[SCM] Lisaac compiler branch, master, updated. 52fb7d86b2e486e6dd8039d4908c30ec5bddea6a

Benoit Sonntag sonntag at icps.u-strasbg.fr
Sat Aug 1 19:44:43 UTC 2009


The following commit has been merged in the master branch:
commit 52fb7d86b2e486e6dd8039d4908c30ec5bddea6a
Author: Benoit Sonntag <sonntag at icps.u-strasbg.fr>
Date:   Sat Aug 1 21:44:33 2009 +0200

    Shorter old representation OK

diff --git a/bin/shorter.c b/bin/shorter.c
index 7f9b2fa..9cf2fbd 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__24R;
-  __CHARACTER *storage__F5R;
+  __INTEGER capacity__ICS;
+  __CHARACTER *storage__RCS;
 };
 __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__QDT;
-  void **storage__1DT;
+  __INTEGER capacity__2GT;
+  void **storage__HHT;
 };
 __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__GFV;
-  __INTEGER capacity__1KV;
-  void **storage__NJV;
+  __INTEGER upper__SIV;
+  __INTEGER capacity__HOV;
+  void **storage__ZMV;
 };
 __ARRAYED_COLLECTIONoITM_TYPE_MONOo ARRAYED_COLLECTIONoITM_TYPE_MONOo_;
 #define ARRAYED_COLLECTIONoITM_TYPE_MONOo__ (&ARRAYED_COLLECTIONoITM_TYPE_MONOo_)
@@ -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__2ZT;
-  void *item__P0T;
-  void *next__H0T;
+  void *key__F5T;
+  void *item__Y5T;
+  void *next__Q5T;
 };
 __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__LZT;
-  __INTEGER count__ICZ;
-  void **buckets__QZT;
+  __INTEGER capacity__U4T;
+  __INTEGER count__HIZ;
+  void **buckets__Z4T;
 };
 __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__ZNO;
+  __CHARACTER *storage__FRO;
 };
 __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__H4OD;
-  __INTEGER capacity__CAPD;
-  void **storage__3APD;
+  __INTEGER upper__VBPD;
+  __INTEGER capacity__QDPD;
+  void **storage__LEPD;
 };
 __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__U3I;
+  __ARRAYED_COLLECTIONoSTRING_CONSTANTo parent_arrayed_collection__ABJ;
 };
 __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__OWR;
-  void *next__0WR;
+  void *item__0ZR;
+  void *next__G0R;
 };
 __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__3VR;
-  __INTEGER count__DXR;
-  void **buckets__CWR;
+  __INTEGER capacity__JZR;
+  __INTEGER count__P0R;
+  void **buckets__OZR;
 };
 __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__0BJ;
+  __POSITION position__GFJ;
 };
 __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__FBU;
+  __CHARACTER style__OGU;
 };
 __NAMED NAMED_;
 #define NAMED__ (&NAMED_)
@@ -256,18 +256,18 @@ typedef struct PROTOTYPE_struct __PROTOTYPE;
 struct PROTOTYPE_struct {
   __NAMED parent_named__5;
   void *source__3BC;
-  void *last_slot__11C;
-  void *type_style__E3C;
-  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;
+  void *last_slot__12C;
+  void *type_style__E4C;
+  void *shortname__AJE;
+  void *default_value__OVE;
+  void *type_c__JXE;
+  __INTEGER index__YOG;
+  void *filename__XRG;
+  void *first_slot__PHZB;
+  void *comment_header__WBRC;
+  void *comment_slot__4UTC;
+  void *idf_generic_list__PNE;
+  void *slot_list__MVS;
 };
 __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__3ZR;
-  void *next__I0R;
+  void *key__J3R;
+  void *next__U3R;
 };
 __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__MZR;
-  __INTEGER count__R0R;
-  void **buckets__RZR;
+  __INTEGER capacity__Y2R;
+  __INTEGER count__33R;
+  void **buckets__32R;
 };
 __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__2CS;
+  __UINTEGER_8 flag__IGS;
 };
 __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__W1R;
-  __INTEGER capacity__Y1R;
-  void **storage__U2R;
+  __INTEGER upper__C5R;
+  __INTEGER capacity__E5R;
+  void **storage__AAS;
 };
 __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__ZKT;
+  void *name__CQT;
 };
 __ENTRY ENTRY_;
 #define ENTRY__ (&ENTRY_)
@@ -351,7 +351,7 @@ __ENTRY ENTRY_;
 #define __ENTRY_UNIX__ 21
 typedef struct ENTRY_UNIX_struct __ENTRY_UNIX;
 struct ENTRY_UNIX_struct {
-  __ENTRY parent_entry__FFD;
+  __ENTRY parent_entry__FGD;
 };
 __ENTRY_UNIX ENTRY_UNIX_;
 #define ENTRY_UNIX__ (&ENTRY_UNIX_)
@@ -360,7 +360,7 @@ __ENTRY_UNIX ENTRY_UNIX_;
 #define __DIRECTORY__ 22
 typedef struct DIRECTORY_struct __DIRECTORY;
 struct DIRECTORY_struct {
-  void *list__UDRD;
+  void *list__CHRD;
 };
 __DIRECTORY DIRECTORY_;
 #define DIRECTORY__ (&DIRECTORY_)
@@ -370,8 +370,8 @@ __DIRECTORY DIRECTORY_;
 typedef struct DIRECTORY_UNIX_struct __DIRECTORY_UNIX;
 struct DIRECTORY_UNIX_struct {
   unsigned long __id;
-  __ENTRY_UNIX parent_entry_unix__GFD;
-  __DIRECTORY parent_directory__HFD;
+  __ENTRY_UNIX parent_entry_unix__GGD;
+  __DIRECTORY parent_directory__HGD;
 };
 __DIRECTORY_UNIX DIRECTORY_UNIX_={__DIRECTORY_UNIX__};
 #define DIRECTORY_UNIX__ (&DIRECTORY_UNIX_)
@@ -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__PAT;
-  void *next__0AT;
-  void *item__DV3;
+  void *key__1DT;
+  void *next__GET;
+  void *item__PY3;
 };
 __HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo_;
 #define HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__ (&HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo_)
@@ -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__45S;
-  __INTEGER count__EJY;
-  void **buckets__DAT;
+  __INTEGER capacity__KDT;
+  __INTEGER count__DPY;
+  void **buckets__PDT;
 };
 __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo_;
 #define HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__ (&HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo_)
@@ -407,14 +407,14 @@ typedef struct ITM_SLOT_struct __ITM_SLOT;
 struct ITM_SLOT_struct {
   unsigned long __id;
   __NAMED parent_named__15;
-  void *id_section__F2C;
-  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;
+  void *id_section__F3C;
+  void *comment__H3OB;
+  void *result_type__PBGC;
+  void *next__HKHC;
+  void *comment_chapter__B4HC;
+  __CHARACTER affect__4CGC;
+  void *argument_list__5GHC;
+  __INTEGER_8 stat_shorter__XNTD;
 };
 __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__BT5B;
-  __INTEGER priority_and_level__VZHC;
-  void *pretty_name__A0HC;
+  __ITM_SLOT parent_itm_slot__NW5B;
+  __INTEGER priority_and_level__D3HC;
+  void *pretty_name__O3HC;
 };
 __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__NYDC;
-  void *type_list__2WFC;
+  void *name__11DC;
+  void *type_list__K0FC;
 };
 __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__VYS;
-  void *item__YPOB;
-  void *next__BZS;
+  void *key__B2S;
+  void *item__ETOB;
+  void *next__N2S;
 };
 __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__EYS;
-  __INTEGER count__KZS;
-  void **buckets__JYS;
+  __INTEGER capacity__Q1S;
+  __INTEGER count__W2S;
+  void **buckets__V1S;
 };
 __HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo_;
 #define HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo__ (&HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo_)
@@ -467,7 +467,7 @@ __HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo HASHED_DICTIONARYoENTRYxABSTRACT_STRI
 #define __LINKED_COLLECTIONoSTRING_CONSTANTo__ 28
 typedef struct LINKED_COLLECTIONoSTRING_CONSTANTo_struct __LINKED_COLLECTIONoSTRING_CONSTANTo;
 struct LINKED_COLLECTIONoSTRING_CONSTANTo_struct {
-  __INTEGER upper__MDD;
+  __INTEGER upper__MED;
 };
 __LINKED_COLLECTIONoSTRING_CONSTANTo LINKED_COLLECTIONoSTRING_CONSTANTo_;
 #define LINKED_COLLECTIONoSTRING_CONSTANTo__ (&LINKED_COLLECTIONoSTRING_CONSTANTo_)
@@ -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__ZTEC;
-  void *first_link__PTEC;
-  void *last_link__YTEC;
-  void *mem_lnk__1TEC;
+  __INTEGER mem_idx__HXEC;
+  void *first_link__3WEC;
+  void *last_link__GXEC;
+  void *mem_lnk__JXEC;
 };
 __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__W1M;
+  __ITM_OBJECT parent_itm_code__C5M;
 };
 __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__J5GC;
-  __INTEGER capacity__L5GC;
-  void **storage__HAHC;
+  __INTEGER upper__XCHC;
+  __INTEGER capacity__ZCHC;
+  void **storage__VDHC;
 };
 __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__AAZB;
+  __ARRAYED_COLLECTIONoITM_ARGUMENTo parent_arrayed_collection__MDZB;
 };
 __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__EHP;
+  void *list_type__QKP;
 };
 __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__XGV;
+  void *value_list__DKV;
 };
 __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__XKFC;
+  void *value__FOFC;
 };
 __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__0AGC;
-  void *item__NBGC;
-  void *next__FBGC;
+  void *key__IEGC;
+  void *item__1EGC;
+  void *next__TEGC;
 };
 __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__X3BC;
-  __INTEGER count__ZOGC;
-  void **buckets__OAGC;
+  __INTEGER capacity__FBCC;
+  __INTEGER count__HSGC;
+  void **buckets__2DGC;
 };
 __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__0JN;
-  void *type_result__EKN;
+  void *type_argument__GNN;
+  void *type_result__QNN;
 };
 __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__OVP;
+  void *name__0YP;
 };
 __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__FPN;
-  void *style__XVP;
+  __ITM_TYPE_SIMPLE parent_itm_type_simple__RSN;
+  void *style__DZP;
 };
 __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__GPN;
-  void *list_type__BWP;
+  __ITM_TYPE_STYLE parent_itm_type_style__SSN;
+  void *list_type__NZP;
 };
 __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__XEHB;
-  void *name__G0HC;
-  void *type__H0HC;
+  __ITM_ARGUMENT parent_itm_argument__DIHB;
+  void *name__U3HC;
+  void *type__V3HC;
 };
 __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__FAFE;
-  void *type__X2PF;
-  void *name__W2PF;
+  __ITM_ARGUMENT parent_itm_argument__TDFE;
+  void *type__4BQF;
+  void *name__3BQF;
 };
 __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__UBE;
+  __ITM_TYPE_SIMPLE parent_itm_type__YEE;
 };
 __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__DBF;
-  __POINTER stream__QHRD;
+  __ENTRY_UNIX parent_entry_unix__HEF;
+  __POINTER stream__4KRD;
 };
 __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__SABC;
-  __INTEGER capacity__UABC;
-  void **storage__QBBC;
+  __INTEGER upper__AEBC;
+  __INTEGER capacity__CEBC;
+  void **storage__4EBC;
 };
 __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__KKE;
+  __ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo parent_arrayed_collection__ONE;
 };
 __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__WBE;
+  __ITM_OBJECT parent_itm_object__0EE;
 };
 __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__ZSPB;
-  void *name__BGFC;
-  void *value__TGFC;
+  __LIP_CODE parent_lip_code__LWPB;
+  void *name__PJFC;
+  void *value__BKFC;
 };
 __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__4Z4B;
-  void *argument__ZLUE;
-  void *name__EMUE;
+  __LIP_CODE parent_lip_code__K34B;
+  void *argument__NQUE;
+  void *name__YQUE;
 };
 __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__HQYC;
-  void *condition__MBQD;
-  void *then__CCQD;
-  void *else__ZCQD;
+  __LIP_CODE parent_lip_code__VTYC;
+  void *condition__0EQD;
+  void *then__QFQD;
+  void *else__HGQD;
 };
 __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__ZQYC;
-  void *message__IQUE;
+  __LIP_CODE parent_lip_code__HUYC;
+  void *message__2UUE;
 };
 __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__XBV;
-  void *next__CCV;
+  void *item__DFV;
+  void *next__OFV;
 };
 __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__OFT;
-  __INTEGER count__UEY;
-  void **buckets__LBV;
+  __INTEGER capacity__0IT;
+  __INTEGER count__AIY;
+  void **buckets__XEV;
 };
 __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__OBE;
+  __ITM_OBJECT parent_itm_object__SEE;
 };
 __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__VFL;
-  __INTEGER capacity__4UT;
-  void **storage__JVT;
+  __INTEGER upper__BJL;
+  __INTEGER capacity__H0T;
+  void **storage__S0T;
 };
 __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__ISF;
+  __ARRAYED_COLLECTIONoITM_CODEo parent_arrayed_collection__MVF;
 };
 __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__ICQD;
-  __INTEGER capacity__GQTD;
-  void **storage__RQTD;
+  __INTEGER upper__WFQD;
+  __INTEGER capacity__UTTD;
+  void **storage__5TTD;
 };
 __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__WMYC;
+  __ARRAYED_COLLECTIONoLIP_CODEo parent_arrayed_collection__EQYC;
 };
 __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__NTRD;
-  void **buckets__STRD;
+  __INTEGER capacity__1WRD;
+  void **buckets__AXRD;
 };
 __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__3NZB;
-  void *left__YXQD;
-  void *right__1XQD;
-  __CHARACTER operator__4XQD;
+  __LIP_CODE parent_lip_code__JRZB;
+  void *left__G1QD;
+  void *right__J1QD;
+  __CHARACTER operator__M1QD;
 };
 __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__MZ4B;
-  void *value__V0QD;
-  __CHARACTER operator__Y0QD;
+  __LIP_CODE parent_lip_code__Y24B;
+  void *value__D4QD;
+  __CHARACTER operator__G4QD;
 };
 __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__EI4F;
+  __INTEGER value__LN4F;
 };
 __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__RNUE;
+  void *value__FSUE;
 };
 __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__WZH;
-  void *name__X0K;
+  __ITM_OBJECT parent_itm_object__C3H;
+  void *name__D4K;
 };
 __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__UYK;
-  __INTEGER capacity__THU;
-  void **storage__4HU;
+  __INTEGER upper__A2K;
+  __INTEGER capacity__2MU;
+  void **storage__HNU;
 };
 __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__1ZH;
+  __ARRAYED_COLLECTIONoITM_LOCALo parent_arrayed_collection__H3H;
 };
 __FAST_ARRAYoITM_LOCALo FAST_ARRAYoITM_LOCALo_;
 #define FAST_ARRAYoITM_LOCALo__ (&FAST_ARRAYoITM_LOCALo_)
@@ -974,8 +974,8 @@ __SHORTER SHORTER_;
 #define __FILE_SYSTEM__ 58
 typedef struct FILE_SYSTEM_struct __FILE_SYSTEM;
 struct FILE_SYSTEM_struct {
-  void *parent_directory__1FD;
-  int parent_directory__2FD;
+  void *parent_directory__1GD;
+  int parent_directory__2GD;
 };
 __FILE_SYSTEM FILE_SYSTEM_;
 #define FILE_SYSTEM__ (&FILE_SYSTEM_)
@@ -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__2MBC;
-  void *item__J4GD;
-  void *next__HNBC;
+  void *key__KQBC;
+  void *item__XBHD;
+  void *next__VQBC;
 };
 __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__LMBC;
-  __INTEGER count__QNBC;
-  void **buckets__QMBC;
+  __INTEGER capacity__ZPBC;
+  __INTEGER count__4QBC;
+  void **buckets__4PBC;
 };
 __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__BAU;
-  void **storage__OQT;
+  __INTEGER capacity__KFU;
+  void **storage__XVT;
 };
 __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__HXHD;
-  void *next__UMOD;
+  void *item__V0HD;
+  void *next__CQOD;
 };
 __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__YBS;
+  __INTEGER capacity__EFS;
 };
 __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__YM3D;
+  __INTEGER upper__GQ3D;
 };
 __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__TDRD;
-  __INTEGER mem_idx__IHWE;
-  void *first_link__BHWE;
-  void *mem_lnk__JHWE;
-  void *last_link__KHWE;
+  __LINKED_COLLECTIONoENTRYo parent_linked_collection__BHRD;
+  __INTEGER mem_idx__2LWE;
+  void *first_link__VLWE;
+  void *mem_lnk__3LWE;
+  void *last_link__4LWE;
 };
 __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__T0WE;
-  void *next__PWFF;
+  void *item__P5WE;
+  void *next__V1FF;
 };
 __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__BSV;
-  __INTEGER capacity__2VV;
-  void **storage__XWV;
+  __INTEGER upper__NVV;
+  __INTEGER capacity__IZV;
+  void **storage__D0V;
 };
 __ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo_;
 #define ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo__ (&ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo_)
@@ -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__NRP;
+  __ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo parent_arrayed_collection__ZUP;
 };
 __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__42V;
-  void *next__K3V;
+  void *item__KAW;
+  void *next__WAW;
 };
 __HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo_;
 #define HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo__ (&HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo_)
@@ -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__N2V;
-  __INTEGER count__BFW;
-  void **buckets__S2V;
+  __INTEGER capacity__Z5V;
+  __INTEGER count__NIW;
+  void **buckets__45V;
 };
 __HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo_;
 #define HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo__ (&HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo_)
@@ -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__0GP;
-  __INTEGER capacity__ZYV;
-  void **storage__EZV;
+  __INTEGER upper__GKP;
+  __INTEGER capacity__F2V;
+  void **storage__Q2V;
 };
 __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__QGP;
+  __ARRAYED_COLLECTIONoITM_TYPE_MULTIo parent_arrayed_collection__2JP;
 };
 __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__MJN;
-  __INTEGER capacity__CHV;
-  void **storage__NHV;
+  __INTEGER upper__YMN;
+  __INTEGER capacity__OKV;
+  void **storage__ZKV;
 };
 __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__CJN;
+  __ARRAYED_COLLECTIONoITM_TYPE_BLOCKo parent_arrayed_collection__OMN;
 };
 __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__SUF;
+  __ITM_CODE parent_itm_code__WXF;
 };
 __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__JOO;
+  __ITM_CONSTANT parent_itm_constant__VRO;
 };
 __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__1OO;
+  __ITM_CONSTANT parent_itm_constant__HSO;
 };
 __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__NPO;
+  __ITM_CONSTANT parent_itm_constant__ZSO;
 };
 __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__4PO;
+  __ITM_CONSTANT parent_itm_constant__KTO;
 };
 __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__EVP;
-  __INTEGER capacity__P4V;
-  void **storage__04V;
+  __INTEGER upper__QYP;
+  __INTEGER capacity__1BW;
+  void **storage__GCW;
 };
 __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__0UP;
+  __ARRAYED_COLLECTIONoITM_TYPE_GENERICo parent_arrayed_collection__GYP;
 };
 __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__TLR;
-  __INTEGER capacity__XIW;
-  void **storage__CJW;
+  __INTEGER upper__5OR;
+  __INTEGER capacity__DMW;
+  void **storage__OMW;
 };
 __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__JLR;
+  __ARRAYED_COLLECTIONoITM_TYPE_STYLEo parent_arrayed_collection__VOR;
 };
 __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__R3E;
+  __ITM_CODE parent_itm_code__VAF;
 };
 __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__NYT;
-  __INTEGER capacity__YFU;
-  void **storage__DGU;
+  __INTEGER upper__W3T;
+  __INTEGER capacity__BLU;
+  void **storage__MLU;
 };
 __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__BQI;
+  __ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo parent_arrayed_collection__NTI;
 };
 __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__MTT;
-  __INTEGER capacity__42T;
-  void **storage__03T;
+  __INTEGER upper__VYT;
+  __INTEGER capacity__HCU;
+  void **storage__DDU;
 };
 __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__X2H;
+  __ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo parent_arrayed_collection__DAI;
 };
 __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__WPU;
-  __INTEGER capacity__1RU;
-  void **storage__GSU;
+  __INTEGER upper__5UU;
+  __INTEGER capacity__EXU;
+  void **storage__PXU;
 };
 __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__C3K;
+  __ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo parent_arrayed_collection__OAL;
 };
 __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__DBJ;
+  __ITM_CODE parent_itm_code__PEJ;
 };
 __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__HTF;
+  __ITM_CODE parent_itm_constant__LWF;
 };
 __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__TUF;
+  __ITM_CONSTANT parent_itm_constant__XXF;
 };
 __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__YBJ;
+  __ITM_CODE parent_itm_code__EFJ;
 };
 __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__ZBJ;
+  __ITM_WRITE parent_itm_write__FFJ;
 };
 __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__QCJ;
+  __ITM_WRITE parent_itm_write__2FJ;
 };
 __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__3EJ;
+  __ITM_CODE parent_itm_code__JIJ;
 };
 __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__1FJ;
+  __ITM_WRITE parent_itm_write__HJJ;
 };
 __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__3CL;
-  void *name__IGL;
+  __ITM_CODE parent_itm_code__JGL;
+  void *name__UJL;
 };
 __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__DGL;
+  __ITM_READ parent_itm_read__PJL;
 };
 __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__QIL;
+  __ITM_READ parent_itm_read__2LL;
 };
 __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__4ZL;
+  __ITM_CODE parent_itm_code__K3L;
 };
 __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__S1M;
+  __ITM_CODE parent_itm_code__44M;
 };
 __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__T1M;
-  __BOOLEAN is_persistant__QEN;
+  __ITM_EXTERN parent_itm_extern__54M;
+  __BOOLEAN is_persistant__2HN;
 };
 __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__LMDC;
+  void *list__ZPDC;
 };
 __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__YCN;
+  __ITM_EXTERN parent_itm_extern__EGN;
 };
 __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__OAO;
+  __ITM_READ parent_itm_read__0DO;
 };
 __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__2EQF;
-  void *next__IFQF;
+  void *item__DKQF;
+  void *next__PKQF;
 };
 __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__LEQF;
-  __INTEGER count__CJQF;
-  void **buckets__QEQF;
+  __INTEGER capacity__SJQF;
+  __INTEGER count__JOQF;
+  void **buckets__XJQF;
 };
 __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__RCXE;
-  __INTEGER capacity__TGXE;
-  void **storage__4GXE;
+  __INTEGER upper__NHXE;
+  __INTEGER capacity__PLXE;
+  void **storage__0LXE;
 };
 __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__UTSE;
+  __ARRAYED_COLLECTIONoLIP_INTEGERo parent_arrayed_collection__IYSE;
 };
 __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__VSPF;
-  __INTEGER capacity__3ZPF;
-  void **storage__I0PF;
+  __INTEGER upper__2XPF;
+  __INTEGER capacity__E5PF;
+  void **storage__P5PF;
 };
 __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__PYFF;
+  __ARRAYED_COLLECTIONoLIP_STRINGo parent_arrayed_collection__V3FF;
 };
 __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__1BQD;
+  __BOOLEAN value__JFQD;
 };
 __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__4EFE;
-  void *value__DWUE;
+  __LIP_CODE parent_lip_code__MIFE;
+  void *value__X0UE;
 };
 __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__0OTD;
-  __INTEGER capacity__1AUD;
-  void **storage__XBUD;
+  __INTEGER upper__ISTD;
+  __INTEGER capacity__JEUD;
+  void **storage__FFUD;
 };
 __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__SLID;
+  __ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo parent_arrayed_collection__APID;
 };
 __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__51PF;
-  __INTEGER capacity__GCQF;
-  void **storage__RCQF;
+  __INTEGER upper__GBQF;
+  __INTEGER capacity__NHQF;
+  void **storage__YHQF;
 };
 __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__CVUE;
+  __ARRAYED_COLLECTIONoLIP_SLOT_DATAo parent_arrayed_collection__WZUE;
 };
 __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__MVKF;
-  __INTEGER capacity__H3PF;
-  void **storage__S3PF;
+  __INTEGER upper__S0KF;
+  __INTEGER capacity__OCQF;
+  void **storage__ZCQF;
 };
 __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__CVKF;
+  __ARRAYED_COLLECTIONoLIP_SLOT_CODEo parent_arrayed_collection__I0KF;
 };
 __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__ZOEC;
-  void *item__MPEC;
-  void *next__EPEC;
+  void *key__HSEC;
+  void *item__0SEC;
+  void *next__SSEC;
 };
 __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__IOEC;
-  __INTEGER count__KYFC;
-  void **buckets__NOEC;
+  __INTEGER capacity__WREC;
+  __INTEGER count__Y1FC;
+  void **buckets__1REC;
 };
 __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__SREC;
-  void *key__5QEC;
-  void *next__KREC;
+  void *item__AVEC;
+  void *key__NUEC;
+  void *next__YUEC;
 };
 __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__OQEC;
-  __INTEGER count__E1FC;
-  void **buckets__TQEC;
+  __INTEGER capacity__2TEC;
+  __INTEGER count__S4FC;
+  void **buckets__BUEC;
 };
 __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__1SGC;
-  __INTEGER capacity__DKHC;
-  void **storage__OKHC;
+  __INTEGER upper__JWGC;
+  __INTEGER capacity__RNHC;
+  void **storage__2NHC;
 };
 __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__WS1B;
+  __ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo parent_arrayed_collection__CW1B;
 };
 __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__5JTD;
-  __INTEGER capacity__E3VE;
-  void **storage__HKWE;
+  __INTEGER upper__NNTD;
+  __INTEGER capacity__YBWE;
+  void **storage__1OWE;
 };
 __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__CJTD;
+  __ARRAYED_COLLECTIONoITM_SLOTo parent_arrayed_collection__QMTD;
 };
 __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__GUH;
-__UINTEGER_32 nb_page__LQJ;
-__UINTEGER_64 capacity_max__U34;
-void *first_free__BCVB;
-__INTEGER type_error__FMG;
-void *msg_err__GMG;
+__POINTER begin_memory__SXH;
+__UINTEGER_32 nb_page__XTJ;
+__UINTEGER_64 capacity_max__CD5;
+void *first_free__NFVB;
+__INTEGER type_error__RPG;
+void *msg_err__SPG;
 void *prototype_list__BJ;
-void *prototype_dico__TQS;
-void *list_tmp__DJTD;
-void *str_tmp__UJ4E;
-void *str_tmp2__WL4E;
-void *str_tmp3__WP4E;
+void *prototype_dico__5TS;
+void *list_tmp__RMTD;
+void *str_tmp__QO4E;
+void *str_tmp2__SQ4E;
+void *str_tmp3__SU4E;
 void *list_id__CBB;
-void *string_tmp__AFD;
-void *string_tmp2__MZAC;
-void *alias__RFD;
-void *string_tmp3__SZAC;
-void *bucket_name__BSOB;
-void *bucket_list__2TOB;
+void *string_tmp__AGD;
+void *string_tmp2__Y2AC;
+void *alias__RGD;
+void *string_tmp3__42AC;
+void *bucket_name__NVOB;
+void *bucket_list__IXOB;
 void *short_dico__QD;
 void *object__ZBC;
 void *source__5BC;
@@ -1902,46 +1902,46 @@ __INTEGER pos_col__HCC;
 __BOOLEAN is_active_short__OCC;
 __INTEGER short_derive__PCC;
 void *short_local__XCC;
-void *last_comment_extern__JYC;
-void *last_string__V0C;
-void *last_section__E1C;
-void *token__TCD;
-__BOOLEAN skip_comment__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;
+void *last_comment_extern__JZC;
+void *last_string__V1C;
+void *last_section__E2C;
+void *token__TDD;
+__BOOLEAN skip_comment__2AE;
+void *last_comment_slot__OBE;
+__INTEGER begin_position__ECE;
+__BOOLEAN is_parameter_type__DLE;
+void *last_group__WVF;
+__INTEGER old_position__2SI;
+__INTEGER old_pos_cur__4SI;
+__INTEGER old_pos_line__ATI;
+__INTEGER old_pos_col__CTI;
+__INTEGER old_short_derive__ETI;
+__INTEGER_64 last_integer__JSO;
+void *last_slot__GYOB;
+void *dico__3JP;
+void *dico__PMN;
+void *type_void__ZXF;
+void *dico__LVI;
+void *type_self__XUN;
+void *type_null__PVN;
+void *dico__WOR;
+void *dico__HYP;
+void *list_data__WRNC;
+void *stack__XZUE;
+void *list_method__J0KF;
+void *storage__JYSE;
+void *storage__W3FF;
 __UINTEGER_32 clone_allocation_size__NTB;
-__POINTER get_begin_memory__SAQB;
+__POINTER get_begin_memory__EEQB;
 void *list__FK;
-void *free__FLP;
+void *free__ROP;
 void *string_tmp__VH;
 void *output_code__SI;
-void *string_tmp3__0SD;
-void *string_tmp4__2SD;
-void *output_decl__UDE;
-void *string_tmp2__O4I;
-void *path_file__04WF;
+void *string_tmp3__2TD;
+void *string_tmp4__4TD;
+void *output_decl__YGE;
+void *string_tmp2__0BJ;
+void *path_file__BEXF;
 __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__GTX;
+void *string_tmp__SWX;
 __INTEGER index_count__P5;
-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;
+void *free_list__0UP;
+void *empty_list__BWP;
+void *bucket__MWP;
+void *free_list__OTI;
+void *free_list__EAI;
+void *free_list__PAL;
+void *empty_list__OMMF;
+void *bucket__YMMF;
+void *true__FXLF;
+void *free_list__BPID;
+__INTEGER last_integer__PYUE;
+void *last_string__BZUE;
+__BOOLEAN push_back_flag__VYMF;
+__CHARACTER memory__UEMF;
+void *free_list__DW1B;
 
 //==========================//
 // STRING CONSTANT          //
@@ -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__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 __POINTER new_lab__FTJ(__UINTEGER_32 t__HTJ);
+static void** create__PHRB(__INTEGER nb_elements__RHRB);
+static void add_last__GOT(__STRING *Self__HOT,__CHARACTER ch__IOT);
+static void add_last__ISV(__FAST_ARRAYoSTRINGo *Self__JSV,void *element__KSV);
+static __INTEGER prime_number_ceiling__541(__INTEGER integer__B51);
+static void** create__BE4(__INTEGER nb_elements__DE4);
+static void** create__5LTC(__INTEGER nb_elements__BMTC);
+static void** create__2GSB(__INTEGER nb_elements__4GSB);
+static void** create__LI4(__INTEGER nb_elements__NI4);
+static void** create__UZ2(__INTEGER nb_elements__WZ2);
+static void** create__CLRB(__INTEGER nb_elements__ELRB);
+static __FAST_ARRAYoITM_TYPE_MONOo* create_with_capacity__YFR(__INTEGER new_count__0FR);
+static void** create__D0BB(__INTEGER nb_elements__F0BB);
+static void** create__CNXB(__INTEGER nb_elements__ENXB);
+static void** create__3VWB(__INTEGER nb_elements__5VWB);
+static void** create__2TXB(__INTEGER nb_elements__4TXB);
+static void** create__5J5(__INTEGER nb_elements__BK5);
+static void fast_put__to__ORZ(__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *Self__PRZ,void *v__QRZ,void *k__RRZ);
+static void** create__IJYB(__INTEGER nb_elements__KJYB);
+static void* get__2UI(void *n__4UI);
+static void** create__AJQB(__INTEGER nb_elements__CJQB);
+static void** create__Q3PB(__INTEGER nb_elements__S3PB);
+static void** create__M5ZB(__INTEGER nb_elements__O5ZB);
+static __FAST_ARRAYoSTRING_CONSTANTo* create_with_capacity__ZKRC(__INTEGER new_count__1KRC);
+static void** create__LLUF(__INTEGER nb_elements__NLUF);
+static void** create__YNGF(__INTEGER nb_elements__0NGF);
+static void** create__GPYF(__INTEGER nb_elements__IPYF);
+static void** create__C2IE(__INTEGER nb_elements__E2IE);
+static void* new_page__YC5();
+static void to_busy__index__MWFC(__MEMORY *Self__NWFC,__UINTEGER_32 sz__OWFC,__UINTEGER_32 idx__PWFC);
+static void** create__IAYC(__INTEGER nb_elements__KAYC);
+static void** create__LFYC(__INTEGER nb_elements__NFYC);
+static void** create__DQBD(__INTEGER nb_elements__FQBD);
+static void** create__QHFF(__INTEGER nb_elements__SHFF);
+static void** create__JK2(__INTEGER nb_elements__LK2);
+static void add__YYR(__HASHED_SEToABSTRACT_STRINGo *Self__ZYR,void *e__0YR);
 static void* operator__name__GHB(void *op__JHB);
-static void print__DID(__STRING_CONSTANT *Self__EID);
+static void print__DJD(__STRING_CONSTANT *Self__EJD);
 static void* get__YWB(void *str__0WB);
-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__GZAC(void *p__IZAC);
-static void put_string__L0F(void *s__N0F);
+static void copy__JDS(__STRING *Self__KDS,void *other__LDS);
+static void append__ROS(__STRING *Self__SOS,void *other__TOS);
+static void* parent_directory__1FD();
+static void* get_entry__S2AC(void *p__U2AC);
+static void put_string__P3F(void *s__R3F);
 static __PROTOTYPE* create__name__generic_count__JBC(void *f__LBC,void *n__MBC);
-static __BOOLEAN read_space__KSD();
-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 __BOOLEAN read_space__MTD();
+static __BOOLEAN read_identifier__QBL();
+static __POSITION current_position__EZF();
+static void put_error__text__NPG(__INTEGER type__PPG,void *txt__QPG);
+static void put_position__XQG(__POSITION Self__YQG);
+static __BOOLEAN read_symbol__SYJ(void *st__UYJ);
+static __BOOLEAN read_short_elt__VLKB();
+static void fast_put__to__I2R(__HASHED_DICTIONARYoTYPExSTRING_CONSTANTo *Self__J2R,void *k__L2R);
 static __TYPE_FULL* create__with__CRB(void *typ__ERB,__UINTEGER_8 code__FRB);
-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** create__MZNB(__INTEGER nb_elements__OZNB);
+static void add_last__44R(__FAST_ARRAYoTYPE_IDo *Self__54R,void *element__A5R);
+static __BOOLEAN open__TGRD(__DIRECTORY_UNIX *Self__UGRD);
+static void check_in__begin__IUQC(void *entry__KUQC,__INTEGER n__LUQC);
+static void* add_ext__PCF(void *n__RCF);
 static void save_file__with__3DC(void *n__5DC,void *buf__AEC);
-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 resize__AYZ(__STRING *Self__BYZ,__INTEGER new_count__CYZ);
+static void move__to__by__0YCC(__CHARACTER *Self__1YCC,__INTEGER lower__2YCC,__INTEGER upper__3YCC,__INTEGER offset__4YCC);
+static __BOOLEAN __infix_equal_equal__GAEB(__STRING_CONSTANT *Self__HAEB,void *other__IAEB);
+static void* at__0N4(__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__1N4,void *k__2N4);
 static void go_on__SBC(void *obj__UBC);
-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__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);
+static void put__to__like__Q3XD(void *tok__S3XD,void *buf__T3XD,void *key__U3XD);
+static void shorter_get_all_slot_in__S5XD(__PROTOTYPE *Self__T5XD,void *lst__U5XD);
+static void pretty_name_in__LW4F(__ITM_SLOT *Self__MW4F,void *buffer__NW4F);
+static void pretty_name_in__AY4F(__ITM_SLOT_OPERATOR *Self__BY4F,void *buffer__CY4F);
+static void get_all_comment_slot__in__QK4E(__PROTOTYPE *Self__RK4E,void *n__SK4E,void *buf__TK4E);
+static void shorter_comment__in__light__DO4E(void *str__FO4E,void *buf__GO4E,__BOOLEAN is_light__HO4E);
+static void append_in__RKH(__UINTEGER_32 Self__SKH,void *buffer__TKH);
+static void append_in__YZ4F(__SECTION_ *Self__ZZ4F,void *buf__0Z4F);
+static void shorter_profile_in__004F(__ITM_SLOT *Self__104F,void *buf__204F);
+static void shorter_profile_in__X14F(__ITM_SLOT_OPERATOR *Self__Y14F,void *buf__Z14F);
+static __CHARACTER* create__JMEB(__INTEGER nb_elements__LMEB);
+static __POINTER realloc_dynamic__old_size__new_size__ZHLC(__POINTER p__1HLC,__UINTEGER_32 old_sz__2HLC,__UINTEGER_32 new_sz__3HLC);
+static void** create__JDRB(__INTEGER nb_elements__LDRB);
+static void* fast_reference_at__F4T(__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *Self__G4T,void *k__H4T);
+static void** create__BMHE(__INTEGER nb_elements__DMHE);
+static __BOOLEAN has__DQW(__HASHED_SEToABSTRACT_STRINGo *Self__EQW,void *e__FQW);
+static void increase_capacity__ISNB(__HASHED_SEToABSTRACT_STRINGo *Self__JSNB);
+static void put_string__DJF(void *s__FJF);
+static __BOOLEAN fast_has__WAY(__HASHED_SEToABSTRACT_STRINGo *Self__XAY,void *e__YAY);
+static void* physical_get_entry__UDF(void *new_path__WDF);
+static void put__to__B1S(__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *Self__C1S,void *v__D1S,void *k__E1S);
+static void reduce_path__YAIC(void *st__0AIC);
+static void* reference_at__1Y0C(__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *Self__2Y0C,void *k__3Y0C);
+static void* physical_get_entry__P10C(void *new_path__R10C);
+static void** create__M31C(__INTEGER nb_elements__O31C);
+static void** create__VUSC(__INTEGER nb_elements__XUSC);
+static void short__token__to__YCD(void *key__0CD,__INTEGER beg__1CD,__INTEGER end__2CD);
+static __INTEGER first_substring_index__3ZZE(__STRING *Self__4ZZE);
+static __BOOLEAN read_string__1FQ();
+static void reduce_path__VN3E(void *st__XN3E);
+static void* item__A3PE(__DIRECTORY_UNIX *Self__B3PE,__INTEGER i__C3PE);
+static void* item__Q2ND(__LINKED_LISToSTRING_CONSTANTo *Self__R2ND,__INTEGER i__S2ND);
+static void** create__123(__INTEGER nb_elements__323);
+static __BOOLEAN read_word__LRF(void *st__NRF);
+static __BOOLEAN read_slot_header__NEE(__BOOLEAN first__PEE);
+static void* get_name__EVOB(void *n__GVOB);
+static void* read_type_list__YMO(__PARSER *Self__ZMO,__BOOLEAN is_section__0MO);
+static __INTEGER hash_code__X50(__FAST_ARRAYoITM_TYPE_MONOo *Self__Y50);
+static __CHARACTER read_style__STF();
+static __FAST_ARRAYoITM_ARGUMENTo* create_with_capacity__4M5B(__INTEGER new_count__AN5B);
+static void* read_loc_arg__with_self__SEHB(__PARSER *Self__TEHB,__BOOLEAN mute__UEHB,__BOOLEAN self_first__VEHB);
+static void* read_slot_operator__EW5B(void *list_arg__GW5B);
+static void add_last__TCHC(__FAST_ARRAYoITM_ARGUMENTo *Self__UCHC,void *element__VCHC);
+static void* read_slot_keyword__R15B(void *list_arg__T15B);
+static void** create__VUBD(__INTEGER nb_elements__XUBD);
+static void set_argument_list__OFHC(__ITM_SLOT *Self__PFHC,void *p__QFHC);
+static __ITM_TYPE_MULTI* get__SJP(void *lt__UJP);
+static void* read_type__WCM(__PARSER *Self__XCM,__BOOLEAN is_local__YCM);
+static void set_result_type__FAGC(__ITM_SLOT *Self__GAGC,void *t__HAGC);
+static void* read_contract__CVF(__PARSER *Self__DVF);
+static void* read_expr__XAJ(__PARSER *Self__YAJ);
+static void set_value__type__SIHC(__ITM_SLOT *Self__TIHC,void *e__UIHC,void *p__VIHC);
+static __POSITION position__SE5B(__ITM_EXPRESSION *Self__TE5B);
+static __POSITION position__4LHC(__ITM_RESULT *Self__5LHC);
+static void fast_put__to__0QGC(__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *Self__1QGC,void *v__2QGC,void *k__3QGC);
+static void* fast_reference_at__JDGC(__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *Self__KDGC,void *k__LDGC);
+static void* fast_reference_at__TLNE(__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__ULNE,void *k__VLNE);
+static void append_in__IIPD(__ITM_TYPE_BLOCK *Self__JIPD,void *buffer__KIPD);
+static void append_in__MJPD(__ITM_TYPE_GENERIC *Self__NJPD,void *buffer__OJPD);
+static void put__to__like__PLBG(void *tok__RLBG,void *buf__SLBG,void *key__TLBG);
+static void shorter_in__QIBG(__ITM_ARG *Self__RIBG,void *buf__SIBG);
+static void shorter_in__HJBG(__ITM_ARGS *Self__IJBG,void *buf__JJBG);
+static void shorter_in__ASDG(__ITM_TYPE_PARAMETER *Self__BSDG,void *buf__CSDG);
+static void shorter_in__RSDG(__ITM_TYPE_SIMPLE *Self__SSDG,void *buf__TSDG);
+static void shorter_raw_in__S0FG(__ITM_TYPE_MULTI *Self__T0FG,void *buf__U0FG);
+static void shorter_in__CTDG(__ITM_TYPE_BLOCK *Self__DTDG,void *buf__ETDG);
+static void shorter_in__KUDG(__ITM_TYPE_GENERIC *Self__LUDG,void *buf__MUDG);
+static void put__to__like__OYFG(void *tok__QYFG,void *buf__RYFG,void *key__SYFG);
+static void put__to__like__YYDG(void *tok__0YDG,void *buf__1YDG,void *key__2YDG);
+static void set_path__1PT(__DIRECTORY_UNIX *Self__2PT,void *n__3PT);
+static void set_path__WQT(__FILE_UNIX *Self__XQT,void *n__YQT);
+static void insert_string__to__CYU(__STRING *Self__DYU,void *s__EYU,__INTEGER i__FYU);
+static void read_escape_character__G4KF();
+static __BOOLEAN read_cap_identifier__B1J();
+static void add_last__2DBC(__FAST_ARRAYoITM_TYPE_PARAMETERo *Self__3DBC,void *element__4DBC);
+static __BOOLEAN read_external__QTO();
+static void* read_expr_primary__Y4M(__PARSER *Self__Z4M);
+static __BOOLEAN read_integer__Q2P();
+static void* readlip_expr__LVPB();
+static void run__JJFC(__LIP_AFFECT *Self__KJFC);
+static void run__FQUE(__LIP_CALL *Self__GQUE);
+static void run__WEQD(__LIP_IF *Self__XEQD);
+static void run__ZUUE(__LIP_PRINT *Self__0UUE);
+static void add_last__COV(__FAST_ARRAYoITM_TYPE_MONOo *Self__DOV,void *element__EOV);
+static void* alias__WVP(void *tmp__YVP);
+static void add__MMHB(__HASHED_SEToSTRING_CONSTANTo *Self__NMHB,void *e__OMHB);
+static void add_last__LDPD(__FAST_ARRAYoSTRING_CONSTANTo *Self__MDPD,void *element__NDPD);
+static void free__EV5(void *tmp__GV5);
+static void free__MNQ(void *tmp__ONQ);
+static __INTEGER hash_code__TTRF(__FAST_ARRAYoSTRING_CONSTANTo *Self__UTRF);
+static void copy__44RD(__FAST_ARRAYoSTRING_CONSTANTo *Self__54RD,void *other__A5RD);
+static __BOOLEAN read_operator__0NM();
+static void* operator__name__NEO(void *typ__PEO,void *op__QEO);
+static void append_in__1KBC(__ITM_TYPE_MULTI *Self__2KBC,void *buffer__3KBC);
+static void* read_prototype__XON(__PARSER *Self__YON,void *styl__ZON);
+static void read_def_local__A3H(__PARSER *Self__B3H);
+static __FAST_ARRAYoITM_CODEo* create_with_capacity__LXI(__INTEGER new_count__NXI);
+static void add_last__25U(__FAST_ARRAYoITM_CODEo *Self__35U,void *element__45U);
+static void* copy__TBI(void *tmp__VBI);
+static __BOOLEAN fast_has__FEV(__HASHED_SEToSTRING_CONSTANTo *Self__GEV,void *e__HEV);
+static void restore_context__YEL();
+static void* read_expr_message__5WL(__PARSER *Self__AXL);
+static void free__RXI(void *tmp__TXI);
+static void display_raw__1OIC(__ITM_TYPE_MULTI *Self__2OIC,void *buffer__3OIC);
+static void put__to__like__0PGG(void *tok__2PGG,void *buf__3PGG,void *key__4PGG);
+static void put__to__like__TWDG(void *tok__VWDG,void *buf__WWDG,void *key__XWDG);
+static void put__to__like__MTFG(void *tok__OTFG,void *buf__PTFG);
+static void put__to__like__5VFG(void *tok__BWFG,void *buf__CWFG,void *key__DWFG);
+static __BOOLEAN is_hexadecimal_digit__UPJE(__CHARACTER Self__VPJE);
+static void* read_constant__LRO();
+static void* read_group__TBHB(__PARSER *Self__UBHB);
+static void* readlip_expr_operator__ZPZB(__PARSER *Self__0PZB);
+static __FAST_ARRAYoLIP_CODEo* create_with_capacity__4UKD(__INTEGER new_count__AVKD);
+static void add_last__CNUD(__FAST_ARRAYoLIP_CODEo *Self__DNUD,void *element__ENUD);
+static void* copy__DQID(void *tmp__FQID);
+static void* fast_reference_at__MWRD(__HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo *Self__NWRD,void *k__OWRD);
+static void* run_expr__A1QD(__LIP_BINARY *Self__B1QD);
+static void* run_expr__53QD(__LIP_UNARY *Self__A4QD);
+static void* run_expr__XWUE(__LIP_CALL *Self__YWUE);
+static void* get__5XSE(__LIP_INTEGER *Self__AYSE,__INTEGER i__BYSE);
+static void* get__M3FF(__LIP_STRING *Self__N3FF,void *str__O3FF);
+static void free__DC4F(__LIP_INTEGER *Self__EC4F);
+static void free__RGIG(__LIP_STRING *Self__SGIG);
+static void load_directory__is_recursive__RCXF(__LIP_CALL *Self__SCXF,void *path__TCXF,__BOOLEAN is_rec__UCXF);
+static void append_in__LNIG(__LIP_STRING *Self__MNIG,void *str__NNIG);
+static void print_positif__1FLG(__INTEGER Self__2FLG);
+static __BOOLEAN has__3LMB(__HASHED_SEToSTRING_CONSTANTo *Self__4LMB,void *e__5LMB);
+static __FAST_ARRAYoITM_LOCALo* create_with_capacity__5KK(__INTEGER new_count__BLK);
+static void add_last__N2U(__FAST_ARRAYoITM_LOCALo *Self__O2U,void *element__P2U);
+static void free__FLK(void *tmp__HLK);
+static void* copy__O5J(void *tmp__Q5J);
+static void** create__3UQB(__INTEGER nb_elements__5UQB);
+static void* read_send_msg__24N(__PARSER *Self__34N,void *first_arg__44N);
+static void* readlip_expr_cmp__N21B(__PARSER *Self__O21B);
+static void** create__OWIE(__INTEGER nb_elements__QWIE);
+static void** create__3SQB(__INTEGER nb_elements__5SQB);
+static void* read_argument__DPP(__PARSER *Self__EPP);
+static void* readlip_expr_binary__KP3B(__PARSER *Self__LP3B);
+static void* readlip_expr_unary__L14B(__PARSER *Self__M14B);
+static void* readlip_expr_base__BHFE(__PARSER *Self__CHFE);
 
 //==========================//
 // SOURCE CODE              //
@@ -2663,440 +2663,440 @@ static void* readlip_expr_base__TDFE(__PARSER *Self__UDFE);
 
 int main(int argc,char **argv)
 {
-  void *str__QHD,*cmd__HZ;
-  __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 *str__QID,*cmd__HZ;
+  __INTEGER new_count__3QKH,typ_id__WQKH,Self__SIF,limit_up__TIF;
+  __INTEGER idx__IOIH,i__QOEB,typ_id__EWG,new_capacity__4MY;
+  __INTEGER typ_id__Q4DB,new_capacity__SYJC,typ_id__DPJ,typ_id__UPH;
+  __INTEGER new_capacity__4OY,typ_id__BPC,new_capacity__ILX,typ_id__X0Q;
+  __INTEGER typ_id__UER,new_capacity__CJ1,typ_id__ETQ,typ_id__K1O;
+  __INTEGER typ_id__R3Q,typ_id__4MK,new_capacity__CIZ,typ_id__BXQ;
+  __INTEGER typ_id__3VR,typ_id__1JK,typ_id__EAK,typ_id__4LM;
+  __INTEGER typ_id__5HOF,new_capacity__0YRF,typ_id__CAG,typ_id__3UTE;
+  __INTEGER typ_id__SRMF,typ_id__23NF,typ_id__2XMD,typ_id__TZED;
+  __INTEGER new_capacity__IEXD,Self__LOYE,typ_id__YYNF,Self__NOAG;
+  __INTEGER typ_id__VJNF,Self__GNAG,typ_id__X4YB,new_capacity__IJOC;
+  __INTEGER typ_id__2BZB,new_capacity__DNOC,typ_id__WL5B,typ_id__OCIE;
+  __INTEGER typ_id__ZUB,new_capacity__E0W,j__IZ,idx__NLC,typ_id__NOIH;
+  __INTEGER typ_id__UHKB,result__XOIH,__tmp__ZOIH,Self__0OIH;
+  __INTEGER result__2OIH,__tmp__4OIH,Self__5OIH,idx__IQEB,idx__LJZB;
+  __INTEGER new_capacity__MJZB,i__NJZB,result__BPIH,__tmp__DPIH;
+  __INTEGER Self__EPIH,typ_id__0LZB,typ_id__IPIH,typ_id__SPIH;
+  __INTEGER typ_id__2PIH,typ_id__JTED,typ_id__CZB,Self__0OWD;
+  __INTEGER typ_id__E3B,typ_id__GQIH,typ_id__W4B,result__QQIH;
+  __INTEGER __tmp__SQIH,Self__TQIH,result__VQIH,__tmp__XQIH,Self__YQIH;
+  __INTEGER result__4QIH,__tmp__ARIH,Self__BRIH,result__DRIH;
+  __INTEGER __tmp__FRIH,Self__GRIH,result__MRIH,__tmp__ORIH,Self__PRIH;
+  __INTEGER result__RRIH,__tmp__TRIH,Self__URIH,i__3EFH,j__5EFH;
+  __INTEGER Self__0NHH,result__WRIH,__tmp__YRIH,Self__ZRIH,result__5RIH;
+  __INTEGER __tmp__BSIH,Self__CSIH,result__ESIH,__tmp__GSIH,Self__HSIH;
+  __INTEGER i__JFFH,j__LFFH,Self__GOHH,result__JSIH,__tmp__LSIH;
+  __INTEGER Self__MSIH,result__OSIH,__tmp__QSIH,Self__RSIH,i1__J5KH;
+  __INTEGER i2__K5KH,__tmp__VSIH,Self__XSIH,result__2SIH,len__BTIH;
+  __INTEGER __tmp__CTIH,__tmp__ETIH,Self__FTIH,result__ETC,n__UOHH;
+  __INTEGER Self__O5KH,Self__M4QC,limit_up__N4QC,__tmp__5FYD,Self__1F5D;
+  __INTEGER i__T5KH,i__Y5KH,__tmp__YKYD,Self__NG5D,i__35KH,i__CALH;
+  __INTEGER i__HALH,__tmp__PNTD,Self__IPYD,__tmp__HBRE,Self__RJSE;
+  __INTEGER i__MALH,i__RALH,__tmp__AQYD,Self__IH5D,__tmp__2SYD;
+  __INTEGER Self__XH5D,i__WALH,__tmp__EPTD,Self__PVYD,__tmp__AGRE;
+  __INTEGER Self__DKSE,__tmp__EQTD,Self__4VYD;
+  __POINTER ptr__VQKH,ptr_table__5QKH,next__4QKH,result__ARKH;
+  __POINTER ptr_table__ERKH,next__DRKH,result__FRKH,ptr__5VG;
+  __POINTER ptr_table__JRKH,next__IRKH,result__KRKH,ptr_table__ORKH;
+  __POINTER next__NRKH,result__PRKH,ptr__L4DB,ptr_table__TRKH;
+  __POINTER next__SRKH,result__URKH,ptr_table__YRKH,next__XRKH;
+  __POINTER result__ZRKH,ptr__4OJ,ptr_table__3RKH,next__2RKH;
+  __POINTER result__4RKH,ptr_table__CSKH,next__BSKH,result__DSKH;
+  __POINTER ptr__PPH,ptr_table__HSKH,next__GSKH,result__ISKH;
+  __POINTER ptr_table__MSKH,next__LSKH,result__NSKH,ptr__2OC;
+  __POINTER ptr_table__RSKH,next__QSKH,result__SSKH,ptr_table__WSKH;
+  __POINTER next__VSKH,result__XSKH,ptr__S0Q,ptr_table__1SKH,next__0SKH;
+  __POINTER result__2SKH,ptr_table__ATKH,next__5SKH,result__BTKH;
+  __POINTER ptr__PER,ptr_table__FTKH,next__ETKH,result__GTKH;
+  __POINTER ptr_table__KTKH,next__JTKH,result__LTKH,ptr__5SQ;
+  __POINTER ptr_table__PTKH,next__OTKH,result__QTKH,ptr_table__UTKH;
+  __POINTER next__TTKH,result__VTKH,ptr__F1O,ptr_table__ZTKH,next__YTKH;
+  __POINTER result__0TKH,ptr_table__4TKH,next__3TKH,result__5TKH;
+  __POINTER ptr__M3Q,ptr_table__DUKH,next__CUKH,result__EUKH;
+  __POINTER ptr_table__IUKH,next__HUKH,result__JUKH,ptr__ZMK;
+  __POINTER ptr_table__NUKH,next__MUKH,result__OUKH,ptr_table__SUKH;
+  __POINTER next__RUKH,result__TUKH,ptr__2WQ,ptr_table__XUKH,next__WUKH;
+  __POINTER result__YUKH,ptr_table__2UKH,next__1UKH,result__3UKH;
+  __POINTER ptr__YVR,ptr_table__BVKH,next__AVKH,result__CVKH;
+  __POINTER ptr_table__GVKH,next__FVKH,result__HVKH,ptr__WJK;
+  __POINTER ptr_table__LVKH,next__KVKH,result__MVKH,ptr_table__QVKH;
+  __POINTER next__PVKH,result__RVKH,ptr__55J,ptr_table__VVKH,next__UVKH;
+  __POINTER result__WVKH,ptr_table__0VKH,next__ZVKH,result__1VKH;
+  __POINTER ptr__ZLM,ptr_table__5VKH,next__4VKH,result__AWKH;
+  __POINTER ptr_table__EWKH,next__DWKH,result__FWKH,ptr__0HOF;
+  __POINTER ptr_table__JWKH,next__IWKH,result__KWKH,ptr_table__OWKH;
+  __POINTER next__NWKH,result__PWKH,ptr__35F,ptr_table__TWKH,next__SWKH;
+  __POINTER result__UWKH,ptr_table__YWKH,next__XWKH,result__ZWKH;
+  __POINTER ptr__YUTE,ptr_table__3WKH,next__2WKH,result__4WKH;
+  __POINTER ptr_table__CXKH,next__BXKH,result__DXKH,ptr__NRMF;
+  __POINTER ptr_table__HXKH,next__GXKH,result__IXKH,ptr_table__MXKH;
+  __POINTER next__LXKH,result__NXKH,ptr__X3NF,ptr_table__RXKH;
+  __POINTER next__QXKH,result__SXKH,ptr_table__WXKH,next__VXKH;
+  __POINTER result__XXKH,ptr__XXMD,ptr_table__1XKH,next__0XKH;
+  __POINTER result__2XKH,ptr_table__AYKH,next__5XKH,result__BYKH;
+  __POINTER ptr__OZED,ptr_table__FYKH,next__EYKH,result__GYKH;
+  __POINTER ptr_table__KYKH,next__JYKH,result__LYKH,result__QBFH;
+  __POINTER ptr_table__PYKH,next__OYKH,result__QYKH,ptr__TYNF;
+  __POINTER ptr_table__XYKH,next__WYKH,result__YYKH,ptr_table__2YKH;
+  __POINTER next__1YKH,result__3YKH,result__YBFH,ptr_table__BZKH;
+  __POINTER next__AZKH,result__CZKH,ptr__QJNF,ptr_table__JZKH;
+  __POINTER next__IZKH,result__KZKH,ptr_table__OZKH,next__NZKH;
+  __POINTER result__PZKH,result__ACFH,ptr_table__TZKH,next__SZKH;
+  __POINTER result__UZKH,ptr__S4YB,ptr_table__1ZKH,next__0ZKH;
+  __POINTER result__2ZKH,ptr_table__A0KH,next__5ZKH,result__B0KH;
+  __POINTER ptr__XBZB,ptr_table__F0KH,next__E0KH,result__G0KH;
+  __POINTER ptr_table__K0KH,next__J0KH,result__L0KH,ptr__RL5B;
+  __POINTER ptr_table__P0KH,next__O0KH,result__Q0KH,ptr_table__U0KH;
+  __POINTER next__T0KH,result__V0KH,ptr__JCIE,ptr_table__Z0KH;
+  __POINTER next__Y0KH,result__00KH,ptr_table__40KH,next__30KH;
+  __POINTER result__50KH,ptr__UUB,ptr_table__D1KH,next__C1KH;
+  __POINTER result__E1KH,ptr_table__I1KH,next__H1KH,result__J1KH;
+  __POINTER ptr__MOIH,ptr_table__N1KH,next__M1KH,result__O1KH;
+  __POINTER ptr_table__S1KH,next__R1KH,result__T1KH,ptr__PHKB;
+  __POINTER ptr_table__01KH,next__Z1KH,result__11KH,ptr_table__51KH;
+  __POINTER next__41KH,result__A2KH,ptr__VLZB,ptr_table__E2KH;
+  __POINTER next__D2KH,result__F2KH,ptr_table__J2KH,next__I2KH;
+  __POINTER result__K2KH,ptr__HPIH,ptr_table__O2KH,next__N2KH;
+  __POINTER result__P2KH,ptr_table__T2KH,next__S2KH,result__U2KH;
+  __POINTER ptr__RPIH,ptr_table__Y2KH,next__X2KH,result__Z2KH;
+  __POINTER ptr_table__32KH,next__22KH,result__42KH,ptr__1PIH;
+  __POINTER ptr_table__F3KH,next__E3KH,result__G3KH,ptr_table__K3KH;
+  __POINTER next__J3KH,result__L3KH,ptr__ETED,ptr_table__P3KH;
+  __POINTER next__O3KH,result__Q3KH,ptr_table__U3KH,next__T3KH;
+  __POINTER result__V3KH,ptr__3YB,ptr_table__Z3KH,next__Y3KH;
+  __POINTER result__03KH,ptr_table__43KH,next__33KH,result__53KH;
+  __POINTER result__IEFH,ptr_table__D4KH,next__C4KH,result__E4KH;
+  __POINTER ptr__52B,ptr_table__L4KH,next__K4KH,result__M4KH;
+  __POINTER ptr_table__Q4KH,next__P4KH,result__R4KH,ptr__FQIH;
+  __POINTER ptr_table__V4KH,next__U4KH,result__W4KH,ptr_table__04KH;
+  __POINTER next__Z4KH,result__14KH,ptr__R4B,ptr_table__54KH,next__44KH;
+  __POINTER result__A5KH,ptr_table__E5KH,next__D5KH,result__F5KH;
+  __UINTEGER_32 sz__XQKH,a__YQKH,new_size__ZQKH,t__0QKH,a__1QKH;
+  __UINTEGER_32 new_size__HRKH,lab_type__GRKH,sz__BWG,a__JEHH;
+  __UINTEGER_32 new_size__KEHH,t__OEHH,a__NEHH,new_size__RRKH;
+  __UINTEGER_32 lab_type__QRKH,sz__N4DB,a__REHH,new_size__SEHH,t__WEHH;
+  __UINTEGER_32 a__VEHH,new_size__1RKH,lab_type__0RKH,sz__APJ,a__ZEHH;
+  __UINTEGER_32 new_size__0EHH,t__4EHH,a__3EHH,new_size__FSKH;
+  __UINTEGER_32 lab_type__ESKH,sz__RPH,a__BFHH,new_size__CFHH,t__GFHH;
+  __UINTEGER_32 a__FFHH,new_size__PSKH,lab_type__OSKH,sz__4OC,a__JFHH;
+  __UINTEGER_32 new_size__KFHH,t__OFHH,a__NFHH,new_size__ZSKH;
+  __UINTEGER_32 lab_type__YSKH,sz__U0Q,a__RFHH,new_size__SFHH,t__WFHH;
+  __UINTEGER_32 a__VFHH,new_size__DTKH,lab_type__CTKH,sz__RER,a__ZFHH;
+  __UINTEGER_32 new_size__0FHH,t__4FHH,a__3FHH,new_size__NTKH;
+  __UINTEGER_32 lab_type__MTKH,sz__BTQ,a__BGHH,new_size__CGHH,t__GGHH;
+  __UINTEGER_32 a__FGHH,new_size__XTKH,lab_type__WTKH,sz__H1O,a__JGHH;
+  __UINTEGER_32 new_size__KGHH,t__OGHH,a__NGHH,new_size__BUKH;
+  __UINTEGER_32 lab_type__AUKH,sz__O3Q,a__RGHH,new_size__SGHH,t__WGHH;
+  __UINTEGER_32 a__VGHH,new_size__LUKH,lab_type__KUKH,sz__1MK,a__ZGHH;
+  __UINTEGER_32 new_size__0GHH,t__4GHH,a__3GHH,new_size__VUKH;
+  __UINTEGER_32 lab_type__UUKH,sz__4WQ,a__4MFH,new_size__5MFH,t__DNFH;
+  __UINTEGER_32 a__CNFH,new_size__5UKH,lab_type__4UKH,sz__0VR,a__BHHH;
+  __UINTEGER_32 new_size__CHHH,t__GHHH,a__FHHH,new_size__JVKH;
+  __UINTEGER_32 lab_type__IVKH,sz__YJK,a__JHHH,new_size__KHHH,t__OHHH;
+  __UINTEGER_32 a__NHHH,new_size__TVKH,lab_type__SVKH,sz__BAK,a__RHHH;
+  __UINTEGER_32 new_size__SHHH,t__WHHH,a__VHHH,new_size__3VKH;
+  __UINTEGER_32 lab_type__2VKH,sz__1LM,a__ZHHH,new_size__0HHH,t__4HHH;
+  __UINTEGER_32 a__3HHH,new_size__HWKH,lab_type__GWKH,sz__2HOF,a__BIHH;
+  __UINTEGER_32 new_size__CIHH,t__GIHH,a__FIHH,new_size__RWKH;
+  __UINTEGER_32 lab_type__QWKH,sz__55F,a__IIFH,new_size__3ZG,t__G1G;
+  __UINTEGER_32 a__OIFH,new_size__1WKH,lab_type__0WKH,sz__0UTE,a__JIHH;
+  __UINTEGER_32 new_size__KIHH,t__OIHH,a__NIHH,new_size__FXKH;
+  __UINTEGER_32 lab_type__EXKH,sz__PRMF,a__RIHH,new_size__SIHH,t__WIHH;
+  __UINTEGER_32 a__VIHH,new_size__PXKH,lab_type__OXKH,sz__Z3NF,a__ZIHH;
+  __UINTEGER_32 new_size__0IHH,t__4IHH,a__3IHH,new_size__ZXKH;
+  __UINTEGER_32 lab_type__YXKH,sz__ZXMD,a__BJHH,new_size__CJHH,t__GJHH;
+  __UINTEGER_32 a__FJHH,new_size__DYKH,lab_type__CYKH,sz__QZED,a__JJHH;
+  __UINTEGER_32 new_size__KJHH,t__OJHH,a__NJHH,new_size__NYKH;
+  __UINTEGER_32 lab_type__MYKH,sz__RBFH,a__WBFH,new_size__SBFH;
+  __UINTEGER_32 new_size2__TBFH,a__RJHH,new_size__SJHH,sz__VYNF,a__YJHH;
+  __UINTEGER_32 new_size__ZJHH,t__3JHH,a__2JHH,new_size__5YKH;
+  __UINTEGER_32 lab_type__4YKH,sz__ZBFH,a__4BFH,new_size__0BFH;
+  __UINTEGER_32 new_size2__1BFH,a__AKHH,new_size__BKHH,sz__SJNF,a__HKHH;
+  __UINTEGER_32 new_size__IKHH,t__MKHH,a__LKHH,new_size__RZKH;
+  __UINTEGER_32 lab_type__QZKH,sz__BCFH,a__GCFH,new_size__CCFH;
+  __UINTEGER_32 new_size2__DCFH,a__PKHH,new_size__QKHH,sz__U4YB,a__WKHH;
+  __UINTEGER_32 new_size__XKHH,t__1KHH,a__0KHH,new_size__D0KH;
+  __UINTEGER_32 lab_type__C0KH,sz__ZBZB,a__4KHH,new_size__5KHH,t__DLHH;
+  __UINTEGER_32 a__CLHH,new_size__N0KH,lab_type__M0KH,sz__TL5B,a__GLHH;
+  __UINTEGER_32 new_size__HLHH,t__LLHH,a__KLHH,new_size__X0KH;
+  __UINTEGER_32 lab_type__W0KH,sz__LCIE,a__OLHH,new_size__PLHH,t__TLHH;
+  __UINTEGER_32 a__SLHH,new_size__B1KH,lab_type__A1KH,sz__WUB,a__WLHH;
+  __UINTEGER_32 new_size__XLHH,t__1LHH,a__0LHH,new_size__L1KH;
+  __UINTEGER_32 lab_type__K1KH,sz__OOIH,a__POIH,new_size__QOIH,t__ROIH;
+  __UINTEGER_32 a__SOIH,new_size__V1KH,lab_type__U1KH,sz__RHKB,a__5LHH;
+  __UINTEGER_32 new_size__AMHH,t__EMHH,a__DMHH,new_size__C2KH;
+  __UINTEGER_32 lab_type__B2KH,sz__XLZB,a__KMHH,new_size__LMHH,t__PMHH;
+  __UINTEGER_32 a__OMHH,new_size__M2KH,lab_type__L2KH,sz__JPIH,a__KPIH;
+  __UINTEGER_32 new_size__LPIH,t__MPIH,a__NPIH,new_size__W2KH;
+  __UINTEGER_32 lab_type__V2KH,sz__TPIH,a__UPIH,new_size__VPIH,t__WPIH;
+  __UINTEGER_32 a__XPIH,new_size__A3KH,lab_type__52KH,sz__3PIH,a__4PIH;
+  __UINTEGER_32 new_size__5PIH,t__AQIH,a__BQIH,new_size__N3KH;
+  __UINTEGER_32 lab_type__M3KH,sz__GTED,a__3DGH,new_size__4DGH,t__CEGH;
+  __UINTEGER_32 a__BEGH,new_size__X3KH,lab_type__W3KH,sz__5YB,a__YMHH;
+  __UINTEGER_32 new_size__ZMHH,t__3MHH,a__2MHH,new_size__B4KH;
+  __UINTEGER_32 lab_type__A4KH,sz__JEFH,a__OEFH,new_size__KEFH;
+  __UINTEGER_32 new_size2__LEFH,a__ANHH,new_size__BNHH,sz__B3B,a__HNHH;
+  __UINTEGER_32 new_size__INHH,t__MNHH,a__LNHH,new_size__T4KH;
+  __UINTEGER_32 lab_type__S4KH,sz__HQIH,a__IQIH,new_size__JQIH,t__KQIH;
+  __UINTEGER_32 a__LQIH,new_size__34KH,lab_type__24KH,sz__T4B,a__LXFH;
+  __UINTEGER_32 new_size__MXFH,t__QXFH,a__PXFH,new_size__H5KH;
+  __UINTEGER_32 lab_type__G5KH;
+  __STRING *Self__OOEB,*new__IV1G,*new__KV1G,*Self__2EFH,*Self__IFFH;
+  __STRING *Self__TSIH,*Self__ROHH,*Self__TOHH,*Self__N5KH;
+  __ITM_TYPE_PARAMETER *result__1WQ,*Self__T3V;
+  __LIP_BOOLEAN *result__W3NF;
+  void *result__TYKH,*result__FZKH,*result__XZKH,*result__H4KH;
+  void *txt__1,*fmt_name__YNC,*k__UOIH,*__tmp__JPD,*k__AQEB;
+  void *element__UMHH,*i__PPIH,*element__ZWEC,*i__DQIH,*__tmp__4B;
+  void *__tmp__2H,*title__SLTD,*__tmp__KIYD,*__tmp__XIYD,*__tmp__AJYD;
+  void *__tmp__VJYD,*__tmp__ENTD,*__tmp__DNYD,*__tmp__QNYD,*__tmp__ZNYD;
+  void *__tmp__OOYD,*__tmp__4NTD,*t__ABRE,*__tmp__FOTD,*__tmp__SDRE;
+  void *__tmp__5DRE,*__tmp__IERE,*__tmp__3ERE,*__tmp__KSYD,*__tmp__1OTD;
+  void *__tmp__GVYD,*__tmp__SPTD,*t__ZFRE,*__tmp__ZPTD,*__tmp__KIRE;
   void *p__AB;
-  __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;
+  __STRING_CONSTANT *result__LOIH,*Self__3WS,*Self__2LHH,*Self__UNS;
+  __STRING_CONSTANT *Self__YOIH,*Self__3OIH,*Self__CPIH,*Self__HV1G;
+  __STRING_CONSTANT *Self__JV1G,*Self__L5KH,*Self__V5KH,*Self__05KH;
+  __STRING_CONSTANT *Self__55KH,*Self__EALH,*Self__JALH,*Self__OALH;
+  __STRING_CONSTANT *Self__TALH,*Self__YALH;
+  __POSITION pos__2Q1G,pos__GR1G,pos__YS1G,pos__0S1G,pos__2S1G;
+  __POSITION pos__4S1G,pos__AT1G,__tmp__URYD,__tmp__ZRYD,__tmp__QUYD;
+  __POSITION __tmp__VUYD,__tmp__UHRE,__tmp__ZHRE;
+  __TYPE_ID *result__EQIH,*result__Q4B;
   void *ent__TB;
-  __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__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;
+  __DIRECTORY_UNIX *Self__KKSD;
+  void *dir__MKSD,*dir__UKSD,*__tmp__AD,*dir__SB;
+  __FILE_UNIX *Self__YKRD;
+  __PROTOTYPE *Self__QLTD;
+  void *s__TLTD,*s__1FYD,*s__UKYD,*s__DBRE,*s__2PYD,*s__YSYD,*s__2FRE;
+  void *__tmp__LQTD;
+  void *__tmp__0MTD,*__tmp__UHYD,*__tmp__NMYD,*__tmp__2CRE,*__tmp__ROTD;
+  void *__tmp__CSYD,*__tmp__4UYD,*__tmp__CIRE;
+  __SECTION_ *Self__RJ2G,*Self__SJ2G,*Self__TJ2G,*Self__UJ2G,*Self__VJ2G;
+  void *__tmp__CIYD,*__tmp__1MYD,*__tmp__KDRE;
+  void *__tmp__EIYD,*ts__BIYD,*__tmp__3MYD,*ts__0MYD,*__tmp__MDRE;
+  void *ts__JDRE;
+  __CHARACTER *arg__PID,*Self__JOIH,*p__POEB,*path__KZ,*Self__BLC;
+  __CHARACTER *Self__1NHH,*model__2NHH,*Self__HOHH,*model__IOHH;
+  __CHARACTER *__tmp__USIH,*Self__WSIH;
+  __FAST_ARRAYoSTRINGo *result__UQKH,*Self__2QKH,*result__25F,*Self__TGT;
+  void *result__OID;
+  __HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *result__4VG,*Self__FLT;
+  __HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *result__K4DB;
+  __HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *Self__DPCC;
+  __FAST_ARRAYoPROTOTYPEo *result__3OJ,*Self__BFU;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *result__OPH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__MPT;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__TOIH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__4PEB;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__MQIH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__NNHH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__0QIH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__RNHH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__IRIH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__VNHH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__VXVB;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__1RIH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__BOHH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__3CT;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__NOHH;
+  __HASHED_DICTIONARYoTYPExSTRING_CONSTANTo *result__1OC,*Self__4PS;
+  __FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *result__R0Q,*Self__53V;
+  __HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo *result__OER,*Self__RFW;
+  __FAST_ARRAYoITM_TYPE_MULTIo *result__4SQ,*Self__21V;
+  __FAST_ARRAYoITM_TYPE_BLOCKo *result__E1O,*Self__FKV;
+  __FAST_ARRAYoITM_TYPE_GENERICo *result__L3Q,*Self__SBW;
+  __HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *result__YMK;
+  __HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *Self__UNU;
+  __FAST_ARRAYoITM_TYPE_STYLEo *result__XVR,*Self__0LW;
+  __FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *result__VJK,*Self__YKU;
+  __FAST_ARRAYoFAST_ARRAYoITM_CODEoo *result__45J,*Self__VHU;
+  __FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *result__YLM,*Self__1WU;
+  __HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo *result__ZHOF,*Self__JMQF;
+  __FAST_ARRAYoLIP_INTEGERo *result__XUTE,*Self__GLXE;
+  __FAST_ARRAYoLIP_STRINGo *result__MRMF,*Self__14PF;
+  __FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *result__WXMD,*Self__DJUD;
+  __HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo *result__NZED;
+  __HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo *Self__UNSD;
+  void **Result__FWHE;
+  __FAST_ARRAYoLIP_SLOT_DATAo *result__SYNF,*Self__EHQF;
+  void **Result__YI1F;
+  __FAST_ARRAYoLIP_SLOT_CODEo *result__PJNF,*Self__FCQF;
+  void **Result__5D1F;
+  __HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo *result__R4YB;
+  __HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo *Self__1ZFC;
+  __HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *result__WBZB;
+  __HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *Self__02FC;
+  __FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *result__QL5B,*Self__INHC;
+  __FAST_ARRAYoITM_SLOTo *result__ICIE,*Self__IOWE;
+  __HASHED_SEToABSTRACT_STRINGo *result__TUB,*Self__XCS;
+  __BOOLEAN __tmp__U0,__tmp__P1,result__JAOB,__tmp__31,result__1AOB;
+  __BOOLEAN __tmp__L2,result__NBOB,__tmp__Y2,result__5BOB,__tmp__14;
+  __BOOLEAN result__W1KH,result__QSEB,result__B3KH,result__4IG;
+  __BOOLEAN __tmp__JC,__tmp__FC,__tmp__UC,result__I5KH;
+  __BOOLEAN is_first_cur__0FYD,__tmp__PGYD,__tmp__RIYD,__tmp__OIYD;
+  __BOOLEAN result__S5KH,__tmp__FJYD,result__X5KH,__tmp__GJYD;
+  __BOOLEAN __tmp__JJYD,is_first_cur__TKYD,result__25KH,__tmp__ILYD;
+  __BOOLEAN __tmp__KNYD,__tmp__HNYD,result__BALH,__tmp__4NYD;
+  __BOOLEAN result__GALH,__tmp__5NYD,__tmp__COYD,is_first_cur__CBRE;
+  __BOOLEAN __tmp__XBRE,__tmp__ZDRE,__tmp__WDRE,result__LALH;
+  __BOOLEAN __tmp__NERE,result__QALH,__tmp__OERE,__tmp__RERE;
+  __BOOLEAN is_first__1PYD,__tmp__QQYD,is_first__XSYD,result__VALH;
+  __BOOLEAN __tmp__MTYD,is_first__1FRE,__tmp__QGRE;
+  __CHARACTER result__X1KH,result__C3KH,result__YUDH,result__HKDH;
+  __CHARACTER Self__P5KH,result__Q5KH,__tmp__1HYD,__tmp__UMYD;
+  __CHARACTER __tmp__DDRE;
+  __LINKED_LISToSTRING_CONSTANTo *result__OHKB,*Self__VMHH,*Self__YWEC;
+  void *node__VOIH,*node__JQEB,*node1__PJZB,*node2__QJZB,*__tmp__WREB;
+  void *node__OQIH,*node__PNHH,*node__2QIH,*node__TNHH,*node__KRIH;
+  void *node__XNHH,*node__5XVB,*node__3RIH,*node__DOHH,*node__IDT;
+  void *node__POHH;
+  void **old_buckets__OJZB;
+  __HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *result__ULZB;
+  __HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__UGGC;
+  void *def__OSEB;
+  __LINKED_LIST_NODEoSTRING_CONSTANTo *result__GPIH,*Self__OPIH;
+  __LINKED_LIST_NODEoSTRING_CONSTANTo *result__QPIH,*Self__YPIH;
+  __LINKED_LIST_NODEoSTRING_CONSTANTo *result__0PIH,*Self__CQIH;
+  __LINKED_LIST_NODEoSTRING_CONSTANTo *result__DTED,*Self__CNSD;
+  __FAST_ARRAYoSLOTo *result__2YB,*Self__1ES;
+  void **Result__DN1C;
+  __FAST_ARRAYoTYPE_IDo *result__42B,*Self__0HS;
+  __INTEGER_8 __tmp__MGYD,__tmp__FLYD,__tmp__YNTD,__tmp__UBRE;
+  __INTEGER_8 __tmp__NQYD,__tmp__JTYD,__tmp__MPTD,__tmp__NGRE;
   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__ZNO=((__CHARACTER *)(NULL));
-  STRING__->storage__F5R=NULL;
-  nb_page__LQJ= 0;
+  STRING_CONSTANT__->storage__FRO=((__CHARACTER *)(NULL));
+  STRING__->storage__RCS=NULL;
+  nb_page__XTJ= 0;
   MEMORY__->map_size_and_id__YTB= 0;
-  capacity_max__U34= 0;
-  get_begin_memory__SAQB=((__POINTER )(NULL));
-  begin_memory__GUH=((__POINTER )(NULL));
+  capacity_max__CD5= 0;
+  get_begin_memory__EEQB=((__POINTER )(NULL));
+  begin_memory__SXH=((__POINTER )(NULL));
   MEMORY__->map_previous_linear__XTB= 0;
-  first_free__BCVB=NULL;
+  first_free__NFVB=NULL;
   MEMORY__->map_next_free__ZTB=NULL;
   MEMORY__->map_previous_free__0TB=NULL;
-  STRING__->capacity__24R= 0;
-  HASHED_SEToABSTRACT_STRINGo__->buckets__CWR=NULL;
-  HASHED_SEToABSTRACT_STRINGo__->capacity__3VR= 0;
-  HASHED_SEToABSTRACT_STRINGo__->count__DXR= 0;
+  STRING__->capacity__ICS= 0;
+  HASHED_SEToABSTRACT_STRINGo__->buckets__OZR=NULL;
+  HASHED_SEToABSTRACT_STRINGo__->capacity__JZR= 0;
+  HASHED_SEToABSTRACT_STRINGo__->count__P0R= 0;
   list__FK=NULL;
-  HASHED_SET_NODEoABSTRACT_STRINGo__->item__OWR=NULL;
-  HASHED_SET_NODEoABSTRACT_STRINGo__->next__0WR=NULL;
+  HASHED_SET_NODEoABSTRACT_STRINGo__->item__0ZR=NULL;
+  HASHED_SET_NODEoABSTRACT_STRINGo__->next__G0R=NULL;
   string_tmp__VH=create__ZBB( 256);
   is_shorter__LZ=FALSE__;
   ARRAYED_COLLECTIONoSTRINGo__->upper__UKC= 0;
-  ARRAYED_COLLECTIONoSTRINGo__->capacity__QDT= 0;
-  ARRAYED_COLLECTIONoSTRINGo__->storage__1DT=NULL;
+  ARRAYED_COLLECTIONoSTRINGo__->capacity__2GT= 0;
+  ARRAYED_COLLECTIONoSTRINGo__->storage__HHT=NULL;
   FAST_ARRAYoSTRINGo__->parent_arrayed_collection__RKC=(*ARRAYED_COLLECTIONoSTRINGo__);
-  arg__PHD=NULL;
-  str__QHD=NULL;
-  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__;
+  arg__PID=NULL;
+  str__QID=NULL;
+  new_count__3QKH=((__INTEGER )(arg_count));
+  result__UQKH=NULL;
+  ptr__VQKH=((__POINTER )(NULL));
+  typ_id__WQKH= 0;
+  sz__XQKH=((__UINTEGER_32 )sizeof(__FAST_ARRAYoSTRINGo));
+  if ((sz__XQKH ==  0)) {
+    result__UQKH=FAST_ARRAYoSTRINGo__;
   } else {
-    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);
+    typ_id__WQKH=__FAST_ARRAYoSTRINGo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__XQKH);
+    if ((typ_id__WQKH == (__INTEGER)(-  1))) {
+      a__YQKH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__ZQKH=(__UINTEGER_32)((__UINTEGER_32)(sz__XQKH + a__YQKH) & (__UINTEGER_32)(~ a__YQKH));
+      ptr_table__5QKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ZQKH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__4QKH=((__POINTER )(NULL));
+      result__ARKH=((__POINTER *)ptr_table__5QKH)[ 0];
+      if ((result__ARKH == (void *)NULL)) {
+        result__ARKH=new_lab__FTJ(new_size__ZQKH);
+        next__4QKH=(void *)((unsigned long)result__ARKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZQKH)));
+        ((__POINTER *)next__4QKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__5QKH)[ 0]=next__4QKH;
+      } else {
+        next__4QKH=((__POINTER *)result__ARKH)[ 0];
+        if ((next__4QKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ARKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__ZQKH <<  1)) <=  4096)) {
+            next__4QKH=(void *)((unsigned long)result__ARKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZQKH)));
+          } else {
+            next__4QKH=new_lab__FTJ(new_size__ZQKH);
+          };
+          ((__POINTER *)next__4QKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__5QKH)[ 0]=next__4QKH;
+        } else {
+          ((__POINTER *)result__ARKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4QKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__ARKH=next__4QKH;
+        };
+      };
+      ptr__VQKH=result__ARKH;
+    } else {
+      t__0QKH=((__UINTEGER_32 )typ_id__WQKH);
+      a__1QKH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__HRKH=(__UINTEGER_32)((__UINTEGER_32)(sz__XQKH + a__1QKH) & (__UINTEGER_32)(~ a__1QKH));
+      ptr_table__ERKH=((__POINTER )(&(table_type[(t__0QKH)])));
+      lab_type__GRKH=(__UINTEGER_32)(t__0QKH |  1);
+      next__DRKH=((__POINTER )(NULL));
+      result__FRKH=((__POINTER *)ptr_table__ERKH)[ 0];
+      if ((result__FRKH == (void *)NULL)) {
+        result__FRKH=new_lab__FTJ(lab_type__GRKH);
+        next__DRKH=(void *)((unsigned long)result__FRKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HRKH)));
+        ((__POINTER *)next__DRKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__ERKH)[ 0]=next__DRKH;
+      } else {
+        next__DRKH=((__POINTER *)result__FRKH)[ 0];
+        if ((next__DRKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__FRKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__HRKH <<  1)) <=  4096)) {
+            next__DRKH=(void *)((unsigned long)result__FRKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HRKH)));
+          } else {
+            next__DRKH=new_lab__FTJ(lab_type__GRKH);
+          };
+          ((__POINTER *)next__DRKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__ERKH)[ 0]=next__DRKH;
+        } else {
+          ((__POINTER *)result__FRKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DRKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__FRKH=next__DRKH;
+        };
+      };
+      ptr__VQKH=result__FRKH;
+    };
+    result__UQKH=((__FAST_ARRAYoSTRINGo *)ptr__VQKH);
+    *(result__UQKH) = *(FAST_ARRAYoSTRINGo__);
+  };
+  Self__2QKH=((__FAST_ARRAYoSTRINGo *)result__UQKH);
+  if ((Self__2QKH->parent_arrayed_collection__RKC.capacity__2GT < new_count__3QKH)) {
+    Self__2QKH->parent_arrayed_collection__RKC.storage__HHT=create__PHRB(new_count__3QKH);
+    Self__2QKH->parent_arrayed_collection__RKC.capacity__2GT=new_count__3QKH;
+  };
+  Self__2QKH->parent_arrayed_collection__RKC.upper__UKC=(__INTEGER)(-  1);
+  result__OID=result__UQKH;
+  Self__SIF= 0;
+  limit_up__TIF=(__INTEGER)(((__INTEGER )(arg_count)) -  1);
+  while ((Self__SIF <= limit_up__TIF)) {
+    arg__PID=((__CHARACTER *)(arg_vector[(Self__SIF)]));
+    Self__JOIH=((__CHARACTER *)arg__PID);
+    idx__IOIH= 0;
+    while ((! ((idx__IOIH >  1024) || ('\0' == Self__JOIH[idx__IOIH])))) {
+      idx__IOIH=(__INTEGER)(idx__IOIH +  1);
+    };
+    str__QID=create__ZBB(idx__IOIH);
+    Self__OOEB=((__STRING *)str__QID);
+    p__POEB=arg__PID;
+    i__QOEB= 0;
+    Self__OOEB->count__EGC= 0;
+    while ((((__CHARACTER *)p__POEB)[i__QOEB] != '\0')) {
+      add_last__GOT(Self__OOEB,((__CHARACTER *)p__POEB)[i__QOEB]);
+      i__QOEB=(__INTEGER)(i__QOEB +  1);
+    };
+    add_last__ISV(result__OID,str__QID);
+    Self__SIF=(__INTEGER)(Self__SIF +  1);
   };
   output_name__DI=NULL;
   format_name__N1=NULL;
@@ -3105,394 +3105,394 @@ int main(int argc,char **argv)
   is_short_recursive__JB=FALSE__;
   is_shorter2__VI=FALSE__;
   input_name__3B=NULL;
-  FILE_SYSTEM__->parent_directory__2FD=1;
-  string_tmp__AFD=create__ZBB( 255);
+  FILE_SYSTEM__->parent_directory__2GD=1;
+  string_tmp__AGD=create__ZBB( 255);
   ENTRY__->path__BD=NULL;
-  ENTRY__->name__ZKT=NULL;
-  ENTRY_UNIX__->parent_entry__FFD=(*ENTRY__);
-  FILE_UNIX__->parent_entry_unix__DBF=(*ENTRY_UNIX__);
-  DIRECTORY_UNIX__->parent_entry_unix__GFD=(*ENTRY_UNIX__);
-  DIRECTORY__->list__UDRD=NULL;
-  DIRECTORY_UNIX__->parent_directory__HFD=(*DIRECTORY__);
-  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__;
+  ENTRY__->name__CQT=NULL;
+  ENTRY_UNIX__->parent_entry__FGD=(*ENTRY__);
+  FILE_UNIX__->parent_entry_unix__HEF=(*ENTRY_UNIX__);
+  DIRECTORY_UNIX__->parent_entry_unix__GGD=(*ENTRY_UNIX__);
+  DIRECTORY__->list__CHRD=NULL;
+  DIRECTORY_UNIX__->parent_directory__HGD=(*DIRECTORY__);
+  HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo__->buckets__V1S=NULL;
+  HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo__->capacity__Q1S= 0;
+  HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo__->count__W2S= 0;
+  result__4VG=NULL;
+  ptr__5VG=((__POINTER )(NULL));
+  typ_id__EWG= 0;
+  sz__BWG=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo));
+  if ((sz__BWG ==  0)) {
+    result__4VG=HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo__;
   } else {
-    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);
+    typ_id__EWG=__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__BWG);
+    if ((typ_id__EWG == (__INTEGER)(-  1))) {
+      a__JEHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__KEHH=(__UINTEGER_32)((__UINTEGER_32)(sz__BWG + a__JEHH) & (__UINTEGER_32)(~ a__JEHH));
+      ptr_table__JRKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__KEHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__IRKH=((__POINTER )(NULL));
+      result__KRKH=((__POINTER *)ptr_table__JRKH)[ 0];
+      if ((result__KRKH == (void *)NULL)) {
+        result__KRKH=new_lab__FTJ(new_size__KEHH);
+        next__IRKH=(void *)((unsigned long)result__KRKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KEHH)));
+        ((__POINTER *)next__IRKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__JRKH)[ 0]=next__IRKH;
+      } else {
+        next__IRKH=((__POINTER *)result__KRKH)[ 0];
+        if ((next__IRKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__KRKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__KEHH <<  1)) <=  4096)) {
+            next__IRKH=(void *)((unsigned long)result__KRKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KEHH)));
+          } else {
+            next__IRKH=new_lab__FTJ(new_size__KEHH);
+          };
+          ((__POINTER *)next__IRKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__JRKH)[ 0]=next__IRKH;
+        } else {
+          ((__POINTER *)result__KRKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__IRKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__KRKH=next__IRKH;
+        };
+      };
+      ptr__5VG=result__KRKH;
+    } else {
+      t__OEHH=((__UINTEGER_32 )typ_id__EWG);
+      a__NEHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__RRKH=(__UINTEGER_32)((__UINTEGER_32)(sz__BWG + a__NEHH) & (__UINTEGER_32)(~ a__NEHH));
+      ptr_table__ORKH=((__POINTER )(&(table_type[(t__OEHH)])));
+      lab_type__QRKH=(__UINTEGER_32)(t__OEHH |  1);
+      next__NRKH=((__POINTER )(NULL));
+      result__PRKH=((__POINTER *)ptr_table__ORKH)[ 0];
+      if ((result__PRKH == (void *)NULL)) {
+        result__PRKH=new_lab__FTJ(lab_type__QRKH);
+        next__NRKH=(void *)((unsigned long)result__PRKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RRKH)));
+        ((__POINTER *)next__NRKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__ORKH)[ 0]=next__NRKH;
+      } else {
+        next__NRKH=((__POINTER *)result__PRKH)[ 0];
+        if ((next__NRKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__PRKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__RRKH <<  1)) <=  4096)) {
+            next__NRKH=(void *)((unsigned long)result__PRKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RRKH)));
+          } else {
+            next__NRKH=new_lab__FTJ(lab_type__QRKH);
+          };
+          ((__POINTER *)next__NRKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__ORKH)[ 0]=next__NRKH;
+        } else {
+          ((__POINTER *)result__PRKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NRKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__PRKH=next__NRKH;
+        };
+      };
+      ptr__5VG=result__PRKH;
+    };
+    result__4VG=((__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *)ptr__5VG);
+    *(result__4VG) = *(HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo__);
+  };
+  Self__FLT=((__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *)result__4VG);
+  new_capacity__4MY=prime_number_ceiling__541( 193);
+  Self__FLT->buckets__V1S=create__BE4(new_capacity__4MY);
+  Self__FLT->capacity__Q1S=new_capacity__4MY;
+  Self__FLT->count__W2S= 0;
+  alias__RGD=result__4VG;
+  HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo__->key__B2S=NULL;
+  HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo__->next__N2S=NULL;
+  HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo__->item__ETOB=NULL;
+  string_tmp2__Y2AC=create__ZBB( 255);
+  string_tmp3__42AC=create__ZBB( 255);
+  ITM_OBJECT__->position__GFJ=((__POSITION ) 0);
   NAMED__->parent_itm_object__4=(*ITM_OBJECT__);
   NAMED__->name__LI=NULL;
-  NAMED__->style__FBU='\0';
+  NAMED__->style__OGU='\0';
   PROTOTYPE__->parent_named__5=(*NAMED__);
-  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__;
+  HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo__->buckets__4PBC=NULL;
+  HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo__->capacity__ZPBC= 0;
+  HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo__->count__4QBC= 0;
+  result__K4DB=NULL;
+  ptr__L4DB=((__POINTER )(NULL));
+  typ_id__Q4DB= 0;
+  sz__N4DB=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo));
+  if ((sz__N4DB ==  0)) {
+    result__K4DB=HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo__;
   } else {
-    typ_id__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;
+    typ_id__Q4DB=__HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__N4DB);
+    if ((typ_id__Q4DB == (__INTEGER)(-  1))) {
+      a__REHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__SEHH=(__UINTEGER_32)((__UINTEGER_32)(sz__N4DB + a__REHH) & (__UINTEGER_32)(~ a__REHH));
+      ptr_table__TRKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__SEHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__SRKH=((__POINTER )(NULL));
+      result__URKH=((__POINTER *)ptr_table__TRKH)[ 0];
+      if ((result__URKH == (void *)NULL)) {
+        result__URKH=new_lab__FTJ(new_size__SEHH);
+        next__SRKH=(void *)((unsigned long)result__URKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SEHH)));
+        ((__POINTER *)next__SRKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__TRKH)[ 0]=next__SRKH;
+      } else {
+        next__SRKH=((__POINTER *)result__URKH)[ 0];
+        if ((next__SRKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__URKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__SEHH <<  1)) <=  4096)) {
+            next__SRKH=(void *)((unsigned long)result__URKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SEHH)));
+          } else {
+            next__SRKH=new_lab__FTJ(new_size__SEHH);
+          };
+          ((__POINTER *)next__SRKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__TRKH)[ 0]=next__SRKH;
+        } else {
+          ((__POINTER *)result__URKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__SRKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__URKH=next__SRKH;
+        };
+      };
+      ptr__L4DB=result__URKH;
+    } else {
+      t__WEHH=((__UINTEGER_32 )typ_id__Q4DB);
+      a__VEHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__1RKH=(__UINTEGER_32)((__UINTEGER_32)(sz__N4DB + a__VEHH) & (__UINTEGER_32)(~ a__VEHH));
+      ptr_table__YRKH=((__POINTER )(&(table_type[(t__WEHH)])));
+      lab_type__0RKH=(__UINTEGER_32)(t__WEHH |  1);
+      next__XRKH=((__POINTER )(NULL));
+      result__ZRKH=((__POINTER *)ptr_table__YRKH)[ 0];
+      if ((result__ZRKH == (void *)NULL)) {
+        result__ZRKH=new_lab__FTJ(lab_type__0RKH);
+        next__XRKH=(void *)((unsigned long)result__ZRKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1RKH)));
+        ((__POINTER *)next__XRKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__YRKH)[ 0]=next__XRKH;
+      } else {
+        next__XRKH=((__POINTER *)result__ZRKH)[ 0];
+        if ((next__XRKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ZRKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__1RKH <<  1)) <=  4096)) {
+            next__XRKH=(void *)((unsigned long)result__ZRKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1RKH)));
+          } else {
+            next__XRKH=new_lab__FTJ(lab_type__0RKH);
+          };
+          ((__POINTER *)next__XRKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__YRKH)[ 0]=next__XRKH;
+        } else {
+          ((__POINTER *)result__ZRKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XRKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__ZRKH=next__XRKH;
+        };
+      };
+      ptr__L4DB=result__ZRKH;
+    };
+    result__K4DB=((__HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *)ptr__L4DB);
+    *(result__K4DB) = *(HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo__);
+  };
+  Self__DPCC=((__HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *)result__K4DB);
+  new_capacity__SYJC=prime_number_ceiling__541( 193);
+  Self__DPCC->buckets__4PBC=create__5LTC(new_capacity__SYJC);
+  Self__DPCC->capacity__ZPBC=new_capacity__SYJC;
+  Self__DPCC->count__4QBC= 0;
+  prototype_dico__5TS=result__K4DB;
+  HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__->key__KQBC=NULL;
+  HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__->next__VQBC=NULL;
+  PROTOTYPE__->filename__XRG=NULL;
+  PROTOTYPE__->shortname__AJE=NULL;
+  ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo__->upper__AEBC= 0;
+  ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo__->capacity__CEBC= 0;
+  ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo__->storage__4EBC=NULL;
+  FAST_ARRAYoITM_TYPE_PARAMETERo__->parent_arrayed_collection__ONE=(*ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo__);
+  ITM_TYPE_SIMPLE__->name__0YP=NULL;
+  ITM_TYPE_PARAMETER__->parent_itm_type__YEE=(*ITM_TYPE_SIMPLE__);
+  PROTOTYPE__->idf_generic_list__PNE=NULL;
   ARRAYED_COLLECTIONoPROTOTYPEo__->upper__HJ= 0;
-  ARRAYED_COLLECTIONoPROTOTYPEo__->storage__OQT=NULL;
-  ARRAYED_COLLECTIONoPROTOTYPEo__->capacity__BAU= 0;
+  ARRAYED_COLLECTIONoPROTOTYPEo__->storage__XVT=NULL;
+  ARRAYED_COLLECTIONoPROTOTYPEo__->capacity__KFU= 0;
   FAST_ARRAYoPROTOTYPEo__->parent_arrayed_collection__AJ=(*ARRAYED_COLLECTIONoPROTOTYPEo__);
-  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__;
+  result__3OJ=NULL;
+  ptr__4OJ=((__POINTER )(NULL));
+  typ_id__DPJ= 0;
+  sz__APJ=((__UINTEGER_32 )sizeof(__FAST_ARRAYoPROTOTYPEo));
+  if ((sz__APJ ==  0)) {
+    result__3OJ=FAST_ARRAYoPROTOTYPEo__;
   } else {
-    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);
+    typ_id__DPJ=__FAST_ARRAYoPROTOTYPEo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__APJ);
+    if ((typ_id__DPJ == (__INTEGER)(-  1))) {
+      a__ZEHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__0EHH=(__UINTEGER_32)((__UINTEGER_32)(sz__APJ + a__ZEHH) & (__UINTEGER_32)(~ a__ZEHH));
+      ptr_table__3RKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__0EHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__2RKH=((__POINTER )(NULL));
+      result__4RKH=((__POINTER *)ptr_table__3RKH)[ 0];
+      if ((result__4RKH == (void *)NULL)) {
+        result__4RKH=new_lab__FTJ(new_size__0EHH);
+        next__2RKH=(void *)((unsigned long)result__4RKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0EHH)));
+        ((__POINTER *)next__2RKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__3RKH)[ 0]=next__2RKH;
+      } else {
+        next__2RKH=((__POINTER *)result__4RKH)[ 0];
+        if ((next__2RKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4RKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__0EHH <<  1)) <=  4096)) {
+            next__2RKH=(void *)((unsigned long)result__4RKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0EHH)));
+          } else {
+            next__2RKH=new_lab__FTJ(new_size__0EHH);
+          };
+          ((__POINTER *)next__2RKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__3RKH)[ 0]=next__2RKH;
+        } else {
+          ((__POINTER *)result__4RKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2RKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__4RKH=next__2RKH;
+        };
+      };
+      ptr__4OJ=result__4RKH;
+    } else {
+      t__4EHH=((__UINTEGER_32 )typ_id__DPJ);
+      a__3EHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__FSKH=(__UINTEGER_32)((__UINTEGER_32)(sz__APJ + a__3EHH) & (__UINTEGER_32)(~ a__3EHH));
+      ptr_table__CSKH=((__POINTER )(&(table_type[(t__4EHH)])));
+      lab_type__ESKH=(__UINTEGER_32)(t__4EHH |  1);
+      next__BSKH=((__POINTER )(NULL));
+      result__DSKH=((__POINTER *)ptr_table__CSKH)[ 0];
+      if ((result__DSKH == (void *)NULL)) {
+        result__DSKH=new_lab__FTJ(lab_type__ESKH);
+        next__BSKH=(void *)((unsigned long)result__DSKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FSKH)));
+        ((__POINTER *)next__BSKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__CSKH)[ 0]=next__BSKH;
+      } else {
+        next__BSKH=((__POINTER *)result__DSKH)[ 0];
+        if ((next__BSKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DSKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__FSKH <<  1)) <=  4096)) {
+            next__BSKH=(void *)((unsigned long)result__DSKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FSKH)));
+          } else {
+            next__BSKH=new_lab__FTJ(lab_type__ESKH);
+          };
+          ((__POINTER *)next__BSKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__CSKH)[ 0]=next__BSKH;
+        } else {
+          ((__POINTER *)result__DSKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BSKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__DSKH=next__BSKH;
+        };
+      };
+      ptr__4OJ=result__DSKH;
+    };
+    result__3OJ=((__FAST_ARRAYoPROTOTYPEo *)ptr__4OJ);
+    *(result__3OJ) = *(FAST_ARRAYoPROTOTYPEo__);
+  };
+  Self__BFU=((__FAST_ARRAYoPROTOTYPEo *)result__3OJ);
+  if ((Self__BFU->parent_arrayed_collection__AJ.capacity__KFU <  512)) {
+    Self__BFU->parent_arrayed_collection__AJ.storage__XVT=create__2GSB( 512);
+    Self__BFU->parent_arrayed_collection__AJ.capacity__KFU= 512;
+  };
+  Self__BFU->parent_arrayed_collection__AJ.upper__HJ=(__INTEGER)(-  1);
+  prototype_list__BJ=result__3OJ;
+  PROTOTYPE__->index__YOG= 0;
+  HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__->item__XBHD=NULL;
+  string_tmp__SWX=create__ZBB( 128);
   PROTOTYPE__->source__3BC=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;
+  HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo__->buckets__2DGC=NULL;
+  HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo__->capacity__FBCC= 0;
+  HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo__->count__HSGC= 0;
+  PROTOTYPE__->slot_list__MVS=NULL;
   object__ZBC=NULL;
   source__5BC=NULL;
   position__CCC= 0;
   pos_cur__FCC= 0;
   pos_line__GCC= 0;
   pos_col__HCC= 0;
-  string_tmp3__0SD=create__ZBB( 256);
-  string_tmp4__2SD=create__ZBB( 256);
+  string_tmp3__2TD=create__ZBB( 256);
+  string_tmp4__4TD=create__ZBB( 256);
+  output_code__SI=create__ZBB( 4000000);
+  short_derive__PCC= 0;
   is_active_short__OCC=FALSE__;
-  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__;
+  HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__->buckets__PDT=NULL;
+  HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__->capacity__KDT= 0;
+  HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__->count__DPY= 0;
+  result__OPH=NULL;
+  ptr__PPH=((__POINTER )(NULL));
+  typ_id__UPH= 0;
+  sz__RPH=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo));
+  if ((sz__RPH ==  0)) {
+    result__OPH=HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__;
   } else {
-    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__DV3=NULL;
-  LINKED_COLLECTIONoSTRING_CONSTANTo__->upper__MDD= 0;
+    typ_id__UPH=__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__RPH);
+    if ((typ_id__UPH == (__INTEGER)(-  1))) {
+      a__BFHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__CFHH=(__UINTEGER_32)((__UINTEGER_32)(sz__RPH + a__BFHH) & (__UINTEGER_32)(~ a__BFHH));
+      ptr_table__HSKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__CFHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__GSKH=((__POINTER )(NULL));
+      result__ISKH=((__POINTER *)ptr_table__HSKH)[ 0];
+      if ((result__ISKH == (void *)NULL)) {
+        result__ISKH=new_lab__FTJ(new_size__CFHH);
+        next__GSKH=(void *)((unsigned long)result__ISKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CFHH)));
+        ((__POINTER *)next__GSKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__HSKH)[ 0]=next__GSKH;
+      } else {
+        next__GSKH=((__POINTER *)result__ISKH)[ 0];
+        if ((next__GSKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ISKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__CFHH <<  1)) <=  4096)) {
+            next__GSKH=(void *)((unsigned long)result__ISKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CFHH)));
+          } else {
+            next__GSKH=new_lab__FTJ(new_size__CFHH);
+          };
+          ((__POINTER *)next__GSKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__HSKH)[ 0]=next__GSKH;
+        } else {
+          ((__POINTER *)result__ISKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GSKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__ISKH=next__GSKH;
+        };
+      };
+      ptr__PPH=result__ISKH;
+    } else {
+      t__GFHH=((__UINTEGER_32 )typ_id__UPH);
+      a__FFHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__PSKH=(__UINTEGER_32)((__UINTEGER_32)(sz__RPH + a__FFHH) & (__UINTEGER_32)(~ a__FFHH));
+      ptr_table__MSKH=((__POINTER )(&(table_type[(t__GFHH)])));
+      lab_type__OSKH=(__UINTEGER_32)(t__GFHH |  1);
+      next__LSKH=((__POINTER )(NULL));
+      result__NSKH=((__POINTER *)ptr_table__MSKH)[ 0];
+      if ((result__NSKH == (void *)NULL)) {
+        result__NSKH=new_lab__FTJ(lab_type__OSKH);
+        next__LSKH=(void *)((unsigned long)result__NSKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PSKH)));
+        ((__POINTER *)next__LSKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__MSKH)[ 0]=next__LSKH;
+      } else {
+        next__LSKH=((__POINTER *)result__NSKH)[ 0];
+        if ((next__LSKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__NSKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__PSKH <<  1)) <=  4096)) {
+            next__LSKH=(void *)((unsigned long)result__NSKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PSKH)));
+          } else {
+            next__LSKH=new_lab__FTJ(lab_type__OSKH);
+          };
+          ((__POINTER *)next__LSKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__MSKH)[ 0]=next__LSKH;
+        } else {
+          ((__POINTER *)result__NSKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LSKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__NSKH=next__LSKH;
+        };
+      };
+      ptr__PPH=result__NSKH;
+    };
+    result__OPH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)ptr__PPH);
+    *(result__OPH) = *(HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__);
+  };
+  Self__MPT=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__OPH);
+  new_capacity__4OY=prime_number_ceiling__541( 193);
+  Self__MPT->buckets__PDT=create__LI4(new_capacity__4OY);
+  Self__MPT->capacity__KDT=new_capacity__4OY;
+  Self__MPT->count__DPY= 0;
+  short_dico__QD=result__OPH;
+  HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__->key__1DT=NULL;
+  HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__->next__GET=NULL;
+  token__TDD=create__ZBB( 100);
+  HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__->item__PY3=NULL;
+  LINKED_COLLECTIONoSTRING_CONSTANTo__->upper__MED= 0;
   LINKED_LISToSTRING_CONSTANTo__->parent_linked_collection__LD=(*LINKED_COLLECTIONoSTRING_CONSTANTo__);
-  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__I5D= 0;
-  last_string__V0C=NULL;
-  string_tmp2__O4I=create__ZBB( 256);
-  last_integer__3OO= 0;
-  LINKED_LISToSTRING_CONSTANTo__->last_link__YTEC=NULL;
+  LINKED_LISToSTRING_CONSTANTo__->mem_idx__HXEC= 0;
+  LINKED_LISToSTRING_CONSTANTo__->mem_lnk__JXEC=NULL;
+  LINKED_LISToSTRING_CONSTANTo__->first_link__3WEC=NULL;
+  LINKED_LIST_NODEoSTRING_CONSTANTo__->next__CQOD=NULL;
+  LINKED_LIST_NODEoSTRING_CONSTANTo__->item__V0HD=NULL;
+  type_error__RPG= 0;
+  msg_err__SPG=create__ZBB( 256);
+  skip_comment__2AE=FALSE__;
+  last_comment_slot__OBE=NULL;
+  last_comment_extern__JZC=NULL;
+  begin_position__ECE= 0;
+  last_string__V1C=NULL;
+  string_tmp2__0BJ=create__ZBB( 256);
+  last_integer__JSO= 0;
+  LINKED_LISToSTRING_CONSTANTo__->last_link__GXEC=NULL;
   index_count__P5= 0;
-  HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__->buckets__RZR=NULL;
-  HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__->capacity__MZR= 0;
-  HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__->count__R0R= 0;
+  HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__->buckets__32R=NULL;
+  HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__->capacity__Y2R= 0;
+  HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__->count__33R= 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__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;
+      a__JFHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__KFHH=(__UINTEGER_32)((__UINTEGER_32)(sz__4OC + a__JFHH) & (__UINTEGER_32)(~ a__JFHH));
+      ptr_table__RSKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__KFHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__QSKH=((__POINTER )(NULL));
+      result__SSKH=((__POINTER *)ptr_table__RSKH)[ 0];
+      if ((result__SSKH == (void *)NULL)) {
+        result__SSKH=new_lab__FTJ(new_size__KFHH);
+        next__QSKH=(void *)((unsigned long)result__SSKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KFHH)));
+        ((__POINTER *)next__QSKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__RSKH)[ 0]=next__QSKH;
       } else {
-        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)));
+        next__QSKH=((__POINTER *)result__SSKH)[ 0];
+        if ((next__QSKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__SSKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__KFHH <<  1)) <=  4096)) {
+            next__QSKH=(void *)((unsigned long)result__SSKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KFHH)));
           } else {
-            next__RKKH=new_lab__ZPJ(new_size__P4GH);
+            next__QSKH=new_lab__FTJ(new_size__KFHH);
           };
-          ((__POINTER *)next__RKKH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__SKKH)[ 0]=next__RKKH;
+          ((__POINTER *)next__QSKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__RSKH)[ 0]=next__QSKH;
         } else {
-          ((__POINTER *)result__TKKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RKKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__TKKH=next__RKKH;
+          ((__POINTER *)result__SSKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QSKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__SSKH=next__QSKH;
         };
       };
-      ptr__2OC=result__TKKH;
+      ptr__2OC=result__SSKH;
     } else {
-      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;
+      t__OFHH=((__UINTEGER_32 )typ_id__BPC);
+      a__NFHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__ZSKH=(__UINTEGER_32)((__UINTEGER_32)(sz__4OC + a__NFHH) & (__UINTEGER_32)(~ a__NFHH));
+      ptr_table__WSKH=((__POINTER )(&(table_type[(t__OFHH)])));
+      lab_type__YSKH=(__UINTEGER_32)(t__OFHH |  1);
+      next__VSKH=((__POINTER )(NULL));
+      result__XSKH=((__POINTER *)ptr_table__WSKH)[ 0];
+      if ((result__XSKH == (void *)NULL)) {
+        result__XSKH=new_lab__FTJ(lab_type__YSKH);
+        next__VSKH=(void *)((unsigned long)result__XSKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZSKH)));
+        ((__POINTER *)next__VSKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__WSKH)[ 0]=next__VSKH;
       } else {
-        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)));
+        next__VSKH=((__POINTER *)result__XSKH)[ 0];
+        if ((next__VSKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XSKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__ZSKH <<  1)) <=  4096)) {
+            next__VSKH=(void *)((unsigned long)result__XSKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZSKH)));
           } else {
-            next__WKKH=new_lab__ZPJ(lab_type__ZKKH);
+            next__VSKH=new_lab__FTJ(lab_type__YSKH);
           };
-          ((__POINTER *)next__WKKH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__XKKH)[ 0]=next__WKKH;
+          ((__POINTER *)next__VSKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__WSKH)[ 0]=next__VSKH;
         } else {
-          ((__POINTER *)result__YKKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WKKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__YKKH=next__WKKH;
+          ((__POINTER *)result__XSKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VSKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__XSKH=next__VSKH;
         };
       };
-      ptr__2OC=result__YKKH;
+      ptr__2OC=result__XSKH;
     };
     result__1OC=((__HASHED_DICTIONARYoTYPExSTRING_CONSTANTo *)ptr__2OC);
     *(result__1OC) = *(HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__);
   };
-  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;
+  Self__4PS=((__HASHED_DICTIONARYoTYPExSTRING_CONSTANTo *)result__1OC);
+  new_capacity__ILX=prime_number_ceiling__541( 193);
+  Self__4PS->buckets__32R=create__UZ2(new_capacity__ILX);
+  Self__4PS->capacity__Y2R=new_capacity__ILX;
+  Self__4PS->count__33R= 0;
+  HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo__->key__J3R=NULL;
+  HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo__->next__U3R=NULL;
+  ARRAYED_COLLECTIONoSLOTo__->capacity__EFS= 0;
   FAST_ARRAYoSLOTo__->parent_arrayed_collection__BAB=(*ARRAYED_COLLECTIONoSLOTo__);
   ITM_SLOT__->parent_named__15=(*NAMED__);
-  TYPE_FULL__->flag__2CS= 0;
-  ARRAYED_COLLECTIONoTYPE_IDo__->upper__W1R= 0;
-  ARRAYED_COLLECTIONoTYPE_IDo__->capacity__Y1R= 0;
-  ARRAYED_COLLECTIONoTYPE_IDo__->storage__U2R=NULL;
+  TYPE_FULL__->flag__IGS= 0;
+  ARRAYED_COLLECTIONoTYPE_IDo__->upper__C5R= 0;
+  ARRAYED_COLLECTIONoTYPE_IDo__->capacity__E5R= 0;
+  ARRAYED_COLLECTIONoTYPE_IDo__->storage__AAS=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__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));
+  LINKED_COLLECTIONoENTRYo__->upper__GQ3D= 0;
+  LINKED_LISToENTRYo__->parent_linked_collection__BHRD=(*LINKED_COLLECTIONoENTRYo__);
+  LINKED_LISToENTRYo__->first_link__VLWE=NULL;
+  LINKED_LISToENTRYo__->mem_idx__2LWE= 0;
+  LINKED_LISToENTRYo__->mem_lnk__3LWE=NULL;
+  LINKED_LISToENTRYo__->last_link__4LWE=NULL;
+  LINKED_LIST_NODEoENTRYo__->item__P5WE=NULL;
+  LINKED_LIST_NODEoENTRYo__->next__V1FF=NULL;
+  FILE_UNIX__->stream__4KRD=((__POINTER )(NULL));
   proto_input__BI=NULL;
-  HASHED_SEToSTRING_CONSTANTo__->buckets__LBV=NULL;
-  HASHED_SEToSTRING_CONSTANTo__->capacity__OFT= 0;
-  HASHED_SEToSTRING_CONSTANTo__->count__UEY= 0;
+  HASHED_SEToSTRING_CONSTANTo__->buckets__XEV=NULL;
+  HASHED_SEToSTRING_CONSTANTo__->capacity__0IT= 0;
+  HASHED_SEToSTRING_CONSTANTo__->count__AIY= 0;
   short_local__XCC=NULL;
-  output_decl__UDE=create__ZBB( 60000);
-  PROTOTYPE__->type_style__E3C=NULL;
-  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;
+  output_decl__YGE=create__ZBB( 60000);
+  PROTOTYPE__->type_style__E4C=NULL;
+  is_parameter_type__DLE=FALSE__;
+  ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo__->upper__NVV= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo__->capacity__IZV= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo__->storage__D0V=NULL;
+  FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo__->parent_arrayed_collection__ZUP=(*ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo__);
+  ARRAYED_COLLECTIONoITM_TYPE_MONOo__->upper__SIV= 0;
+  ARRAYED_COLLECTIONoITM_TYPE_MONOo__->storage__ZMV=NULL;
+  ARRAYED_COLLECTIONoITM_TYPE_MONOo__->capacity__HOV= 0;
   FAST_ARRAYoITM_TYPE_MONOo__->parent_arrayed_collection__EYC=(*ARRAYED_COLLECTIONoITM_TYPE_MONOo__);
-  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__;
+  result__R0Q=NULL;
+  ptr__S0Q=((__POINTER )(NULL));
+  typ_id__X0Q= 0;
+  sz__U0Q=((__UINTEGER_32 )sizeof(__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo));
+  if ((sz__U0Q ==  0)) {
+    result__R0Q=FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo__;
   } else {
-    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__;
+    typ_id__X0Q=__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__U0Q);
+    if ((typ_id__X0Q == (__INTEGER)(-  1))) {
+      a__RFHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__SFHH=(__UINTEGER_32)((__UINTEGER_32)(sz__U0Q + a__RFHH) & (__UINTEGER_32)(~ a__RFHH));
+      ptr_table__1SKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__SFHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__0SKH=((__POINTER )(NULL));
+      result__2SKH=((__POINTER *)ptr_table__1SKH)[ 0];
+      if ((result__2SKH == (void *)NULL)) {
+        result__2SKH=new_lab__FTJ(new_size__SFHH);
+        next__0SKH=(void *)((unsigned long)result__2SKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SFHH)));
+        ((__POINTER *)next__0SKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__1SKH)[ 0]=next__0SKH;
+      } else {
+        next__0SKH=((__POINTER *)result__2SKH)[ 0];
+        if ((next__0SKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2SKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__SFHH <<  1)) <=  4096)) {
+            next__0SKH=(void *)((unsigned long)result__2SKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SFHH)));
+          } else {
+            next__0SKH=new_lab__FTJ(new_size__SFHH);
+          };
+          ((__POINTER *)next__0SKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__1SKH)[ 0]=next__0SKH;
+        } else {
+          ((__POINTER *)result__2SKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0SKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__2SKH=next__0SKH;
+        };
+      };
+      ptr__S0Q=result__2SKH;
+    } else {
+      t__WFHH=((__UINTEGER_32 )typ_id__X0Q);
+      a__VFHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__DTKH=(__UINTEGER_32)((__UINTEGER_32)(sz__U0Q + a__VFHH) & (__UINTEGER_32)(~ a__VFHH));
+      ptr_table__ATKH=((__POINTER )(&(table_type[(t__WFHH)])));
+      lab_type__CTKH=(__UINTEGER_32)(t__WFHH |  1);
+      next__5SKH=((__POINTER )(NULL));
+      result__BTKH=((__POINTER *)ptr_table__ATKH)[ 0];
+      if ((result__BTKH == (void *)NULL)) {
+        result__BTKH=new_lab__FTJ(lab_type__CTKH);
+        next__5SKH=(void *)((unsigned long)result__BTKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DTKH)));
+        ((__POINTER *)next__5SKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__ATKH)[ 0]=next__5SKH;
+      } else {
+        next__5SKH=((__POINTER *)result__BTKH)[ 0];
+        if ((next__5SKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BTKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__DTKH <<  1)) <=  4096)) {
+            next__5SKH=(void *)((unsigned long)result__BTKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DTKH)));
+          } else {
+            next__5SKH=new_lab__FTJ(lab_type__CTKH);
+          };
+          ((__POINTER *)next__5SKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__ATKH)[ 0]=next__5SKH;
+        } else {
+          ((__POINTER *)result__BTKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5SKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__BTKH=next__5SKH;
+        };
+      };
+      ptr__S0Q=result__BTKH;
+    };
+    result__R0Q=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)ptr__S0Q);
+    *(result__R0Q) = *(FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo__);
+  };
+  Self__53V=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)result__R0Q);
+  if ((Self__53V->parent_arrayed_collection__ZUP.capacity__IZV <  5)) {
+    Self__53V->parent_arrayed_collection__ZUP.storage__D0V=create__CLRB( 5);
+    Self__53V->parent_arrayed_collection__ZUP.capacity__IZV= 5;
+  };
+  Self__53V->parent_arrayed_collection__ZUP.upper__NVV=(__INTEGER)(-  1);
+  free_list__0UP=result__R0Q;
+  empty_list__BWP=create_with_capacity__YFR( 0);
+  HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo__->buckets__45V=NULL;
+  HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo__->capacity__Z5V= 0;
+  HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo__->count__NIW= 0;
+  result__OER=NULL;
+  ptr__PER=((__POINTER )(NULL));
+  typ_id__UER= 0;
+  sz__RER=((__UINTEGER_32 )sizeof(__HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo));
+  if ((sz__RER ==  0)) {
+    result__OER=HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo__;
+  } else {
+    typ_id__UER=__HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__RER);
+    if ((typ_id__UER == (__INTEGER)(-  1))) {
+      a__ZFHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__0FHH=(__UINTEGER_32)((__UINTEGER_32)(sz__RER + a__ZFHH) & (__UINTEGER_32)(~ a__ZFHH));
+      ptr_table__FTKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__0FHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__ETKH=((__POINTER )(NULL));
+      result__GTKH=((__POINTER *)ptr_table__FTKH)[ 0];
+      if ((result__GTKH == (void *)NULL)) {
+        result__GTKH=new_lab__FTJ(new_size__0FHH);
+        next__ETKH=(void *)((unsigned long)result__GTKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0FHH)));
+        ((__POINTER *)next__ETKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__FTKH)[ 0]=next__ETKH;
+      } else {
+        next__ETKH=((__POINTER *)result__GTKH)[ 0];
+        if ((next__ETKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GTKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__0FHH <<  1)) <=  4096)) {
+            next__ETKH=(void *)((unsigned long)result__GTKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0FHH)));
+          } else {
+            next__ETKH=new_lab__FTJ(new_size__0FHH);
+          };
+          ((__POINTER *)next__ETKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__FTKH)[ 0]=next__ETKH;
+        } else {
+          ((__POINTER *)result__GTKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ETKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__GTKH=next__ETKH;
+        };
+      };
+      ptr__PER=result__GTKH;
+    } else {
+      t__4FHH=((__UINTEGER_32 )typ_id__UER);
+      a__3FHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__NTKH=(__UINTEGER_32)((__UINTEGER_32)(sz__RER + a__3FHH) & (__UINTEGER_32)(~ a__3FHH));
+      ptr_table__KTKH=((__POINTER )(&(table_type[(t__4FHH)])));
+      lab_type__MTKH=(__UINTEGER_32)(t__4FHH |  1);
+      next__JTKH=((__POINTER )(NULL));
+      result__LTKH=((__POINTER *)ptr_table__KTKH)[ 0];
+      if ((result__LTKH == (void *)NULL)) {
+        result__LTKH=new_lab__FTJ(lab_type__MTKH);
+        next__JTKH=(void *)((unsigned long)result__LTKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NTKH)));
+        ((__POINTER *)next__JTKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__KTKH)[ 0]=next__JTKH;
+      } else {
+        next__JTKH=((__POINTER *)result__LTKH)[ 0];
+        if ((next__JTKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LTKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__NTKH <<  1)) <=  4096)) {
+            next__JTKH=(void *)((unsigned long)result__LTKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NTKH)));
+          } else {
+            next__JTKH=new_lab__FTJ(lab_type__MTKH);
+          };
+          ((__POINTER *)next__JTKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__KTKH)[ 0]=next__JTKH;
+        } else {
+          ((__POINTER *)result__LTKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JTKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__LTKH=next__JTKH;
+        };
+      };
+      ptr__PER=result__LTKH;
+    };
+    result__OER=((__HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo *)ptr__PER);
+    *(result__OER) = *(HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo__);
+  };
+  Self__RFW=((__HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo *)result__OER);
+  new_capacity__CJ1=prime_number_ceiling__541( 53);
+  Self__RFW->buckets__45V=create__D0BB(new_capacity__CJ1);
+  Self__RFW->capacity__Z5V=new_capacity__CJ1;
+  Self__RFW->count__NIW= 0;
+  bucket__MWP=result__OER;
+  ITM_TYPE_STYLE__->parent_itm_type_simple__RSN=(*ITM_TYPE_SIMPLE__);
+  ITM_TYPE_STYLE__->style__DZP=NULL;
+  ITM_TYPE_GENERIC__->parent_itm_type_style__SSN=(*ITM_TYPE_STYLE__);
+  HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo__->item__KAW=NULL;
+  HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo__->next__WAW=NULL;
+  ARRAYED_COLLECTIONoITM_TYPE_MULTIo__->upper__GKP= 0;
+  ARRAYED_COLLECTIONoITM_TYPE_MULTIo__->capacity__F2V= 0;
+  ARRAYED_COLLECTIONoITM_TYPE_MULTIo__->storage__Q2V=NULL;
+  FAST_ARRAYoITM_TYPE_MULTIo__->parent_arrayed_collection__2JP=(*ARRAYED_COLLECTIONoITM_TYPE_MULTIo__);
+  result__4SQ=NULL;
+  ptr__5SQ=((__POINTER )(NULL));
+  typ_id__ETQ= 0;
+  sz__BTQ=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_TYPE_MULTIo));
+  if ((sz__BTQ ==  0)) {
+    result__4SQ=FAST_ARRAYoITM_TYPE_MULTIo__;
   } else {
-    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__;
+    typ_id__ETQ=__FAST_ARRAYoITM_TYPE_MULTIo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__BTQ);
+    if ((typ_id__ETQ == (__INTEGER)(-  1))) {
+      a__BGHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__CGHH=(__UINTEGER_32)((__UINTEGER_32)(sz__BTQ + a__BGHH) & (__UINTEGER_32)(~ a__BGHH));
+      ptr_table__PTKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__CGHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__OTKH=((__POINTER )(NULL));
+      result__QTKH=((__POINTER *)ptr_table__PTKH)[ 0];
+      if ((result__QTKH == (void *)NULL)) {
+        result__QTKH=new_lab__FTJ(new_size__CGHH);
+        next__OTKH=(void *)((unsigned long)result__QTKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CGHH)));
+        ((__POINTER *)next__OTKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__PTKH)[ 0]=next__OTKH;
+      } else {
+        next__OTKH=((__POINTER *)result__QTKH)[ 0];
+        if ((next__OTKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__QTKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__CGHH <<  1)) <=  4096)) {
+            next__OTKH=(void *)((unsigned long)result__QTKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CGHH)));
+          } else {
+            next__OTKH=new_lab__FTJ(new_size__CGHH);
+          };
+          ((__POINTER *)next__OTKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__PTKH)[ 0]=next__OTKH;
+        } else {
+          ((__POINTER *)result__QTKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OTKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__QTKH=next__OTKH;
+        };
+      };
+      ptr__5SQ=result__QTKH;
+    } else {
+      t__GGHH=((__UINTEGER_32 )typ_id__ETQ);
+      a__FGHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__XTKH=(__UINTEGER_32)((__UINTEGER_32)(sz__BTQ + a__FGHH) & (__UINTEGER_32)(~ a__FGHH));
+      ptr_table__UTKH=((__POINTER )(&(table_type[(t__GGHH)])));
+      lab_type__WTKH=(__UINTEGER_32)(t__GGHH |  1);
+      next__TTKH=((__POINTER )(NULL));
+      result__VTKH=((__POINTER *)ptr_table__UTKH)[ 0];
+      if ((result__VTKH == (void *)NULL)) {
+        result__VTKH=new_lab__FTJ(lab_type__WTKH);
+        next__TTKH=(void *)((unsigned long)result__VTKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XTKH)));
+        ((__POINTER *)next__TTKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__UTKH)[ 0]=next__TTKH;
+      } else {
+        next__TTKH=((__POINTER *)result__VTKH)[ 0];
+        if ((next__TTKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__VTKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__XTKH <<  1)) <=  4096)) {
+            next__TTKH=(void *)((unsigned long)result__VTKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XTKH)));
+          } else {
+            next__TTKH=new_lab__FTJ(lab_type__WTKH);
+          };
+          ((__POINTER *)next__TTKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__UTKH)[ 0]=next__TTKH;
+        } else {
+          ((__POINTER *)result__VTKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TTKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__VTKH=next__TTKH;
+        };
+      };
+      ptr__5SQ=result__VTKH;
+    };
+    result__4SQ=((__FAST_ARRAYoITM_TYPE_MULTIo *)ptr__5SQ);
+    *(result__4SQ) = *(FAST_ARRAYoITM_TYPE_MULTIo__);
+  };
+  Self__21V=((__FAST_ARRAYoITM_TYPE_MULTIo *)result__4SQ);
+  if ((Self__21V->parent_arrayed_collection__2JP.capacity__F2V <  32)) {
+    Self__21V->parent_arrayed_collection__2JP.storage__Q2V=create__CNXB( 32);
+    Self__21V->parent_arrayed_collection__2JP.capacity__F2V= 32;
+  };
+  Self__21V->parent_arrayed_collection__2JP.upper__GKP=(__INTEGER)(-  1);
+  dico__3JP=result__4SQ;
+  ITM_TYPE_MULTI__->list_type__QKP=NULL;
+  ITM_TYPE_BLOCK__->type_argument__GNN=NULL;
+  ITM_TYPE_GENERIC__->list_type__NZP=NULL;
+  ITM_TYPE_BLOCK__->type_result__QNN=NULL;
+  ARRAYED_COLLECTIONoITM_TYPE_BLOCKo__->upper__YMN= 0;
+  ARRAYED_COLLECTIONoITM_TYPE_BLOCKo__->capacity__OKV= 0;
+  ARRAYED_COLLECTIONoITM_TYPE_BLOCKo__->storage__ZKV=NULL;
+  FAST_ARRAYoITM_TYPE_BLOCKo__->parent_arrayed_collection__OMN=(*ARRAYED_COLLECTIONoITM_TYPE_BLOCKo__);
+  result__E1O=NULL;
+  ptr__F1O=((__POINTER )(NULL));
+  typ_id__K1O= 0;
+  sz__H1O=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_TYPE_BLOCKo));
+  if ((sz__H1O ==  0)) {
+    result__E1O=FAST_ARRAYoITM_TYPE_BLOCKo__;
   } else {
-    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__;
+    typ_id__K1O=__FAST_ARRAYoITM_TYPE_BLOCKo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__H1O);
+    if ((typ_id__K1O == (__INTEGER)(-  1))) {
+      a__JGHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__KGHH=(__UINTEGER_32)((__UINTEGER_32)(sz__H1O + a__JGHH) & (__UINTEGER_32)(~ a__JGHH));
+      ptr_table__ZTKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__KGHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__YTKH=((__POINTER )(NULL));
+      result__0TKH=((__POINTER *)ptr_table__ZTKH)[ 0];
+      if ((result__0TKH == (void *)NULL)) {
+        result__0TKH=new_lab__FTJ(new_size__KGHH);
+        next__YTKH=(void *)((unsigned long)result__0TKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KGHH)));
+        ((__POINTER *)next__YTKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__ZTKH)[ 0]=next__YTKH;
+      } else {
+        next__YTKH=((__POINTER *)result__0TKH)[ 0];
+        if ((next__YTKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__0TKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__KGHH <<  1)) <=  4096)) {
+            next__YTKH=(void *)((unsigned long)result__0TKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KGHH)));
+          } else {
+            next__YTKH=new_lab__FTJ(new_size__KGHH);
+          };
+          ((__POINTER *)next__YTKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__ZTKH)[ 0]=next__YTKH;
+        } else {
+          ((__POINTER *)result__0TKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YTKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__0TKH=next__YTKH;
+        };
+      };
+      ptr__F1O=result__0TKH;
+    } else {
+      t__OGHH=((__UINTEGER_32 )typ_id__K1O);
+      a__NGHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__BUKH=(__UINTEGER_32)((__UINTEGER_32)(sz__H1O + a__NGHH) & (__UINTEGER_32)(~ a__NGHH));
+      ptr_table__4TKH=((__POINTER )(&(table_type[(t__OGHH)])));
+      lab_type__AUKH=(__UINTEGER_32)(t__OGHH |  1);
+      next__3TKH=((__POINTER )(NULL));
+      result__5TKH=((__POINTER *)ptr_table__4TKH)[ 0];
+      if ((result__5TKH == (void *)NULL)) {
+        result__5TKH=new_lab__FTJ(lab_type__AUKH);
+        next__3TKH=(void *)((unsigned long)result__5TKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BUKH)));
+        ((__POINTER *)next__3TKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__4TKH)[ 0]=next__3TKH;
+      } else {
+        next__3TKH=((__POINTER *)result__5TKH)[ 0];
+        if ((next__3TKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__5TKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__BUKH <<  1)) <=  4096)) {
+            next__3TKH=(void *)((unsigned long)result__5TKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BUKH)));
+          } else {
+            next__3TKH=new_lab__FTJ(lab_type__AUKH);
+          };
+          ((__POINTER *)next__3TKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__4TKH)[ 0]=next__3TKH;
+        } else {
+          ((__POINTER *)result__5TKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3TKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__5TKH=next__3TKH;
+        };
+      };
+      ptr__F1O=result__5TKH;
+    };
+    result__E1O=((__FAST_ARRAYoITM_TYPE_BLOCKo *)ptr__F1O);
+    *(result__E1O) = *(FAST_ARRAYoITM_TYPE_BLOCKo__);
+  };
+  Self__FKV=((__FAST_ARRAYoITM_TYPE_BLOCKo *)result__E1O);
+  if ((Self__FKV->parent_arrayed_collection__OMN.capacity__OKV <  32)) {
+    Self__FKV->parent_arrayed_collection__OMN.storage__ZKV=create__3VWB( 32);
+    Self__FKV->parent_arrayed_collection__OMN.capacity__OKV= 32;
+  };
+  Self__FKV->parent_arrayed_collection__OMN.upper__YMN=(__INTEGER)(-  1);
+  dico__PMN=result__E1O;
+  ITM_CODE__->parent_itm_object__SEE=(*ITM_OBJECT__);
+  ITM_CONSTANT__->parent_itm_code__WXF=(*ITM_CODE__);
+  ITM_REAL__->parent_itm_constant__VRO=(*ITM_CONSTANT__);
+  ITM_NUMBER__->parent_itm_constant__HSO=(*ITM_CONSTANT__);
+  ITM_CHARACTER__->parent_itm_constant__ZSO=(*ITM_CONSTANT__);
+  ITM_STRING__->parent_itm_constant__KTO=(*ITM_CONSTANT__);
+  ARRAYED_COLLECTIONoITM_TYPE_GENERICo__->upper__QYP= 0;
+  ARRAYED_COLLECTIONoITM_TYPE_GENERICo__->capacity__1BW= 0;
+  ARRAYED_COLLECTIONoITM_TYPE_GENERICo__->storage__GCW=NULL;
+  FAST_ARRAYoITM_TYPE_GENERICo__->parent_arrayed_collection__GYP=(*ARRAYED_COLLECTIONoITM_TYPE_GENERICo__);
+  result__L3Q=NULL;
+  ptr__M3Q=((__POINTER )(NULL));
+  typ_id__R3Q= 0;
+  sz__O3Q=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_TYPE_GENERICo));
+  if ((sz__O3Q ==  0)) {
+    result__L3Q=FAST_ARRAYoITM_TYPE_GENERICo__;
   } else {
-    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__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__ZLKH=new_lab__ZPJ(new_size__P5GH);
-          };
-          ((__POINTER *)next__ZLKH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__0LKH)[ 0]=next__ZLKH;
-        } else {
-          ((__POINTER *)result__1LKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZLKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__1LKH=next__ZLKH;
-        };
-      };
-      ptr__ZXO=result__1LKH;
-    } else {
-      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__;
+    typ_id__R3Q=__FAST_ARRAYoITM_TYPE_GENERICo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__O3Q);
+    if ((typ_id__R3Q == (__INTEGER)(-  1))) {
+      a__RGHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__SGHH=(__UINTEGER_32)((__UINTEGER_32)(sz__O3Q + a__RGHH) & (__UINTEGER_32)(~ a__RGHH));
+      ptr_table__DUKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__SGHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__CUKH=((__POINTER )(NULL));
+      result__EUKH=((__POINTER *)ptr_table__DUKH)[ 0];
+      if ((result__EUKH == (void *)NULL)) {
+        result__EUKH=new_lab__FTJ(new_size__SGHH);
+        next__CUKH=(void *)((unsigned long)result__EUKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SGHH)));
+        ((__POINTER *)next__CUKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__DUKH)[ 0]=next__CUKH;
+      } else {
+        next__CUKH=((__POINTER *)result__EUKH)[ 0];
+        if ((next__CUKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__EUKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__SGHH <<  1)) <=  4096)) {
+            next__CUKH=(void *)((unsigned long)result__EUKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SGHH)));
+          } else {
+            next__CUKH=new_lab__FTJ(new_size__SGHH);
+          };
+          ((__POINTER *)next__CUKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__DUKH)[ 0]=next__CUKH;
+        } else {
+          ((__POINTER *)result__EUKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CUKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__EUKH=next__CUKH;
+        };
+      };
+      ptr__M3Q=result__EUKH;
+    } else {
+      t__WGHH=((__UINTEGER_32 )typ_id__R3Q);
+      a__VGHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__LUKH=(__UINTEGER_32)((__UINTEGER_32)(sz__O3Q + a__VGHH) & (__UINTEGER_32)(~ a__VGHH));
+      ptr_table__IUKH=((__POINTER )(&(table_type[(t__WGHH)])));
+      lab_type__KUKH=(__UINTEGER_32)(t__WGHH |  1);
+      next__HUKH=((__POINTER )(NULL));
+      result__JUKH=((__POINTER *)ptr_table__IUKH)[ 0];
+      if ((result__JUKH == (void *)NULL)) {
+        result__JUKH=new_lab__FTJ(lab_type__KUKH);
+        next__HUKH=(void *)((unsigned long)result__JUKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LUKH)));
+        ((__POINTER *)next__HUKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__IUKH)[ 0]=next__HUKH;
+      } else {
+        next__HUKH=((__POINTER *)result__JUKH)[ 0];
+        if ((next__HUKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__JUKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__LUKH <<  1)) <=  4096)) {
+            next__HUKH=(void *)((unsigned long)result__JUKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LUKH)));
+          } else {
+            next__HUKH=new_lab__FTJ(lab_type__KUKH);
+          };
+          ((__POINTER *)next__HUKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__IUKH)[ 0]=next__HUKH;
+        } else {
+          ((__POINTER *)result__JUKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HUKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__JUKH=next__HUKH;
+        };
+      };
+      ptr__M3Q=result__JUKH;
+    };
+    result__L3Q=((__FAST_ARRAYoITM_TYPE_GENERICo *)ptr__M3Q);
+    *(result__L3Q) = *(FAST_ARRAYoITM_TYPE_GENERICo__);
+  };
+  Self__SBW=((__FAST_ARRAYoITM_TYPE_GENERICo *)result__L3Q);
+  if ((Self__SBW->parent_arrayed_collection__GYP.capacity__1BW <  32)) {
+    Self__SBW->parent_arrayed_collection__GYP.storage__GCW=create__2TXB( 32);
+    Self__SBW->parent_arrayed_collection__GYP.capacity__1BW= 32;
+  };
+  Self__SBW->parent_arrayed_collection__GYP.upper__QYP=(__INTEGER)(-  1);
+  dico__HYP=result__L3Q;
+  HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo__->buckets__Z4T=NULL;
+  HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo__->capacity__U4T= 0;
+  HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo__->count__HIZ= 0;
+  result__YMK=NULL;
+  ptr__ZMK=((__POINTER )(NULL));
+  typ_id__4MK= 0;
+  sz__1MK=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo));
+  if ((sz__1MK ==  0)) {
+    result__YMK=HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo__;
   } else {
-    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__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__DMKH=new_lab__ZPJ(new_size__X5GH);
-          };
-          ((__POINTER *)next__DMKH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__EMKH)[ 0]=next__DMKH;
-        } else {
-          ((__POINTER *)result__FMKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DMKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__FMKH=next__DMKH;
-        };
-      };
-      ptr__A0Q=result__FMKH;
-    } else {
-      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__;
+    typ_id__4MK=__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__1MK);
+    if ((typ_id__4MK == (__INTEGER)(-  1))) {
+      a__ZGHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__0GHH=(__UINTEGER_32)((__UINTEGER_32)(sz__1MK + a__ZGHH) & (__UINTEGER_32)(~ a__ZGHH));
+      ptr_table__NUKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__0GHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__MUKH=((__POINTER )(NULL));
+      result__OUKH=((__POINTER *)ptr_table__NUKH)[ 0];
+      if ((result__OUKH == (void *)NULL)) {
+        result__OUKH=new_lab__FTJ(new_size__0GHH);
+        next__MUKH=(void *)((unsigned long)result__OUKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0GHH)));
+        ((__POINTER *)next__MUKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__NUKH)[ 0]=next__MUKH;
+      } else {
+        next__MUKH=((__POINTER *)result__OUKH)[ 0];
+        if ((next__MUKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__OUKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__0GHH <<  1)) <=  4096)) {
+            next__MUKH=(void *)((unsigned long)result__OUKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0GHH)));
+          } else {
+            next__MUKH=new_lab__FTJ(new_size__0GHH);
+          };
+          ((__POINTER *)next__MUKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__NUKH)[ 0]=next__MUKH;
+        } else {
+          ((__POINTER *)result__OUKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MUKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__OUKH=next__MUKH;
+        };
+      };
+      ptr__ZMK=result__OUKH;
+    } else {
+      t__4GHH=((__UINTEGER_32 )typ_id__4MK);
+      a__3GHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__VUKH=(__UINTEGER_32)((__UINTEGER_32)(sz__1MK + a__3GHH) & (__UINTEGER_32)(~ a__3GHH));
+      ptr_table__SUKH=((__POINTER )(&(table_type[(t__4GHH)])));
+      lab_type__UUKH=(__UINTEGER_32)(t__4GHH |  1);
+      next__RUKH=((__POINTER )(NULL));
+      result__TUKH=((__POINTER *)ptr_table__SUKH)[ 0];
+      if ((result__TUKH == (void *)NULL)) {
+        result__TUKH=new_lab__FTJ(lab_type__UUKH);
+        next__RUKH=(void *)((unsigned long)result__TUKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VUKH)));
+        ((__POINTER *)next__RUKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__SUKH)[ 0]=next__RUKH;
+      } else {
+        next__RUKH=((__POINTER *)result__TUKH)[ 0];
+        if ((next__RUKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TUKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__VUKH <<  1)) <=  4096)) {
+            next__RUKH=(void *)((unsigned long)result__TUKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VUKH)));
+          } else {
+            next__RUKH=new_lab__FTJ(lab_type__UUKH);
+          };
+          ((__POINTER *)next__RUKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__SUKH)[ 0]=next__RUKH;
+        } else {
+          ((__POINTER *)result__TUKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RUKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__TUKH=next__RUKH;
+        };
+      };
+      ptr__ZMK=result__TUKH;
+    };
+    result__YMK=((__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *)ptr__ZMK);
+    *(result__YMK) = *(HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo__);
+  };
+  Self__UNU=((__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *)result__YMK);
+  new_capacity__CIZ=prime_number_ceiling__541( 193);
+  Self__UNU->buckets__Z4T=create__5J5(new_capacity__CIZ);
+  Self__UNU->capacity__U4T=new_capacity__CIZ;
+  Self__UNU->count__HIZ= 0;
+  dico__LVI=result__YMK;
+  HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo__->key__F5T=NULL;
+  HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo__->next__Q5T=NULL;
+  HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo__->item__Y5T=NULL;
+  result__1WQ=NULL;
+  ptr__2WQ=((__POINTER )(NULL));
+  typ_id__BXQ= 0;
+  sz__4WQ=((__UINTEGER_32 )sizeof(__ITM_TYPE_PARAMETER));
+  if ((sz__4WQ ==  0)) {
+    result__1WQ=ITM_TYPE_PARAMETER__;
   } else {
-    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__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__NMKH=new_lab__ZPJ(new_size__55GH);
-          };
-          ((__POINTER *)next__NMKH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__OMKH)[ 0]=next__NMKH;
-        } else {
-          ((__POINTER *)result__PMKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NMKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__PMKH=next__NMKH;
-        };
-      };
-      ptr__NJK=result__PMKH;
-    } else {
-      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__;
+    typ_id__BXQ=-1;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__4WQ);
+    if ((typ_id__BXQ == (__INTEGER)(-  1))) {
+      a__4MFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__5MFH=(__UINTEGER_32)((__UINTEGER_32)(sz__4WQ + a__4MFH) & (__UINTEGER_32)(~ a__4MFH));
+      ptr_table__XUKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__5MFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__WUKH=((__POINTER )(NULL));
+      result__YUKH=((__POINTER *)ptr_table__XUKH)[ 0];
+      if ((result__YUKH == (void *)NULL)) {
+        result__YUKH=new_lab__FTJ(new_size__5MFH);
+        next__WUKH=(void *)((unsigned long)result__YUKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5MFH)));
+        ((__POINTER *)next__WUKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__XUKH)[ 0]=next__WUKH;
+      } else {
+        next__WUKH=((__POINTER *)result__YUKH)[ 0];
+        if ((next__WUKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YUKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__5MFH <<  1)) <=  4096)) {
+            next__WUKH=(void *)((unsigned long)result__YUKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5MFH)));
+          } else {
+            next__WUKH=new_lab__FTJ(new_size__5MFH);
+          };
+          ((__POINTER *)next__WUKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__XUKH)[ 0]=next__WUKH;
+        } else {
+          ((__POINTER *)result__YUKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WUKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__YUKH=next__WUKH;
+        };
+      };
+      ptr__2WQ=result__YUKH;
+    } else {
+      t__DNFH=((__UINTEGER_32 )typ_id__BXQ);
+      a__CNFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__5UKH=(__UINTEGER_32)((__UINTEGER_32)(sz__4WQ + a__CNFH) & (__UINTEGER_32)(~ a__CNFH));
+      ptr_table__2UKH=((__POINTER )(&(table_type[(t__DNFH)])));
+      lab_type__4UKH=(__UINTEGER_32)(t__DNFH |  1);
+      next__1UKH=((__POINTER )(NULL));
+      result__3UKH=((__POINTER *)ptr_table__2UKH)[ 0];
+      if ((result__3UKH == (void *)NULL)) {
+        result__3UKH=new_lab__FTJ(lab_type__4UKH);
+        next__1UKH=(void *)((unsigned long)result__3UKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5UKH)));
+        ((__POINTER *)next__1UKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__2UKH)[ 0]=next__1UKH;
+      } else {
+        next__1UKH=((__POINTER *)result__3UKH)[ 0];
+        if ((next__1UKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__3UKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__5UKH <<  1)) <=  4096)) {
+            next__1UKH=(void *)((unsigned long)result__3UKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5UKH)));
+          } else {
+            next__1UKH=new_lab__FTJ(lab_type__4UKH);
+          };
+          ((__POINTER *)next__1UKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__2UKH)[ 0]=next__1UKH;
+        } else {
+          ((__POINTER *)result__3UKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1UKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__3UKH=next__1UKH;
+        };
+      };
+      ptr__2WQ=result__3UKH;
+    };
+    result__1WQ=((__ITM_TYPE_PARAMETER *)ptr__2WQ);
+    *(result__1WQ) = *(ITM_TYPE_PARAMETER__);
+  };
+  Self__T3V=((__ITM_TYPE_PARAMETER *)result__1WQ);
+  Self__T3V->parent_itm_type__YEE.name__0YP=(&__string_1);
+  fast_put__to__ORZ(result__YMK,Self__T3V,(&__string_1));
+  type_self__XUN=result__1WQ;
+  ARRAYED_COLLECTIONoITM_TYPE_STYLEo__->upper__5OR= 0;
+  ARRAYED_COLLECTIONoITM_TYPE_STYLEo__->capacity__DMW= 0;
+  ARRAYED_COLLECTIONoITM_TYPE_STYLEo__->storage__OMW=NULL;
+  FAST_ARRAYoITM_TYPE_STYLEo__->parent_arrayed_collection__VOR=(*ARRAYED_COLLECTIONoITM_TYPE_STYLEo__);
+  result__XVR=NULL;
+  ptr__YVR=((__POINTER )(NULL));
+  typ_id__3VR= 0;
+  sz__0VR=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_TYPE_STYLEo));
+  if ((sz__0VR ==  0)) {
+    result__XVR=FAST_ARRAYoITM_TYPE_STYLEo__;
   } else {
-    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__;
+    typ_id__3VR=__FAST_ARRAYoITM_TYPE_STYLEo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__0VR);
+    if ((typ_id__3VR == (__INTEGER)(-  1))) {
+      a__BHHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__CHHH=(__UINTEGER_32)((__UINTEGER_32)(sz__0VR + a__BHHH) & (__UINTEGER_32)(~ a__BHHH));
+      ptr_table__BVKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__CHHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__AVKH=((__POINTER )(NULL));
+      result__CVKH=((__POINTER *)ptr_table__BVKH)[ 0];
+      if ((result__CVKH == (void *)NULL)) {
+        result__CVKH=new_lab__FTJ(new_size__CHHH);
+        next__AVKH=(void *)((unsigned long)result__CVKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CHHH)));
+        ((__POINTER *)next__AVKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__BVKH)[ 0]=next__AVKH;
+      } else {
+        next__AVKH=((__POINTER *)result__CVKH)[ 0];
+        if ((next__AVKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__CVKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__CHHH <<  1)) <=  4096)) {
+            next__AVKH=(void *)((unsigned long)result__CVKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CHHH)));
+          } else {
+            next__AVKH=new_lab__FTJ(new_size__CHHH);
+          };
+          ((__POINTER *)next__AVKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__BVKH)[ 0]=next__AVKH;
+        } else {
+          ((__POINTER *)result__CVKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__AVKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__CVKH=next__AVKH;
+        };
+      };
+      ptr__YVR=result__CVKH;
+    } else {
+      t__GHHH=((__UINTEGER_32 )typ_id__3VR);
+      a__FHHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__JVKH=(__UINTEGER_32)((__UINTEGER_32)(sz__0VR + a__FHHH) & (__UINTEGER_32)(~ a__FHHH));
+      ptr_table__GVKH=((__POINTER )(&(table_type[(t__GHHH)])));
+      lab_type__IVKH=(__UINTEGER_32)(t__GHHH |  1);
+      next__FVKH=((__POINTER )(NULL));
+      result__HVKH=((__POINTER *)ptr_table__GVKH)[ 0];
+      if ((result__HVKH == (void *)NULL)) {
+        result__HVKH=new_lab__FTJ(lab_type__IVKH);
+        next__FVKH=(void *)((unsigned long)result__HVKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JVKH)));
+        ((__POINTER *)next__FVKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__GVKH)[ 0]=next__FVKH;
+      } else {
+        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__SXH)))) &  4095) + (__UINTEGER_32)(new_size__JVKH <<  1)) <=  4096)) {
+            next__FVKH=(void *)((unsigned long)result__HVKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JVKH)));
+          } else {
+            next__FVKH=new_lab__FTJ(lab_type__IVKH);
+          };
+          ((__POINTER *)next__FVKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__GVKH)[ 0]=next__FVKH;
+        } else {
+          ((__POINTER *)result__HVKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FVKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__HVKH=next__FVKH;
+        };
+      };
+      ptr__YVR=result__HVKH;
+    };
+    result__XVR=((__FAST_ARRAYoITM_TYPE_STYLEo *)ptr__YVR);
+    *(result__XVR) = *(FAST_ARRAYoITM_TYPE_STYLEo__);
+  };
+  Self__0LW=((__FAST_ARRAYoITM_TYPE_STYLEo *)result__XVR);
+  if ((Self__0LW->parent_arrayed_collection__VOR.capacity__DMW <  32)) {
+    Self__0LW->parent_arrayed_collection__VOR.storage__OMW=create__IJYB( 32);
+    Self__0LW->parent_arrayed_collection__VOR.capacity__DMW= 32;
+  };
+  Self__0LW->parent_arrayed_collection__VOR.upper__5OR=(__INTEGER)(-  1);
+  dico__WOR=result__XVR;
+  type_null__PVN=get__2UI((&__string_2));
+  ITM_LIST__->parent_itm_code__VAF=(*ITM_CODE__);
+  last_group__WVF=NULL;
+  old_position__2SI= 0;
+  old_pos_cur__4SI= 0;
+  old_pos_line__ATI= 0;
+  old_pos_col__CTI= 0;
+  old_short_derive__ETI= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo__->upper__W3T= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo__->capacity__BLU= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo__->storage__MLU=NULL;
+  FAST_ARRAYoFAST_ARRAYoITM_LOCALoo__->parent_arrayed_collection__NTI=(*ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo__);
+  ARRAYED_COLLECTIONoITM_LOCALo__->upper__A2K= 0;
+  ARRAYED_COLLECTIONoITM_LOCALo__->capacity__2MU= 0;
+  ARRAYED_COLLECTIONoITM_LOCALo__->storage__HNU=NULL;
+  FAST_ARRAYoITM_LOCALo__->parent_arrayed_collection__H3H=(*ARRAYED_COLLECTIONoITM_LOCALo__);
+  result__VJK=NULL;
+  ptr__WJK=((__POINTER )(NULL));
+  typ_id__1JK= 0;
+  sz__YJK=((__UINTEGER_32 )sizeof(__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo));
+  if ((sz__YJK ==  0)) {
+    result__VJK=FAST_ARRAYoFAST_ARRAYoITM_LOCALoo__;
   } 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__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__BNKH=new_lab__ZPJ(new_size__HAHH);
-          };
-          ((__POINTER *)next__BNKH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__CNKH)[ 0]=next__BNKH;
-        } else {
-          ((__POINTER *)result__DNKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BNKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__DNKH=next__BNKH;
-        };
-      };
-      ptr__MSR=result__DNKH;
-    } else {
-      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__;
+    typ_id__1JK=__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__YJK);
+    if ((typ_id__1JK == (__INTEGER)(-  1))) {
+      a__JHHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__KHHH=(__UINTEGER_32)((__UINTEGER_32)(sz__YJK + a__JHHH) & (__UINTEGER_32)(~ a__JHHH));
+      ptr_table__LVKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__KHHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__KVKH=((__POINTER )(NULL));
+      result__MVKH=((__POINTER *)ptr_table__LVKH)[ 0];
+      if ((result__MVKH == (void *)NULL)) {
+        result__MVKH=new_lab__FTJ(new_size__KHHH);
+        next__KVKH=(void *)((unsigned long)result__MVKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KHHH)));
+        ((__POINTER *)next__KVKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__LVKH)[ 0]=next__KVKH;
+      } else {
+        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__SXH)))) &  4095) + (__UINTEGER_32)(new_size__KHHH <<  1)) <=  4096)) {
+            next__KVKH=(void *)((unsigned long)result__MVKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KHHH)));
+          } else {
+            next__KVKH=new_lab__FTJ(new_size__KHHH);
+          };
+          ((__POINTER *)next__KVKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__LVKH)[ 0]=next__KVKH;
+        } else {
+          ((__POINTER *)result__MVKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KVKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__MVKH=next__KVKH;
+        };
+      };
+      ptr__WJK=result__MVKH;
+    } else {
+      t__OHHH=((__UINTEGER_32 )typ_id__1JK);
+      a__NHHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__TVKH=(__UINTEGER_32)((__UINTEGER_32)(sz__YJK + a__NHHH) & (__UINTEGER_32)(~ a__NHHH));
+      ptr_table__QVKH=((__POINTER )(&(table_type[(t__OHHH)])));
+      lab_type__SVKH=(__UINTEGER_32)(t__OHHH |  1);
+      next__PVKH=((__POINTER )(NULL));
+      result__RVKH=((__POINTER *)ptr_table__QVKH)[ 0];
+      if ((result__RVKH == (void *)NULL)) {
+        result__RVKH=new_lab__FTJ(lab_type__SVKH);
+        next__PVKH=(void *)((unsigned long)result__RVKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TVKH)));
+        ((__POINTER *)next__PVKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__QVKH)[ 0]=next__PVKH;
+      } else {
+        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__SXH)))) &  4095) + (__UINTEGER_32)(new_size__TVKH <<  1)) <=  4096)) {
+            next__PVKH=(void *)((unsigned long)result__RVKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TVKH)));
+          } else {
+            next__PVKH=new_lab__FTJ(lab_type__SVKH);
+          };
+          ((__POINTER *)next__PVKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__QVKH)[ 0]=next__PVKH;
+        } else {
+          ((__POINTER *)result__RVKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PVKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__RVKH=next__PVKH;
+        };
+      };
+      ptr__WJK=result__RVKH;
+    };
+    result__VJK=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)ptr__WJK);
+    *(result__VJK) = *(FAST_ARRAYoFAST_ARRAYoITM_LOCALoo__);
+  };
+  Self__YKU=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)result__VJK);
+  if ((Self__YKU->parent_arrayed_collection__NTI.capacity__BLU <  5)) {
+    Self__YKU->parent_arrayed_collection__NTI.storage__MLU=create__AJQB( 5);
+    Self__YKU->parent_arrayed_collection__NTI.capacity__BLU= 5;
+  };
+  Self__YKU->parent_arrayed_collection__NTI.upper__W3T=(__INTEGER)(-  1);
+  free_list__OTI=result__VJK;
+  ITM_LOCAL__->parent_itm_object__C3H=(*ITM_OBJECT__);
+  ITM_LOCAL__->name__D4K=NULL;
+  HASHED_SET_NODEoSTRING_CONSTANTo__->item__DFV=NULL;
+  HASHED_SET_NODEoSTRING_CONSTANTo__->next__OFV=NULL;
+  ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo__->upper__VYT= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo__->capacity__HCU= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo__->storage__DDU=NULL;
+  FAST_ARRAYoFAST_ARRAYoITM_CODEoo__->parent_arrayed_collection__DAI=(*ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo__);
+  ARRAYED_COLLECTIONoITM_CODEo__->upper__BJL= 0;
+  ARRAYED_COLLECTIONoITM_CODEo__->capacity__H0T= 0;
+  ARRAYED_COLLECTIONoITM_CODEo__->storage__S0T=NULL;
+  FAST_ARRAYoITM_CODEo__->parent_arrayed_collection__MVF=(*ARRAYED_COLLECTIONoITM_CODEo__);
+  result__45J=NULL;
+  ptr__55J=((__POINTER )(NULL));
+  typ_id__EAK= 0;
+  sz__BAK=((__UINTEGER_32 )sizeof(__FAST_ARRAYoFAST_ARRAYoITM_CODEoo));
+  if ((sz__BAK ==  0)) {
+    result__45J=FAST_ARRAYoFAST_ARRAYoITM_CODEoo__;
   } 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__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);
+    typ_id__EAK=__FAST_ARRAYoFAST_ARRAYoITM_CODEoo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__BAK);
+    if ((typ_id__EAK == (__INTEGER)(-  1))) {
+      a__RHHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__SHHH=(__UINTEGER_32)((__UINTEGER_32)(sz__BAK + a__RHHH) & (__UINTEGER_32)(~ a__RHHH));
+      ptr_table__VVKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__SHHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__UVKH=((__POINTER )(NULL));
+      result__WVKH=((__POINTER *)ptr_table__VVKH)[ 0];
+      if ((result__WVKH == (void *)NULL)) {
+        result__WVKH=new_lab__FTJ(new_size__SHHH);
+        next__UVKH=(void *)((unsigned long)result__WVKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SHHH)));
+        ((__POINTER *)next__UVKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__VVKH)[ 0]=next__UVKH;
+      } else {
+        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__SXH)))) &  4095) + (__UINTEGER_32)(new_size__SHHH <<  1)) <=  4096)) {
+            next__UVKH=(void *)((unsigned long)result__WVKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SHHH)));
+          } else {
+            next__UVKH=new_lab__FTJ(new_size__SHHH);
+          };
+          ((__POINTER *)next__UVKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__VVKH)[ 0]=next__UVKH;
+        } else {
+          ((__POINTER *)result__WVKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UVKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__WVKH=next__UVKH;
+        };
+      };
+      ptr__55J=result__WVKH;
+    } else {
+      t__WHHH=((__UINTEGER_32 )typ_id__EAK);
+      a__VHHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__3VKH=(__UINTEGER_32)((__UINTEGER_32)(sz__BAK + a__VHHH) & (__UINTEGER_32)(~ a__VHHH));
+      ptr_table__0VKH=((__POINTER )(&(table_type[(t__WHHH)])));
+      lab_type__2VKH=(__UINTEGER_32)(t__WHHH |  1);
+      next__ZVKH=((__POINTER )(NULL));
+      result__1VKH=((__POINTER *)ptr_table__0VKH)[ 0];
+      if ((result__1VKH == (void *)NULL)) {
+        result__1VKH=new_lab__FTJ(lab_type__2VKH);
+        next__ZVKH=(void *)((unsigned long)result__1VKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3VKH)));
+        ((__POINTER *)next__ZVKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__0VKH)[ 0]=next__ZVKH;
+      } else {
+        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__SXH)))) &  4095) + (__UINTEGER_32)(new_size__3VKH <<  1)) <=  4096)) {
+            next__ZVKH=(void *)((unsigned long)result__1VKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3VKH)));
+          } else {
+            next__ZVKH=new_lab__FTJ(lab_type__2VKH);
           };
-          ((__POINTER *)next__QNKH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__RNKH)[ 0]=next__QNKH;
+          ((__POINTER *)next__ZVKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__0VKH)[ 0]=next__ZVKH;
         } 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__;
+          ((__POINTER *)result__1VKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZVKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__1VKH=next__ZVKH;
+        };
+      };
+      ptr__55J=result__1VKH;
+    };
+    result__45J=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)ptr__55J);
+    *(result__45J) = *(FAST_ARRAYoFAST_ARRAYoITM_CODEoo__);
+  };
+  Self__VHU=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)result__45J);
+  if ((Self__VHU->parent_arrayed_collection__DAI.capacity__HCU <  5)) {
+    Self__VHU->parent_arrayed_collection__DAI.storage__DDU=create__Q3PB( 5);
+    Self__VHU->parent_arrayed_collection__DAI.capacity__HCU= 5;
+  };
+  Self__VHU->parent_arrayed_collection__DAI.upper__VYT=(__INTEGER)(-  1);
+  free_list__EAI=result__45J;
+  ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo__->upper__5UU= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo__->capacity__EXU= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo__->storage__PXU=NULL;
+  FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo__->parent_arrayed_collection__OAL=(*ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo__);
+  ARRAYED_COLLECTIONoSTRING_CONSTANTo__->upper__VBPD= 0;
+  ARRAYED_COLLECTIONoSTRING_CONSTANTo__->capacity__QDPD= 0;
+  ARRAYED_COLLECTIONoSTRING_CONSTANTo__->storage__LEPD=NULL;
+  FAST_ARRAYoSTRING_CONSTANTo__->parent_arrayed_collection__ABJ=(*ARRAYED_COLLECTIONoSTRING_CONSTANTo__);
+  result__YLM=NULL;
+  ptr__ZLM=((__POINTER )(NULL));
+  typ_id__4LM= 0;
+  sz__1LM=((__UINTEGER_32 )sizeof(__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo));
+  if ((sz__1LM ==  0)) {
+    result__YLM=FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo__;
   } 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);
+    typ_id__4LM=__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__1LM);
+    if ((typ_id__4LM == (__INTEGER)(-  1))) {
+      a__ZHHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__0HHH=(__UINTEGER_32)((__UINTEGER_32)(sz__1LM + a__ZHHH) & (__UINTEGER_32)(~ a__ZHHH));
+      ptr_table__5VKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__0HHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__4VKH=((__POINTER )(NULL));
+      result__AWKH=((__POINTER *)ptr_table__5VKH)[ 0];
+      if ((result__AWKH == (void *)NULL)) {
+        result__AWKH=new_lab__FTJ(new_size__0HHH);
+        next__4VKH=(void *)((unsigned long)result__AWKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0HHH)));
+        ((__POINTER *)next__4VKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__5VKH)[ 0]=next__4VKH;
+      } else {
+        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__SXH)))) &  4095) + (__UINTEGER_32)(new_size__0HHH <<  1)) <=  4096)) {
+            next__4VKH=(void *)((unsigned long)result__AWKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0HHH)));
+          } else {
+            next__4VKH=new_lab__FTJ(new_size__0HHH);
           };
-          ((__POINTER *)next__VNKH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__WNKH)[ 0]=next__VNKH;
+          ((__POINTER *)next__4VKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__5VKH)[ 0]=next__4VKH;
         } 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__;
+          ((__POINTER *)result__AWKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4VKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__AWKH=next__4VKH;
+        };
+      };
+      ptr__ZLM=result__AWKH;
+    } else {
+      t__4HHH=((__UINTEGER_32 )typ_id__4LM);
+      a__3HHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__HWKH=(__UINTEGER_32)((__UINTEGER_32)(sz__1LM + a__3HHH) & (__UINTEGER_32)(~ a__3HHH));
+      ptr_table__EWKH=((__POINTER )(&(table_type[(t__4HHH)])));
+      lab_type__GWKH=(__UINTEGER_32)(t__4HHH |  1);
+      next__DWKH=((__POINTER )(NULL));
+      result__FWKH=((__POINTER *)ptr_table__EWKH)[ 0];
+      if ((result__FWKH == (void *)NULL)) {
+        result__FWKH=new_lab__FTJ(lab_type__GWKH);
+        next__DWKH=(void *)((unsigned long)result__FWKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HWKH)));
+        ((__POINTER *)next__DWKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__EWKH)[ 0]=next__DWKH;
+      } else {
+        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__SXH)))) &  4095) + (__UINTEGER_32)(new_size__HWKH <<  1)) <=  4096)) {
+            next__DWKH=(void *)((unsigned long)result__FWKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HWKH)));
+          } else {
+            next__DWKH=new_lab__FTJ(lab_type__GWKH);
+          };
+          ((__POINTER *)next__DWKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__EWKH)[ 0]=next__DWKH;
+        } else {
+          ((__POINTER *)result__FWKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DWKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__FWKH=next__DWKH;
+        };
+      };
+      ptr__ZLM=result__FWKH;
+    };
+    result__YLM=((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)ptr__ZLM);
+    *(result__YLM) = *(FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo__);
+  };
+  Self__1WU=((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)result__YLM);
+  if ((Self__1WU->parent_arrayed_collection__OAL.capacity__EXU <  5)) {
+    Self__1WU->parent_arrayed_collection__OAL.storage__PXU=create__M5ZB( 5);
+    Self__1WU->parent_arrayed_collection__OAL.capacity__EXU= 5;
+  };
+  Self__1WU->parent_arrayed_collection__OAL.upper__5UU=(__INTEGER)(-  1);
+  free_list__PAL=result__YLM;
+  ITM_LIST_IDF__->parent_itm_code__PEJ=(*ITM_CODE__);
+  ITM_LDOTS__->parent_itm_constant__LWF=(*ITM_CODE__);
+  ITM_PROTOTYPE__->parent_itm_constant__XXF=(*ITM_CONSTANT__);
+  ITM_WRITE__->parent_itm_code__EFJ=(*ITM_CODE__);
+  ITM_WRITE_VALUE__->parent_itm_write__FFJ=(*ITM_WRITE__);
+  ITM_WRITE_CAST__->parent_itm_write__2FJ=(*ITM_WRITE__);
+  ITM_READ__->parent_itm_code__JIJ=(*ITM_CODE__);
+  ITM_WRITE_CODE__->parent_itm_write__HJJ=(*ITM_WRITE__);
+  ITM_OPERATOR__->parent_itm_code__JGL=(*ITM_CODE__);
+  ITM_READ_ARG1__->parent_itm_read__PJL=(*ITM_READ__);
+  ITM_READ_ARG2__->parent_itm_read__2LL=(*ITM_READ__);
+  ITM_EXPRESSION__->value_list__DKV=NULL;
+  ITM_OLD__->parent_itm_code__K3L=(*ITM_CODE__);
+  ITM_EXTERN__->parent_itm_code__44M=(*ITM_CODE__);
+  ITM_EXTERNAL_TYPE__->parent_itm_extern__54M=(*ITM_EXTERN__);
+  ITM_BLOCK__->list__ZPDC=NULL;
+  ITM_EXTERNAL__->parent_itm_extern__EGN=(*ITM_EXTERN__);
+  ITM_READ_ARGS__->parent_itm_read__0DO=(*ITM_READ__);
+  ITM_RESULT__->value__FOFC=NULL;
+  ITM_OPERATOR__->name__UJL=NULL;
+  ITM_ARGUMENT__->parent_itm_code__C5M=(*ITM_OBJECT__);
+  ITM_ARG__->parent_itm_argument__DIHB=(*ITM_ARGUMENT__);
+  ITM_ARG__->name__U3HC=NULL;
+  ITM_ARG__->type__V3HC=NULL;
+  empty_list__OMMF=create_with_capacity__ZKRC( 0);
+  HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo__->buckets__XJQF=NULL;
+  HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo__->capacity__SJQF= 0;
+  HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo__->count__JOQF= 0;
+  result__ZHOF=NULL;
+  ptr__0HOF=((__POINTER )(NULL));
+  typ_id__5HOF= 0;
+  sz__2HOF=((__UINTEGER_32 )sizeof(__HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo));
+  if ((sz__2HOF ==  0)) {
+    result__ZHOF=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__;
+    typ_id__5HOF=__HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__2HOF);
+    if ((typ_id__5HOF == (__INTEGER)(-  1))) {
+      a__BIHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__CIHH=(__UINTEGER_32)((__UINTEGER_32)(sz__2HOF + a__BIHH) & (__UINTEGER_32)(~ a__BIHH));
+      ptr_table__JWKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__CIHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__IWKH=((__POINTER )(NULL));
+      result__KWKH=((__POINTER *)ptr_table__JWKH)[ 0];
+      if ((result__KWKH == (void *)NULL)) {
+        result__KWKH=new_lab__FTJ(new_size__CIHH);
+        next__IWKH=(void *)((unsigned long)result__KWKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CIHH)));
+        ((__POINTER *)next__IWKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__JWKH)[ 0]=next__IWKH;
+      } else {
+        next__IWKH=((__POINTER *)result__KWKH)[ 0];
+        if ((next__IWKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__KWKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__CIHH <<  1)) <=  4096)) {
+            next__IWKH=(void *)((unsigned long)result__KWKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CIHH)));
+          } else {
+            next__IWKH=new_lab__FTJ(new_size__CIHH);
+          };
+          ((__POINTER *)next__IWKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__JWKH)[ 0]=next__IWKH;
+        } else {
+          ((__POINTER *)result__KWKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__IWKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__KWKH=next__IWKH;
+        };
+      };
+      ptr__0HOF=result__KWKH;
+    } else {
+      t__GIHH=((__UINTEGER_32 )typ_id__5HOF);
+      a__FIHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__RWKH=(__UINTEGER_32)((__UINTEGER_32)(sz__2HOF + a__FIHH) & (__UINTEGER_32)(~ a__FIHH));
+      ptr_table__OWKH=((__POINTER )(&(table_type[(t__GIHH)])));
+      lab_type__QWKH=(__UINTEGER_32)(t__GIHH |  1);
+      next__NWKH=((__POINTER )(NULL));
+      result__PWKH=((__POINTER *)ptr_table__OWKH)[ 0];
+      if ((result__PWKH == (void *)NULL)) {
+        result__PWKH=new_lab__FTJ(lab_type__QWKH);
+        next__NWKH=(void *)((unsigned long)result__PWKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RWKH)));
+        ((__POINTER *)next__NWKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__OWKH)[ 0]=next__NWKH;
+      } else {
+        next__NWKH=((__POINTER *)result__PWKH)[ 0];
+        if ((next__NWKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__PWKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__RWKH <<  1)) <=  4096)) {
+            next__NWKH=(void *)((unsigned long)result__PWKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RWKH)));
+          } else {
+            next__NWKH=new_lab__FTJ(lab_type__QWKH);
+          };
+          ((__POINTER *)next__NWKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__OWKH)[ 0]=next__NWKH;
+        } else {
+          ((__POINTER *)result__PWKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NWKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__PWKH=next__NWKH;
+        };
+      };
+      ptr__0HOF=result__PWKH;
+    };
+    result__ZHOF=((__HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo *)ptr__0HOF);
+    *(result__ZHOF) = *(HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo__);
+  };
+  Self__JMQF=((__HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo *)result__ZHOF);
+  new_capacity__0YRF=prime_number_ceiling__541( 53);
+  Self__JMQF->buckets__XJQF=create__LLUF(new_capacity__0YRF);
+  Self__JMQF->capacity__SJQF=new_capacity__0YRF;
+  Self__JMQF->count__JOQF= 0;
+  bucket__YMMF=result__ZHOF;
+  HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo__->item__DKQF=NULL;
+  HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo__->next__PKQF=NULL;
+  ITM_ARGS__->parent_itm_argument__TDFE=(*ITM_ARGUMENT__);
+  ITM_ARGS__->name__3BQF=NULL;
+  ITM_ARGS__->type__4BQF=NULL;
+  ITM_EXTERNAL_TYPE__->is_persistant__2HN=FALSE__;
+  result__25F=NULL;
+  ptr__35F=((__POINTER )(NULL));
+  typ_id__CAG= 0;
+  sz__55F=((__UINTEGER_32 )sizeof(__FAST_ARRAYoSTRINGo));
+  if ((sz__55F ==  0)) {
+    result__25F=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__;
+    typ_id__CAG=__FAST_ARRAYoSTRINGo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__55F);
+    if ((typ_id__CAG == (__INTEGER)(-  1))) {
+      a__IIFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__3ZG=(__UINTEGER_32)((__UINTEGER_32)(sz__55F + a__IIFH) & (__UINTEGER_32)(~ a__IIFH));
+      ptr_table__TWKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__3ZG / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__SWKH=((__POINTER )(NULL));
+      result__UWKH=((__POINTER *)ptr_table__TWKH)[ 0];
+      if ((result__UWKH == (void *)NULL)) {
+        result__UWKH=new_lab__FTJ(new_size__3ZG);
+        next__SWKH=(void *)((unsigned long)result__UWKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3ZG)));
+        ((__POINTER *)next__SWKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__TWKH)[ 0]=next__SWKH;
+      } else {
+        next__SWKH=((__POINTER *)result__UWKH)[ 0];
+        if ((next__SWKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__UWKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__3ZG <<  1)) <=  4096)) {
+            next__SWKH=(void *)((unsigned long)result__UWKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3ZG)));
+          } else {
+            next__SWKH=new_lab__FTJ(new_size__3ZG);
+          };
+          ((__POINTER *)next__SWKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__TWKH)[ 0]=next__SWKH;
+        } else {
+          ((__POINTER *)result__UWKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__SWKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__UWKH=next__SWKH;
+        };
+      };
+      ptr__35F=result__UWKH;
+    } else {
+      t__G1G=((__UINTEGER_32 )typ_id__CAG);
+      a__OIFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__1WKH=(__UINTEGER_32)((__UINTEGER_32)(sz__55F + a__OIFH) & (__UINTEGER_32)(~ a__OIFH));
+      ptr_table__YWKH=((__POINTER )(&(table_type[(t__G1G)])));
+      lab_type__0WKH=(__UINTEGER_32)(t__G1G |  1);
+      next__XWKH=((__POINTER )(NULL));
+      result__ZWKH=((__POINTER *)ptr_table__YWKH)[ 0];
+      if ((result__ZWKH == (void *)NULL)) {
+        result__ZWKH=new_lab__FTJ(lab_type__0WKH);
+        next__XWKH=(void *)((unsigned long)result__ZWKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1WKH)));
+        ((__POINTER *)next__XWKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__YWKH)[ 0]=next__XWKH;
+      } else {
+        next__XWKH=((__POINTER *)result__ZWKH)[ 0];
+        if ((next__XWKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ZWKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__1WKH <<  1)) <=  4096)) {
+            next__XWKH=(void *)((unsigned long)result__ZWKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1WKH)));
+          } else {
+            next__XWKH=new_lab__FTJ(lab_type__0WKH);
+          };
+          ((__POINTER *)next__XWKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__YWKH)[ 0]=next__XWKH;
+        } else {
+          ((__POINTER *)result__ZWKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XWKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__ZWKH=next__XWKH;
+        };
+      };
+      ptr__35F=result__ZWKH;
+    };
+    result__25F=((__FAST_ARRAYoSTRINGo *)ptr__35F);
+    *(result__25F) = *(FAST_ARRAYoSTRINGo__);
+  };
+  Self__TGT=((__FAST_ARRAYoSTRINGo *)result__25F);
+  if ((Self__TGT->parent_arrayed_collection__RKC.capacity__2GT <  5)) {
+    Self__TGT->parent_arrayed_collection__RKC.storage__HHT=create__PHRB( 5);
+    Self__TGT->parent_arrayed_collection__RKC.capacity__2GT= 5;
+  };
+  Self__TGT->parent_arrayed_collection__RKC.upper__UKC=(__INTEGER)(-  1);
+  free__ROP=result__25F;
+  type_void__ZXF=get__2UI((&__string_3));
+  PROTOTYPE__->default_value__OVE=NULL;
+  PROTOTYPE__->type_c__JXE=NULL;
+  LIP_CODE__->parent_itm_object__0EE=(*ITM_OBJECT__);
+  LIP_UNARY__->parent_lip_code__Y24B=(*LIP_CODE__);
+  LIP_UNARY__->operator__G4QD='\0';
+  LIP_UNARY__->value__D4QD=NULL;
+  LIP_CALL__->parent_lip_code__K34B=(*LIP_CODE__);
+  LIP_CALL__->name__YQUE=NULL;
+  LIP_CALL__->argument__NQUE=NULL;
+  ARRAYED_COLLECTIONoLIP_INTEGERo__->upper__NHXE= 0;
+  ARRAYED_COLLECTIONoLIP_INTEGERo__->capacity__PLXE= 0;
+  ARRAYED_COLLECTIONoLIP_INTEGERo__->storage__0LXE=NULL;
+  FAST_ARRAYoLIP_INTEGERo__->parent_arrayed_collection__IYSE=(*ARRAYED_COLLECTIONoLIP_INTEGERo__);
+  result__XUTE=NULL;
+  ptr__YUTE=((__POINTER )(NULL));
+  typ_id__3UTE= 0;
+  sz__0UTE=((__UINTEGER_32 )sizeof(__FAST_ARRAYoLIP_INTEGERo));
+  if ((sz__0UTE ==  0)) {
+    result__XUTE=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__;
+    typ_id__3UTE=__FAST_ARRAYoLIP_INTEGERo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__0UTE);
+    if ((typ_id__3UTE == (__INTEGER)(-  1))) {
+      a__JIHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__KIHH=(__UINTEGER_32)((__UINTEGER_32)(sz__0UTE + a__JIHH) & (__UINTEGER_32)(~ a__JIHH));
+      ptr_table__3WKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__KIHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__2WKH=((__POINTER )(NULL));
+      result__4WKH=((__POINTER *)ptr_table__3WKH)[ 0];
+      if ((result__4WKH == (void *)NULL)) {
+        result__4WKH=new_lab__FTJ(new_size__KIHH);
+        next__2WKH=(void *)((unsigned long)result__4WKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KIHH)));
+        ((__POINTER *)next__2WKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__3WKH)[ 0]=next__2WKH;
+      } else {
+        next__2WKH=((__POINTER *)result__4WKH)[ 0];
+        if ((next__2WKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4WKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__KIHH <<  1)) <=  4096)) {
+            next__2WKH=(void *)((unsigned long)result__4WKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KIHH)));
+          } else {
+            next__2WKH=new_lab__FTJ(new_size__KIHH);
+          };
+          ((__POINTER *)next__2WKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__3WKH)[ 0]=next__2WKH;
+        } else {
+          ((__POINTER *)result__4WKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2WKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__4WKH=next__2WKH;
+        };
+      };
+      ptr__YUTE=result__4WKH;
+    } else {
+      t__OIHH=((__UINTEGER_32 )typ_id__3UTE);
+      a__NIHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__FXKH=(__UINTEGER_32)((__UINTEGER_32)(sz__0UTE + a__NIHH) & (__UINTEGER_32)(~ a__NIHH));
+      ptr_table__CXKH=((__POINTER )(&(table_type[(t__OIHH)])));
+      lab_type__EXKH=(__UINTEGER_32)(t__OIHH |  1);
+      next__BXKH=((__POINTER )(NULL));
+      result__DXKH=((__POINTER *)ptr_table__CXKH)[ 0];
+      if ((result__DXKH == (void *)NULL)) {
+        result__DXKH=new_lab__FTJ(lab_type__EXKH);
+        next__BXKH=(void *)((unsigned long)result__DXKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FXKH)));
+        ((__POINTER *)next__BXKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__CXKH)[ 0]=next__BXKH;
+      } else {
+        next__BXKH=((__POINTER *)result__DXKH)[ 0];
+        if ((next__BXKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DXKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__FXKH <<  1)) <=  4096)) {
+            next__BXKH=(void *)((unsigned long)result__DXKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FXKH)));
+          } else {
+            next__BXKH=new_lab__FTJ(lab_type__EXKH);
+          };
+          ((__POINTER *)next__BXKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__CXKH)[ 0]=next__BXKH;
+        } else {
+          ((__POINTER *)result__DXKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BXKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__DXKH=next__BXKH;
+        };
+      };
+      ptr__YUTE=result__DXKH;
+    };
+    result__XUTE=((__FAST_ARRAYoLIP_INTEGERo *)ptr__YUTE);
+    *(result__XUTE) = *(FAST_ARRAYoLIP_INTEGERo__);
+  };
+  Self__GLXE=((__FAST_ARRAYoLIP_INTEGERo *)result__XUTE);
+  if ((Self__GLXE->parent_arrayed_collection__IYSE.capacity__PLXE <  10)) {
+    Self__GLXE->parent_arrayed_collection__IYSE.storage__0LXE=create__YNGF( 10);
+    Self__GLXE->parent_arrayed_collection__IYSE.capacity__PLXE= 10;
+  };
+  Self__GLXE->parent_arrayed_collection__IYSE.upper__NHXE=(__INTEGER)(-  1);
+  storage__JYSE=result__XUTE;
+  LIP_INTEGER__->value__LN4F= 0;
+  ARRAYED_COLLECTIONoLIP_STRINGo__->upper__2XPF= 0;
+  ARRAYED_COLLECTIONoLIP_STRINGo__->capacity__E5PF= 0;
+  ARRAYED_COLLECTIONoLIP_STRINGo__->storage__P5PF=NULL;
+  FAST_ARRAYoLIP_STRINGo__->parent_arrayed_collection__V3FF=(*ARRAYED_COLLECTIONoLIP_STRINGo__);
+  result__MRMF=NULL;
+  ptr__NRMF=((__POINTER )(NULL));
+  typ_id__SRMF= 0;
+  sz__PRMF=((__UINTEGER_32 )sizeof(__FAST_ARRAYoLIP_STRINGo));
+  if ((sz__PRMF ==  0)) {
+    result__MRMF=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__;
+    typ_id__SRMF=__FAST_ARRAYoLIP_STRINGo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__PRMF);
+    if ((typ_id__SRMF == (__INTEGER)(-  1))) {
+      a__RIHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__SIHH=(__UINTEGER_32)((__UINTEGER_32)(sz__PRMF + a__RIHH) & (__UINTEGER_32)(~ a__RIHH));
+      ptr_table__HXKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__SIHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__GXKH=((__POINTER )(NULL));
+      result__IXKH=((__POINTER *)ptr_table__HXKH)[ 0];
+      if ((result__IXKH == (void *)NULL)) {
+        result__IXKH=new_lab__FTJ(new_size__SIHH);
+        next__GXKH=(void *)((unsigned long)result__IXKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SIHH)));
+        ((__POINTER *)next__GXKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__HXKH)[ 0]=next__GXKH;
+      } else {
+        next__GXKH=((__POINTER *)result__IXKH)[ 0];
+        if ((next__GXKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__IXKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__SIHH <<  1)) <=  4096)) {
+            next__GXKH=(void *)((unsigned long)result__IXKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SIHH)));
+          } else {
+            next__GXKH=new_lab__FTJ(new_size__SIHH);
+          };
+          ((__POINTER *)next__GXKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__HXKH)[ 0]=next__GXKH;
+        } else {
+          ((__POINTER *)result__IXKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GXKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__IXKH=next__GXKH;
+        };
+      };
+      ptr__NRMF=result__IXKH;
+    } else {
+      t__WIHH=((__UINTEGER_32 )typ_id__SRMF);
+      a__VIHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__PXKH=(__UINTEGER_32)((__UINTEGER_32)(sz__PRMF + a__VIHH) & (__UINTEGER_32)(~ a__VIHH));
+      ptr_table__MXKH=((__POINTER )(&(table_type[(t__WIHH)])));
+      lab_type__OXKH=(__UINTEGER_32)(t__WIHH |  1);
+      next__LXKH=((__POINTER )(NULL));
+      result__NXKH=((__POINTER *)ptr_table__MXKH)[ 0];
+      if ((result__NXKH == (void *)NULL)) {
+        result__NXKH=new_lab__FTJ(lab_type__OXKH);
+        next__LXKH=(void *)((unsigned long)result__NXKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PXKH)));
+        ((__POINTER *)next__LXKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__MXKH)[ 0]=next__LXKH;
+      } else {
+        next__LXKH=((__POINTER *)result__NXKH)[ 0];
+        if ((next__LXKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__NXKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__PXKH <<  1)) <=  4096)) {
+            next__LXKH=(void *)((unsigned long)result__NXKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PXKH)));
+          } else {
+            next__LXKH=new_lab__FTJ(lab_type__OXKH);
+          };
+          ((__POINTER *)next__LXKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__MXKH)[ 0]=next__LXKH;
+        } else {
+          ((__POINTER *)result__NXKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LXKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__NXKH=next__LXKH;
+        };
+      };
+      ptr__NRMF=result__NXKH;
+    };
+    result__MRMF=((__FAST_ARRAYoLIP_STRINGo *)ptr__NRMF);
+    *(result__MRMF) = *(FAST_ARRAYoLIP_STRINGo__);
+  };
+  Self__14PF=((__FAST_ARRAYoLIP_STRINGo *)result__MRMF);
+  if ((Self__14PF->parent_arrayed_collection__V3FF.capacity__E5PF <  10)) {
+    Self__14PF->parent_arrayed_collection__V3FF.storage__P5PF=create__GPYF( 10);
+    Self__14PF->parent_arrayed_collection__V3FF.capacity__E5PF= 10;
+  };
+  Self__14PF->parent_arrayed_collection__V3FF.upper__2XPF=(__INTEGER)(-  1);
+  storage__W3FF=result__MRMF;
+  LIP_STRING__->value__FSUE=NULL;
+  LIP_BOOLEAN__->value__JFQD=FALSE__;
+  result__W3NF=NULL;
+  ptr__X3NF=((__POINTER )(NULL));
+  typ_id__23NF= 0;
+  sz__Z3NF=((__UINTEGER_32 )sizeof(__LIP_BOOLEAN));
+  if ((sz__Z3NF ==  0)) {
+    result__W3NF=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__;
+    typ_id__23NF=-1;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__Z3NF);
+    if ((typ_id__23NF == (__INTEGER)(-  1))) {
+      a__ZIHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__0IHH=(__UINTEGER_32)((__UINTEGER_32)(sz__Z3NF + a__ZIHH) & (__UINTEGER_32)(~ a__ZIHH));
+      ptr_table__RXKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__0IHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__QXKH=((__POINTER )(NULL));
+      result__SXKH=((__POINTER *)ptr_table__RXKH)[ 0];
+      if ((result__SXKH == (void *)NULL)) {
+        result__SXKH=new_lab__FTJ(new_size__0IHH);
+        next__QXKH=(void *)((unsigned long)result__SXKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0IHH)));
+        ((__POINTER *)next__QXKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__RXKH)[ 0]=next__QXKH;
+      } else {
+        next__QXKH=((__POINTER *)result__SXKH)[ 0];
+        if ((next__QXKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__SXKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__0IHH <<  1)) <=  4096)) {
+            next__QXKH=(void *)((unsigned long)result__SXKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0IHH)));
+          } else {
+            next__QXKH=new_lab__FTJ(new_size__0IHH);
+          };
+          ((__POINTER *)next__QXKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__RXKH)[ 0]=next__QXKH;
+        } else {
+          ((__POINTER *)result__SXKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QXKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__SXKH=next__QXKH;
+        };
+      };
+      ptr__X3NF=result__SXKH;
+    } else {
+      t__4IHH=((__UINTEGER_32 )typ_id__23NF);
+      a__3IHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__ZXKH=(__UINTEGER_32)((__UINTEGER_32)(sz__Z3NF + a__3IHH) & (__UINTEGER_32)(~ a__3IHH));
+      ptr_table__WXKH=((__POINTER )(&(table_type[(t__4IHH)])));
+      lab_type__YXKH=(__UINTEGER_32)(t__4IHH |  1);
+      next__VXKH=((__POINTER )(NULL));
+      result__XXKH=((__POINTER *)ptr_table__WXKH)[ 0];
+      if ((result__XXKH == (void *)NULL)) {
+        result__XXKH=new_lab__FTJ(lab_type__YXKH);
+        next__VXKH=(void *)((unsigned long)result__XXKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZXKH)));
+        ((__POINTER *)next__VXKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__WXKH)[ 0]=next__VXKH;
+      } else {
+        next__VXKH=((__POINTER *)result__XXKH)[ 0];
+        if ((next__VXKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XXKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__ZXKH <<  1)) <=  4096)) {
+            next__VXKH=(void *)((unsigned long)result__XXKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZXKH)));
+          } else {
+            next__VXKH=new_lab__FTJ(lab_type__YXKH);
+          };
+          ((__POINTER *)next__VXKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__WXKH)[ 0]=next__VXKH;
+        } else {
+          ((__POINTER *)result__XXKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VXKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__XXKH=next__VXKH;
+        };
+      };
+      ptr__X3NF=result__XXKH;
+    };
+    result__W3NF=((__LIP_BOOLEAN *)ptr__X3NF);
+    *(result__W3NF) = *(LIP_BOOLEAN__);
+  };
+  ((__LIP_BOOLEAN *)result__W3NF)->value__JFQD=TRUE__;
+  true__FXLF=result__W3NF;
+  LIP_VALUE__->parent_lip_code__MIFE=(*LIP_CODE__);
+  LIP_VALUE__->value__X0UE=NULL;
+  LIP_BINARY__->parent_lip_code__JRZB=(*LIP_CODE__);
+  LIP_BINARY__->left__G1QD=NULL;
+  LIP_BINARY__->right__J1QD=NULL;
+  LIP_BINARY__->operator__M1QD='\0';
+  LIP_AFFECT__->parent_lip_code__LWPB=(*LIP_CODE__);
+  LIP_AFFECT__->name__PJFC=NULL;
+  LIP_AFFECT__->value__BKFC=NULL;
+  ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo__->upper__ISTD= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo__->capacity__JEUD= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo__->storage__FFUD=NULL;
+  FAST_ARRAYoFAST_ARRAYoLIP_CODEoo__->parent_arrayed_collection__APID=(*ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo__);
+  ARRAYED_COLLECTIONoLIP_CODEo__->upper__WFQD= 0;
+  ARRAYED_COLLECTIONoLIP_CODEo__->capacity__UTTD= 0;
+  ARRAYED_COLLECTIONoLIP_CODEo__->storage__5TTD=NULL;
+  FAST_ARRAYoLIP_CODEo__->parent_arrayed_collection__EQYC=(*ARRAYED_COLLECTIONoLIP_CODEo__);
+  result__WXMD=NULL;
+  ptr__XXMD=((__POINTER )(NULL));
+  typ_id__2XMD= 0;
+  sz__ZXMD=((__UINTEGER_32 )sizeof(__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo));
+  if ((sz__ZXMD ==  0)) {
+    result__WXMD=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__;
+    typ_id__2XMD=__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__ZXMD);
+    if ((typ_id__2XMD == (__INTEGER)(-  1))) {
+      a__BJHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__CJHH=(__UINTEGER_32)((__UINTEGER_32)(sz__ZXMD + a__BJHH) & (__UINTEGER_32)(~ a__BJHH));
+      ptr_table__1XKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__CJHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__0XKH=((__POINTER )(NULL));
+      result__2XKH=((__POINTER *)ptr_table__1XKH)[ 0];
+      if ((result__2XKH == (void *)NULL)) {
+        result__2XKH=new_lab__FTJ(new_size__CJHH);
+        next__0XKH=(void *)((unsigned long)result__2XKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CJHH)));
+        ((__POINTER *)next__0XKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__1XKH)[ 0]=next__0XKH;
+      } else {
+        next__0XKH=((__POINTER *)result__2XKH)[ 0];
+        if ((next__0XKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2XKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__CJHH <<  1)) <=  4096)) {
+            next__0XKH=(void *)((unsigned long)result__2XKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CJHH)));
+          } else {
+            next__0XKH=new_lab__FTJ(new_size__CJHH);
+          };
+          ((__POINTER *)next__0XKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__1XKH)[ 0]=next__0XKH;
+        } else {
+          ((__POINTER *)result__2XKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0XKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__2XKH=next__0XKH;
+        };
+      };
+      ptr__XXMD=result__2XKH;
+    } else {
+      t__GJHH=((__UINTEGER_32 )typ_id__2XMD);
+      a__FJHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__DYKH=(__UINTEGER_32)((__UINTEGER_32)(sz__ZXMD + a__FJHH) & (__UINTEGER_32)(~ a__FJHH));
+      ptr_table__AYKH=((__POINTER )(&(table_type[(t__GJHH)])));
+      lab_type__CYKH=(__UINTEGER_32)(t__GJHH |  1);
+      next__5XKH=((__POINTER )(NULL));
+      result__BYKH=((__POINTER *)ptr_table__AYKH)[ 0];
+      if ((result__BYKH == (void *)NULL)) {
+        result__BYKH=new_lab__FTJ(lab_type__CYKH);
+        next__5XKH=(void *)((unsigned long)result__BYKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DYKH)));
+        ((__POINTER *)next__5XKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__AYKH)[ 0]=next__5XKH;
+      } else {
+        next__5XKH=((__POINTER *)result__BYKH)[ 0];
+        if ((next__5XKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BYKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__DYKH <<  1)) <=  4096)) {
+            next__5XKH=(void *)((unsigned long)result__BYKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DYKH)));
+          } else {
+            next__5XKH=new_lab__FTJ(lab_type__CYKH);
+          };
+          ((__POINTER *)next__5XKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__AYKH)[ 0]=next__5XKH;
+        } else {
+          ((__POINTER *)result__BYKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5XKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__BYKH=next__5XKH;
+        };
+      };
+      ptr__XXMD=result__BYKH;
+    };
+    result__WXMD=((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)ptr__XXMD);
+    *(result__WXMD) = *(FAST_ARRAYoFAST_ARRAYoLIP_CODEoo__);
+  };
+  Self__DJUD=((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)result__WXMD);
+  if ((Self__DJUD->parent_arrayed_collection__APID.capacity__JEUD <  5)) {
+    Self__DJUD->parent_arrayed_collection__APID.storage__FFUD=create__C2IE( 5);
+    Self__DJUD->parent_arrayed_collection__APID.capacity__JEUD= 5;
+  };
+  Self__DJUD->parent_arrayed_collection__APID.upper__ISTD=(__INTEGER)(-  1);
+  free_list__BPID=result__WXMD;
+  LIP_IF__->parent_lip_code__VTYC=(*LIP_CODE__);
+  LIP_IF__->condition__0EQD=NULL;
+  LIP_IF__->then__QFQD=NULL;
+  LIP_IF__->else__HGQD=NULL;
+  LIP_PRINT__->parent_lip_code__HUYC=(*LIP_CODE__);
+  LIP_PRINT__->message__2UUE=NULL;
+  HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo__->buckets__AXRD=NULL;
+  HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo__->capacity__1WRD= 0;
+  result__NZED=NULL;
+  ptr__OZED=((__POINTER )(NULL));
+  typ_id__TZED= 0;
+  sz__QZED=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo));
+  if ((sz__QZED ==  0)) {
+    result__NZED=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 *))))));
+    typ_id__TZED=__HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__QZED);
+    if ((typ_id__TZED == (__INTEGER)(-  1))) {
+      a__JJHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__KJHH=(__UINTEGER_32)((__UINTEGER_32)(sz__QZED + a__JJHH) & (__UINTEGER_32)(~ a__JJHH));
+      ptr_table__FYKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__KJHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__EYKH=((__POINTER )(NULL));
+      result__GYKH=((__POINTER *)ptr_table__FYKH)[ 0];
+      if ((result__GYKH == (void *)NULL)) {
+        result__GYKH=new_lab__FTJ(new_size__KJHH);
+        next__EYKH=(void *)((unsigned long)result__GYKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KJHH)));
+        ((__POINTER *)next__EYKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__FYKH)[ 0]=next__EYKH;
+      } else {
+        next__EYKH=((__POINTER *)result__GYKH)[ 0];
+        if ((next__EYKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GYKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__KJHH <<  1)) <=  4096)) {
+            next__EYKH=(void *)((unsigned long)result__GYKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KJHH)));
+          } else {
+            next__EYKH=new_lab__FTJ(new_size__KJHH);
+          };
+          ((__POINTER *)next__EYKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__FYKH)[ 0]=next__EYKH;
+        } else {
+          ((__POINTER *)result__GYKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EYKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__GYKH=next__EYKH;
+        };
+      };
+      ptr__OZED=result__GYKH;
+    } else {
+      t__OJHH=((__UINTEGER_32 )typ_id__TZED);
+      a__NJHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__NYKH=(__UINTEGER_32)((__UINTEGER_32)(sz__QZED + a__NJHH) & (__UINTEGER_32)(~ a__NJHH));
+      ptr_table__KYKH=((__POINTER )(&(table_type[(t__OJHH)])));
+      lab_type__MYKH=(__UINTEGER_32)(t__OJHH |  1);
+      next__JYKH=((__POINTER )(NULL));
+      result__LYKH=((__POINTER *)ptr_table__KYKH)[ 0];
+      if ((result__LYKH == (void *)NULL)) {
+        result__LYKH=new_lab__FTJ(lab_type__MYKH);
+        next__JYKH=(void *)((unsigned long)result__LYKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NYKH)));
+        ((__POINTER *)next__JYKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__KYKH)[ 0]=next__JYKH;
+      } else {
+        next__JYKH=((__POINTER *)result__LYKH)[ 0];
+        if ((next__JYKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LYKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__NYKH <<  1)) <=  4096)) {
+            next__JYKH=(void *)((unsigned long)result__LYKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NYKH)));
+          } else {
+            next__JYKH=new_lab__FTJ(lab_type__MYKH);
+          };
+          ((__POINTER *)next__JYKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__KYKH)[ 0]=next__JYKH;
+        } else {
+          ((__POINTER *)result__LYKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JYKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__LYKH=next__JYKH;
+        };
+      };
+      ptr__OZED=result__LYKH;
+    };
+    result__NZED=((__HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo *)ptr__OZED);
+    *(result__NZED) = *(HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo__);
+  };
+  Self__UNSD=((__HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo *)result__NZED);
+  new_capacity__IEXD=prime_number_ceiling__541( 193);
+  sz__RBFH=((__UINTEGER_32 )(__INTEGER)(new_capacity__IEXD * ((__INTEGER )(sizeof(void *)))));
+  result__QBFH=((__POINTER )(NULL));
+  a__WBFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__SBFH=(__UINTEGER_32)((__UINTEGER_32)(sz__RBFH + a__WBFH) & (__UINTEGER_32)(~ a__WBFH));
+  new_size2__TBFH=(__UINTEGER_32)(new_size__SBFH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__TBFH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__RJHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__SJHH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__TBFH + a__RJHH) & (__UINTEGER_32)(~ a__RJHH));
+    ptr_table__PYKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__SJHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__OYKH=((__POINTER )(NULL));
+    result__QYKH=((__POINTER *)ptr_table__PYKH)[ 0];
+    if ((result__QYKH == (void *)NULL)) {
+      result__QYKH=new_lab__FTJ(new_size__SJHH);
+      next__OYKH=(void *)((unsigned long)result__QYKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SJHH)));
+      ((__POINTER *)next__OYKH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__PYKH)[ 0]=next__OYKH;
+    } else {
+      next__OYKH=((__POINTER *)result__QYKH)[ 0];
+      if ((next__OYKH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__QYKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__SJHH <<  1)) <=  4096)) {
+          next__OYKH=(void *)((unsigned long)result__QYKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SJHH)));
+        } else {
+          next__OYKH=new_lab__FTJ(new_size__SJHH);
+        };
+        ((__POINTER *)next__OYKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__PYKH)[ 0]=next__OYKH;
+      } else {
+        ((__POINTER *)result__QYKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OYKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__QYKH=next__OYKH;
+      };
+    };
+    ((__POINTER *)result__QYKH)[ 0]=((__POINTER ) 3);
+    result__QBFH=(void *)((unsigned long)result__QYKH - (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__;
+    result__TYKH=first_free__NFVB;
+    while ((((void *)result__TYKH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__TYKH)->map_size_and_id__YTB &  4294967292LU) < new_size__SBFH))) {
+      result__TYKH=((__MEMORY *)result__TYKH)->map_next_free__ZTB;
+    };
+    if (((void *)result__TYKH == (void *)NULL)) {
+      result__TYKH=new_page__YC5();
+    };
+    to_busy__index__MWFC(result__TYKH,new_size__SBFH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__TYKH)) - (unsigned long)begin_memory__SXH)))) >>  26));
+    result__QBFH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__TYKH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+  };
+  Result__FWHE=((void **)result__QBFH);
+  Self__LOYE=(__INTEGER)(new_capacity__IEXD -  1);
+  while ((Self__LOYE >=  0)) {
+    Result__FWHE[Self__LOYE]=NULL;
+    Self__LOYE=(__INTEGER)(Self__LOYE -  1);
+  };
+  Self__UNSD->buckets__AXRD=Result__FWHE;
+  Self__UNSD->capacity__1WRD=new_capacity__IEXD;
+  list_data__WRNC=result__NZED;
+  push_back_flag__VYMF=FALSE__;
+  memory__UEMF='\0';
+  last_integer__PYUE= 0;
+  last_string__BZUE=create__ZBB( 1024);
+  ARRAYED_COLLECTIONoLIP_SLOT_DATAo__->upper__GBQF= 0;
+  ARRAYED_COLLECTIONoLIP_SLOT_DATAo__->capacity__NHQF= 0;
+  ARRAYED_COLLECTIONoLIP_SLOT_DATAo__->storage__YHQF=NULL;
+  FAST_ARRAYoLIP_SLOT_DATAo__->parent_arrayed_collection__WZUE=(*ARRAYED_COLLECTIONoLIP_SLOT_DATAo__);
+  result__SYNF=NULL;
+  ptr__TYNF=((__POINTER )(NULL));
+  typ_id__YYNF= 0;
+  sz__VYNF=((__UINTEGER_32 )sizeof(__FAST_ARRAYoLIP_SLOT_DATAo));
+  if ((sz__VYNF ==  0)) {
+    result__SYNF=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__;
+    typ_id__YYNF=__FAST_ARRAYoLIP_SLOT_DATAo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__VYNF);
+    if ((typ_id__YYNF == (__INTEGER)(-  1))) {
+      a__YJHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__ZJHH=(__UINTEGER_32)((__UINTEGER_32)(sz__VYNF + a__YJHH) & (__UINTEGER_32)(~ a__YJHH));
+      ptr_table__XYKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ZJHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__WYKH=((__POINTER )(NULL));
+      result__YYKH=((__POINTER *)ptr_table__XYKH)[ 0];
+      if ((result__YYKH == (void *)NULL)) {
+        result__YYKH=new_lab__FTJ(new_size__ZJHH);
+        next__WYKH=(void *)((unsigned long)result__YYKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZJHH)));
+        ((__POINTER *)next__WYKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__XYKH)[ 0]=next__WYKH;
+      } else {
+        next__WYKH=((__POINTER *)result__YYKH)[ 0];
+        if ((next__WYKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YYKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__ZJHH <<  1)) <=  4096)) {
+            next__WYKH=(void *)((unsigned long)result__YYKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZJHH)));
+          } else {
+            next__WYKH=new_lab__FTJ(new_size__ZJHH);
+          };
+          ((__POINTER *)next__WYKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__XYKH)[ 0]=next__WYKH;
+        } else {
+          ((__POINTER *)result__YYKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WYKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__YYKH=next__WYKH;
+        };
+      };
+      ptr__TYNF=result__YYKH;
+    } else {
+      t__3JHH=((__UINTEGER_32 )typ_id__YYNF);
+      a__2JHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__5YKH=(__UINTEGER_32)((__UINTEGER_32)(sz__VYNF + a__2JHH) & (__UINTEGER_32)(~ a__2JHH));
+      ptr_table__2YKH=((__POINTER )(&(table_type[(t__3JHH)])));
+      lab_type__4YKH=(__UINTEGER_32)(t__3JHH |  1);
+      next__1YKH=((__POINTER )(NULL));
+      result__3YKH=((__POINTER *)ptr_table__2YKH)[ 0];
+      if ((result__3YKH == (void *)NULL)) {
+        result__3YKH=new_lab__FTJ(lab_type__4YKH);
+        next__1YKH=(void *)((unsigned long)result__3YKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5YKH)));
+        ((__POINTER *)next__1YKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__2YKH)[ 0]=next__1YKH;
+      } else {
+        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__SXH)))) &  4095) + (__UINTEGER_32)(new_size__5YKH <<  1)) <=  4096)) {
+            next__1YKH=(void *)((unsigned long)result__3YKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5YKH)));
+          } else {
+            next__1YKH=new_lab__FTJ(lab_type__4YKH);
+          };
+          ((__POINTER *)next__1YKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__2YKH)[ 0]=next__1YKH;
+        } else {
+          ((__POINTER *)result__3YKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1YKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__3YKH=next__1YKH;
+        };
+      };
+      ptr__TYNF=result__3YKH;
+    };
+    result__SYNF=((__FAST_ARRAYoLIP_SLOT_DATAo *)ptr__TYNF);
+    *(result__SYNF) = *(FAST_ARRAYoLIP_SLOT_DATAo__);
+  };
+  Self__EHQF=((__FAST_ARRAYoLIP_SLOT_DATAo *)result__SYNF);
+  if ((Self__EHQF->parent_arrayed_collection__WZUE.capacity__NHQF <  8)) {
+    sz__ZBFH=((__UINTEGER_32 )(__INTEGER)(((__INTEGER )(sizeof(void *))) <<  3));
+    result__YBFH=((__POINTER )(NULL));
+    a__4BFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__0BFH=(__UINTEGER_32)((__UINTEGER_32)(sz__ZBFH + a__4BFH) & (__UINTEGER_32)(~ a__4BFH));
+    new_size2__1BFH=(__UINTEGER_32)(new_size__0BFH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+    if ((new_size2__1BFH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+      a__AKHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__BKHH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__1BFH + a__AKHH) & (__UINTEGER_32)(~ a__AKHH));
+      ptr_table__BZKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__BKHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__AZKH=((__POINTER )(NULL));
+      result__CZKH=((__POINTER *)ptr_table__BZKH)[ 0];
+      if ((result__CZKH == (void *)NULL)) {
+        result__CZKH=new_lab__FTJ(new_size__BKHH);
+        next__AZKH=(void *)((unsigned long)result__CZKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BKHH)));
+        ((__POINTER *)next__AZKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__BZKH)[ 0]=next__AZKH;
+      } else {
+        next__AZKH=((__POINTER *)result__CZKH)[ 0];
+        if ((next__AZKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__CZKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__BKHH <<  1)) <=  4096)) {
+            next__AZKH=(void *)((unsigned long)result__CZKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BKHH)));
+          } else {
+            next__AZKH=new_lab__FTJ(new_size__BKHH);
+          };
+          ((__POINTER *)next__AZKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__BZKH)[ 0]=next__AZKH;
+        } else {
+          ((__POINTER *)result__CZKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__AZKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__CZKH=next__AZKH;
+        };
+      };
+      ((__POINTER *)result__CZKH)[ 0]=((__POINTER ) 3);
+      result__YBFH=(void *)((unsigned long)result__CZKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+    } else {
+      result__FZKH=first_free__NFVB;
+      while ((((void *)result__FZKH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__FZKH)->map_size_and_id__YTB &  4294967292LU) < new_size__0BFH))) {
+        result__FZKH=((__MEMORY *)result__FZKH)->map_next_free__ZTB;
+      };
+      if (((void *)result__FZKH == (void *)NULL)) {
+        result__FZKH=new_page__YC5();
+      };
+      to_busy__index__MWFC(result__FZKH,new_size__0BFH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__FZKH)) - (unsigned long)begin_memory__SXH)))) >>  26));
+      result__YBFH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__FZKH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    };
+    Result__YI1F=((void **)result__YBFH);
+    Self__NOAG= 7;
+    while ((Self__NOAG >=  0)) {
+      Result__YI1F[Self__NOAG]=NULL;
+      Self__NOAG=(__INTEGER)(Self__NOAG -  1);
+    };
+    Self__EHQF->parent_arrayed_collection__WZUE.storage__YHQF=Result__YI1F;
+    Self__EHQF->parent_arrayed_collection__WZUE.capacity__NHQF= 8;
+  };
+  Self__EHQF->parent_arrayed_collection__WZUE.upper__GBQF=(__INTEGER)(-  1);
+  stack__XZUE=result__SYNF;
+  path_file__BEXF=create_with_capacity__ZKRC( 3000);
+  ARRAYED_COLLECTIONoLIP_SLOT_CODEo__->upper__S0KF= 0;
+  ARRAYED_COLLECTIONoLIP_SLOT_CODEo__->capacity__OCQF= 0;
+  ARRAYED_COLLECTIONoLIP_SLOT_CODEo__->storage__ZCQF=NULL;
+  FAST_ARRAYoLIP_SLOT_CODEo__->parent_arrayed_collection__I0KF=(*ARRAYED_COLLECTIONoLIP_SLOT_CODEo__);
+  result__PJNF=NULL;
+  ptr__QJNF=((__POINTER )(NULL));
+  typ_id__VJNF= 0;
+  sz__SJNF=((__UINTEGER_32 )sizeof(__FAST_ARRAYoLIP_SLOT_CODEo));
+  if ((sz__SJNF ==  0)) {
+    result__PJNF=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__;
+    typ_id__VJNF=__FAST_ARRAYoLIP_SLOT_CODEo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__SJNF);
+    if ((typ_id__VJNF == (__INTEGER)(-  1))) {
+      a__HKHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__IKHH=(__UINTEGER_32)((__UINTEGER_32)(sz__SJNF + a__HKHH) & (__UINTEGER_32)(~ a__HKHH));
+      ptr_table__JZKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__IKHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__IZKH=((__POINTER )(NULL));
+      result__KZKH=((__POINTER *)ptr_table__JZKH)[ 0];
+      if ((result__KZKH == (void *)NULL)) {
+        result__KZKH=new_lab__FTJ(new_size__IKHH);
+        next__IZKH=(void *)((unsigned long)result__KZKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IKHH)));
+        ((__POINTER *)next__IZKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__JZKH)[ 0]=next__IZKH;
+      } else {
+        next__IZKH=((__POINTER *)result__KZKH)[ 0];
+        if ((next__IZKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__KZKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__IKHH <<  1)) <=  4096)) {
+            next__IZKH=(void *)((unsigned long)result__KZKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IKHH)));
+          } else {
+            next__IZKH=new_lab__FTJ(new_size__IKHH);
+          };
+          ((__POINTER *)next__IZKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__JZKH)[ 0]=next__IZKH;
+        } else {
+          ((__POINTER *)result__KZKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__IZKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__KZKH=next__IZKH;
+        };
+      };
+      ptr__QJNF=result__KZKH;
+    } else {
+      t__MKHH=((__UINTEGER_32 )typ_id__VJNF);
+      a__LKHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__RZKH=(__UINTEGER_32)((__UINTEGER_32)(sz__SJNF + a__LKHH) & (__UINTEGER_32)(~ a__LKHH));
+      ptr_table__OZKH=((__POINTER )(&(table_type[(t__MKHH)])));
+      lab_type__QZKH=(__UINTEGER_32)(t__MKHH |  1);
+      next__NZKH=((__POINTER )(NULL));
+      result__PZKH=((__POINTER *)ptr_table__OZKH)[ 0];
+      if ((result__PZKH == (void *)NULL)) {
+        result__PZKH=new_lab__FTJ(lab_type__QZKH);
+        next__NZKH=(void *)((unsigned long)result__PZKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RZKH)));
+        ((__POINTER *)next__NZKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__OZKH)[ 0]=next__NZKH;
+      } else {
+        next__NZKH=((__POINTER *)result__PZKH)[ 0];
+        if ((next__NZKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__PZKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__RZKH <<  1)) <=  4096)) {
+            next__NZKH=(void *)((unsigned long)result__PZKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RZKH)));
+          } else {
+            next__NZKH=new_lab__FTJ(lab_type__QZKH);
+          };
+          ((__POINTER *)next__NZKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__OZKH)[ 0]=next__NZKH;
+        } else {
+          ((__POINTER *)result__PZKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NZKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__PZKH=next__NZKH;
+        };
+      };
+      ptr__QJNF=result__PZKH;
+    };
+    result__PJNF=((__FAST_ARRAYoLIP_SLOT_CODEo *)ptr__QJNF);
+    *(result__PJNF) = *(FAST_ARRAYoLIP_SLOT_CODEo__);
+  };
+  Self__FCQF=((__FAST_ARRAYoLIP_SLOT_CODEo *)result__PJNF);
+  if ((Self__FCQF->parent_arrayed_collection__I0KF.capacity__OCQF <  32)) {
+    sz__BCFH=((__UINTEGER_32 )(__INTEGER)(((__INTEGER )(sizeof(void *))) <<  5));
+    result__ACFH=((__POINTER )(NULL));
+    a__GCFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__CCFH=(__UINTEGER_32)((__UINTEGER_32)(sz__BCFH + a__GCFH) & (__UINTEGER_32)(~ a__GCFH));
+    new_size2__DCFH=(__UINTEGER_32)(new_size__CCFH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+    if ((new_size2__DCFH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+      a__PKHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__QKHH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__DCFH + a__PKHH) & (__UINTEGER_32)(~ a__PKHH));
+      ptr_table__TZKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__QKHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__SZKH=((__POINTER )(NULL));
+      result__UZKH=((__POINTER *)ptr_table__TZKH)[ 0];
+      if ((result__UZKH == (void *)NULL)) {
+        result__UZKH=new_lab__FTJ(new_size__QKHH);
+        next__SZKH=(void *)((unsigned long)result__UZKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QKHH)));
+        ((__POINTER *)next__SZKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__TZKH)[ 0]=next__SZKH;
+      } else {
+        next__SZKH=((__POINTER *)result__UZKH)[ 0];
+        if ((next__SZKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__UZKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__QKHH <<  1)) <=  4096)) {
+            next__SZKH=(void *)((unsigned long)result__UZKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QKHH)));
+          } else {
+            next__SZKH=new_lab__FTJ(new_size__QKHH);
+          };
+          ((__POINTER *)next__SZKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__TZKH)[ 0]=next__SZKH;
+        } else {
+          ((__POINTER *)result__UZKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__SZKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__UZKH=next__SZKH;
+        };
+      };
+      ((__POINTER *)result__UZKH)[ 0]=((__POINTER ) 3);
+      result__ACFH=(void *)((unsigned long)result__UZKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+    } else {
+      result__XZKH=first_free__NFVB;
+      while ((((void *)result__XZKH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__XZKH)->map_size_and_id__YTB &  4294967292LU) < new_size__CCFH))) {
+        result__XZKH=((__MEMORY *)result__XZKH)->map_next_free__ZTB;
+      };
+      if (((void *)result__XZKH == (void *)NULL)) {
+        result__XZKH=new_page__YC5();
+      };
+      to_busy__index__MWFC(result__XZKH,new_size__CCFH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__XZKH)) - (unsigned long)begin_memory__SXH)))) >>  26));
+      result__ACFH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__XZKH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    };
+    Result__5D1F=((void **)result__ACFH);
+    Self__GNAG= 31;
+    while ((Self__GNAG >=  0)) {
+      Result__5D1F[Self__GNAG]=NULL;
+      Self__GNAG=(__INTEGER)(Self__GNAG -  1);
+    };
+    Self__FCQF->parent_arrayed_collection__I0KF.storage__ZCQF=Result__5D1F;
+    Self__FCQF->parent_arrayed_collection__I0KF.capacity__OCQF= 32;
+  };
+  Self__FCQF->parent_arrayed_collection__I0KF.upper__S0KF=(__INTEGER)(-  1);
+  list_method__J0KF=result__PJNF;
+  PROTOTYPE__->comment_slot__4UTC=NULL;
+  PROTOTYPE__->comment_header__WBRC=NULL;
+  HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo__->buckets__1REC=NULL;
+  HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo__->capacity__WREC= 0;
+  HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo__->count__Y1FC= 0;
+  result__R4YB=NULL;
+  ptr__S4YB=((__POINTER )(NULL));
+  typ_id__X4YB= 0;
+  sz__U4YB=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo));
+  if ((sz__U4YB ==  0)) {
+    result__R4YB=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__;
+    typ_id__X4YB=__HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__U4YB);
+    if ((typ_id__X4YB == (__INTEGER)(-  1))) {
+      a__WKHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__XKHH=(__UINTEGER_32)((__UINTEGER_32)(sz__U4YB + a__WKHH) & (__UINTEGER_32)(~ a__WKHH));
+      ptr_table__1ZKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__XKHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__0ZKH=((__POINTER )(NULL));
+      result__2ZKH=((__POINTER *)ptr_table__1ZKH)[ 0];
+      if ((result__2ZKH == (void *)NULL)) {
+        result__2ZKH=new_lab__FTJ(new_size__XKHH);
+        next__0ZKH=(void *)((unsigned long)result__2ZKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XKHH)));
+        ((__POINTER *)next__0ZKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__1ZKH)[ 0]=next__0ZKH;
+      } else {
+        next__0ZKH=((__POINTER *)result__2ZKH)[ 0];
+        if ((next__0ZKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2ZKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__XKHH <<  1)) <=  4096)) {
+            next__0ZKH=(void *)((unsigned long)result__2ZKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XKHH)));
+          } else {
+            next__0ZKH=new_lab__FTJ(new_size__XKHH);
+          };
+          ((__POINTER *)next__0ZKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__1ZKH)[ 0]=next__0ZKH;
+        } else {
+          ((__POINTER *)result__2ZKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0ZKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__2ZKH=next__0ZKH;
+        };
+      };
+      ptr__S4YB=result__2ZKH;
+    } else {
+      t__1KHH=((__UINTEGER_32 )typ_id__X4YB);
+      a__0KHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__D0KH=(__UINTEGER_32)((__UINTEGER_32)(sz__U4YB + a__0KHH) & (__UINTEGER_32)(~ a__0KHH));
+      ptr_table__A0KH=((__POINTER )(&(table_type[(t__1KHH)])));
+      lab_type__C0KH=(__UINTEGER_32)(t__1KHH |  1);
+      next__5ZKH=((__POINTER )(NULL));
+      result__B0KH=((__POINTER *)ptr_table__A0KH)[ 0];
+      if ((result__B0KH == (void *)NULL)) {
+        result__B0KH=new_lab__FTJ(lab_type__C0KH);
+        next__5ZKH=(void *)((unsigned long)result__B0KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__D0KH)));
+        ((__POINTER *)next__5ZKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__A0KH)[ 0]=next__5ZKH;
+      } else {
+        next__5ZKH=((__POINTER *)result__B0KH)[ 0];
+        if ((next__5ZKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__B0KH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__D0KH <<  1)) <=  4096)) {
+            next__5ZKH=(void *)((unsigned long)result__B0KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__D0KH)));
+          } else {
+            next__5ZKH=new_lab__FTJ(lab_type__C0KH);
+          };
+          ((__POINTER *)next__5ZKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__A0KH)[ 0]=next__5ZKH;
+        } else {
+          ((__POINTER *)result__B0KH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5ZKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__B0KH=next__5ZKH;
+        };
+      };
+      ptr__S4YB=result__B0KH;
+    };
+    result__R4YB=((__HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo *)ptr__S4YB);
+    *(result__R4YB) = *(HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo__);
+  };
+  Self__1ZFC=((__HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo *)result__R4YB);
+  new_capacity__IJOC=prime_number_ceiling__541( 193);
+  Self__1ZFC->buckets__1REC=create__IAYC(new_capacity__IJOC);
+  Self__1ZFC->capacity__WREC=new_capacity__IJOC;
+  Self__1ZFC->count__Y1FC= 0;
+  bucket_name__NVOB=result__R4YB;
+  HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__->key__HSEC=NULL;
+  HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__->next__SSEC=NULL;
+  HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__->item__0SEC=NULL;
+  SECTION___->name__11DC=NULL;
+  SECTION___->type_list__K0FC=NULL;
+  last_section__E2C=NULL;
+  PROTOTYPE__->last_slot__12C=NULL;
+  ITM_SLOT__->id_section__F3C=NULL;
+  ITM_SLOT__->comment__H3OB=NULL;
+  ITM_SLOT__->result_type__PBGC=NULL;
+  ITM_SLOT__->affect__4CGC='\0';
+  ITM_SLOT__->argument_list__5GHC=NULL;
+  ITM_SLOT__->next__HKHC=NULL;
+  ITM_SLOT__->comment_chapter__B4HC=NULL;
+  ITM_SLOT__->stat_shorter__XNTD= 0;
+  ITM_SLOT_OPERATOR__->parent_itm_slot__NW5B=(*ITM_SLOT__);
+  HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__->buckets__BUEC=NULL;
+  HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__->capacity__2TEC= 0;
+  HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__->count__S4FC= 0;
+  result__WBZB=NULL;
+  ptr__XBZB=((__POINTER )(NULL));
+  typ_id__2BZB= 0;
+  sz__ZBZB=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo));
+  if ((sz__ZBZB ==  0)) {
+    result__WBZB=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__;
+    typ_id__2BZB=__HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__ZBZB);
+    if ((typ_id__2BZB == (__INTEGER)(-  1))) {
+      a__4KHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__5KHH=(__UINTEGER_32)((__UINTEGER_32)(sz__ZBZB + a__4KHH) & (__UINTEGER_32)(~ a__4KHH));
+      ptr_table__F0KH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__5KHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__E0KH=((__POINTER )(NULL));
+      result__G0KH=((__POINTER *)ptr_table__F0KH)[ 0];
+      if ((result__G0KH == (void *)NULL)) {
+        result__G0KH=new_lab__FTJ(new_size__5KHH);
+        next__E0KH=(void *)((unsigned long)result__G0KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5KHH)));
+        ((__POINTER *)next__E0KH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__F0KH)[ 0]=next__E0KH;
+      } else {
+        next__E0KH=((__POINTER *)result__G0KH)[ 0];
+        if ((next__E0KH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__G0KH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__5KHH <<  1)) <=  4096)) {
+            next__E0KH=(void *)((unsigned long)result__G0KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5KHH)));
+          } else {
+            next__E0KH=new_lab__FTJ(new_size__5KHH);
+          };
+          ((__POINTER *)next__E0KH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__F0KH)[ 0]=next__E0KH;
+        } else {
+          ((__POINTER *)result__G0KH)[ 0]=(void *)((unsigned long)((__POINTER *)next__E0KH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__G0KH=next__E0KH;
+        };
+      };
+      ptr__XBZB=result__G0KH;
+    } else {
+      t__DLHH=((__UINTEGER_32 )typ_id__2BZB);
+      a__CLHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__N0KH=(__UINTEGER_32)((__UINTEGER_32)(sz__ZBZB + a__CLHH) & (__UINTEGER_32)(~ a__CLHH));
+      ptr_table__K0KH=((__POINTER )(&(table_type[(t__DLHH)])));
+      lab_type__M0KH=(__UINTEGER_32)(t__DLHH |  1);
+      next__J0KH=((__POINTER )(NULL));
+      result__L0KH=((__POINTER *)ptr_table__K0KH)[ 0];
+      if ((result__L0KH == (void *)NULL)) {
+        result__L0KH=new_lab__FTJ(lab_type__M0KH);
+        next__J0KH=(void *)((unsigned long)result__L0KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__N0KH)));
+        ((__POINTER *)next__J0KH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__K0KH)[ 0]=next__J0KH;
+      } else {
+        next__J0KH=((__POINTER *)result__L0KH)[ 0];
+        if ((next__J0KH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__L0KH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__N0KH <<  1)) <=  4096)) {
+            next__J0KH=(void *)((unsigned long)result__L0KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__N0KH)));
+          } else {
+            next__J0KH=new_lab__FTJ(lab_type__M0KH);
+          };
+          ((__POINTER *)next__J0KH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__K0KH)[ 0]=next__J0KH;
+        } else {
+          ((__POINTER *)result__L0KH)[ 0]=(void *)((unsigned long)((__POINTER *)next__J0KH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__L0KH=next__J0KH;
+        };
+      };
+      ptr__XBZB=result__L0KH;
+    };
+    result__WBZB=((__HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)ptr__XBZB);
+    *(result__WBZB) = *(HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__);
+  };
+  Self__02FC=((__HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)result__WBZB);
+  new_capacity__DNOC=prime_number_ceiling__541( 193);
+  Self__02FC->buckets__BUEC=create__LFYC(new_capacity__DNOC);
+  Self__02FC->capacity__2TEC=new_capacity__DNOC;
+  Self__02FC->count__S4FC= 0;
+  bucket_list__IXOB=result__WBZB;
+  HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__->key__NUEC=NULL;
+  HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__->next__YUEC=NULL;
+  HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__->item__AVEC=NULL;
+  ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo__->upper__JWGC= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo__->capacity__RNHC= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo__->storage__2NHC=NULL;
+  FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo__->parent_arrayed_collection__CW1B=(*ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo__);
+  ARRAYED_COLLECTIONoITM_ARGUMENTo__->upper__XCHC= 0;
+  ARRAYED_COLLECTIONoITM_ARGUMENTo__->capacity__ZCHC= 0;
+  ARRAYED_COLLECTIONoITM_ARGUMENTo__->storage__VDHC=NULL;
+  FAST_ARRAYoITM_ARGUMENTo__->parent_arrayed_collection__MDZB=(*ARRAYED_COLLECTIONoITM_ARGUMENTo__);
+  result__QL5B=NULL;
+  ptr__RL5B=((__POINTER )(NULL));
+  typ_id__WL5B= 0;
+  sz__TL5B=((__UINTEGER_32 )sizeof(__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo));
+  if ((sz__TL5B ==  0)) {
+    result__QL5B=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__;
+    typ_id__WL5B=__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__TL5B);
+    if ((typ_id__WL5B == (__INTEGER)(-  1))) {
+      a__GLHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__HLHH=(__UINTEGER_32)((__UINTEGER_32)(sz__TL5B + a__GLHH) & (__UINTEGER_32)(~ a__GLHH));
+      ptr_table__P0KH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__HLHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__O0KH=((__POINTER )(NULL));
+      result__Q0KH=((__POINTER *)ptr_table__P0KH)[ 0];
+      if ((result__Q0KH == (void *)NULL)) {
+        result__Q0KH=new_lab__FTJ(new_size__HLHH);
+        next__O0KH=(void *)((unsigned long)result__Q0KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HLHH)));
+        ((__POINTER *)next__O0KH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__P0KH)[ 0]=next__O0KH;
+      } else {
+        next__O0KH=((__POINTER *)result__Q0KH)[ 0];
+        if ((next__O0KH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__Q0KH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__HLHH <<  1)) <=  4096)) {
+            next__O0KH=(void *)((unsigned long)result__Q0KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HLHH)));
+          } else {
+            next__O0KH=new_lab__FTJ(new_size__HLHH);
+          };
+          ((__POINTER *)next__O0KH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__P0KH)[ 0]=next__O0KH;
+        } else {
+          ((__POINTER *)result__Q0KH)[ 0]=(void *)((unsigned long)((__POINTER *)next__O0KH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__Q0KH=next__O0KH;
+        };
+      };
+      ptr__RL5B=result__Q0KH;
+    } else {
+      t__LLHH=((__UINTEGER_32 )typ_id__WL5B);
+      a__KLHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__X0KH=(__UINTEGER_32)((__UINTEGER_32)(sz__TL5B + a__KLHH) & (__UINTEGER_32)(~ a__KLHH));
+      ptr_table__U0KH=((__POINTER )(&(table_type[(t__LLHH)])));
+      lab_type__W0KH=(__UINTEGER_32)(t__LLHH |  1);
+      next__T0KH=((__POINTER )(NULL));
+      result__V0KH=((__POINTER *)ptr_table__U0KH)[ 0];
+      if ((result__V0KH == (void *)NULL)) {
+        result__V0KH=new_lab__FTJ(lab_type__W0KH);
+        next__T0KH=(void *)((unsigned long)result__V0KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__X0KH)));
+        ((__POINTER *)next__T0KH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__U0KH)[ 0]=next__T0KH;
+      } else {
+        next__T0KH=((__POINTER *)result__V0KH)[ 0];
+        if ((next__T0KH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__V0KH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__X0KH <<  1)) <=  4096)) {
+            next__T0KH=(void *)((unsigned long)result__V0KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__X0KH)));
+          } else {
+            next__T0KH=new_lab__FTJ(lab_type__W0KH);
+          };
+          ((__POINTER *)next__T0KH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__U0KH)[ 0]=next__T0KH;
+        } else {
+          ((__POINTER *)result__V0KH)[ 0]=(void *)((unsigned long)((__POINTER *)next__T0KH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__V0KH=next__T0KH;
+        };
+      };
+      ptr__RL5B=result__V0KH;
+    };
+    result__QL5B=((__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *)ptr__RL5B);
+    *(result__QL5B) = *(FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo__);
+  };
+  Self__INHC=((__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *)result__QL5B);
+  if ((Self__INHC->parent_arrayed_collection__CW1B.capacity__RNHC <  5)) {
+    Self__INHC->parent_arrayed_collection__CW1B.storage__2NHC=create__DQBD( 5);
+    Self__INHC->parent_arrayed_collection__CW1B.capacity__RNHC= 5;
+  };
+  Self__INHC->parent_arrayed_collection__CW1B.upper__JWGC=(__INTEGER)(-  1);
+  free_list__DW1B=result__QL5B;
+  ITM_SLOT_OPERATOR__->priority_and_level__D3HC= 0;
+  ITM_SLOT_OPERATOR__->pretty_name__O3HC=NULL;
+  last_slot__GYOB=NULL;
+  HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__->key__IEGC=NULL;
+  HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__->next__TEGC=NULL;
+  HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__->item__1EGC=NULL;
+  PROTOTYPE__->first_slot__PHZB=NULL;
+  ARRAYED_COLLECTIONoITM_SLOTo__->upper__NNTD= 0;
+  ARRAYED_COLLECTIONoITM_SLOTo__->capacity__YBWE= 0;
+  ARRAYED_COLLECTIONoITM_SLOTo__->storage__1OWE=NULL;
+  FAST_ARRAYoITM_SLOTo__->parent_arrayed_collection__QMTD=(*ARRAYED_COLLECTIONoITM_SLOTo__);
+  result__ICIE=NULL;
+  ptr__JCIE=((__POINTER )(NULL));
+  typ_id__OCIE= 0;
+  sz__LCIE=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_SLOTo));
+  if ((sz__LCIE ==  0)) {
+    result__ICIE=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);
+    typ_id__OCIE=__FAST_ARRAYoITM_SLOTo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__LCIE);
+    if ((typ_id__OCIE == (__INTEGER)(-  1))) {
+      a__OLHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__PLHH=(__UINTEGER_32)((__UINTEGER_32)(sz__LCIE + a__OLHH) & (__UINTEGER_32)(~ a__OLHH));
+      ptr_table__Z0KH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__PLHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__Y0KH=((__POINTER )(NULL));
+      result__00KH=((__POINTER *)ptr_table__Z0KH)[ 0];
+      if ((result__00KH == (void *)NULL)) {
+        result__00KH=new_lab__FTJ(new_size__PLHH);
+        next__Y0KH=(void *)((unsigned long)result__00KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PLHH)));
+        ((__POINTER *)next__Y0KH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__Z0KH)[ 0]=next__Y0KH;
+      } else {
+        next__Y0KH=((__POINTER *)result__00KH)[ 0];
+        if ((next__Y0KH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__00KH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__PLHH <<  1)) <=  4096)) {
+            next__Y0KH=(void *)((unsigned long)result__00KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PLHH)));
+          } else {
+            next__Y0KH=new_lab__FTJ(new_size__PLHH);
+          };
+          ((__POINTER *)next__Y0KH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__Z0KH)[ 0]=next__Y0KH;
+        } else {
+          ((__POINTER *)result__00KH)[ 0]=(void *)((unsigned long)((__POINTER *)next__Y0KH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__00KH=next__Y0KH;
+        };
+      };
+      ptr__JCIE=result__00KH;
+    } else {
+      t__TLHH=((__UINTEGER_32 )typ_id__OCIE);
+      a__SLHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__B1KH=(__UINTEGER_32)((__UINTEGER_32)(sz__LCIE + a__SLHH) & (__UINTEGER_32)(~ a__SLHH));
+      ptr_table__40KH=((__POINTER )(&(table_type[(t__TLHH)])));
+      lab_type__A1KH=(__UINTEGER_32)(t__TLHH |  1);
+      next__30KH=((__POINTER )(NULL));
+      result__50KH=((__POINTER *)ptr_table__40KH)[ 0];
+      if ((result__50KH == (void *)NULL)) {
+        result__50KH=new_lab__FTJ(lab_type__A1KH);
+        next__30KH=(void *)((unsigned long)result__50KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__B1KH)));
+        ((__POINTER *)next__30KH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__40KH)[ 0]=next__30KH;
+      } else {
+        next__30KH=((__POINTER *)result__50KH)[ 0];
+        if ((next__30KH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__50KH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__B1KH <<  1)) <=  4096)) {
+            next__30KH=(void *)((unsigned long)result__50KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__B1KH)));
+          } else {
+            next__30KH=new_lab__FTJ(lab_type__A1KH);
+          };
+          ((__POINTER *)next__30KH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__40KH)[ 0]=next__30KH;
+        } else {
+          ((__POINTER *)result__50KH)[ 0]=(void *)((unsigned long)((__POINTER *)next__30KH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__50KH=next__30KH;
+        };
+      };
+      ptr__JCIE=result__50KH;
+    };
+    result__ICIE=((__FAST_ARRAYoITM_SLOTo *)ptr__JCIE);
+    *(result__ICIE) = *(FAST_ARRAYoITM_SLOTo__);
+  };
+  Self__IOWE=((__FAST_ARRAYoITM_SLOTo *)result__ICIE);
+  if ((Self__IOWE->parent_arrayed_collection__QMTD.capacity__YBWE <  256)) {
+    Self__IOWE->parent_arrayed_collection__QMTD.storage__1OWE=create__QHFF( 256);
+    Self__IOWE->parent_arrayed_collection__QMTD.capacity__YBWE= 256;
+  };
+  Self__IOWE->parent_arrayed_collection__QMTD.upper__NNTD=(__INTEGER)(-  1);
+  list_tmp__RMTD=result__ICIE;
+  str_tmp__QO4E=create__ZBB( 512);
+  str_tmp2__SQ4E=create__ZBB( 64);
+  str_tmp3__SU4E=create__ZBB( 64);
   txt__1=NULL;
   p__AB=NULL;
   create__ZBB( 255);
@@ -5797,246 +5797,246 @@ 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__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;
+      a__WLHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__XLHH=(__UINTEGER_32)((__UINTEGER_32)(sz__WUB + a__WLHH) & (__UINTEGER_32)(~ a__WLHH));
+      ptr_table__D1KH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__XLHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__C1KH=((__POINTER )(NULL));
+      result__E1KH=((__POINTER *)ptr_table__D1KH)[ 0];
+      if ((result__E1KH == (void *)NULL)) {
+        result__E1KH=new_lab__FTJ(new_size__XLHH);
+        next__C1KH=(void *)((unsigned long)result__E1KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XLHH)));
+        ((__POINTER *)next__C1KH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__D1KH)[ 0]=next__C1KH;
       } else {
-        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)));
+        next__C1KH=((__POINTER *)result__E1KH)[ 0];
+        if ((next__C1KH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__E1KH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__XLHH <<  1)) <=  4096)) {
+            next__C1KH=(void *)((unsigned long)result__E1KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XLHH)));
           } else {
-            next__DTKH=new_lab__ZPJ(new_size__2EHH);
+            next__C1KH=new_lab__FTJ(new_size__XLHH);
           };
-          ((__POINTER *)next__DTKH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__ETKH)[ 0]=next__DTKH;
+          ((__POINTER *)next__C1KH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__D1KH)[ 0]=next__C1KH;
         } else {
-          ((__POINTER *)result__FTKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DTKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__FTKH=next__DTKH;
+          ((__POINTER *)result__E1KH)[ 0]=(void *)((unsigned long)((__POINTER *)next__C1KH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__E1KH=next__C1KH;
         };
       };
-      ptr__UUB=result__FTKH;
+      ptr__UUB=result__E1KH;
     } else {
-      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;
+      t__1LHH=((__UINTEGER_32 )typ_id__ZUB);
+      a__0LHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__L1KH=(__UINTEGER_32)((__UINTEGER_32)(sz__WUB + a__0LHH) & (__UINTEGER_32)(~ a__0LHH));
+      ptr_table__I1KH=((__POINTER )(&(table_type[(t__1LHH)])));
+      lab_type__K1KH=(__UINTEGER_32)(t__1LHH |  1);
+      next__H1KH=((__POINTER )(NULL));
+      result__J1KH=((__POINTER *)ptr_table__I1KH)[ 0];
+      if ((result__J1KH == (void *)NULL)) {
+        result__J1KH=new_lab__FTJ(lab_type__K1KH);
+        next__H1KH=(void *)((unsigned long)result__J1KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__L1KH)));
+        ((__POINTER *)next__H1KH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__I1KH)[ 0]=next__H1KH;
       } else {
-        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)));
+        next__H1KH=((__POINTER *)result__J1KH)[ 0];
+        if ((next__H1KH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__J1KH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__L1KH <<  1)) <=  4096)) {
+            next__H1KH=(void *)((unsigned long)result__J1KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__L1KH)));
           } else {
-            next__ITKH=new_lab__ZPJ(lab_type__LTKH);
+            next__H1KH=new_lab__FTJ(lab_type__K1KH);
           };
-          ((__POINTER *)next__ITKH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__JTKH)[ 0]=next__ITKH;
+          ((__POINTER *)next__H1KH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__I1KH)[ 0]=next__H1KH;
         } else {
-          ((__POINTER *)result__KTKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ITKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__KTKH=next__ITKH;
+          ((__POINTER *)result__J1KH)[ 0]=(void *)((unsigned long)((__POINTER *)next__H1KH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__J1KH=next__H1KH;
         };
       };
-      ptr__UUB=result__KTKH;
+      ptr__UUB=result__J1KH;
     };
     result__TUB=((__HASHED_SEToABSTRACT_STRINGo *)ptr__UUB);
     *(result__TUB) = *(HASHED_SEToABSTRACT_STRINGo__);
   };
-  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;
+  Self__XCS=((__HASHED_SEToABSTRACT_STRINGo *)result__TUB);
+  new_capacity__E0W=prime_number_ceiling__541( 53);
+  Self__XCS->buckets__OZR=create__JK2(new_capacity__E0W);
+  Self__XCS->capacity__JZR=new_capacity__E0W;
+  Self__XCS->count__P0R= 0;
   list__FK=result__TUB;
-  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));
+  add__YYR(result__TUB,(&__string_4));
+  add__YYR(list__FK,(&__string_5));
+  add__YYR(list__FK,(&__string_6));
+  add__YYR(list__FK,(&__string_7));
+  add__YYR(list__FK,(&__string_8));
+  add__YYR(list__FK,(&__string_9));
+  add__YYR(list__FK,(&__string_10));
+  add__YYR(list__FK,(&__string_11));
+  add__YYR(list__FK,(&__string_12));
+  add__YYR(list__FK,(&__string_13));
+  add__YYR(list__FK,(&__string_14));
+  add__YYR(list__FK,(&__string_15));
+  add__YYR(list__FK,(&__string_16));
+  add__YYR(list__FK,(&__string_17));
+  add__YYR(list__FK,(&__string_18));
+  add__YYR(list__FK,(&__string_19));
+  add__YYR(list__FK,(&__string_20));
+  add__YYR(list__FK,(&__string_21));
+  add__YYR(list__FK,(&__string_22));
+  add__YYR(list__FK,(&__string_23));
+  add__YYR(list__FK,(&__string_24));
+  add__YYR(list__FK,(&__string_25));
+  add__YYR(list__FK,(&__string_26));
+  add__YYR(list__FK,(&__string_27));
+  add__YYR(list__FK,(&__string_28));
+  add__YYR(list__FK,(&__string_29));
+  add__YYR(list__FK,(&__string_30));
+  add__YYR(list__FK,(&__string_31));
+  add__YYR(list__FK,(&__string_32));
+  add__YYR(list__FK,(&__string_33));
+  add__YYR(list__FK,(&__string_34));
+  add__YYR(list__FK,(&__string_35));
+  add__YYR(list__FK,(&__string_36));
+  add__YYR(list__FK,(&__string_37));
+  add__YYR(list__FK,(&__string_38));
+  add__YYR(list__FK,(&__string_39));
+  add__YYR(list__FK,(&__string_40));
+  add__YYR(list__FK,(&__string_41));
+  add__YYR(list__FK,(&__string_42));
+  add__YYR(list__FK,(&__string_43));
+  add__YYR(list__FK,(&__string_44));
+  add__YYR(list__FK,(&__string_45));
+  add__YYR(list__FK,(&__string_46));
+  add__YYR(list__FK,(&__string_47));
+  add__YYR(list__FK,(&__string_1));
+  add__YYR(list__FK,(&__string_48));
+  add__YYR(list__FK,(&__string_49));
+  add__YYR(list__FK,(&__string_50));
+  add__YYR(list__FK,(&__string_51));
+  add__YYR(list__FK,(&__string_52));
+  add__YYR(list__FK,(&__string_53));
+  add__YYR(list__FK,(&__string_54));
+  add__YYR(list__FK,(&__string_55));
+  add__YYR(list__FK,(&__string_56));
+  add__YYR(list__FK,(&__string_57));
+  add__YYR(list__FK,(&__string_58));
+  add__YYR(list__FK,(&__string_59));
+  add__YYR(list__FK,(&__string_2));
+  add__YYR(list__FK,(&__string_3));
+  add__YYR(list__FK,(&__string_60));
+  add__YYR(list__FK,(&__string_61));
+  add__YYR(list__FK,(&__string_62));
+  add__YYR(list__FK,(&__string_63));
+  add__YYR(list__FK,(&__string_64));
+  add__YYR(list__FK,(&__string_65));
+  add__YYR(list__FK,(&__string_66));
+  add__YYR(list__FK,(&__string_67));
+  add__YYR(list__FK,(&__string_68));
+  add__YYR(list__FK,(&__string_69));
+  add__YYR(list__FK,(&__string_70));
+  add__YYR(list__FK,(&__string_71));
+  add__YYR(list__FK,(&__string_72));
+  add__YYR(list__FK,(&__string_73));
+  add__YYR(list__FK,(&__string_74));
+  add__YYR(list__FK,(&__string_75));
+  add__YYR(list__FK,(&__string_76));
+  add__YYR(list__FK,(&__string_77));
+  add__YYR(list__FK,(&__string_78));
+  add__YYR(list__FK,(&__string_79));
+  add__YYR(list__FK,(&__string_80));
+  add__YYR(list__FK,(&__string_81));
+  add__YYR(list__FK,(&__string_82));
+  add__YYR(list__FK,(&__string_83));
+  add__YYR(list__FK,(&__string_84));
+  add__YYR(list__FK,(&__string_85));
+  add__YYR(list__FK,(&__string_86));
+  add__YYR(list__FK,(&__string_87));
+  add__YYR(list__FK,(&__string_88));
+  add__YYR(list__FK,(&__string_89));
+  add__YYR(list__FK,(&__string_90));
+  add__YYR(list__FK,(&__string_91));
+  add__YYR(list__FK,(&__string_92));
+  add__YYR(list__FK,(&__string_93));
+  add__YYR(list__FK,(&__string_94));
+  add__YYR(list__FK,(&__string_95));
+  add__YYR(list__FK,(&__string_96));
+  add__YYR(list__FK,(&__string_97));
+  add__YYR(list__FK,(&__string_98));
+  add__YYR(list__FK,(&__string_99));
+  add__YYR(list__FK,(&__string_100));
+  add__YYR(list__FK,(&__string_101));
+  add__YYR(list__FK,(&__string_102));
+  add__YYR(list__FK,(&__string_103));
+  add__YYR(list__FK,(&__string_104));
+  add__YYR(list__FK,(&__string_105));
+  add__YYR(list__FK,(&__string_106));
+  add__YYR(list__FK,(&__string_107));
+  add__YYR(list__FK,(&__string_108));
+  add__YYR(list__FK,(&__string_109));
+  add__YYR(list__FK,(&__string_110));
+  add__YYR(list__FK,(&__string_111));
+  add__YYR(list__FK,(&__string_112));
+  add__YYR(list__FK,(&__string_113));
+  add__YYR(list__FK,(&__string_114));
+  add__YYR(list__FK,(&__string_115));
+  add__YYR(list__FK,(&__string_116));
+  add__YYR(list__FK,(&__string_117));
+  add__YYR(list__FK,(&__string_118));
+  add__YYR(list__FK,(&__string_119));
+  add__YYR(list__FK,(&__string_120));
+  add__YYR(list__FK,(&__string_121));
+  add__YYR(list__FK,(&__string_122));
+  add__YYR(list__FK,(&__string_123));
+  add__YYR(list__FK,(&__string_124));
+  add__YYR(list__FK,(&__string_125));
+  add__YYR(list__FK,(&__string_126));
+  add__YYR(list__FK,(&__string_127));
+  add__YYR(list__FK,(&__string_128));
+  add__YYR(list__FK,(&__string_129));
+  add__YYR(list__FK,(&__string_70));
+  add__YYR(list__FK,(&__string_130));
+  add__YYR(list__FK,(&__string_131));
+  add__YYR(list__FK,(&__string_132));
+  add__YYR(list__FK,(&__string_133));
+  add__YYR(list__FK,(&__string_65));
+  add__YYR(list__FK,(&__string_134));
+  add__YYR(list__FK,(&__string_135));
+  add__YYR(list__FK,(&__string_136));
+  add__YYR(list__FK,(&__string_137));
+  add__YYR(list__FK,(&__string_138));
+  add__YYR(list__FK,(&__string_139));
+  add__YYR(list__FK,(&__string_140));
+  add__YYR(list__FK,(&__string_141));
+  add__YYR(list__FK,(&__string_142));
+  add__YYR(list__FK,(&__string_143));
+  add__YYR(list__FK,(&__string_144));
+  add__YYR(list__FK,(&__string_145));
+  add__YYR(list__FK,(&__string_146));
+  add__YYR(list__FK,(&__string_147));
+  add__YYR(list__FK,(&__string_148));
+  add__YYR(list__FK,(&__string_149));
+  add__YYR(list__FK,(&__string_150));
+  add__YYR(list__FK,(&__string_66));
+  add__YYR(list__FK,(&__string_151));
+  add__YYR(list__FK,(&__string_152));
+  add__YYR(list__FK,(&__string_153));
+  add__YYR(list__FK,(&__string_154));
+  add__YYR(list__FK,(&__string_155));
+  add__YYR(list__FK,(&__string_156));
   operator__name__GHB((&__string_16));
   operator__name__GHB((&__string_17));
   cmd__HZ=NULL;
   path__KZ=NULL;
   is_shorter__LZ=TRUE__;
   j__IZ= 1;
-  while ((j__IZ <= ((__FAST_ARRAYoSTRINGo *)result__OHD)->parent_arrayed_collection__RKC.upper__UKC)) {
-    cmd__HZ=((void **)((__FAST_ARRAYoSTRINGo *)result__OHD)->parent_arrayed_collection__RKC.storage__1DT)[j__IZ];
-    if ((((__CHARACTER *)((__STRING *)cmd__HZ)->storage__F5R)[ 0] == '-')) {
-      if ((((__CHARACTER *)((__STRING *)cmd__HZ)->storage__F5R)[ 1] == 'o')) {
+  while ((j__IZ <= ((__FAST_ARRAYoSTRINGo *)result__OID)->parent_arrayed_collection__RKC.upper__UKC)) {
+    cmd__HZ=((void **)((__FAST_ARRAYoSTRINGo *)result__OID)->parent_arrayed_collection__RKC.storage__HHT)[j__IZ];
+    if ((((__CHARACTER *)((__STRING *)cmd__HZ)->storage__RCS)[ 0] == '-')) {
+      if ((((__CHARACTER *)((__STRING *)cmd__HZ)->storage__RCS)[ 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));
+        if ((j__IZ > (__INTEGER)(((__FAST_ARRAYoSTRINGo *)result__OID)->parent_arrayed_collection__RKC.upper__UKC +  1))) {
+          print__DJD((&__string_157));
           exit(( 1));
         };
-        output_name__DI=get__YWB(((void **)((__FAST_ARRAYoSTRINGo *)result__OHD)->parent_arrayed_collection__RKC.storage__1DT)[j__IZ]);
+        output_name__DI=get__YWB(((void **)((__FAST_ARRAYoSTRINGo *)result__OID)->parent_arrayed_collection__RKC.storage__HHT)[j__IZ]);
         __tmp__U0=TRUE__;
       } else {
         __tmp__U0=FALSE__;
@@ -6044,66 +6044,66 @@ int main(int argc,char **argv)
       if (__tmp__U0) {
         __tmp__P1=TRUE__;
       } else {
-        result__32NB=(((__CHARACTER *)((__STRING *)cmd__HZ)->storage__F5R)[ 1] == 'f');
-        if (result__32NB) {
+        result__JAOB=(((__CHARACTER *)((__STRING *)cmd__HZ)->storage__RCS)[ 1] == 'f');
+        if (result__JAOB) {
           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));
+          if ((j__IZ > (__INTEGER)(((__FAST_ARRAYoSTRINGo *)result__OID)->parent_arrayed_collection__RKC.upper__UKC +  1))) {
+            print__DJD((&__string_157));
             exit(( 1));
           };
-          format_name__N1=get__YWB(((void **)((__FAST_ARRAYoSTRINGo *)result__OHD)->parent_arrayed_collection__RKC.storage__1DT)[j__IZ]);
+          format_name__N1=get__YWB(((void **)((__FAST_ARRAYoSTRINGo *)result__OID)->parent_arrayed_collection__RKC.storage__HHT)[j__IZ]);
         };
-        __tmp__P1=result__32NB;
+        __tmp__P1=result__JAOB;
       };
       if (__tmp__P1) {
         __tmp__31=TRUE__;
       } else {
-        result__P3NB=(((__CHARACTER *)((__STRING *)cmd__HZ)->storage__F5R)[ 1] == 'c');
-        if (result__P3NB) {
+        result__1AOB=(((__CHARACTER *)((__STRING *)cmd__HZ)->storage__RCS)[ 1] == 'c');
+        if (result__1AOB) {
           is_short_code__11=TRUE__;
         };
-        __tmp__31=result__P3NB;
+        __tmp__31=result__1AOB;
       };
       if (__tmp__31) {
         __tmp__L2=TRUE__;
       } else {
-        result__B4NB=(((__CHARACTER *)((__STRING *)cmd__HZ)->storage__F5R)[ 1] == 'p');
-        if (result__B4NB) {
+        result__NBOB=(((__CHARACTER *)((__STRING *)cmd__HZ)->storage__RCS)[ 1] == 'p');
+        if (result__NBOB) {
           is_short_private__J2=TRUE__;
         };
-        __tmp__L2=result__B4NB;
+        __tmp__L2=result__NBOB;
       };
       if (__tmp__L2) {
         __tmp__Y2=TRUE__;
       } else {
-        result__T4NB=(((__CHARACTER *)((__STRING *)cmd__HZ)->storage__F5R)[ 1] == 'r');
-        if (result__T4NB) {
+        result__5BOB=(((__CHARACTER *)((__STRING *)cmd__HZ)->storage__RCS)[ 1] == 'r');
+        if (result__5BOB) {
           is_short_recursive__JB=TRUE__;
         };
-        __tmp__Y2=result__T4NB;
+        __tmp__Y2=result__5BOB;
       };
       if ((! __tmp__Y2)) {
-        if ((((__CHARACTER *)((__STRING *)cmd__HZ)->storage__F5R)[ 1] == 'd')) {
+        if ((((__CHARACTER *)((__STRING *)cmd__HZ)->storage__RCS)[ 1] == 'd')) {
           is_shorter__LZ=FALSE__;
           is_shorter2__VI=TRUE__;
           is_short_recursive__JB=TRUE__;
         } else {
-          print__DID((&__string_157));
+          print__DJD((&__string_157));
           exit(( 1));
         };
       };
     } else {
       if (((void *)input_name__3B != (void *)NULL)) {
-        print__DID((&__string_157));
+        print__DJD((&__string_157));
         exit(( 1));
       };
-      copy__35R(string_tmp__VH,((void **)((__FAST_ARRAYoSTRINGo *)result__OHD)->parent_arrayed_collection__RKC.storage__1DT)[j__IZ]);
+      copy__JDS(string_tmp__VH,((void **)((__FAST_ARRAYoSTRINGo *)result__OID)->parent_arrayed_collection__RKC.storage__HHT)[j__IZ]);
       input_name__3B=get__YWB(string_tmp__VH);
     };
     j__IZ=(__INTEGER)(j__IZ +  1);
   };
   if (((void *)input_name__3B == (void *)NULL)) {
-    print__DID((&__string_157));
+    print__DJD((&__string_157));
     exit(( 1));
   };
   if (((void *)format_name__N1 != (void *)NULL)) {
@@ -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__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)));
+    result__LOIH=NULL;
+    ptr__MOIH=((__POINTER )(NULL));
+    typ_id__NOIH= 0;
+    sz__OOIH=((__UINTEGER_32 )sizeof(__STRING_CONSTANT));
+    if ((sz__OOIH ==  0)) {
+      result__LOIH=STRING_CONSTANT__;
+    } else {
+      typ_id__NOIH=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__OOIH);
+      if ((typ_id__NOIH == (__INTEGER)(-  1))) {
+        a__POIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__QOIH=(__UINTEGER_32)((__UINTEGER_32)(sz__OOIH + a__POIH) & (__UINTEGER_32)(~ a__POIH));
+        ptr_table__N1KH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__QOIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__M1KH=((__POINTER )(NULL));
+        result__O1KH=((__POINTER *)ptr_table__N1KH)[ 0];
+        if ((result__O1KH == (void *)NULL)) {
+          result__O1KH=new_lab__FTJ(new_size__QOIH);
+          next__M1KH=(void *)((unsigned long)result__O1KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QOIH)));
+          ((__POINTER *)next__M1KH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__N1KH)[ 0]=next__M1KH;
+        } else {
+          next__M1KH=((__POINTER *)result__O1KH)[ 0];
+          if ((next__M1KH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__O1KH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__QOIH <<  1)) <=  4096)) {
+              next__M1KH=(void *)((unsigned long)result__O1KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QOIH)));
             } else {
-              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)));
+              next__M1KH=new_lab__FTJ(new_size__QOIH);
+            };
+            ((__POINTER *)next__M1KH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__N1KH)[ 0]=next__M1KH;
+          } else {
+            ((__POINTER *)result__O1KH)[ 0]=(void *)((unsigned long)((__POINTER *)next__M1KH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__O1KH=next__M1KH;
+          };
+        };
+        ptr__MOIH=result__O1KH;
+      } else {
+        t__ROIH=((__UINTEGER_32 )typ_id__NOIH);
+        a__SOIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__V1KH=(__UINTEGER_32)((__UINTEGER_32)(sz__OOIH + a__SOIH) & (__UINTEGER_32)(~ a__SOIH));
+        ptr_table__S1KH=((__POINTER )(&(table_type[(t__ROIH)])));
+        lab_type__U1KH=(__UINTEGER_32)(t__ROIH |  1);
+        next__R1KH=((__POINTER )(NULL));
+        result__T1KH=((__POINTER *)ptr_table__S1KH)[ 0];
+        if ((result__T1KH == (void *)NULL)) {
+          result__T1KH=new_lab__FTJ(lab_type__U1KH);
+          next__R1KH=(void *)((unsigned long)result__T1KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__V1KH)));
+          ((__POINTER *)next__R1KH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__S1KH)[ 0]=next__R1KH;
+        } else {
+          next__R1KH=((__POINTER *)result__T1KH)[ 0];
+          if ((next__R1KH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__T1KH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__V1KH <<  1)) <=  4096)) {
+              next__R1KH=(void *)((unsigned long)result__T1KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__V1KH)));
             } else {
-              next__STKH=new_lab__ZPJ(lab_type__VTKH);
+              next__R1KH=new_lab__FTJ(lab_type__U1KH);
             };
-            ((__POINTER *)next__STKH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__TTKH)[ 0]=next__STKH;
+            ((__POINTER *)next__R1KH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__S1KH)[ 0]=next__R1KH;
           } else {
-            ((__POINTER *)result__UTKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__STKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__UTKH=next__STKH;
+            ((__POINTER *)result__T1KH)[ 0]=(void *)((unsigned long)((__POINTER *)next__R1KH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__T1KH=next__R1KH;
           };
         };
-        ptr__YGIH=result__UTKH;
+        ptr__MOIH=result__T1KH;
       };
-      result__XGIH=((__STRING_CONSTANT *)ptr__YGIH);
-      *(result__XGIH) = *(STRING_CONSTANT__);
+      result__LOIH=((__STRING_CONSTANT *)ptr__MOIH);
+      *(result__LOIH) = *(STRING_CONSTANT__);
     };
-    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)] != '\\');
+    Self__3WS=((__STRING_CONSTANT *)result__LOIH);
+    Self__3WS->storage__FRO=path__KZ;
+    Self__3WS->count__DD=idx__NLC;
+    copy__JDS(string_tmp__VH,result__LOIH);
+    Self__2LHH=((__STRING_CONSTANT *)result__LOIH);
+    if ((((__CHARACTER *)Self__2LHH->storage__FRO)[(__INTEGER)(Self__2LHH->count__DD -  1)] != '/')) {
+      Self__UNS=((__STRING_CONSTANT *)result__LOIH);
+      __tmp__14=(((__CHARACTER *)Self__UNS->storage__FRO)[(__INTEGER)(Self__UNS->count__DD -  1)] != '\\');
     } else {
       __tmp__14=FALSE__;
     };
     if (__tmp__14) {
-      add_last__3IT(string_tmp__VH,'/');
+      add_last__GOT(string_tmp__VH,'/');
     };
-    append__FLS(string_tmp__VH,(&__string_158));
-    append__FLS(string_tmp__VH,format_name__N1);
-    append__FLS(string_tmp__VH,(&__string_159));
+    append__ROS(string_tmp__VH,(&__string_158));
+    append__ROS(string_tmp__VH,format_name__N1);
+    append__ROS(string_tmp__VH,(&__string_159));
     fmt_name__YNC=get__YWB(string_tmp__VH);
-    if (FILE_SYSTEM__->parent_directory__2FD==0) {
+    if (FILE_SYSTEM__->parent_directory__2GD==0) {
     } else {
-      parent_directory__1ED();
+      parent_directory__1FD();
     };
-    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));
+    if (((void *)get_entry__S2AC(fmt_name__YNC) == (void *)NULL)) {
+      put_string__P3F((&__string_160));
+      put_string__P3F(fmt_name__YNC);
+      put_string__P3F((&__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__KIF:
+    while_do__OLF:
     {
-      result__XTKH=FALSE__;
-      if ((! read_space__KSD())) {
-        result__XTKH=FALSE__;
+      result__W1KH=FALSE__;
+      if ((! read_space__MTD())) {
+        result__W1KH=FALSE__;
       } else {
-        result__YTKH='\0';
+        result__X1KH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__YTKH=((__CHARACTER )(( 0)));
+          result__X1KH=((__CHARACTER )(( 0)));
         } else {
-          result__YTKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+          result__X1KH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__YTKH == '-')) {
+        if ((result__X1KH == '-')) {
           position__CCC=(__INTEGER)(position__CCC +  1);
-          result__XTKH=TRUE__;
+          result__W1KH=TRUE__;
         };
       };
-      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)) {
+      if (result__W1KH) {
+        if ((! read_identifier__QBL())) {
+          pos__2Q1G=current_position__EZF();
+          put_error__text__NPG( 0,(&__string_162));
+          put_position__XQG(pos__2Q1G);
+          put_string__P3F(msg_err__SPG);
+          if ((type_error__RPG !=  2)) {
             exit(( 1));
           };
         };
-        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;
+        result__OHKB=NULL;
+        ptr__PHKB=((__POINTER )(NULL));
+        typ_id__UHKB= 0;
+        sz__RHKB=((__UINTEGER_32 )sizeof(__LINKED_LISToSTRING_CONSTANTo));
+        if ((sz__RHKB ==  0)) {
+          result__OHKB=LINKED_LISToSTRING_CONSTANTo__;
+        } else {
+          typ_id__UHKB=__LINKED_LISToSTRING_CONSTANTo__;
+          clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__RHKB);
+          if ((typ_id__UHKB == (__INTEGER)(-  1))) {
+            a__5LHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__AMHH=(__UINTEGER_32)((__UINTEGER_32)(sz__RHKB + a__5LHH) & (__UINTEGER_32)(~ a__5LHH));
+            ptr_table__01KH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__AMHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__Z1KH=((__POINTER )(NULL));
+            result__11KH=((__POINTER *)ptr_table__01KH)[ 0];
+            if ((result__11KH == (void *)NULL)) {
+              result__11KH=new_lab__FTJ(new_size__AMHH);
+              next__Z1KH=(void *)((unsigned long)result__11KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AMHH)));
+              ((__POINTER *)next__Z1KH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__01KH)[ 0]=next__Z1KH;
             } else {
-              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)));
+              next__Z1KH=((__POINTER *)result__11KH)[ 0];
+              if ((next__Z1KH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__11KH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__AMHH <<  1)) <=  4096)) {
+                  next__Z1KH=(void *)((unsigned long)result__11KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AMHH)));
                 } else {
-                  next__0TKH=new_lab__ZPJ(new_size__FFHH);
+                  next__Z1KH=new_lab__FTJ(new_size__AMHH);
                 };
-                ((__POINTER *)next__0TKH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__1TKH)[ 0]=next__0TKH;
+                ((__POINTER *)next__Z1KH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__01KH)[ 0]=next__Z1KH;
               } else {
-                ((__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;
+                ((__POINTER *)result__11KH)[ 0]=(void *)((unsigned long)((__POINTER *)next__Z1KH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__11KH=next__Z1KH;
+              };
+            };
+            ptr__PHKB=result__11KH;
+          } else {
+            t__EMHH=((__UINTEGER_32 )typ_id__UHKB);
+            a__DMHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__C2KH=(__UINTEGER_32)((__UINTEGER_32)(sz__RHKB + a__DMHH) & (__UINTEGER_32)(~ a__DMHH));
+            ptr_table__51KH=((__POINTER )(&(table_type[(t__EMHH)])));
+            lab_type__B2KH=(__UINTEGER_32)(t__EMHH |  1);
+            next__41KH=((__POINTER )(NULL));
+            result__A2KH=((__POINTER *)ptr_table__51KH)[ 0];
+            if ((result__A2KH == (void *)NULL)) {
+              result__A2KH=new_lab__FTJ(lab_type__B2KH);
+              next__41KH=(void *)((unsigned long)result__A2KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__C2KH)));
+              ((__POINTER *)next__41KH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__51KH)[ 0]=next__41KH;
             } else {
-              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)));
+              next__41KH=((__POINTER *)result__A2KH)[ 0];
+              if ((next__41KH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__A2KH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__C2KH <<  1)) <=  4096)) {
+                  next__41KH=(void *)((unsigned long)result__A2KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__C2KH)));
                 } else {
-                  next__5TKH=new_lab__ZPJ(lab_type__CUKH);
+                  next__41KH=new_lab__FTJ(lab_type__B2KH);
                 };
-                ((__POINTER *)next__5TKH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__AUKH)[ 0]=next__5TKH;
+                ((__POINTER *)next__41KH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__51KH)[ 0]=next__41KH;
               } else {
-                ((__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)) {
+                ((__POINTER *)result__A2KH)[ 0]=(void *)((unsigned long)((__POINTER *)next__41KH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__A2KH=next__41KH;
+              };
+            };
+            ptr__PHKB=result__A2KH;
+          };
+          result__OHKB=((__LINKED_LISToSTRING_CONSTANTo *)ptr__PHKB);
+          *(result__OHKB) = *(LINKED_LISToSTRING_CONSTANTo__);
+        };
+        Self__TOIH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
+        k__UOIH=last_string__V1C;
+        Self__YOIH=((__STRING_CONSTANT *)last_string__V1C);
+        result__XOIH= 0;
+        __tmp__ZOIH=Self__YOIH->count__DD;
+        Self__0OIH= 1;
+        while ((Self__0OIH <= __tmp__ZOIH)) {
+          result__XOIH=(__INTEGER)((__INTEGER)( 5 * result__XOIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__YOIH->storage__FRO)[(__INTEGER)(Self__0OIH -  1)])));
+          Self__0OIH=(__INTEGER)(Self__0OIH +  1);
+        };
+        if ((result__XOIH <  0)) {
+          result__XOIH=(__INTEGER)(~ result__XOIH);
+        };
+        node__VOIH=((void **)Self__TOIH->buckets__PDT)[(__INTEGER)(result__XOIH % Self__TOIH->capacity__KDT)];
+        while ((! (((void *)node__VOIH == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__VOIH)->key__1DT == (void *)k__UOIH)))) {
+          node__VOIH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__VOIH)->next__GET;
+        };
+        if (((void *)node__VOIH != (void *)NULL)) {
+          pos__GR1G=current_position__EZF();
+          put_error__text__NPG( 0,(&__string_163));
+          put_position__XQG(pos__GR1G);
+          put_string__P3F(msg_err__SPG);
+          if ((type_error__RPG !=  2)) {
             exit(( 1));
           };
         };
-        __tmp__JOD=last_string__V0C;
-        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);
+        __tmp__JPD=last_string__V1C;
+        Self__4PEB=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
+        k__AQEB=last_string__V1C;
+        Self__3OIH=((__STRING_CONSTANT *)last_string__V1C);
+        result__2OIH= 0;
+        __tmp__4OIH=Self__3OIH->count__DD;
+        Self__5OIH= 1;
+        while ((Self__5OIH <= __tmp__4OIH)) {
+          result__2OIH=(__INTEGER)((__INTEGER)( 5 * result__2OIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__3OIH->storage__FRO)[(__INTEGER)(Self__5OIH -  1)])));
+          Self__5OIH=(__INTEGER)(Self__5OIH +  1);
+        };
+        if ((result__2OIH <  0)) {
+          result__2OIH=(__INTEGER)(~ result__2OIH);
+        };
+        idx__IQEB=(__INTEGER)(result__2OIH % Self__4PEB->capacity__KDT);
+        node__JQEB=((void **)Self__4PEB->buckets__PDT)[idx__IQEB];
+        while ((! (((void *)node__JQEB == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__JQEB)->key__1DT == (void *)k__AQEB)))) {
+          node__JQEB=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__JQEB)->next__GET;
+        };
+        if (((void *)node__JQEB == (void *)NULL)) {
+          if ((Self__4PEB->capacity__KDT == Self__4PEB->count__DPY)) {
+            idx__LJZB= 0;
+            node1__PJZB=NULL;
+            node2__QJZB=NULL;
+            old_buckets__OJZB=Self__4PEB->buckets__PDT;
+            new_capacity__MJZB=prime_number_ceiling__541((__INTEGER)(Self__4PEB->capacity__KDT +  1));
+            Self__4PEB->buckets__PDT=create__LI4(new_capacity__MJZB);
+            i__NJZB=(__INTEGER)(Self__4PEB->capacity__KDT -  1);
+            Self__4PEB->capacity__KDT=new_capacity__MJZB;
+            while ((i__NJZB >=  0)) {
+              node1__PJZB=((void **)old_buckets__OJZB)[i__NJZB];
+              while (((void *)node1__PJZB != (void *)NULL)) {
+                node2__QJZB=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node1__PJZB)->next__GET;
+                Self__CPIH=((__STRING_CONSTANT *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node1__PJZB)->key__1DT);
+                result__BPIH= 0;
+                __tmp__DPIH=Self__CPIH->count__DD;
+                Self__EPIH= 1;
+                while ((Self__EPIH <= __tmp__DPIH)) {
+                  result__BPIH=(__INTEGER)((__INTEGER)( 5 * result__BPIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__CPIH->storage__FRO)[(__INTEGER)(Self__EPIH -  1)])));
+                  Self__EPIH=(__INTEGER)(Self__EPIH +  1);
                 };
-                if ((result__NHIH <  0)) {
-                  result__NHIH=(__INTEGER)(~ result__NHIH);
+                if ((result__BPIH <  0)) {
+                  result__BPIH=(__INTEGER)(~ result__BPIH);
                 };
-                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;
+                idx__LJZB=(__INTEGER)(result__BPIH % Self__4PEB->capacity__KDT);
+                ((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node1__PJZB)->next__GET=((void **)Self__4PEB->buckets__PDT)[idx__LJZB];
+                ((void **)Self__4PEB->buckets__PDT)[idx__LJZB]=node1__PJZB;
+                node1__PJZB=node2__QJZB;
+              };
+              i__NJZB=(__INTEGER)(i__NJZB -  1);
+            };
+            idx__IQEB=(__INTEGER)(result__2OIH % new_capacity__MJZB);
+          };
+          __tmp__WREB=((void **)Self__4PEB->buckets__PDT)[idx__IQEB];
+          result__ULZB=NULL;
+          ptr__VLZB=((__POINTER )(NULL));
+          typ_id__0LZB= 0;
+          sz__XLZB=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo));
+          if ((sz__XLZB ==  0)) {
+            result__ULZB=HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__;
+          } else {
+            typ_id__0LZB=__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__;
+            clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__XLZB);
+            if ((typ_id__0LZB == (__INTEGER)(-  1))) {
+              a__KMHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__LMHH=(__UINTEGER_32)((__UINTEGER_32)(sz__XLZB + a__KMHH) & (__UINTEGER_32)(~ a__KMHH));
+              ptr_table__E2KH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__LMHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__D2KH=((__POINTER )(NULL));
+              result__F2KH=((__POINTER *)ptr_table__E2KH)[ 0];
+              if ((result__F2KH == (void *)NULL)) {
+                result__F2KH=new_lab__FTJ(new_size__LMHH);
+                next__D2KH=(void *)((unsigned long)result__F2KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LMHH)));
+                ((__POINTER *)next__D2KH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__E2KH)[ 0]=next__D2KH;
               } else {
-                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)));
+                next__D2KH=((__POINTER *)result__F2KH)[ 0];
+                if ((next__D2KH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__F2KH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__LMHH <<  1)) <=  4096)) {
+                    next__D2KH=(void *)((unsigned long)result__F2KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LMHH)));
                   } else {
-                    next__EUKH=new_lab__ZPJ(new_size__QFHH);
+                    next__D2KH=new_lab__FTJ(new_size__LMHH);
                   };
-                  ((__POINTER *)next__EUKH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__FUKH)[ 0]=next__EUKH;
+                  ((__POINTER *)next__D2KH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__E2KH)[ 0]=next__D2KH;
                 } else {
-                  ((__POINTER *)result__GUKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EUKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__GUKH=next__EUKH;
+                  ((__POINTER *)result__F2KH)[ 0]=(void *)((unsigned long)((__POINTER *)next__D2KH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__F2KH=next__D2KH;
                 };
               };
-              ptr__JIZB=result__GUKH;
+              ptr__VLZB=result__F2KH;
             } else {
-              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;
+              t__PMHH=((__UINTEGER_32 )typ_id__0LZB);
+              a__OMHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__M2KH=(__UINTEGER_32)((__UINTEGER_32)(sz__XLZB + a__OMHH) & (__UINTEGER_32)(~ a__OMHH));
+              ptr_table__J2KH=((__POINTER )(&(table_type[(t__PMHH)])));
+              lab_type__L2KH=(__UINTEGER_32)(t__PMHH |  1);
+              next__I2KH=((__POINTER )(NULL));
+              result__K2KH=((__POINTER *)ptr_table__J2KH)[ 0];
+              if ((result__K2KH == (void *)NULL)) {
+                result__K2KH=new_lab__FTJ(lab_type__L2KH);
+                next__I2KH=(void *)((unsigned long)result__K2KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__M2KH)));
+                ((__POINTER *)next__I2KH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__J2KH)[ 0]=next__I2KH;
               } else {
-                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)));
+                next__I2KH=((__POINTER *)result__K2KH)[ 0];
+                if ((next__I2KH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__K2KH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__M2KH <<  1)) <=  4096)) {
+                    next__I2KH=(void *)((unsigned long)result__K2KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__M2KH)));
                   } else {
-                    next__JUKH=new_lab__ZPJ(lab_type__MUKH);
+                    next__I2KH=new_lab__FTJ(lab_type__L2KH);
                   };
-                  ((__POINTER *)next__JUKH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__KUKH)[ 0]=next__JUKH;
+                  ((__POINTER *)next__I2KH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__J2KH)[ 0]=next__I2KH;
                 } else {
-                  ((__POINTER *)result__LUKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JUKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__LUKH=next__JUKH;
+                  ((__POINTER *)result__K2KH)[ 0]=(void *)((unsigned long)((__POINTER *)next__I2KH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__K2KH=next__I2KH;
                 };
               };
-              ptr__JIZB=result__LUKH;
+              ptr__VLZB=result__K2KH;
             };
-            result__IIZB=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)ptr__JIZB);
-            *(result__IIZB) = *(HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__);
+            result__ULZB=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)ptr__VLZB);
+            *(result__ULZB) = *(HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__);
           };
-          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);
+          Self__UGGC=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__ULZB);
+          Self__UGGC->item__PY3=result__OHKB;
+          Self__UGGC->key__1DT=__tmp__JPD;
+          Self__UGGC->next__GET=__tmp__WREB;
+          node__JQEB=result__ULZB;
+          ((void **)Self__4PEB->buckets__PDT)[idx__IQEB]=result__ULZB;
+          Self__4PEB->count__DPY=(__INTEGER)(Self__4PEB->count__DPY +  1);
         } else {
-          ((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__3MEB)->item__DV3=result__CEKB;
+          ((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__JQEB)->item__PY3=result__OHKB;
         };
-        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)) {
+        if ((! read_symbol__SYJ((&__string_12)))) {
+          pos__YS1G=current_position__EZF();
+          put_error__text__NPG( 0,(&__string_164));
+          put_position__XQG(pos__YS1G);
+          put_string__P3F(msg_err__SPG);
+          if ((type_error__RPG !=  2)) {
             exit(( 1));
           };
         };
-        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__;
+        def__OSEB=result__OHKB;
+        result__QSEB=FALSE__;
+        if (read_short_elt__VLKB()) {
+          result__QSEB=TRUE__;
+          Self__VMHH=((__LINKED_LISToSTRING_CONSTANTo *)result__OHKB);
+          element__UMHH=last_string__V1C;
+          if (((void *)Self__VMHH->first_link__3WEC == (void *)NULL)) {
+            i__PPIH=last_string__V1C;
+            result__GPIH=NULL;
+            ptr__HPIH=((__POINTER )(NULL));
+            typ_id__IPIH= 0;
+            sz__JPIH=((__UINTEGER_32 )sizeof(__LINKED_LIST_NODEoSTRING_CONSTANTo));
+            if ((sz__JPIH ==  0)) {
+              result__GPIH=LINKED_LIST_NODEoSTRING_CONSTANTo__;
             } else {
-              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;
+              typ_id__IPIH=__LINKED_LIST_NODEoSTRING_CONSTANTo__;
+              clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__JPIH);
+              if ((typ_id__IPIH == (__INTEGER)(-  1))) {
+                a__KPIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                new_size__LPIH=(__UINTEGER_32)((__UINTEGER_32)(sz__JPIH + a__KPIH) & (__UINTEGER_32)(~ a__KPIH));
+                ptr_table__O2KH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__LPIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                next__N2KH=((__POINTER )(NULL));
+                result__P2KH=((__POINTER *)ptr_table__O2KH)[ 0];
+                if ((result__P2KH == (void *)NULL)) {
+                  result__P2KH=new_lab__FTJ(new_size__LPIH);
+                  next__N2KH=(void *)((unsigned long)result__P2KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LPIH)));
+                  ((__POINTER *)next__N2KH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__O2KH)[ 0]=next__N2KH;
                 } else {
-                  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)));
+                  next__N2KH=((__POINTER *)result__P2KH)[ 0];
+                  if ((next__N2KH == (void *)NULL)) {
+                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__P2KH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__LPIH <<  1)) <=  4096)) {
+                      next__N2KH=(void *)((unsigned long)result__P2KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LPIH)));
                     } else {
-                      next__OUKH=new_lab__ZPJ(new_size__XHIH);
+                      next__N2KH=new_lab__FTJ(new_size__LPIH);
                     };
-                    ((__POINTER *)next__OUKH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__PUKH)[ 0]=next__OUKH;
+                    ((__POINTER *)next__N2KH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__O2KH)[ 0]=next__N2KH;
                   } else {
-                    ((__POINTER *)result__QUKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OUKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__QUKH=next__OUKH;
+                    ((__POINTER *)result__P2KH)[ 0]=(void *)((unsigned long)((__POINTER *)next__N2KH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__P2KH=next__N2KH;
                   };
                 };
-                ptr__THIH=result__QUKH;
+                ptr__HPIH=result__P2KH;
               } else {
-                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;
+                t__MPIH=((__UINTEGER_32 )typ_id__IPIH);
+                a__NPIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                new_size__W2KH=(__UINTEGER_32)((__UINTEGER_32)(sz__JPIH + a__NPIH) & (__UINTEGER_32)(~ a__NPIH));
+                ptr_table__T2KH=((__POINTER )(&(table_type[(t__MPIH)])));
+                lab_type__V2KH=(__UINTEGER_32)(t__MPIH |  1);
+                next__S2KH=((__POINTER )(NULL));
+                result__U2KH=((__POINTER *)ptr_table__T2KH)[ 0];
+                if ((result__U2KH == (void *)NULL)) {
+                  result__U2KH=new_lab__FTJ(lab_type__V2KH);
+                  next__S2KH=(void *)((unsigned long)result__U2KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__W2KH)));
+                  ((__POINTER *)next__S2KH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__T2KH)[ 0]=next__S2KH;
                 } else {
-                  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)));
+                  next__S2KH=((__POINTER *)result__U2KH)[ 0];
+                  if ((next__S2KH == (void *)NULL)) {
+                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__U2KH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__W2KH <<  1)) <=  4096)) {
+                      next__S2KH=(void *)((unsigned long)result__U2KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__W2KH)));
                     } else {
-                      next__TUKH=new_lab__ZPJ(lab_type__WUKH);
+                      next__S2KH=new_lab__FTJ(lab_type__V2KH);
                     };
-                    ((__POINTER *)next__TUKH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__UUKH)[ 0]=next__TUKH;
+                    ((__POINTER *)next__S2KH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__T2KH)[ 0]=next__S2KH;
                   } else {
-                    ((__POINTER *)result__VUKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TUKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__VUKH=next__TUKH;
+                    ((__POINTER *)result__U2KH)[ 0]=(void *)((unsigned long)((__POINTER *)next__S2KH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__U2KH=next__S2KH;
                   };
                 };
-                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__;
+                ptr__HPIH=result__U2KH;
+              };
+              result__GPIH=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)ptr__HPIH);
+              *(result__GPIH) = *(LINKED_LIST_NODEoSTRING_CONSTANTo__);
+            };
+            Self__OPIH=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)result__GPIH);
+            Self__OPIH->item__V0HD=i__PPIH;
+            Self__OPIH->next__CQOD=NULL;
+            Self__VMHH->first_link__3WEC=result__GPIH;
+            Self__VMHH->parent_linked_collection__LD.upper__MED= 1;
+            Self__VMHH->last_link__GXEC=result__GPIH;
+            Self__VMHH->mem_idx__HXEC= 1;
+            Self__VMHH->mem_lnk__JXEC=result__GPIH;
+          } else {
+            result__QPIH=NULL;
+            ptr__RPIH=((__POINTER )(NULL));
+            typ_id__SPIH= 0;
+            sz__TPIH=((__UINTEGER_32 )sizeof(__LINKED_LIST_NODEoSTRING_CONSTANTo));
+            if ((sz__TPIH ==  0)) {
+              result__QPIH=LINKED_LIST_NODEoSTRING_CONSTANTo__;
             } else {
-              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;
+              typ_id__SPIH=__LINKED_LIST_NODEoSTRING_CONSTANTo__;
+              clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__TPIH);
+              if ((typ_id__SPIH == (__INTEGER)(-  1))) {
+                a__UPIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                new_size__VPIH=(__UINTEGER_32)((__UINTEGER_32)(sz__TPIH + a__UPIH) & (__UINTEGER_32)(~ a__UPIH));
+                ptr_table__Y2KH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__VPIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                next__X2KH=((__POINTER )(NULL));
+                result__Z2KH=((__POINTER *)ptr_table__Y2KH)[ 0];
+                if ((result__Z2KH == (void *)NULL)) {
+                  result__Z2KH=new_lab__FTJ(new_size__VPIH);
+                  next__X2KH=(void *)((unsigned long)result__Z2KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VPIH)));
+                  ((__POINTER *)next__X2KH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__Y2KH)[ 0]=next__X2KH;
                 } else {
-                  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)));
+                  next__X2KH=((__POINTER *)result__Z2KH)[ 0];
+                  if ((next__X2KH == (void *)NULL)) {
+                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__Z2KH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__VPIH <<  1)) <=  4096)) {
+                      next__X2KH=(void *)((unsigned long)result__Z2KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VPIH)));
                     } else {
-                      next__YUKH=new_lab__ZPJ(new_size__BIIH);
+                      next__X2KH=new_lab__FTJ(new_size__VPIH);
                     };
-                    ((__POINTER *)next__YUKH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__ZUKH)[ 0]=next__YUKH;
+                    ((__POINTER *)next__X2KH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__Y2KH)[ 0]=next__X2KH;
                   } else {
-                    ((__POINTER *)result__0UKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YUKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__0UKH=next__YUKH;
+                    ((__POINTER *)result__Z2KH)[ 0]=(void *)((unsigned long)((__POINTER *)next__X2KH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__Z2KH=next__X2KH;
                   };
                 };
-                ptr__3HIH=result__0UKH;
+                ptr__RPIH=result__Z2KH;
               } else {
-                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;
+                t__WPIH=((__UINTEGER_32 )typ_id__SPIH);
+                a__XPIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                new_size__A3KH=(__UINTEGER_32)((__UINTEGER_32)(sz__TPIH + a__XPIH) & (__UINTEGER_32)(~ a__XPIH));
+                ptr_table__32KH=((__POINTER )(&(table_type[(t__WPIH)])));
+                lab_type__52KH=(__UINTEGER_32)(t__WPIH |  1);
+                next__22KH=((__POINTER )(NULL));
+                result__42KH=((__POINTER *)ptr_table__32KH)[ 0];
+                if ((result__42KH == (void *)NULL)) {
+                  result__42KH=new_lab__FTJ(lab_type__52KH);
+                  next__22KH=(void *)((unsigned long)result__42KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__A3KH)));
+                  ((__POINTER *)next__22KH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__32KH)[ 0]=next__22KH;
                 } else {
-                  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)));
+                  next__22KH=((__POINTER *)result__42KH)[ 0];
+                  if ((next__22KH == (void *)NULL)) {
+                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__42KH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__A3KH <<  1)) <=  4096)) {
+                      next__22KH=(void *)((unsigned long)result__42KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__A3KH)));
                     } else {
-                      next__3UKH=new_lab__ZPJ(lab_type__AVKH);
+                      next__22KH=new_lab__FTJ(lab_type__52KH);
                     };
-                    ((__POINTER *)next__3UKH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__4UKH)[ 0]=next__3UKH;
+                    ((__POINTER *)next__22KH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__32KH)[ 0]=next__22KH;
                   } else {
-                    ((__POINTER *)result__5UKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3UKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__5UKH=next__3UKH;
+                    ((__POINTER *)result__42KH)[ 0]=(void *)((unsigned long)((__POINTER *)next__22KH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__42KH=next__22KH;
                   };
                 };
-                ptr__3HIH=result__5UKH;
+                ptr__RPIH=result__42KH;
               };
-              result__2HIH=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)ptr__3HIH);
-              *(result__2HIH) = *(LINKED_LIST_NODEoSTRING_CONSTANTo__);
+              result__QPIH=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)ptr__RPIH);
+              *(result__QPIH) = *(LINKED_LIST_NODEoSTRING_CONSTANTo__);
             };
-            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;
+            Self__YPIH=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)result__QPIH);
+            Self__YPIH->item__V0HD=element__UMHH;
+            Self__YPIH->next__CQOD=NULL;
+            ((__LINKED_LIST_NODEoSTRING_CONSTANTo *)Self__VMHH->last_link__GXEC)->next__CQOD=result__QPIH;
+            Self__VMHH->parent_linked_collection__LD.upper__MED=(__INTEGER)(Self__VMHH->parent_linked_collection__LD.upper__MED +  1);
+            Self__VMHH->last_link__GXEC=result__QPIH;
           };
-          while_do__MQSB:
+          while_do__YTSB:
           {
-            result__CVKH=FALSE__;
-            if ((! read_space__KSD())) {
-              result__CVKH=FALSE__;
+            result__B3KH=FALSE__;
+            if ((! read_space__MTD())) {
+              result__B3KH=FALSE__;
             } else {
-              result__DVKH='\0';
+              result__C3KH='\0';
               if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                result__DVKH=((__CHARACTER )(( 0)));
+                result__C3KH=((__CHARACTER )(( 0)));
               } else {
-                result__DVKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+                result__C3KH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
               };
-              if ((result__DVKH == '+')) {
+              if ((result__C3KH == '+')) {
                 position__CCC=(__INTEGER)(position__CCC +  1);
-                result__CVKH=TRUE__;
+                result__B3KH=TRUE__;
               };
             };
-            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)) {
+            if (result__B3KH) {
+              if ((! read_short_elt__VLKB())) {
+                pos__0S1G=current_position__EZF();
+                put_error__text__NPG( 0,(&__string_165));
+                put_position__XQG(pos__0S1G);
+                put_string__P3F(msg_err__SPG);
+                if ((type_error__RPG !=  2)) {
                   exit(( 1));
                 };
               };
-              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__;
+              Self__YWEC=((__LINKED_LISToSTRING_CONSTANTo *)def__OSEB);
+              element__ZWEC=last_string__V1C;
+              if (((void *)Self__YWEC->first_link__3WEC == (void *)NULL)) {
+                i__DQIH=last_string__V1C;
+                result__0PIH=NULL;
+                ptr__1PIH=((__POINTER )(NULL));
+                typ_id__2PIH= 0;
+                sz__3PIH=((__UINTEGER_32 )sizeof(__LINKED_LIST_NODEoSTRING_CONSTANTo));
+                if ((sz__3PIH ==  0)) {
+                  result__0PIH=LINKED_LIST_NODEoSTRING_CONSTANTo__;
                 } else {
-                  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;
+                  typ_id__2PIH=__LINKED_LIST_NODEoSTRING_CONSTANTo__;
+                  clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__3PIH);
+                  if ((typ_id__2PIH == (__INTEGER)(-  1))) {
+                    a__4PIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__5PIH=(__UINTEGER_32)((__UINTEGER_32)(sz__3PIH + a__4PIH) & (__UINTEGER_32)(~ a__4PIH));
+                    ptr_table__F3KH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__5PIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                    next__E3KH=((__POINTER )(NULL));
+                    result__G3KH=((__POINTER *)ptr_table__F3KH)[ 0];
+                    if ((result__G3KH == (void *)NULL)) {
+                      result__G3KH=new_lab__FTJ(new_size__5PIH);
+                      next__E3KH=(void *)((unsigned long)result__G3KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5PIH)));
+                      ((__POINTER *)next__E3KH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__F3KH)[ 0]=next__E3KH;
                     } else {
-                      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)));
+                      next__E3KH=((__POINTER *)result__G3KH)[ 0];
+                      if ((next__E3KH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__G3KH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__5PIH <<  1)) <=  4096)) {
+                          next__E3KH=(void *)((unsigned long)result__G3KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5PIH)));
                         } else {
-                          next__FVKH=new_lab__ZPJ(new_size__LIIH);
+                          next__E3KH=new_lab__FTJ(new_size__5PIH);
                         };
-                        ((__POINTER *)next__FVKH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__GVKH)[ 0]=next__FVKH;
+                        ((__POINTER *)next__E3KH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__F3KH)[ 0]=next__E3KH;
                       } else {
-                        ((__POINTER *)result__HVKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FVKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__HVKH=next__FVKH;
+                        ((__POINTER *)result__G3KH)[ 0]=(void *)((unsigned long)((__POINTER *)next__E3KH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__G3KH=next__E3KH;
                       };
                     };
-                    ptr__HIIH=result__HVKH;
+                    ptr__1PIH=result__G3KH;
                   } else {
-                    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;
+                    t__AQIH=((__UINTEGER_32 )typ_id__2PIH);
+                    a__BQIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__N3KH=(__UINTEGER_32)((__UINTEGER_32)(sz__3PIH + a__BQIH) & (__UINTEGER_32)(~ a__BQIH));
+                    ptr_table__K3KH=((__POINTER )(&(table_type[(t__AQIH)])));
+                    lab_type__M3KH=(__UINTEGER_32)(t__AQIH |  1);
+                    next__J3KH=((__POINTER )(NULL));
+                    result__L3KH=((__POINTER *)ptr_table__K3KH)[ 0];
+                    if ((result__L3KH == (void *)NULL)) {
+                      result__L3KH=new_lab__FTJ(lab_type__M3KH);
+                      next__J3KH=(void *)((unsigned long)result__L3KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__N3KH)));
+                      ((__POINTER *)next__J3KH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__K3KH)[ 0]=next__J3KH;
                     } else {
-                      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)));
+                      next__J3KH=((__POINTER *)result__L3KH)[ 0];
+                      if ((next__J3KH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__L3KH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__N3KH <<  1)) <=  4096)) {
+                          next__J3KH=(void *)((unsigned long)result__L3KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__N3KH)));
                         } else {
-                          next__KVKH=new_lab__ZPJ(lab_type__NVKH);
+                          next__J3KH=new_lab__FTJ(lab_type__M3KH);
                         };
-                        ((__POINTER *)next__KVKH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__LVKH)[ 0]=next__KVKH;
+                        ((__POINTER *)next__J3KH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__K3KH)[ 0]=next__J3KH;
                       } else {
-                        ((__POINTER *)result__MVKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KVKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__MVKH=next__KVKH;
+                        ((__POINTER *)result__L3KH)[ 0]=(void *)((unsigned long)((__POINTER *)next__J3KH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__L3KH=next__J3KH;
                       };
                     };
-                    ptr__HIIH=result__MVKH;
+                    ptr__1PIH=result__L3KH;
                   };
-                  result__GIIH=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)ptr__HIIH);
-                  *(result__GIIH) = *(LINKED_LIST_NODEoSTRING_CONSTANTo__);
+                  result__0PIH=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)ptr__1PIH);
+                  *(result__0PIH) = *(LINKED_LIST_NODEoSTRING_CONSTANTo__);
                 };
-                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;
+                Self__CQIH=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)result__0PIH);
+                Self__CQIH->item__V0HD=i__DQIH;
+                Self__CQIH->next__CQOD=NULL;
+                Self__YWEC->first_link__3WEC=result__0PIH;
+                Self__YWEC->parent_linked_collection__LD.upper__MED= 1;
+                Self__YWEC->last_link__GXEC=result__0PIH;
+                Self__YWEC->mem_idx__HXEC= 1;
+                Self__YWEC->mem_lnk__JXEC=result__0PIH;
               } else {
-                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__;
+                result__DTED=NULL;
+                ptr__ETED=((__POINTER )(NULL));
+                typ_id__JTED= 0;
+                sz__GTED=((__UINTEGER_32 )sizeof(__LINKED_LIST_NODEoSTRING_CONSTANTo));
+                if ((sz__GTED ==  0)) {
+                  result__DTED=LINKED_LIST_NODEoSTRING_CONSTANTo__;
                 } else {
-                  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;
+                  typ_id__JTED=__LINKED_LIST_NODEoSTRING_CONSTANTo__;
+                  clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__GTED);
+                  if ((typ_id__JTED == (__INTEGER)(-  1))) {
+                    a__3DGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__4DGH=(__UINTEGER_32)((__UINTEGER_32)(sz__GTED + a__3DGH) & (__UINTEGER_32)(~ a__3DGH));
+                    ptr_table__P3KH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__4DGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                    next__O3KH=((__POINTER )(NULL));
+                    result__Q3KH=((__POINTER *)ptr_table__P3KH)[ 0];
+                    if ((result__Q3KH == (void *)NULL)) {
+                      result__Q3KH=new_lab__FTJ(new_size__4DGH);
+                      next__O3KH=(void *)((unsigned long)result__Q3KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4DGH)));
+                      ((__POINTER *)next__O3KH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__P3KH)[ 0]=next__O3KH;
                     } else {
-                      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)));
+                      next__O3KH=((__POINTER *)result__Q3KH)[ 0];
+                      if ((next__O3KH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__Q3KH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__4DGH <<  1)) <=  4096)) {
+                          next__O3KH=(void *)((unsigned long)result__Q3KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4DGH)));
                         } else {
-                          next__PVKH=new_lab__ZPJ(new_size__D3FH);
+                          next__O3KH=new_lab__FTJ(new_size__4DGH);
                         };
-                        ((__POINTER *)next__PVKH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__QVKH)[ 0]=next__PVKH;
+                        ((__POINTER *)next__O3KH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__P3KH)[ 0]=next__O3KH;
                       } else {
-                        ((__POINTER *)result__RVKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PVKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__RVKH=next__PVKH;
+                        ((__POINTER *)result__Q3KH)[ 0]=(void *)((unsigned long)((__POINTER *)next__O3KH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__Q3KH=next__O3KH;
                       };
                     };
-                    ptr__WPED=result__RVKH;
+                    ptr__ETED=result__Q3KH;
                   } else {
-                    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;
+                    t__CEGH=((__UINTEGER_32 )typ_id__JTED);
+                    a__BEGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__X3KH=(__UINTEGER_32)((__UINTEGER_32)(sz__GTED + a__BEGH) & (__UINTEGER_32)(~ a__BEGH));
+                    ptr_table__U3KH=((__POINTER )(&(table_type[(t__CEGH)])));
+                    lab_type__W3KH=(__UINTEGER_32)(t__CEGH |  1);
+                    next__T3KH=((__POINTER )(NULL));
+                    result__V3KH=((__POINTER *)ptr_table__U3KH)[ 0];
+                    if ((result__V3KH == (void *)NULL)) {
+                      result__V3KH=new_lab__FTJ(lab_type__W3KH);
+                      next__T3KH=(void *)((unsigned long)result__V3KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__X3KH)));
+                      ((__POINTER *)next__T3KH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__U3KH)[ 0]=next__T3KH;
                     } else {
-                      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)));
+                      next__T3KH=((__POINTER *)result__V3KH)[ 0];
+                      if ((next__T3KH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__V3KH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__X3KH <<  1)) <=  4096)) {
+                          next__T3KH=(void *)((unsigned long)result__V3KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__X3KH)));
                         } else {
-                          next__UVKH=new_lab__ZPJ(lab_type__XVKH);
+                          next__T3KH=new_lab__FTJ(lab_type__W3KH);
                         };
-                        ((__POINTER *)next__UVKH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__VVKH)[ 0]=next__UVKH;
+                        ((__POINTER *)next__T3KH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__U3KH)[ 0]=next__T3KH;
                       } else {
-                        ((__POINTER *)result__WVKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UVKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__WVKH=next__UVKH;
+                        ((__POINTER *)result__V3KH)[ 0]=(void *)((unsigned long)((__POINTER *)next__T3KH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__V3KH=next__T3KH;
                       };
                     };
-                    ptr__WPED=result__WVKH;
+                    ptr__ETED=result__V3KH;
                   };
-                  result__VPED=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)ptr__WPED);
-                  *(result__VPED) = *(LINKED_LIST_NODEoSTRING_CONSTANTo__);
+                  result__DTED=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)ptr__ETED);
+                  *(result__DTED) = *(LINKED_LIST_NODEoSTRING_CONSTANTo__);
                 };
-                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;
+                Self__CNSD=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)result__DTED);
+                Self__CNSD->item__V0HD=element__ZWEC;
+                Self__CNSD->next__CQOD=NULL;
+                ((__LINKED_LIST_NODEoSTRING_CONSTANTo *)Self__YWEC->last_link__GXEC)->next__CQOD=result__DTED;
+                Self__YWEC->parent_linked_collection__LD.upper__MED=(__INTEGER)(Self__YWEC->parent_linked_collection__LD.upper__MED +  1);
+                Self__YWEC->last_link__GXEC=result__DTED;
               };
-              goto while_do__MQSB;
+              goto while_do__YTSB;
             };
           };
         };
-        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)) {
+        if ((! result__QSEB)) {
+          pos__2S1G=current_position__EZF();
+          put_error__text__NPG( 0,(&__string_166));
+          put_position__XQG(pos__2S1G);
+          put_string__P3F(msg_err__SPG);
+          if ((type_error__RPG !=  2)) {
             exit(( 1));
           };
         };
-        result__SFG=FALSE__;
-        if ((! read_space__KSD())) {
-          result__SFG=FALSE__;
+        result__4IG=FALSE__;
+        if ((! read_space__MTD())) {
+          result__4IG=FALSE__;
         } else {
-          result__EODH='\0';
+          result__YUDH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__EODH=((__CHARACTER )(( 0)));
+            result__YUDH=((__CHARACTER )(( 0)));
           } else {
-            result__EODH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+            result__YUDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__EODH == ';')) {
+          if ((result__YUDH == ';')) {
             position__CCC=(__INTEGER)(position__CCC +  1);
-            result__SFG=TRUE__;
+            result__4IG=TRUE__;
           };
         };
-        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)) {
+        if ((! result__4IG)) {
+          pos__4S1G=current_position__EZF();
+          put_error__text__NPG( 2,(&__string_167));
+          put_position__XQG(pos__4S1G);
+          put_string__P3F(msg_err__SPG);
+          if ((type_error__RPG !=  2)) {
             exit(( 1));
           };
         };
-        goto while_do__KIF;
+        goto while_do__OLF;
       };
     };
-    read_space__KSD();
-    result__TDDH='\0';
+    read_space__MTD();
+    result__HKDH='\0';
     if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-      result__TDDH=((__CHARACTER )(( 0)));
+      result__HKDH=((__CHARACTER )(( 0)));
     } else {
-      result__TDDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+      result__HKDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
     };
-    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)) {
+    if ((result__HKDH != ((__CHARACTER )(( 0))))) {
+      pos__AT1G=current_position__EZF();
+      put_error__text__NPG( 0,(&__string_168));
+      put_position__XQG(pos__AT1G);
+      put_string__P3F(msg_err__SPG);
+      if ((type_error__RPG !=  2)) {
         exit(( 1));
       };
     };
     object__ZBC=NULL;
   };
   index_count__P5=(__INTEGER)(index_count__P5 +  1);
-  fast_put__to__2YR(result__1OC,(&__string_2));
+  fast_put__to__I2R(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__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;
+      a__YMHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__ZMHH=(__UINTEGER_32)((__UINTEGER_32)(sz__5YB + a__YMHH) & (__UINTEGER_32)(~ a__YMHH));
+      ptr_table__Z3KH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ZMHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__Y3KH=((__POINTER )(NULL));
+      result__03KH=((__POINTER *)ptr_table__Z3KH)[ 0];
+      if ((result__03KH == (void *)NULL)) {
+        result__03KH=new_lab__FTJ(new_size__ZMHH);
+        next__Y3KH=(void *)((unsigned long)result__03KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZMHH)));
+        ((__POINTER *)next__Y3KH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__Z3KH)[ 0]=next__Y3KH;
       } else {
-        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)));
+        next__Y3KH=((__POINTER *)result__03KH)[ 0];
+        if ((next__Y3KH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__03KH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__ZMHH <<  1)) <=  4096)) {
+            next__Y3KH=(void *)((unsigned long)result__03KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZMHH)));
           } else {
-            next__ZVKH=new_lab__ZPJ(new_size__4FHH);
+            next__Y3KH=new_lab__FTJ(new_size__ZMHH);
           };
-          ((__POINTER *)next__ZVKH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__0VKH)[ 0]=next__ZVKH;
+          ((__POINTER *)next__Y3KH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__Z3KH)[ 0]=next__Y3KH;
         } else {
-          ((__POINTER *)result__1VKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZVKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__1VKH=next__ZVKH;
+          ((__POINTER *)result__03KH)[ 0]=(void *)((unsigned long)((__POINTER *)next__Y3KH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__03KH=next__Y3KH;
         };
       };
-      ptr__3YB=result__1VKH;
+      ptr__3YB=result__03KH;
     } else {
-      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;
+      t__3MHH=((__UINTEGER_32 )typ_id__CZB);
+      a__2MHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__B4KH=(__UINTEGER_32)((__UINTEGER_32)(sz__5YB + a__2MHH) & (__UINTEGER_32)(~ a__2MHH));
+      ptr_table__43KH=((__POINTER )(&(table_type[(t__3MHH)])));
+      lab_type__A4KH=(__UINTEGER_32)(t__3MHH |  1);
+      next__33KH=((__POINTER )(NULL));
+      result__53KH=((__POINTER *)ptr_table__43KH)[ 0];
+      if ((result__53KH == (void *)NULL)) {
+        result__53KH=new_lab__FTJ(lab_type__A4KH);
+        next__33KH=(void *)((unsigned long)result__53KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__B4KH)));
+        ((__POINTER *)next__33KH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__43KH)[ 0]=next__33KH;
       } else {
-        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)));
+        next__33KH=((__POINTER *)result__53KH)[ 0];
+        if ((next__33KH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__53KH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__B4KH <<  1)) <=  4096)) {
+            next__33KH=(void *)((unsigned long)result__53KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__B4KH)));
           } else {
-            next__4VKH=new_lab__ZPJ(lab_type__BWKH);
+            next__33KH=new_lab__FTJ(lab_type__A4KH);
           };
-          ((__POINTER *)next__4VKH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__5VKH)[ 0]=next__4VKH;
+          ((__POINTER *)next__33KH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__43KH)[ 0]=next__33KH;
         } else {
-          ((__POINTER *)result__AWKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4VKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__AWKH=next__4VKH;
+          ((__POINTER *)result__53KH)[ 0]=(void *)((unsigned long)((__POINTER *)next__33KH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__53KH=next__33KH;
         };
       };
-      ptr__3YB=result__AWKH;
+      ptr__3YB=result__53KH;
     };
     result__2YB=((__FAST_ARRAYoSLOTo *)ptr__3YB);
     *(result__2YB) = *(FAST_ARRAYoSLOTo__);
   };
-  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;
+  Self__1ES=((__FAST_ARRAYoSLOTo *)result__2YB);
+  if ((Self__1ES->parent_arrayed_collection__BAB.capacity__EFS <  1)) {
+    sz__JEFH=((__UINTEGER_32 )((__INTEGER )(sizeof(void *))));
+    result__IEFH=((__POINTER )(NULL));
+    a__OEFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__KEFH=(__UINTEGER_32)((__UINTEGER_32)(sz__JEFH + a__OEFH) & (__UINTEGER_32)(~ a__OEFH));
+    new_size2__LEFH=(__UINTEGER_32)(new_size__KEFH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+    if ((new_size2__LEFH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+      a__ANHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__BNHH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__LEFH + a__ANHH) & (__UINTEGER_32)(~ a__ANHH));
+      ptr_table__D4KH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__BNHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__C4KH=((__POINTER )(NULL));
+      result__E4KH=((__POINTER *)ptr_table__D4KH)[ 0];
+      if ((result__E4KH == (void *)NULL)) {
+        result__E4KH=new_lab__FTJ(new_size__BNHH);
+        next__C4KH=(void *)((unsigned long)result__E4KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BNHH)));
+        ((__POINTER *)next__C4KH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__D4KH)[ 0]=next__C4KH;
       } else {
-        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)));
+        next__C4KH=((__POINTER *)result__E4KH)[ 0];
+        if ((next__C4KH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__E4KH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__BNHH <<  1)) <=  4096)) {
+            next__C4KH=(void *)((unsigned long)result__E4KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BNHH)));
           } else {
-            next__DWKH=new_lab__ZPJ(new_size__GGHH);
+            next__C4KH=new_lab__FTJ(new_size__BNHH);
           };
-          ((__POINTER *)next__DWKH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__EWKH)[ 0]=next__DWKH;
+          ((__POINTER *)next__C4KH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__D4KH)[ 0]=next__C4KH;
         } else {
-          ((__POINTER *)result__FWKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DWKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__FWKH=next__DWKH;
+          ((__POINTER *)result__E4KH)[ 0]=(void *)((unsigned long)((__POINTER *)next__C4KH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__E4KH=next__C4KH;
         };
       };
-      ((__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 *))))));
+      ((__POINTER *)result__E4KH)[ 0]=((__POINTER ) 3);
+      result__IEFH=(void *)((unsigned long)result__E4KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
     } else {
-      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;
+      result__H4KH=first_free__NFVB;
+      while ((((void *)result__H4KH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__H4KH)->map_size_and_id__YTB &  4294967292LU) < new_size__KEFH))) {
+        result__H4KH=((__MEMORY *)result__H4KH)->map_next_free__ZTB;
       };
-      if (((void *)result__IWKH == (void *)NULL)) {
-        result__IWKH=new_page__K34();
+      if (((void *)result__H4KH == (void *)NULL)) {
+        result__H4KH=new_page__YC5();
       };
-      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)));
+      to_busy__index__MWFC(result__H4KH,new_size__KEFH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__H4KH)) - (unsigned long)begin_memory__SXH)))) >>  26));
+      result__IEFH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__H4KH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
     };
-    Result__VJ1C=((void **)result__S3EH);
-    Self__MLWD= 0;
-    while ((Self__MLWD >=  0)) {
-      Result__VJ1C[Self__MLWD]=NULL;
-      Self__MLWD=(__INTEGER)(Self__MLWD -  1);
+    Result__DN1C=((void **)result__IEFH);
+    Self__0OWD= 0;
+    while ((Self__0OWD >=  0)) {
+      Result__DN1C[Self__0OWD]=NULL;
+      Self__0OWD=(__INTEGER)(Self__0OWD -  1);
     };
-    Self__PBS->parent_arrayed_collection__BAB.capacity__YBS= 1;
+    Self__1ES->parent_arrayed_collection__BAB.capacity__EFS= 1;
   };
   create__with__CRB(TYPE_NULL__, 0);
-  fast_put__to__2YR(result__1OC,(&__string_3));
+  fast_put__to__I2R(result__1OC,(&__string_3));
   create__with__CRB(TYPE_VOID__, 0);
-  fast_put__to__2YR(result__1OC,(&__string_45));
+  fast_put__to__I2R(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__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;
+      a__HNHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__INHH=(__UINTEGER_32)((__UINTEGER_32)(sz__B3B + a__HNHH) & (__UINTEGER_32)(~ a__HNHH));
+      ptr_table__L4KH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__INHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__K4KH=((__POINTER )(NULL));
+      result__M4KH=((__POINTER *)ptr_table__L4KH)[ 0];
+      if ((result__M4KH == (void *)NULL)) {
+        result__M4KH=new_lab__FTJ(new_size__INHH);
+        next__K4KH=(void *)((unsigned long)result__M4KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__INHH)));
+        ((__POINTER *)next__K4KH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__L4KH)[ 0]=next__K4KH;
       } else {
-        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)));
+        next__K4KH=((__POINTER *)result__M4KH)[ 0];
+        if ((next__K4KH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__M4KH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__INHH <<  1)) <=  4096)) {
+            next__K4KH=(void *)((unsigned long)result__M4KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__INHH)));
           } else {
-            next__LWKH=new_lab__ZPJ(new_size__NGHH);
+            next__K4KH=new_lab__FTJ(new_size__INHH);
           };
-          ((__POINTER *)next__LWKH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__MWKH)[ 0]=next__LWKH;
+          ((__POINTER *)next__K4KH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__L4KH)[ 0]=next__K4KH;
         } else {
-          ((__POINTER *)result__NWKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LWKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__NWKH=next__LWKH;
+          ((__POINTER *)result__M4KH)[ 0]=(void *)((unsigned long)((__POINTER *)next__K4KH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__M4KH=next__K4KH;
         };
       };
-      ptr__52B=result__NWKH;
+      ptr__52B=result__M4KH;
     } else {
-      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;
+      t__MNHH=((__UINTEGER_32 )typ_id__E3B);
+      a__LNHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__T4KH=(__UINTEGER_32)((__UINTEGER_32)(sz__B3B + a__LNHH) & (__UINTEGER_32)(~ a__LNHH));
+      ptr_table__Q4KH=((__POINTER )(&(table_type[(t__MNHH)])));
+      lab_type__S4KH=(__UINTEGER_32)(t__MNHH |  1);
+      next__P4KH=((__POINTER )(NULL));
+      result__R4KH=((__POINTER *)ptr_table__Q4KH)[ 0];
+      if ((result__R4KH == (void *)NULL)) {
+        result__R4KH=new_lab__FTJ(lab_type__S4KH);
+        next__P4KH=(void *)((unsigned long)result__R4KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__T4KH)));
+        ((__POINTER *)next__P4KH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__Q4KH)[ 0]=next__P4KH;
       } else {
-        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)));
+        next__P4KH=((__POINTER *)result__R4KH)[ 0];
+        if ((next__P4KH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__R4KH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__T4KH <<  1)) <=  4096)) {
+            next__P4KH=(void *)((unsigned long)result__R4KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__T4KH)));
           } else {
-            next__QWKH=new_lab__ZPJ(lab_type__TWKH);
+            next__P4KH=new_lab__FTJ(lab_type__S4KH);
           };
-          ((__POINTER *)next__QWKH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__RWKH)[ 0]=next__QWKH;
+          ((__POINTER *)next__P4KH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__Q4KH)[ 0]=next__P4KH;
         } else {
-          ((__POINTER *)result__SWKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QWKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__SWKH=next__QWKH;
+          ((__POINTER *)result__R4KH)[ 0]=(void *)((unsigned long)((__POINTER *)next__P4KH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__R4KH=next__P4KH;
         };
       };
-      ptr__52B=result__SWKH;
+      ptr__52B=result__R4KH;
     };
     result__42B=((__FAST_ARRAYoTYPE_IDo *)ptr__52B);
     *(result__42B) = *(FAST_ARRAYoTYPE_IDo__);
   };
-  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__0HS=((__FAST_ARRAYoTYPE_IDo *)result__42B);
+  if ((Self__0HS->parent_arrayed_collection__ABB.capacity__E5R <  3)) {
+    Self__0HS->parent_arrayed_collection__ABB.storage__AAS=create__MZNB( 3);
+    Self__0HS->parent_arrayed_collection__ABB.capacity__E5R= 3;
   };
-  Self__OES->parent_arrayed_collection__ABB.upper__W1R=(__INTEGER)(-  1);
+  Self__0HS->parent_arrayed_collection__ABB.upper__C5R=(__INTEGER)(-  1);
   list_id__CBB=result__42B;
-  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__;
+  result__EQIH=NULL;
+  ptr__FQIH=((__POINTER )(NULL));
+  typ_id__GQIH= 0;
+  sz__HQIH=((__UINTEGER_32 )sizeof(__TYPE_ID));
+  if ((sz__HQIH ==  0)) {
+    result__EQIH=TYPE_ID__;
   } else {
-    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);
+    typ_id__GQIH=-1;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__HQIH);
+    if ((typ_id__GQIH == (__INTEGER)(-  1))) {
+      a__IQIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__JQIH=(__UINTEGER_32)((__UINTEGER_32)(sz__HQIH + a__IQIH) & (__UINTEGER_32)(~ a__IQIH));
+      ptr_table__V4KH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__JQIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__U4KH=((__POINTER )(NULL));
+      result__W4KH=((__POINTER *)ptr_table__V4KH)[ 0];
+      if ((result__W4KH == (void *)NULL)) {
+        result__W4KH=new_lab__FTJ(new_size__JQIH);
+        next__U4KH=(void *)((unsigned long)result__W4KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JQIH)));
+        ((__POINTER *)next__U4KH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__V4KH)[ 0]=next__U4KH;
+      } else {
+        next__U4KH=((__POINTER *)result__W4KH)[ 0];
+        if ((next__U4KH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__W4KH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__JQIH <<  1)) <=  4096)) {
+            next__U4KH=(void *)((unsigned long)result__W4KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JQIH)));
+          } else {
+            next__U4KH=new_lab__FTJ(new_size__JQIH);
+          };
+          ((__POINTER *)next__U4KH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__V4KH)[ 0]=next__U4KH;
+        } else {
+          ((__POINTER *)result__W4KH)[ 0]=(void *)((unsigned long)((__POINTER *)next__U4KH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__W4KH=next__U4KH;
+        };
+      };
+      ptr__FQIH=result__W4KH;
+    } else {
+      t__KQIH=((__UINTEGER_32 )typ_id__GQIH);
+      a__LQIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__34KH=(__UINTEGER_32)((__UINTEGER_32)(sz__HQIH + a__LQIH) & (__UINTEGER_32)(~ a__LQIH));
+      ptr_table__04KH=((__POINTER )(&(table_type[(t__KQIH)])));
+      lab_type__24KH=(__UINTEGER_32)(t__KQIH |  1);
+      next__Z4KH=((__POINTER )(NULL));
+      result__14KH=((__POINTER *)ptr_table__04KH)[ 0];
+      if ((result__14KH == (void *)NULL)) {
+        result__14KH=new_lab__FTJ(lab_type__24KH);
+        next__Z4KH=(void *)((unsigned long)result__14KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__34KH)));
+        ((__POINTER *)next__Z4KH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__04KH)[ 0]=next__Z4KH;
+      } else {
+        next__Z4KH=((__POINTER *)result__14KH)[ 0];
+        if ((next__Z4KH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__14KH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__34KH <<  1)) <=  4096)) {
+            next__Z4KH=(void *)((unsigned long)result__14KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__34KH)));
+          } else {
+            next__Z4KH=new_lab__FTJ(lab_type__24KH);
+          };
+          ((__POINTER *)next__Z4KH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__04KH)[ 0]=next__Z4KH;
+        } else {
+          ((__POINTER *)result__14KH)[ 0]=(void *)((unsigned long)((__POINTER *)next__Z4KH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__14KH=next__Z4KH;
+        };
+      };
+      ptr__FQIH=result__14KH;
+    };
+    result__EQIH=((__TYPE_ID *)ptr__FQIH);
+    *(result__EQIH) = *(TYPE_ID__);
+  };
+  create__with__CRB(((__TYPE_ID *)result__EQIH), 0);
+  add_last__44R(result__42B,result__EQIH);
   result__Q4B=NULL;
   ptr__R4B=((__POINTER )(NULL));
   typ_id__W4B= 0;
@@ -7172,107 +7172,107 @@ 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__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;
+      a__LXFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__MXFH=(__UINTEGER_32)((__UINTEGER_32)(sz__T4B + a__LXFH) & (__UINTEGER_32)(~ a__LXFH));
+      ptr_table__54KH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__MXFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__44KH=((__POINTER )(NULL));
+      result__A5KH=((__POINTER *)ptr_table__54KH)[ 0];
+      if ((result__A5KH == (void *)NULL)) {
+        result__A5KH=new_lab__FTJ(new_size__MXFH);
+        next__44KH=(void *)((unsigned long)result__A5KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MXFH)));
+        ((__POINTER *)next__44KH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__54KH)[ 0]=next__44KH;
       } else {
-        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)));
+        next__44KH=((__POINTER *)result__A5KH)[ 0];
+        if ((next__44KH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__A5KH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__MXFH <<  1)) <=  4096)) {
+            next__44KH=(void *)((unsigned long)result__A5KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MXFH)));
           } else {
-            next__5WKH=new_lab__ZPJ(new_size__WQFH);
+            next__44KH=new_lab__FTJ(new_size__MXFH);
           };
-          ((__POINTER *)next__5WKH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__AXKH)[ 0]=next__5WKH;
+          ((__POINTER *)next__44KH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__54KH)[ 0]=next__44KH;
         } else {
-          ((__POINTER *)result__BXKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5WKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__BXKH=next__5WKH;
+          ((__POINTER *)result__A5KH)[ 0]=(void *)((unsigned long)((__POINTER *)next__44KH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__A5KH=next__44KH;
         };
       };
-      ptr__R4B=result__BXKH;
+      ptr__R4B=result__A5KH;
     } else {
-      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;
+      t__QXFH=((__UINTEGER_32 )typ_id__W4B);
+      a__PXFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__H5KH=(__UINTEGER_32)((__UINTEGER_32)(sz__T4B + a__PXFH) & (__UINTEGER_32)(~ a__PXFH));
+      ptr_table__E5KH=((__POINTER )(&(table_type[(t__QXFH)])));
+      lab_type__G5KH=(__UINTEGER_32)(t__QXFH |  1);
+      next__D5KH=((__POINTER )(NULL));
+      result__F5KH=((__POINTER *)ptr_table__E5KH)[ 0];
+      if ((result__F5KH == (void *)NULL)) {
+        result__F5KH=new_lab__FTJ(lab_type__G5KH);
+        next__D5KH=(void *)((unsigned long)result__F5KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__H5KH)));
+        ((__POINTER *)next__D5KH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__E5KH)[ 0]=next__D5KH;
       } else {
-        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)));
+        next__D5KH=((__POINTER *)result__F5KH)[ 0];
+        if ((next__D5KH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__F5KH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__H5KH <<  1)) <=  4096)) {
+            next__D5KH=(void *)((unsigned long)result__F5KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__H5KH)));
           } else {
-            next__EXKH=new_lab__ZPJ(lab_type__HXKH);
+            next__D5KH=new_lab__FTJ(lab_type__G5KH);
           };
-          ((__POINTER *)next__EXKH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__FXKH)[ 0]=next__EXKH;
+          ((__POINTER *)next__D5KH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__E5KH)[ 0]=next__D5KH;
         } else {
-          ((__POINTER *)result__GXKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EXKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__GXKH=next__EXKH;
+          ((__POINTER *)result__F5KH)[ 0]=(void *)((unsigned long)((__POINTER *)next__D5KH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__F5KH=next__D5KH;
         };
       };
-      ptr__R4B=result__GXKH;
+      ptr__R4B=result__F5KH;
     };
     result__Q4B=((__TYPE_ID *)ptr__R4B);
     *(result__Q4B) = *(TYPE_ID__);
   };
   create__with__CRB(((__TYPE_ID *)result__Q4B), 0);
-  add_last__S1R(list_id__CBB,result__Q4B);
+  add_last__44R(list_id__CBB,result__Q4B);
   if (is_short_recursive__JB) {
     directory_list__YB=create__ZBB( 100);
     file_list__0B=create__ZBB( 100);
     current_list__2B=create__ZBB( 100);
     __tmp__4B=input_name__3B;
-    if (FILE_SYSTEM__->parent_directory__2FD==0) {
+    if (FILE_SYSTEM__->parent_directory__2GD==0) {
     } else {
-      parent_directory__1ED();
+      parent_directory__1FD();
     };
-    ent__TB=get_entry__GZAC(__tmp__4B);
+    ent__TB=get_entry__S2AC(__tmp__4B);
     if (((void *)ent__TB == (void *)NULL)) {
       __tmp__JC=TRUE__;
     } else {
       if (((struct ___OBJ *)ent__TB)->__id==__DIRECTORY_UNIX__) {
-        Self__2GSD=((__DIRECTORY_UNIX *)ent__TB);
-        dir__4GSD=Self__2GSD;
-        __tmp__FC=((void *)Self__2GSD != (void *)NULL);
+        Self__KKSD=((__DIRECTORY_UNIX *)ent__TB);
+        dir__MKSD=Self__KKSD;
+        __tmp__FC=((void *)Self__KKSD != (void *)NULL);
       } else {
-        dir__GHSD=NULL;
+        dir__UKSD=NULL;
         __tmp__FC=FALSE__;
       };
       __tmp__JC=(! __tmp__FC);
     };
     if (__tmp__JC) {
-      print__DID((&__string_169));
-      print__DID(input_name__3B);
-      print__DID((&__string_170));
+      print__DJD((&__string_169));
+      print__DJD(input_name__3B);
+      print__DJD((&__string_170));
       exit(( 1));
     };
     if (((struct ___OBJ *)ent__TB)->__id==__DIRECTORY_UNIX__) {
-      __tmp__UC=open__FDRD(ent__TB);
+      __tmp__UC=open__TGRD(ent__TB);
     } else {
-      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);
+      Self__YKRD=((__FILE_UNIX *)ent__TB);
+      Self__YKRD->stream__4KRD=((__POINTER )(fopen((char*)(((__STRING_CONSTANT *)Self__YKRD->parent_entry_unix__HEF.parent_entry__FGD.path__BD)->storage__FRO),"r+b")));
+      __tmp__UC=(Self__YKRD->stream__4KRD != (void *)NULL);
     };
     if ((! __tmp__UC)) {
-      print__DID((&__string_169));
-      print__DID(input_name__3B);
-      print__DID((&__string_171));
+      print__DJD((&__string_169));
+      print__DJD(input_name__3B);
+      print__DJD((&__string_171));
       exit(( 1));
     };
     if (ent__TB==NULL) {
@@ -7288,1175 +7288,1175 @@ int main(int argc,char **argv)
       }
     };
     dir__SB=__tmp__AD;
-    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);
+    check_in__begin__IUQC(__tmp__AD,(__INTEGER)(((__STRING_CONSTANT *)((__DIRECTORY_UNIX *)__tmp__AD)->parent_entry_unix__GGD.parent_entry__FGD.path__BD)->count__DD +  1));
+    Self__MQIH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__OPH);
+    result__QQIH= 0;
+    __tmp__SQIH=((__STRING_CONSTANT *)(&__string_150))->count__DD;
+    Self__TQIH= 1;
+    while ((Self__TQIH <= __tmp__SQIH)) {
+      result__QQIH=(__INTEGER)((__INTEGER)( 5 * result__QQIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_150))->storage__FRO)[(__INTEGER)(Self__TQIH -  1)])));
+      Self__TQIH=(__INTEGER)(Self__TQIH +  1);
+    };
+    if ((result__QQIH <  0)) {
+      result__QQIH=(__INTEGER)(~ result__QQIH);
+    };
+    node__OQIH=((void **)Self__MQIH->buckets__PDT)[(__INTEGER)(result__QQIH % Self__MQIH->capacity__KDT)];
+    while ((! (((void *)node__OQIH == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__OQIH)->key__1DT == (void *)(&__string_150))))) {
+      node__OQIH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__OQIH)->next__GET;
+    };
+    if (((void *)node__OQIH != (void *)NULL)) {
+      Self__NNHH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__OPH);
+      result__VQIH= 0;
+      __tmp__XQIH=((__STRING_CONSTANT *)(&__string_150))->count__DD;
+      Self__YQIH= 1;
+      while ((Self__YQIH <= __tmp__XQIH)) {
+        result__VQIH=(__INTEGER)((__INTEGER)( 5 * result__VQIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_150))->storage__FRO)[(__INTEGER)(Self__YQIH -  1)])));
+        Self__YQIH=(__INTEGER)(Self__YQIH +  1);
+      };
+      if ((result__VQIH <  0)) {
+        result__VQIH=(__INTEGER)(~ result__VQIH);
+      };
+      node__PNHH=((void **)Self__NNHH->buckets__PDT)[(__INTEGER)(result__VQIH % Self__NNHH->capacity__KDT)];
+      while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__PNHH)->key__1DT != (void *)(&__string_150))) {
+        node__PNHH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__PNHH)->next__GET;
+      };
+      txt__1=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__PNHH)->item__PY3)->first_link__3WEC)->item__V0HD;
+      Self__HV1G=((__STRING_CONSTANT *)txt__1);
+      new__IV1G=create__ZBB(Self__HV1G->count__DD);
+      copy__JDS(new__IV1G,Self__HV1G);
+      save_file__with__3DC(add_ext__PCF((&__string_150)),new__IV1G);
+    };
+    Self__0QIH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__OPH);
+    result__4QIH= 0;
+    __tmp__ARIH=((__STRING_CONSTANT *)(&__string_66))->count__DD;
+    Self__BRIH= 1;
+    while ((Self__BRIH <= __tmp__ARIH)) {
+      result__4QIH=(__INTEGER)((__INTEGER)( 5 * result__4QIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_66))->storage__FRO)[(__INTEGER)(Self__BRIH -  1)])));
+      Self__BRIH=(__INTEGER)(Self__BRIH +  1);
+    };
+    if ((result__4QIH <  0)) {
+      result__4QIH=(__INTEGER)(~ result__4QIH);
+    };
+    node__2QIH=((void **)Self__0QIH->buckets__PDT)[(__INTEGER)(result__4QIH % Self__0QIH->capacity__KDT)];
+    while ((! (((void *)node__2QIH == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__2QIH)->key__1DT == (void *)(&__string_66))))) {
+      node__2QIH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__2QIH)->next__GET;
+    };
+    if (((void *)node__2QIH != (void *)NULL)) {
+      Self__RNHH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__OPH);
+      result__DRIH= 0;
+      __tmp__FRIH=((__STRING_CONSTANT *)(&__string_66))->count__DD;
+      Self__GRIH= 1;
+      while ((Self__GRIH <= __tmp__FRIH)) {
+        result__DRIH=(__INTEGER)((__INTEGER)( 5 * result__DRIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_66))->storage__FRO)[(__INTEGER)(Self__GRIH -  1)])));
+        Self__GRIH=(__INTEGER)(Self__GRIH +  1);
+      };
+      if ((result__DRIH <  0)) {
+        result__DRIH=(__INTEGER)(~ result__DRIH);
+      };
+      node__TNHH=((void **)Self__RNHH->buckets__PDT)[(__INTEGER)(result__DRIH % Self__RNHH->capacity__KDT)];
+      while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__TNHH)->key__1DT != (void *)(&__string_66))) {
+        node__TNHH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__TNHH)->next__GET;
+      };
+      txt__1=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__TNHH)->item__PY3)->first_link__3WEC)->item__V0HD;
+      Self__JV1G=((__STRING_CONSTANT *)txt__1);
+      new__KV1G=create__ZBB(Self__JV1G->count__DD);
+      copy__JDS(new__KV1G,Self__JV1G);
+      save_file__with__3DC(add_ext__PCF((&__string_66)),new__KV1G);
+    };
+    Self__IRIH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__OPH);
+    result__MRIH= 0;
+    __tmp__ORIH=((__STRING_CONSTANT *)(&__string_151))->count__DD;
+    Self__PRIH= 1;
+    while ((Self__PRIH <= __tmp__ORIH)) {
+      result__MRIH=(__INTEGER)((__INTEGER)( 5 * result__MRIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_151))->storage__FRO)[(__INTEGER)(Self__PRIH -  1)])));
+      Self__PRIH=(__INTEGER)(Self__PRIH +  1);
+    };
+    if ((result__MRIH <  0)) {
+      result__MRIH=(__INTEGER)(~ result__MRIH);
+    };
+    node__KRIH=((void **)Self__IRIH->buckets__PDT)[(__INTEGER)(result__MRIH % Self__IRIH->capacity__KDT)];
+    while ((! (((void *)node__KRIH == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__KRIH)->key__1DT == (void *)(&__string_151))))) {
+      node__KRIH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__KRIH)->next__GET;
+    };
+    if (((void *)node__KRIH != (void *)NULL)) {
+      Self__VNHH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__OPH);
+      result__RRIH= 0;
+      __tmp__TRIH=((__STRING_CONSTANT *)(&__string_151))->count__DD;
+      Self__URIH= 1;
+      while ((Self__URIH <= __tmp__TRIH)) {
+        result__RRIH=(__INTEGER)((__INTEGER)( 5 * result__RRIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_151))->storage__FRO)[(__INTEGER)(Self__URIH -  1)])));
+        Self__URIH=(__INTEGER)(Self__URIH +  1);
+      };
+      if ((result__RRIH <  0)) {
+        result__RRIH=(__INTEGER)(~ result__RRIH);
+      };
+      node__XNHH=((void **)Self__VNHH->buckets__PDT)[(__INTEGER)(result__RRIH % Self__VNHH->capacity__KDT)];
+      while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__XNHH)->key__1DT != (void *)(&__string_151))) {
+        node__XNHH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__XNHH)->next__GET;
+      };
+      txt__1=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__XNHH)->item__PY3)->first_link__3WEC)->item__V0HD;
+      Self__2EFH=((__STRING *)directory_list__YB);
+      i__3EFH=Self__2EFH->count__EGC;
+      j__5EFH=((__STRING_CONSTANT *)txt__1)->count__DD;
+      resize__AYZ(Self__2EFH,(__INTEGER)(i__3EFH + j__5EFH));
+      if (((i__3EFH >  0) && (j__5EFH >  0))) {
+        move__to__by__0YCC(Self__2EFH->storage__RCS, 0,(__INTEGER)(i__3EFH -  1),j__5EFH);
+      };
+      Self__1NHH=((__CHARACTER *)Self__2EFH->storage__RCS);
+      model__2NHH=((__STRING_CONSTANT *)txt__1)->storage__FRO;
+      Self__0NHH=(__INTEGER)(j__5EFH -  1);
+      while ((Self__0NHH >=  0)) {
+        Self__1NHH[Self__0NHH]=((__CHARACTER *)model__2NHH)[Self__0NHH];
+        Self__0NHH=(__INTEGER)(Self__0NHH -  1);
+      };
+    };
+    Self__VXVB=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__OPH);
+    result__WRIH= 0;
+    __tmp__YRIH=((__STRING_CONSTANT *)(&__string_153))->count__DD;
+    Self__ZRIH= 1;
+    while ((Self__ZRIH <= __tmp__YRIH)) {
+      result__WRIH=(__INTEGER)((__INTEGER)( 5 * result__WRIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_153))->storage__FRO)[(__INTEGER)(Self__ZRIH -  1)])));
+      Self__ZRIH=(__INTEGER)(Self__ZRIH +  1);
+    };
+    if ((result__WRIH <  0)) {
+      result__WRIH=(__INTEGER)(~ result__WRIH);
+    };
+    node__5XVB=((void **)Self__VXVB->buckets__PDT)[(__INTEGER)(result__WRIH % Self__VXVB->capacity__KDT)];
+    while ((! (((void *)node__5XVB == (void *)NULL) || __infix_equal_equal__GAEB(((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__5XVB)->key__1DT,(&__string_153))))) {
+      node__5XVB=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__5XVB)->next__GET;
+    };
+    if (((void *)node__5XVB != (void *)NULL)) {
+      txt__1=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)at__0N4(result__OPH,(&__string_153)))->first_link__3WEC)->item__V0HD;
+      append__ROS(directory_list__YB,txt__1);
+    };
+    save_file__with__3DC(add_ext__PCF((&__string_172)),directory_list__YB);
+    Self__1RIH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__OPH);
+    result__5RIH= 0;
+    __tmp__BSIH=((__STRING_CONSTANT *)(&__string_154))->count__DD;
+    Self__CSIH= 1;
+    while ((Self__CSIH <= __tmp__BSIH)) {
+      result__5RIH=(__INTEGER)((__INTEGER)( 5 * result__5RIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_154))->storage__FRO)[(__INTEGER)(Self__CSIH -  1)])));
+      Self__CSIH=(__INTEGER)(Self__CSIH +  1);
+    };
+    if ((result__5RIH <  0)) {
+      result__5RIH=(__INTEGER)(~ result__5RIH);
+    };
+    node__3RIH=((void **)Self__1RIH->buckets__PDT)[(__INTEGER)(result__5RIH % Self__1RIH->capacity__KDT)];
+    while ((! (((void *)node__3RIH == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__3RIH)->key__1DT == (void *)(&__string_154))))) {
+      node__3RIH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__3RIH)->next__GET;
+    };
+    if (((void *)node__3RIH != (void *)NULL)) {
+      Self__BOHH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__OPH);
+      result__ESIH= 0;
+      __tmp__GSIH=((__STRING_CONSTANT *)(&__string_154))->count__DD;
+      Self__HSIH= 1;
+      while ((Self__HSIH <= __tmp__GSIH)) {
+        result__ESIH=(__INTEGER)((__INTEGER)( 5 * result__ESIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_154))->storage__FRO)[(__INTEGER)(Self__HSIH -  1)])));
+        Self__HSIH=(__INTEGER)(Self__HSIH +  1);
+      };
+      if ((result__ESIH <  0)) {
+        result__ESIH=(__INTEGER)(~ result__ESIH);
+      };
+      node__DOHH=((void **)Self__BOHH->buckets__PDT)[(__INTEGER)(result__ESIH % Self__BOHH->capacity__KDT)];
+      while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__DOHH)->key__1DT != (void *)(&__string_154))) {
+        node__DOHH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__DOHH)->next__GET;
+      };
+      txt__1=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__DOHH)->item__PY3)->first_link__3WEC)->item__V0HD;
+      Self__IFFH=((__STRING *)file_list__0B);
+      i__JFFH=Self__IFFH->count__EGC;
+      j__LFFH=((__STRING_CONSTANT *)txt__1)->count__DD;
+      resize__AYZ(Self__IFFH,(__INTEGER)(i__JFFH + j__LFFH));
+      if (((i__JFFH >  0) && (j__LFFH >  0))) {
+        move__to__by__0YCC(Self__IFFH->storage__RCS, 0,(__INTEGER)(i__JFFH -  1),j__LFFH);
+      };
+      Self__HOHH=((__CHARACTER *)Self__IFFH->storage__RCS);
+      model__IOHH=((__STRING_CONSTANT *)txt__1)->storage__FRO;
+      Self__GOHH=(__INTEGER)(j__LFFH -  1);
+      while ((Self__GOHH >=  0)) {
+        Self__HOHH[Self__GOHH]=((__CHARACTER *)model__IOHH)[Self__GOHH];
+        Self__GOHH=(__INTEGER)(Self__GOHH -  1);
+      };
+    };
+    Self__3CT=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__OPH);
+    result__JSIH= 0;
+    __tmp__LSIH=((__STRING_CONSTANT *)(&__string_156))->count__DD;
+    Self__MSIH= 1;
+    while ((Self__MSIH <= __tmp__LSIH)) {
+      result__JSIH=(__INTEGER)((__INTEGER)( 5 * result__JSIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_156))->storage__FRO)[(__INTEGER)(Self__MSIH -  1)])));
+      Self__MSIH=(__INTEGER)(Self__MSIH +  1);
+    };
+    if ((result__JSIH <  0)) {
+      result__JSIH=(__INTEGER)(~ result__JSIH);
+    };
+    node__IDT=((void **)Self__3CT->buckets__PDT)[(__INTEGER)(result__JSIH % Self__3CT->capacity__KDT)];
+    while ((! (((void *)node__IDT == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__IDT)->key__1DT == (void *)(&__string_156))))) {
+      node__IDT=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__IDT)->next__GET;
+    };
+    if (((void *)node__IDT != (void *)NULL)) {
+      Self__NOHH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__OPH);
+      result__OSIH= 0;
+      __tmp__QSIH=((__STRING_CONSTANT *)(&__string_156))->count__DD;
+      Self__RSIH= 1;
+      while ((Self__RSIH <= __tmp__QSIH)) {
+        result__OSIH=(__INTEGER)((__INTEGER)( 5 * result__OSIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_156))->storage__FRO)[(__INTEGER)(Self__RSIH -  1)])));
+        Self__RSIH=(__INTEGER)(Self__RSIH +  1);
+      };
+      if ((result__OSIH <  0)) {
+        result__OSIH=(__INTEGER)(~ result__OSIH);
+      };
+      node__POHH=((void **)Self__NOHH->buckets__PDT)[(__INTEGER)(result__OSIH % Self__NOHH->capacity__KDT)];
+      while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__POHH)->key__1DT != (void *)(&__string_156))) {
+        node__POHH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__POHH)->next__GET;
+      };
+      txt__1=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__POHH)->item__PY3)->first_link__3WEC)->item__V0HD;
+      append__ROS(file_list__0B,txt__1);
+    };
+    save_file__with__3DC(add_ext__PCF((&__string_173)),file_list__0B);
   } else {
-    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));
+    Self__L5KH=((__STRING_CONSTANT *)input_name__3B);
+    result__I5KH=FALSE__;
+    i1__J5KH= 0;
+    i2__K5KH= 0;
+    if ((((__STRING_CONSTANT *)(&__string_159))->count__DD <= Self__L5KH->count__DD)) {
+      i1__J5KH=(__INTEGER)((__INTEGER)(Self__L5KH->count__DD - ((__STRING_CONSTANT *)(&__string_159))->count__DD) +  1);
+      i2__K5KH= 1;
+      while ((! (((i1__J5KH > Self__L5KH->count__DD) || (i2__K5KH > ((__STRING_CONSTANT *)(&__string_159))->count__DD)) || (((__CHARACTER *)Self__L5KH->storage__FRO)[(__INTEGER)(i1__J5KH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_159))->storage__FRO)[(__INTEGER)(i2__K5KH -  1)])))) {
+        i1__J5KH=(__INTEGER)(i1__J5KH +  1);
+        i2__K5KH=(__INTEGER)(i2__K5KH +  1);
+      };
+      result__I5KH=(i1__J5KH > Self__L5KH->count__DD);
+    };
+    if ((! result__I5KH)) {
+      copy__JDS(string_tmp__VH,input_name__3B);
+      append__ROS(string_tmp__VH,(&__string_159));
       input_name__3B=get__YWB(string_tmp__VH);
     };
     __tmp__2H=input_name__3B;
-    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]='/';
+    copy__JDS(string_tmp__VH,input_name__3B);
+    Self__TSIH=((__STRING *)string_tmp__VH);
+    __tmp__USIH=Self__TSIH->storage__RCS;
+    __tmp__VSIH=(__INTEGER)(Self__TSIH->count__EGC -  1);
+    Self__WSIH=((__CHARACTER *)__tmp__USIH);
+    Self__XSIH=__tmp__VSIH;
+    while ((Self__XSIH >=  0)) {
+      if (('\\' == Self__WSIH[Self__XSIH])) {
+        Self__WSIH[Self__XSIH]='/';
       };
-      Self__DLIH=(__INTEGER)(Self__DLIH -  1);
+      Self__XSIH=(__INTEGER)(Self__XSIH -  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);
+    result__2SIH=((__STRING *)string_tmp__VH)->count__EGC;
+    while ((! ((result__2SIH <  1) || (((__CHARACTER *)((__STRING *)string_tmp__VH)->storage__RCS)[(__INTEGER)(result__2SIH -  1)] == '/')))) {
+      result__2SIH=(__INTEGER)(result__2SIH -  1);
     };
-    if ((result__ILIH >=  1)) {
-      Self__WHHH=((__STRING *)string_tmp__VH);
-      if ((result__ILIH > Self__WHHH->count__EGC)) {
-        Self__WHHH->count__EGC= 0;
+    if ((result__2SIH >=  1)) {
+      Self__ROHH=((__STRING *)string_tmp__VH);
+      if ((result__2SIH > Self__ROHH->count__EGC)) {
+        Self__ROHH->count__EGC= 0;
       } else {
-        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);
+        if ((result__2SIH >  0)) {
+          len__BTIH=(__INTEGER)((__INTEGER)(result__2SIH -  1) +  1);
+          if ((len__BTIH >  0)) {
+            __tmp__CTIH=(__INTEGER)(result__2SIH +  1);
+            __tmp__ETIH=Self__ROHH->count__EGC;
+            Self__FTIH=__tmp__CTIH;
+            while ((Self__FTIH <= __tmp__ETIH)) {
+              ((__CHARACTER *)Self__ROHH->storage__RCS)[(__INTEGER)((__INTEGER)(Self__FTIH - len__BTIH) -  1)]=((__CHARACTER *)Self__ROHH->storage__RCS)[(__INTEGER)(Self__FTIH -  1)];
+              Self__FTIH=(__INTEGER)(Self__FTIH +  1);
             };
-            Self__WHHH->count__EGC=(__INTEGER)(Self__WHHH->count__EGC - len__NLIH);
+            Self__ROHH->count__EGC=(__INTEGER)(Self__ROHH->count__EGC - len__BTIH);
           };
         };
       };
     };
     result__ETC=((__STRING *)string_tmp__VH)->count__EGC;
-    while ((! ((result__ETC <  1) || (((__CHARACTER *)((__STRING *)string_tmp__VH)->storage__F5R)[(__INTEGER)(result__ETC -  1)] == '.')))) {
+    while ((! ((result__ETC <  1) || (((__CHARACTER *)((__STRING *)string_tmp__VH)->storage__RCS)[(__INTEGER)(result__ETC -  1)] == '.')))) {
       result__ETC=(__INTEGER)(result__ETC -  1);
     };
-    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;
+    Self__TOHH=((__STRING *)string_tmp__VH);
+    n__UOHH=(__INTEGER)((__INTEGER)(((__STRING *)string_tmp__VH)->count__EGC - result__ETC) +  1);
+    if ((n__UOHH > Self__TOHH->count__EGC)) {
+      Self__TOHH->count__EGC= 0;
     } else {
-      Self__YHHH->count__EGC=(__INTEGER)(Self__YHHH->count__EGC - n__ZHHH);
+      Self__TOHH->count__EGC=(__INTEGER)(Self__TOHH->count__EGC - n__UOHH);
     };
-    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;
+    Self__N5KH=((__STRING *)string_tmp__VH);
+    Self__O5KH=Self__N5KH->count__EGC;
+    while ((Self__O5KH >=  1)) {
+      Self__P5KH=((__CHARACTER *)Self__N5KH->storage__RCS)[(__INTEGER)(Self__O5KH -  1)];
+      result__Q5KH='\0';
+      if (((((__INTEGER_8 )Self__P5KH) <  97) || (((__INTEGER_8 )Self__P5KH) >  122))) {
+        result__Q5KH=Self__P5KH;
       } else {
-        result__RXKH=((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )Self__QXKH) -  32))));
+        result__Q5KH=((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )Self__P5KH) -  32))));
       };
-      ((__CHARACTER *)Self__OXKH->storage__F5R)[(__INTEGER)(Self__PXKH -  1)]=result__RXKH;
-      Self__PXKH=(__INTEGER)(Self__PXKH -  1);
+      ((__CHARACTER *)Self__N5KH->storage__RCS)[(__INTEGER)(Self__O5KH -  1)]=result__Q5KH;
+      Self__O5KH=(__INTEGER)(Self__O5KH -  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__L5E(((__PROTOTYPE *)proto_input__BI)->parent_named__5.name__LI);
+      output_name__DI=add_ext__PCF(((__PROTOTYPE *)proto_input__BI)->parent_named__5.name__LI);
     };
     save_file__with__3DC(output_name__DI,output_code__SI);
   };
   if (is_shorter2__VI) {
-    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];
+    Self__M4QC= 0;
+    limit_up__N4QC=result__3OJ->parent_arrayed_collection__AJ.upper__HJ;
+    while ((Self__M4QC <= limit_up__N4QC)) {
+      p__AB=((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__XVT)[Self__M4QC];
       ((__STRING *)output_code__SI)->count__EGC= 0;
-      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) {
+      Self__QLTD=((__PROTOTYPE *)p__AB);
+      title__SLTD=NULL;
+      s__TLTD=NULL;
+      put__to__like__Q3XD(Self__QLTD->parent_named__5.name__LI,output_code__SI,(&__string_140));
+      if (((void *)Self__QLTD->comment_slot__4UTC != (void *)NULL)) {
+        put__to__like__Q3XD(Self__QLTD->comment_slot__4UTC,output_code__SI,(&__string_138));
+      };
+      if (((void *)Self__QLTD->comment_header__WBRC != (void *)NULL)) {
+        put__to__like__Q3XD(Self__QLTD->comment_header__WBRC,output_code__SI,(&__string_139));
+      };
+      ((__FAST_ARRAYoITM_SLOTo *)list_tmp__RMTD)->parent_arrayed_collection__QMTD.upper__NNTD=(__INTEGER)(-  1);
+      shorter_get_all_slot_in__S5XD(Self__QLTD,list_tmp__RMTD);
+      s__1FYD=NULL;
+      is_first_cur__0FYD=TRUE__;
+      __tmp__5FYD=((__FAST_ARRAYoITM_SLOTo *)list_tmp__RMTD)->parent_arrayed_collection__QMTD.upper__NNTD;
+      Self__1F5D= 0;
+      while ((Self__1F5D <= __tmp__5FYD)) {
+        s__1FYD=((void **)((__FAST_ARRAYoITM_SLOTo *)list_tmp__RMTD)->parent_arrayed_collection__QMTD.storage__1OWE)[Self__1F5D];
+        if (((struct ___OBJ *)s__1FYD)->__id==__ITM_SLOT__) {
+          __tmp__0MTD=((__ITM_SLOT *)s__1FYD)->id_section__F3C;
+        } else {
+          __tmp__0MTD=((__ITM_SLOT_OPERATOR *)s__1FYD)->parent_itm_slot__NW5B.id_section__F3C;
+        };
+        Self__RJ2G=((__SECTION_ *)__tmp__0MTD);
+        if ((((void *)Self__RJ2G->name__11DC == (void *)(&__string_23)) || ((void *)Self__RJ2G->name__11DC == (void *)(&__string_24)))) {
+          if (((struct ___OBJ *)s__1FYD)->__id==__ITM_SLOT__) {
+            __tmp__MGYD=((__ITM_SLOT *)s__1FYD)->stat_shorter__XNTD;
+          } else {
+            __tmp__MGYD=((__ITM_SLOT_OPERATOR *)s__1FYD)->parent_itm_slot__NW5B.stat_shorter__XNTD;
+          };
+          __tmp__PGYD=(__tmp__MGYD ==  0);
+        } else {
+          __tmp__PGYD=FALSE__;
+        };
+        if (__tmp__PGYD) {
+          if (is_first_cur__0FYD) {
             if (((void *)(&__string_174) == (void *)NULL)) {
-              put__to__like__C0XD((&__string_175),output_code__SI,(&__string_141));
+              put__to__like__Q3XD((&__string_175),output_code__SI,(&__string_141));
             } else {
-              put__to__like__C0XD((&__string_174),output_code__SI,(&__string_141));
+              put__to__like__Q3XD((&__string_174),output_code__SI,(&__string_141));
             };
-            is_first_cur__MCYD=FALSE__;
+            is_first_cur__0FYD=FALSE__;
           };
-          if (((struct ___OBJ *)s__NCYD)->__id==__ITM_SLOT__) {
-            ((__ITM_SLOT *)s__NCYD)->stat_shorter__JKTD= 1;
+          if (((struct ___OBJ *)s__1FYD)->__id==__ITM_SLOT__) {
+            ((__ITM_SLOT *)s__1FYD)->stat_shorter__XNTD= 1;
           } else {
-            ((__ITM_SLOT_OPERATOR *)s__NCYD)->parent_itm_slot__BT5B.stat_shorter__JKTD= 1;
+            ((__ITM_SLOT_OPERATOR *)s__1FYD)->parent_itm_slot__NW5B.stat_shorter__XNTD= 1;
           };
           ((__STRING *)string_tmp__VH)->count__EGC= 0;
-          ((__STRING *)string_tmp2__O4I)->count__EGC= 0;
-          if (((struct ___OBJ *)s__NCYD)->__id==__ITM_SLOT__) {
-            pretty_name_in__ER4F(s__NCYD,string_tmp2__O4I);
+          ((__STRING *)string_tmp2__0BJ)->count__EGC= 0;
+          if (((struct ___OBJ *)s__1FYD)->__id==__ITM_SLOT__) {
+            pretty_name_in__LW4F(s__1FYD,string_tmp2__0BJ);
           } else {
-            pretty_name_in__ZS4F(s__NCYD,string_tmp2__O4I);
+            pretty_name_in__AY4F(s__1FYD,string_tmp2__0BJ);
           };
-          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;
+          put__to__like__Q3XD(string_tmp2__0BJ,string_tmp__VH,(&__string_143));
+          if (((struct ___OBJ *)s__1FYD)->__id==__ITM_SLOT__) {
+            __tmp__UHYD=((__ITM_SLOT *)s__1FYD)->id_section__F3C;
           } else {
-            __tmp__GEYD=((__ITM_SLOT_OPERATOR *)s__NCYD)->parent_itm_slot__BT5B.id_section__F2C;
+            __tmp__UHYD=((__ITM_SLOT_OPERATOR *)s__1FYD)->parent_itm_slot__NW5B.id_section__F3C;
           };
-          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;
+          Self__SJ2G=((__SECTION_ *)__tmp__UHYD);
+          if ((((void *)Self__SJ2G->name__11DC == (void *)(&__string_23)) || ((void *)Self__SJ2G->name__11DC == (void *)(&__string_24)))) {
+            if (((struct ___OBJ *)s__1FYD)->__id==__ITM_SLOT__) {
+              __tmp__1HYD=((__ITM_SLOT *)s__1FYD)->parent_named__15.style__OGU;
             } else {
-              __tmp__NEYD=((__ITM_SLOT_OPERATOR *)s__NCYD)->parent_itm_slot__BT5B.parent_named__15.style__FBU;
+              __tmp__1HYD=((__ITM_SLOT_OPERATOR *)s__1FYD)->parent_itm_slot__NW5B.parent_named__15.style__OGU;
             };
-            if ((__tmp__NEYD != '+')) {
-              __tmp__DFYD=TRUE__;
+            if ((__tmp__1HYD != '+')) {
+              __tmp__RIYD=TRUE__;
             } else {
-              if (((struct ___OBJ *)s__NCYD)->__id==__ITM_SLOT__) {
-                __tmp__UEYD=((__ITM_SLOT *)s__NCYD)->result_type__B4FC;
+              if (((struct ___OBJ *)s__1FYD)->__id==__ITM_SLOT__) {
+                __tmp__CIYD=((__ITM_SLOT *)s__1FYD)->result_type__PBGC;
               } else {
-                __tmp__UEYD=((__ITM_SLOT_OPERATOR *)s__NCYD)->parent_itm_slot__BT5B.result_type__B4FC;
+                __tmp__CIYD=((__ITM_SLOT_OPERATOR *)s__1FYD)->parent_itm_slot__NW5B.result_type__PBGC;
               };
-              if (__tmp__UEYD==NULL) {
-                __tmp__WEYD=NULL;
+              if (__tmp__CIYD==NULL) {
+                __tmp__EIYD=NULL;
               } else {
-                switch (((struct ___OBJ *)__tmp__UEYD)->__id) {
+                switch (((struct ___OBJ *)__tmp__CIYD)->__id) {
                 case __ITM_TYPE_PARAMETER__: {
-                  __tmp__WEYD=((void *)__tmp__UEYD);
+                  __tmp__EIYD=((void *)__tmp__CIYD);
                 } break;
                 case __ITM_TYPE_SIMPLE__: {
-                  __tmp__WEYD=((void *)__tmp__UEYD);
+                  __tmp__EIYD=((void *)__tmp__CIYD);
                 } break;
                 case __ITM_TYPE_MULTI__: {
-                  __tmp__WEYD=NULL;
+                  __tmp__EIYD=NULL;
                 } break;
                 case __ITM_TYPE_BLOCK__: {
-                  __tmp__WEYD=NULL;
+                  __tmp__EIYD=NULL;
                 } break;
                 case __ITM_TYPE_GENERIC__: {
-                  __tmp__WEYD=((void *)__tmp__UEYD);
+                  __tmp__EIYD=((void *)__tmp__CIYD);
                 } break;
                 case __ITM_TYPE_STYLE__: {
-                  __tmp__WEYD=((void *)__tmp__UEYD);
+                  __tmp__EIYD=((void *)__tmp__CIYD);
                 } break;
                 }
               };
-              ts__TEYD=__tmp__WEYD;
-              if (((void *)__tmp__WEYD == (void *)NULL)) {
-                __tmp__AFYD=TRUE__;
+              ts__BIYD=__tmp__EIYD;
+              if (((void *)__tmp__EIYD == (void *)NULL)) {
+                __tmp__OIYD=TRUE__;
               } else {
-                switch (((struct ___OBJ *)__tmp__WEYD)->__id) {
+                switch (((struct ___OBJ *)__tmp__EIYD)->__id) {
                 case __ITM_TYPE_PARAMETER__: {
-                  __tmp__2EYD=NULL;
+                  __tmp__KIYD=NULL;
                 } break;
                 case __ITM_TYPE_SIMPLE__: {
-                  __tmp__2EYD=NULL;
+                  __tmp__KIYD=NULL;
                 } break;
                 case __ITM_TYPE_GENERIC__: {
-                  __tmp__2EYD=((__ITM_TYPE_GENERIC *)__tmp__WEYD)->parent_itm_type_style__GPN.style__XVP;
+                  __tmp__KIYD=((__ITM_TYPE_GENERIC *)__tmp__EIYD)->parent_itm_type_style__SSN.style__DZP;
                 } break;
                 case __ITM_TYPE_STYLE__: {
-                  __tmp__2EYD=((__ITM_TYPE_STYLE *)__tmp__WEYD)->style__XVP;
+                  __tmp__KIYD=((__ITM_TYPE_STYLE *)__tmp__EIYD)->style__DZP;
                 } break;
                 };
-                __tmp__AFYD=((void *)__tmp__2EYD != (void *)(&__string_9));
+                __tmp__OIYD=((void *)__tmp__KIYD != (void *)(&__string_9));
               };
-              __tmp__DFYD=__tmp__AFYD;
+              __tmp__RIYD=__tmp__OIYD;
             };
-            if (__tmp__DFYD) {
-              if (((struct ___OBJ *)s__NCYD)->__id==__ITM_SLOT__) {
-                __tmp__JFYD=((__ITM_SLOT *)s__NCYD)->parent_named__15.name__LI;
+            if (__tmp__RIYD) {
+              if (((struct ___OBJ *)s__1FYD)->__id==__ITM_SLOT__) {
+                __tmp__XIYD=((__ITM_SLOT *)s__1FYD)->parent_named__15.name__LI;
               } else {
-                __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);
+                __tmp__XIYD=((__ITM_SLOT_OPERATOR *)s__1FYD)->parent_itm_slot__NW5B.parent_named__15.name__LI;
+              };
+              Self__V5KH=((__STRING_CONSTANT *)__tmp__XIYD);
+              result__S5KH=FALSE__;
+              i__T5KH= 0;
+              if ((((__STRING_CONSTANT *)(&__string_176))->count__DD <= Self__V5KH->count__DD)) {
+                i__T5KH=((__STRING_CONSTANT *)(&__string_176))->count__DD;
+                while ((! ((i__T5KH ==  0) || (((__CHARACTER *)Self__V5KH->storage__FRO)[(__INTEGER)(i__T5KH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_176))->storage__FRO)[(__INTEGER)(i__T5KH -  1)])))) {
+                  i__T5KH=(__INTEGER)(i__T5KH -  1);
                 };
-                result__TXKH=(i__UXKH ==  0);
+                result__S5KH=(i__T5KH ==  0);
               };
-              __tmp__XFYD=(! result__TXKH);
+              __tmp__FJYD=(! result__S5KH);
             } else {
-              __tmp__XFYD=FALSE__;
+              __tmp__FJYD=FALSE__;
             };
-            if (__tmp__XFYD) {
-              if (((struct ___OBJ *)s__NCYD)->__id==__ITM_SLOT__) {
-                __tmp__SFYD=((__ITM_SLOT *)s__NCYD)->parent_named__15.name__LI;
+            if (__tmp__FJYD) {
+              if (((struct ___OBJ *)s__1FYD)->__id==__ITM_SLOT__) {
+                __tmp__AJYD=((__ITM_SLOT *)s__1FYD)->parent_named__15.name__LI;
               } else {
-                __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);
+                __tmp__AJYD=((__ITM_SLOT_OPERATOR *)s__1FYD)->parent_itm_slot__NW5B.parent_named__15.name__LI;
+              };
+              Self__05KH=((__STRING_CONSTANT *)__tmp__AJYD);
+              result__X5KH=FALSE__;
+              i__Y5KH= 0;
+              if ((((__STRING_CONSTANT *)(&__string_177))->count__DD <= Self__05KH->count__DD)) {
+                i__Y5KH=((__STRING_CONSTANT *)(&__string_177))->count__DD;
+                while ((! ((i__Y5KH ==  0) || (((__CHARACTER *)Self__05KH->storage__FRO)[(__INTEGER)(i__Y5KH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_177))->storage__FRO)[(__INTEGER)(i__Y5KH -  1)])))) {
+                  i__Y5KH=(__INTEGER)(i__Y5KH -  1);
                 };
-                result__YXKH=(i__ZXKH ==  0);
+                result__X5KH=(i__Y5KH ==  0);
               };
-              __tmp__YFYD=(! result__YXKH);
+              __tmp__GJYD=(! result__X5KH);
             } else {
-              __tmp__YFYD=FALSE__;
+              __tmp__GJYD=FALSE__;
             };
-            __tmp__1FYD=__tmp__YFYD;
+            __tmp__JJYD=__tmp__GJYD;
           } else {
-            __tmp__1FYD=FALSE__;
+            __tmp__JJYD=FALSE__;
           };
-          if (__tmp__1FYD) {
-            put__to__like__C0XD((&__string_178),string_tmp__VH,(&__string_135));
+          if (__tmp__JJYD) {
+            put__to__like__Q3XD((&__string_178),string_tmp__VH,(&__string_135));
           };
-          ((__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;
+          ((__STRING *)string_tmp2__0BJ)->count__EGC= 0;
+          if (((struct ___OBJ *)s__1FYD)->__id==__ITM_SLOT__) {
+            __tmp__VJYD=((__ITM_SLOT *)s__1FYD)->parent_named__15.name__LI;
           } else {
-            __tmp__HGYD=((__ITM_SLOT_OPERATOR *)s__NCYD)->parent_itm_slot__BT5B.parent_named__15.name__LI;
+            __tmp__VJYD=((__ITM_SLOT_OPERATOR *)s__1FYD)->parent_itm_slot__NW5B.parent_named__15.name__LI;
           };
-          get_all_comment_slot__in__UF4E(Self__CITD,__tmp__HGYD,string_tmp2__O4I);
-          ((__STRING *)string_tmp3__0SD)->count__EGC= 0;
-          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));
+          get_all_comment_slot__in__QK4E(Self__QLTD,__tmp__VJYD,string_tmp2__0BJ);
+          ((__STRING *)string_tmp3__2TD)->count__EGC= 0;
+          shorter_comment__in__light__DO4E(string_tmp2__0BJ,string_tmp3__2TD,TRUE__);
+          put__to__like__Q3XD(string_tmp3__2TD,string_tmp__VH,(&__string_144));
+          put__to__like__Q3XD(string_tmp__VH,output_code__SI,(&__string_142));
         };
-        Self__NC5D=(__INTEGER)(Self__NC5D +  1);
+        Self__1F5D=(__INTEGER)(Self__1F5D +  1);
       };
-      if ((! is_first_cur__MCYD)) {
-        put__to__like__C0XD(NULL,output_code__SI,(&__string_145));
+      if ((! is_first_cur__0FYD)) {
+        put__to__like__Q3XD(NULL,output_code__SI,(&__string_145));
       };
-      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;
+      s__UKYD=NULL;
+      is_first_cur__TKYD=TRUE__;
+      __tmp__YKYD=((__FAST_ARRAYoITM_SLOTo *)list_tmp__RMTD)->parent_arrayed_collection__QMTD.upper__NNTD;
+      Self__NG5D= 0;
+      while ((Self__NG5D <= __tmp__YKYD)) {
+        s__UKYD=((void **)((__FAST_ARRAYoITM_SLOTo *)list_tmp__RMTD)->parent_arrayed_collection__QMTD.storage__1OWE)[Self__NG5D];
+        if (((struct ___OBJ *)s__UKYD)->__id==__ITM_SLOT__) {
+          __tmp__ENTD=((__ITM_SLOT *)s__UKYD)->parent_named__15.name__LI;
         } else {
-          __tmp__WJTD=((__ITM_SLOT_OPERATOR *)s__GHYD)->parent_itm_slot__BT5B.parent_named__15.name__LI;
+          __tmp__ENTD=((__ITM_SLOT_OPERATOR *)s__UKYD)->parent_itm_slot__NW5B.parent_named__15.name__LI;
         };
-        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);
+        Self__55KH=((__STRING_CONSTANT *)__tmp__ENTD);
+        result__25KH=FALSE__;
+        i__35KH= 0;
+        if ((((__STRING_CONSTANT *)(&__string_179))->count__DD <= Self__55KH->count__DD)) {
+          i__35KH=((__STRING_CONSTANT *)(&__string_179))->count__DD;
+          while ((! ((i__35KH ==  0) || (((__CHARACTER *)Self__55KH->storage__FRO)[(__INTEGER)(i__35KH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_179))->storage__FRO)[(__INTEGER)(i__35KH -  1)])))) {
+            i__35KH=(__INTEGER)(i__35KH -  1);
           };
-          result__3XKH=(i__4XKH ==  0);
+          result__25KH=(i__35KH ==  0);
         };
-        if (result__3XKH) {
-          if (((struct ___OBJ *)s__GHYD)->__id==__ITM_SLOT__) {
-            __tmp__XHYD=((__ITM_SLOT *)s__GHYD)->stat_shorter__JKTD;
+        if (result__25KH) {
+          if (((struct ___OBJ *)s__UKYD)->__id==__ITM_SLOT__) {
+            __tmp__FLYD=((__ITM_SLOT *)s__UKYD)->stat_shorter__XNTD;
           } else {
-            __tmp__XHYD=((__ITM_SLOT_OPERATOR *)s__GHYD)->parent_itm_slot__BT5B.stat_shorter__JKTD;
+            __tmp__FLYD=((__ITM_SLOT_OPERATOR *)s__UKYD)->parent_itm_slot__NW5B.stat_shorter__XNTD;
           };
-          __tmp__0HYD=(__tmp__XHYD ==  0);
+          __tmp__ILYD=(__tmp__FLYD ==  0);
         } else {
-          __tmp__0HYD=FALSE__;
+          __tmp__ILYD=FALSE__;
         };
-        if (__tmp__0HYD) {
-          if (is_first_cur__FHYD) {
+        if (__tmp__ILYD) {
+          if (is_first_cur__TKYD) {
             if (((void *)(&__string_180) == (void *)NULL)) {
-              put__to__like__C0XD((&__string_175),output_code__SI,(&__string_141));
+              put__to__like__Q3XD((&__string_175),output_code__SI,(&__string_141));
             } else {
-              put__to__like__C0XD((&__string_180),output_code__SI,(&__string_141));
+              put__to__like__Q3XD((&__string_180),output_code__SI,(&__string_141));
             };
-            is_first_cur__FHYD=FALSE__;
+            is_first_cur__TKYD=FALSE__;
           };
-          if (((struct ___OBJ *)s__GHYD)->__id==__ITM_SLOT__) {
-            ((__ITM_SLOT *)s__GHYD)->stat_shorter__JKTD= 1;
+          if (((struct ___OBJ *)s__UKYD)->__id==__ITM_SLOT__) {
+            ((__ITM_SLOT *)s__UKYD)->stat_shorter__XNTD= 1;
           } else {
-            ((__ITM_SLOT_OPERATOR *)s__GHYD)->parent_itm_slot__BT5B.stat_shorter__JKTD= 1;
+            ((__ITM_SLOT_OPERATOR *)s__UKYD)->parent_itm_slot__NW5B.stat_shorter__XNTD= 1;
           };
           ((__STRING *)string_tmp__VH)->count__EGC= 0;
-          ((__STRING *)string_tmp2__O4I)->count__EGC= 0;
-          if (((struct ___OBJ *)s__GHYD)->__id==__ITM_SLOT__) {
-            pretty_name_in__ER4F(s__GHYD,string_tmp2__O4I);
+          ((__STRING *)string_tmp2__0BJ)->count__EGC= 0;
+          if (((struct ___OBJ *)s__UKYD)->__id==__ITM_SLOT__) {
+            pretty_name_in__LW4F(s__UKYD,string_tmp2__0BJ);
           } else {
-            pretty_name_in__ZS4F(s__GHYD,string_tmp2__O4I);
+            pretty_name_in__AY4F(s__UKYD,string_tmp2__0BJ);
           };
-          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;
+          put__to__like__Q3XD(string_tmp2__0BJ,string_tmp__VH,(&__string_143));
+          if (((struct ___OBJ *)s__UKYD)->__id==__ITM_SLOT__) {
+            __tmp__NMYD=((__ITM_SLOT *)s__UKYD)->id_section__F3C;
           } else {
-            __tmp__5IYD=((__ITM_SLOT_OPERATOR *)s__GHYD)->parent_itm_slot__BT5B.id_section__F2C;
+            __tmp__NMYD=((__ITM_SLOT_OPERATOR *)s__UKYD)->parent_itm_slot__NW5B.id_section__F3C;
           };
-          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;
+          Self__TJ2G=((__SECTION_ *)__tmp__NMYD);
+          if ((((void *)Self__TJ2G->name__11DC == (void *)(&__string_23)) || ((void *)Self__TJ2G->name__11DC == (void *)(&__string_24)))) {
+            if (((struct ___OBJ *)s__UKYD)->__id==__ITM_SLOT__) {
+              __tmp__UMYD=((__ITM_SLOT *)s__UKYD)->parent_named__15.style__OGU;
             } else {
-              __tmp__GJYD=((__ITM_SLOT_OPERATOR *)s__GHYD)->parent_itm_slot__BT5B.parent_named__15.style__FBU;
+              __tmp__UMYD=((__ITM_SLOT_OPERATOR *)s__UKYD)->parent_itm_slot__NW5B.parent_named__15.style__OGU;
             };
-            if ((__tmp__GJYD != '+')) {
-              __tmp__2JYD=TRUE__;
+            if ((__tmp__UMYD != '+')) {
+              __tmp__KNYD=TRUE__;
             } else {
-              if (((struct ___OBJ *)s__GHYD)->__id==__ITM_SLOT__) {
-                __tmp__NJYD=((__ITM_SLOT *)s__GHYD)->result_type__B4FC;
+              if (((struct ___OBJ *)s__UKYD)->__id==__ITM_SLOT__) {
+                __tmp__1MYD=((__ITM_SLOT *)s__UKYD)->result_type__PBGC;
               } else {
-                __tmp__NJYD=((__ITM_SLOT_OPERATOR *)s__GHYD)->parent_itm_slot__BT5B.result_type__B4FC;
+                __tmp__1MYD=((__ITM_SLOT_OPERATOR *)s__UKYD)->parent_itm_slot__NW5B.result_type__PBGC;
               };
-              if (__tmp__NJYD==NULL) {
-                __tmp__PJYD=NULL;
+              if (__tmp__1MYD==NULL) {
+                __tmp__3MYD=NULL;
               } else {
-                switch (((struct ___OBJ *)__tmp__NJYD)->__id) {
+                switch (((struct ___OBJ *)__tmp__1MYD)->__id) {
                 case __ITM_TYPE_PARAMETER__: {
-                  __tmp__PJYD=((void *)__tmp__NJYD);
+                  __tmp__3MYD=((void *)__tmp__1MYD);
                 } break;
                 case __ITM_TYPE_SIMPLE__: {
-                  __tmp__PJYD=((void *)__tmp__NJYD);
+                  __tmp__3MYD=((void *)__tmp__1MYD);
                 } break;
                 case __ITM_TYPE_MULTI__: {
-                  __tmp__PJYD=NULL;
+                  __tmp__3MYD=NULL;
                 } break;
                 case __ITM_TYPE_BLOCK__: {
-                  __tmp__PJYD=NULL;
+                  __tmp__3MYD=NULL;
                 } break;
                 case __ITM_TYPE_GENERIC__: {
-                  __tmp__PJYD=((void *)__tmp__NJYD);
+                  __tmp__3MYD=((void *)__tmp__1MYD);
                 } break;
                 case __ITM_TYPE_STYLE__: {
-                  __tmp__PJYD=((void *)__tmp__NJYD);
+                  __tmp__3MYD=((void *)__tmp__1MYD);
                 } break;
                 }
               };
-              ts__MJYD=__tmp__PJYD;
-              if (((void *)__tmp__PJYD == (void *)NULL)) {
-                __tmp__ZJYD=TRUE__;
+              ts__0MYD=__tmp__3MYD;
+              if (((void *)__tmp__3MYD == (void *)NULL)) {
+                __tmp__HNYD=TRUE__;
               } else {
-                switch (((struct ___OBJ *)__tmp__PJYD)->__id) {
+                switch (((struct ___OBJ *)__tmp__3MYD)->__id) {
                 case __ITM_TYPE_PARAMETER__: {
-                  __tmp__VJYD=NULL;
+                  __tmp__DNYD=NULL;
                 } break;
                 case __ITM_TYPE_SIMPLE__: {
-                  __tmp__VJYD=NULL;
+                  __tmp__DNYD=NULL;
                 } break;
                 case __ITM_TYPE_GENERIC__: {
-                  __tmp__VJYD=((__ITM_TYPE_GENERIC *)__tmp__PJYD)->parent_itm_type_style__GPN.style__XVP;
+                  __tmp__DNYD=((__ITM_TYPE_GENERIC *)__tmp__3MYD)->parent_itm_type_style__SSN.style__DZP;
                 } break;
                 case __ITM_TYPE_STYLE__: {
-                  __tmp__VJYD=((__ITM_TYPE_STYLE *)__tmp__PJYD)->style__XVP;
+                  __tmp__DNYD=((__ITM_TYPE_STYLE *)__tmp__3MYD)->style__DZP;
                 } break;
                 };
-                __tmp__ZJYD=((void *)__tmp__VJYD != (void *)(&__string_9));
+                __tmp__HNYD=((void *)__tmp__DNYD != (void *)(&__string_9));
               };
-              __tmp__2JYD=__tmp__ZJYD;
+              __tmp__KNYD=__tmp__HNYD;
             };
-            if (__tmp__2JYD) {
-              if (((struct ___OBJ *)s__GHYD)->__id==__ITM_SLOT__) {
-                __tmp__CKYD=((__ITM_SLOT *)s__GHYD)->parent_named__15.name__LI;
+            if (__tmp__KNYD) {
+              if (((struct ___OBJ *)s__UKYD)->__id==__ITM_SLOT__) {
+                __tmp__QNYD=((__ITM_SLOT *)s__UKYD)->parent_named__15.name__LI;
               } else {
-                __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);
+                __tmp__QNYD=((__ITM_SLOT_OPERATOR *)s__UKYD)->parent_itm_slot__NW5B.parent_named__15.name__LI;
+              };
+              Self__EALH=((__STRING_CONSTANT *)__tmp__QNYD);
+              result__BALH=FALSE__;
+              i__CALH= 0;
+              if ((((__STRING_CONSTANT *)(&__string_176))->count__DD <= Self__EALH->count__DD)) {
+                i__CALH=((__STRING_CONSTANT *)(&__string_176))->count__DD;
+                while ((! ((i__CALH ==  0) || (((__CHARACTER *)Self__EALH->storage__FRO)[(__INTEGER)(i__CALH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_176))->storage__FRO)[(__INTEGER)(i__CALH -  1)])))) {
+                  i__CALH=(__INTEGER)(i__CALH -  1);
                 };
-                result__CYKH=(i__DYKH ==  0);
+                result__BALH=(i__CALH ==  0);
               };
-              __tmp__QKYD=(! result__CYKH);
+              __tmp__4NYD=(! result__BALH);
             } else {
-              __tmp__QKYD=FALSE__;
+              __tmp__4NYD=FALSE__;
             };
-            if (__tmp__QKYD) {
-              if (((struct ___OBJ *)s__GHYD)->__id==__ITM_SLOT__) {
-                __tmp__LKYD=((__ITM_SLOT *)s__GHYD)->parent_named__15.name__LI;
+            if (__tmp__4NYD) {
+              if (((struct ___OBJ *)s__UKYD)->__id==__ITM_SLOT__) {
+                __tmp__ZNYD=((__ITM_SLOT *)s__UKYD)->parent_named__15.name__LI;
               } else {
-                __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);
+                __tmp__ZNYD=((__ITM_SLOT_OPERATOR *)s__UKYD)->parent_itm_slot__NW5B.parent_named__15.name__LI;
+              };
+              Self__JALH=((__STRING_CONSTANT *)__tmp__ZNYD);
+              result__GALH=FALSE__;
+              i__HALH= 0;
+              if ((((__STRING_CONSTANT *)(&__string_177))->count__DD <= Self__JALH->count__DD)) {
+                i__HALH=((__STRING_CONSTANT *)(&__string_177))->count__DD;
+                while ((! ((i__HALH ==  0) || (((__CHARACTER *)Self__JALH->storage__FRO)[(__INTEGER)(i__HALH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_177))->storage__FRO)[(__INTEGER)(i__HALH -  1)])))) {
+                  i__HALH=(__INTEGER)(i__HALH -  1);
                 };
-                result__HYKH=(i__IYKH ==  0);
+                result__GALH=(i__HALH ==  0);
               };
-              __tmp__RKYD=(! result__HYKH);
+              __tmp__5NYD=(! result__GALH);
             } else {
-              __tmp__RKYD=FALSE__;
+              __tmp__5NYD=FALSE__;
             };
-            __tmp__UKYD=__tmp__RKYD;
+            __tmp__COYD=__tmp__5NYD;
           } else {
-            __tmp__UKYD=FALSE__;
+            __tmp__COYD=FALSE__;
           };
-          if (__tmp__UKYD) {
-            put__to__like__C0XD((&__string_178),string_tmp__VH,(&__string_135));
+          if (__tmp__COYD) {
+            put__to__like__Q3XD((&__string_178),string_tmp__VH,(&__string_135));
           };
-          ((__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;
+          ((__STRING *)string_tmp2__0BJ)->count__EGC= 0;
+          if (((struct ___OBJ *)s__UKYD)->__id==__ITM_SLOT__) {
+            __tmp__OOYD=((__ITM_SLOT *)s__UKYD)->parent_named__15.name__LI;
           } else {
-            __tmp__ALYD=((__ITM_SLOT_OPERATOR *)s__GHYD)->parent_itm_slot__BT5B.parent_named__15.name__LI;
+            __tmp__OOYD=((__ITM_SLOT_OPERATOR *)s__UKYD)->parent_itm_slot__NW5B.parent_named__15.name__LI;
           };
-          get_all_comment_slot__in__UF4E(Self__CITD,__tmp__ALYD,string_tmp2__O4I);
-          ((__STRING *)string_tmp3__0SD)->count__EGC= 0;
-          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));
+          get_all_comment_slot__in__QK4E(Self__QLTD,__tmp__OOYD,string_tmp2__0BJ);
+          ((__STRING *)string_tmp3__2TD)->count__EGC= 0;
+          shorter_comment__in__light__DO4E(string_tmp2__0BJ,string_tmp3__2TD,TRUE__);
+          put__to__like__Q3XD(string_tmp3__2TD,string_tmp__VH,(&__string_144));
+          put__to__like__Q3XD(string_tmp__VH,output_code__SI,(&__string_142));
         };
-        Self__5C5D=(__INTEGER)(Self__5C5D +  1);
+        Self__NG5D=(__INTEGER)(Self__NG5D +  1);
       };
-      if ((! is_first_cur__FHYD)) {
-        put__to__like__C0XD(NULL,output_code__SI,(&__string_145));
+      if ((! is_first_cur__TKYD)) {
+        put__to__like__Q3XD(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;
+      __tmp__PNTD=((__FAST_ARRAYoITM_SLOTo *)list_tmp__RMTD)->parent_arrayed_collection__QMTD.upper__NNTD;
+      Self__IPYD= 0;
+      while ((Self__IPYD <= __tmp__PNTD)) {
+        s__TLTD=((void **)((__FAST_ARRAYoITM_SLOTo *)list_tmp__RMTD)->parent_arrayed_collection__QMTD.storage__1OWE)[Self__IPYD];
+        if (((struct ___OBJ *)s__TLTD)->__id==__ITM_SLOT__) {
+          __tmp__YNTD=((__ITM_SLOT *)s__TLTD)->stat_shorter__XNTD;
         } else {
-          __tmp__KKTD=((__ITM_SLOT_OPERATOR *)s__FITD)->parent_itm_slot__BT5B.stat_shorter__JKTD;
+          __tmp__YNTD=((__ITM_SLOT_OPERATOR *)s__TLTD)->parent_itm_slot__NW5B.stat_shorter__XNTD;
         };
-        if ((__tmp__KKTD ==  0)) {
-          if (((struct ___OBJ *)s__FITD)->__id==__ITM_SLOT__) {
-            __tmp__QKTD=((__ITM_SLOT *)s__FITD)->comment_chapter__T0HC;
+        if ((__tmp__YNTD ==  0)) {
+          if (((struct ___OBJ *)s__TLTD)->__id==__ITM_SLOT__) {
+            __tmp__4NTD=((__ITM_SLOT *)s__TLTD)->comment_chapter__B4HC;
           } else {
-            __tmp__QKTD=((__ITM_SLOT_OPERATOR *)s__FITD)->parent_itm_slot__BT5B.comment_chapter__T0HC;
+            __tmp__4NTD=((__ITM_SLOT_OPERATOR *)s__TLTD)->parent_itm_slot__NW5B.comment_chapter__B4HC;
           };
-          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;
+          title__SLTD=__tmp__4NTD;
+          t__ABRE=__tmp__4NTD;
+          s__DBRE=NULL;
+          is_first_cur__CBRE=TRUE__;
+          __tmp__HBRE=((__FAST_ARRAYoITM_SLOTo *)list_tmp__RMTD)->parent_arrayed_collection__QMTD.upper__NNTD;
+          Self__RJSE= 0;
+          while ((Self__RJSE <= __tmp__HBRE)) {
+            s__DBRE=((void **)((__FAST_ARRAYoITM_SLOTo *)list_tmp__RMTD)->parent_arrayed_collection__QMTD.storage__1OWE)[Self__RJSE];
+            if (((struct ___OBJ *)s__DBRE)->__id==__ITM_SLOT__) {
+              __tmp__FOTD=((__ITM_SLOT *)s__DBRE)->comment_chapter__B4HC;
             } else {
-              __tmp__XKTD=((__ITM_SLOT_OPERATOR *)s__Q2QE)->parent_itm_slot__BT5B.comment_chapter__T0HC;
+              __tmp__FOTD=((__ITM_SLOT_OPERATOR *)s__DBRE)->parent_itm_slot__NW5B.comment_chapter__B4HC;
             };
-            if (((void *)__tmp__XKTD == (void *)title__EITD)) {
-              if (((struct ___OBJ *)s__Q2QE)->__id==__ITM_SLOT__) {
-                __tmp__B3QE=((__ITM_SLOT *)s__Q2QE)->stat_shorter__JKTD;
+            if (((void *)__tmp__FOTD == (void *)title__SLTD)) {
+              if (((struct ___OBJ *)s__DBRE)->__id==__ITM_SLOT__) {
+                __tmp__UBRE=((__ITM_SLOT *)s__DBRE)->stat_shorter__XNTD;
               } else {
-                __tmp__B3QE=((__ITM_SLOT_OPERATOR *)s__Q2QE)->parent_itm_slot__BT5B.stat_shorter__JKTD;
+                __tmp__UBRE=((__ITM_SLOT_OPERATOR *)s__DBRE)->parent_itm_slot__NW5B.stat_shorter__XNTD;
               };
-              __tmp__E3QE=(__tmp__B3QE ==  0);
+              __tmp__XBRE=(__tmp__UBRE ==  0);
             } else {
-              __tmp__E3QE=FALSE__;
+              __tmp__XBRE=FALSE__;
             };
-            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));
+            if (__tmp__XBRE) {
+              if (is_first_cur__CBRE) {
+                if (((void *)t__ABRE == (void *)NULL)) {
+                  put__to__like__Q3XD((&__string_175),output_code__SI,(&__string_141));
                 } else {
-                  put__to__like__C0XD(t__N2QE,output_code__SI,(&__string_141));
+                  put__to__like__Q3XD(t__ABRE,output_code__SI,(&__string_141));
                 };
-                is_first_cur__P2QE=FALSE__;
+                is_first_cur__CBRE=FALSE__;
               };
-              if (((struct ___OBJ *)s__Q2QE)->__id==__ITM_SLOT__) {
-                ((__ITM_SLOT *)s__Q2QE)->stat_shorter__JKTD= 1;
+              if (((struct ___OBJ *)s__DBRE)->__id==__ITM_SLOT__) {
+                ((__ITM_SLOT *)s__DBRE)->stat_shorter__XNTD= 1;
               } else {
-                ((__ITM_SLOT_OPERATOR *)s__Q2QE)->parent_itm_slot__BT5B.stat_shorter__JKTD= 1;
+                ((__ITM_SLOT_OPERATOR *)s__DBRE)->parent_itm_slot__NW5B.stat_shorter__XNTD= 1;
               };
               ((__STRING *)string_tmp__VH)->count__EGC= 0;
-              ((__STRING *)string_tmp2__O4I)->count__EGC= 0;
-              if (((struct ___OBJ *)s__Q2QE)->__id==__ITM_SLOT__) {
-                pretty_name_in__ER4F(s__Q2QE,string_tmp2__O4I);
+              ((__STRING *)string_tmp2__0BJ)->count__EGC= 0;
+              if (((struct ___OBJ *)s__DBRE)->__id==__ITM_SLOT__) {
+                pretty_name_in__LW4F(s__DBRE,string_tmp2__0BJ);
               } else {
-                pretty_name_in__ZS4F(s__Q2QE,string_tmp2__O4I);
+                pretty_name_in__AY4F(s__DBRE,string_tmp2__0BJ);
               };
-              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;
+              put__to__like__Q3XD(string_tmp2__0BJ,string_tmp__VH,(&__string_143));
+              if (((struct ___OBJ *)s__DBRE)->__id==__ITM_SLOT__) {
+                __tmp__2CRE=((__ITM_SLOT *)s__DBRE)->id_section__F3C;
               } else {
-                __tmp__J4QE=((__ITM_SLOT_OPERATOR *)s__Q2QE)->parent_itm_slot__BT5B.id_section__F2C;
+                __tmp__2CRE=((__ITM_SLOT_OPERATOR *)s__DBRE)->parent_itm_slot__NW5B.id_section__F3C;
               };
-              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;
+              Self__UJ2G=((__SECTION_ *)__tmp__2CRE);
+              if ((((void *)Self__UJ2G->name__11DC == (void *)(&__string_23)) || ((void *)Self__UJ2G->name__11DC == (void *)(&__string_24)))) {
+                if (((struct ___OBJ *)s__DBRE)->__id==__ITM_SLOT__) {
+                  __tmp__DDRE=((__ITM_SLOT *)s__DBRE)->parent_named__15.style__OGU;
                 } else {
-                  __tmp__Q4QE=((__ITM_SLOT_OPERATOR *)s__Q2QE)->parent_itm_slot__BT5B.parent_named__15.style__FBU;
+                  __tmp__DDRE=((__ITM_SLOT_OPERATOR *)s__DBRE)->parent_itm_slot__NW5B.parent_named__15.style__OGU;
                 };
-                if ((__tmp__Q4QE != '+')) {
-                  __tmp__G5QE=TRUE__;
+                if ((__tmp__DDRE != '+')) {
+                  __tmp__ZDRE=TRUE__;
                 } else {
-                  if (((struct ___OBJ *)s__Q2QE)->__id==__ITM_SLOT__) {
-                    __tmp__X4QE=((__ITM_SLOT *)s__Q2QE)->result_type__B4FC;
+                  if (((struct ___OBJ *)s__DBRE)->__id==__ITM_SLOT__) {
+                    __tmp__KDRE=((__ITM_SLOT *)s__DBRE)->result_type__PBGC;
                   } else {
-                    __tmp__X4QE=((__ITM_SLOT_OPERATOR *)s__Q2QE)->parent_itm_slot__BT5B.result_type__B4FC;
+                    __tmp__KDRE=((__ITM_SLOT_OPERATOR *)s__DBRE)->parent_itm_slot__NW5B.result_type__PBGC;
                   };
-                  if (__tmp__X4QE==NULL) {
-                    __tmp__Z4QE=NULL;
+                  if (__tmp__KDRE==NULL) {
+                    __tmp__MDRE=NULL;
                   } else {
-                    switch (((struct ___OBJ *)__tmp__X4QE)->__id) {
+                    switch (((struct ___OBJ *)__tmp__KDRE)->__id) {
                     case __ITM_TYPE_PARAMETER__: {
-                      __tmp__Z4QE=((void *)__tmp__X4QE);
+                      __tmp__MDRE=((void *)__tmp__KDRE);
                     } break;
                     case __ITM_TYPE_SIMPLE__: {
-                      __tmp__Z4QE=((void *)__tmp__X4QE);
+                      __tmp__MDRE=((void *)__tmp__KDRE);
                     } break;
                     case __ITM_TYPE_MULTI__: {
-                      __tmp__Z4QE=NULL;
+                      __tmp__MDRE=NULL;
                     } break;
                     case __ITM_TYPE_BLOCK__: {
-                      __tmp__Z4QE=NULL;
+                      __tmp__MDRE=NULL;
                     } break;
                     case __ITM_TYPE_GENERIC__: {
-                      __tmp__Z4QE=((void *)__tmp__X4QE);
+                      __tmp__MDRE=((void *)__tmp__KDRE);
                     } break;
                     case __ITM_TYPE_STYLE__: {
-                      __tmp__Z4QE=((void *)__tmp__X4QE);
+                      __tmp__MDRE=((void *)__tmp__KDRE);
                     } break;
                     }
                   };
-                  ts__W4QE=__tmp__Z4QE;
-                  if (((void *)__tmp__Z4QE == (void *)NULL)) {
-                    __tmp__D5QE=TRUE__;
+                  ts__JDRE=__tmp__MDRE;
+                  if (((void *)__tmp__MDRE == (void *)NULL)) {
+                    __tmp__WDRE=TRUE__;
                   } else {
-                    switch (((struct ___OBJ *)__tmp__Z4QE)->__id) {
+                    switch (((struct ___OBJ *)__tmp__MDRE)->__id) {
                     case __ITM_TYPE_PARAMETER__: {
-                      __tmp__54QE=NULL;
+                      __tmp__SDRE=NULL;
                     } break;
                     case __ITM_TYPE_SIMPLE__: {
-                      __tmp__54QE=NULL;
+                      __tmp__SDRE=NULL;
                     } break;
                     case __ITM_TYPE_GENERIC__: {
-                      __tmp__54QE=((__ITM_TYPE_GENERIC *)__tmp__Z4QE)->parent_itm_type_style__GPN.style__XVP;
+                      __tmp__SDRE=((__ITM_TYPE_GENERIC *)__tmp__MDRE)->parent_itm_type_style__SSN.style__DZP;
                     } break;
                     case __ITM_TYPE_STYLE__: {
-                      __tmp__54QE=((__ITM_TYPE_STYLE *)__tmp__Z4QE)->style__XVP;
+                      __tmp__SDRE=((__ITM_TYPE_STYLE *)__tmp__MDRE)->style__DZP;
                     } break;
                     };
-                    __tmp__D5QE=((void *)__tmp__54QE != (void *)(&__string_9));
+                    __tmp__WDRE=((void *)__tmp__SDRE != (void *)(&__string_9));
                   };
-                  __tmp__G5QE=__tmp__D5QE;
+                  __tmp__ZDRE=__tmp__WDRE;
                 };
-                if (__tmp__G5QE) {
-                  if (((struct ___OBJ *)s__Q2QE)->__id==__ITM_SLOT__) {
-                    __tmp__M5QE=((__ITM_SLOT *)s__Q2QE)->parent_named__15.name__LI;
+                if (__tmp__ZDRE) {
+                  if (((struct ___OBJ *)s__DBRE)->__id==__ITM_SLOT__) {
+                    __tmp__5DRE=((__ITM_SLOT *)s__DBRE)->parent_named__15.name__LI;
                   } else {
-                    __tmp__M5QE=((__ITM_SLOT_OPERATOR *)s__Q2QE)->parent_itm_slot__BT5B.parent_named__15.name__LI;
+                    __tmp__5DRE=((__ITM_SLOT_OPERATOR *)s__DBRE)->parent_itm_slot__NW5B.parent_named__15.name__LI;
                   };
-                  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);
+                  Self__OALH=((__STRING_CONSTANT *)__tmp__5DRE);
+                  result__LALH=FALSE__;
+                  i__MALH= 0;
+                  if ((((__STRING_CONSTANT *)(&__string_176))->count__DD <= Self__OALH->count__DD)) {
+                    i__MALH=((__STRING_CONSTANT *)(&__string_176))->count__DD;
+                    while ((! ((i__MALH ==  0) || (((__CHARACTER *)Self__OALH->storage__FRO)[(__INTEGER)(i__MALH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_176))->storage__FRO)[(__INTEGER)(i__MALH -  1)])))) {
+                      i__MALH=(__INTEGER)(i__MALH -  1);
                     };
-                    result__MYKH=(i__NYKH ==  0);
+                    result__LALH=(i__MALH ==  0);
                   };
-                  __tmp__05QE=(! result__MYKH);
+                  __tmp__NERE=(! result__LALH);
                 } else {
-                  __tmp__05QE=FALSE__;
+                  __tmp__NERE=FALSE__;
                 };
-                if (__tmp__05QE) {
-                  if (((struct ___OBJ *)s__Q2QE)->__id==__ITM_SLOT__) {
-                    __tmp__V5QE=((__ITM_SLOT *)s__Q2QE)->parent_named__15.name__LI;
+                if (__tmp__NERE) {
+                  if (((struct ___OBJ *)s__DBRE)->__id==__ITM_SLOT__) {
+                    __tmp__IERE=((__ITM_SLOT *)s__DBRE)->parent_named__15.name__LI;
                   } else {
-                    __tmp__V5QE=((__ITM_SLOT_OPERATOR *)s__Q2QE)->parent_itm_slot__BT5B.parent_named__15.name__LI;
+                    __tmp__IERE=((__ITM_SLOT_OPERATOR *)s__DBRE)->parent_itm_slot__NW5B.parent_named__15.name__LI;
                   };
-                  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);
+                  Self__TALH=((__STRING_CONSTANT *)__tmp__IERE);
+                  result__QALH=FALSE__;
+                  i__RALH= 0;
+                  if ((((__STRING_CONSTANT *)(&__string_177))->count__DD <= Self__TALH->count__DD)) {
+                    i__RALH=((__STRING_CONSTANT *)(&__string_177))->count__DD;
+                    while ((! ((i__RALH ==  0) || (((__CHARACTER *)Self__TALH->storage__FRO)[(__INTEGER)(i__RALH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_177))->storage__FRO)[(__INTEGER)(i__RALH -  1)])))) {
+                      i__RALH=(__INTEGER)(i__RALH -  1);
                     };
-                    result__RYKH=(i__SYKH ==  0);
+                    result__QALH=(i__RALH ==  0);
                   };
-                  __tmp__15QE=(! result__RYKH);
+                  __tmp__OERE=(! result__QALH);
                 } else {
-                  __tmp__15QE=FALSE__;
+                  __tmp__OERE=FALSE__;
                 };
-                __tmp__45QE=__tmp__15QE;
+                __tmp__RERE=__tmp__OERE;
               } else {
-                __tmp__45QE=FALSE__;
+                __tmp__RERE=FALSE__;
               };
-              if (__tmp__45QE) {
-                put__to__like__C0XD((&__string_178),string_tmp__VH,(&__string_135));
+              if (__tmp__RERE) {
+                put__to__like__Q3XD((&__string_178),string_tmp__VH,(&__string_135));
               };
-              ((__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;
+              ((__STRING *)string_tmp2__0BJ)->count__EGC= 0;
+              if (((struct ___OBJ *)s__DBRE)->__id==__ITM_SLOT__) {
+                __tmp__3ERE=((__ITM_SLOT *)s__DBRE)->parent_named__15.name__LI;
               } else {
-                __tmp__KARE=((__ITM_SLOT_OPERATOR *)s__Q2QE)->parent_itm_slot__BT5B.parent_named__15.name__LI;
+                __tmp__3ERE=((__ITM_SLOT_OPERATOR *)s__DBRE)->parent_itm_slot__NW5B.parent_named__15.name__LI;
               };
-              get_all_comment_slot__in__UF4E(Self__CITD,__tmp__KARE,string_tmp2__O4I);
-              ((__STRING *)string_tmp3__0SD)->count__EGC= 0;
-              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));
+              get_all_comment_slot__in__QK4E(Self__QLTD,__tmp__3ERE,string_tmp2__0BJ);
+              ((__STRING *)string_tmp3__2TD)->count__EGC= 0;
+              shorter_comment__in__light__DO4E(string_tmp2__0BJ,string_tmp3__2TD,TRUE__);
+              put__to__like__Q3XD(string_tmp3__2TD,string_tmp__VH,(&__string_144));
+              put__to__like__Q3XD(string_tmp__VH,output_code__SI,(&__string_142));
             };
-            Self__3ESE=(__INTEGER)(Self__3ESE +  1);
+            Self__RJSE=(__INTEGER)(Self__RJSE +  1);
           };
-          if ((! is_first_cur__P2QE)) {
-            put__to__like__C0XD(NULL,output_code__SI,(&__string_145));
+          if ((! is_first_cur__CBRE)) {
+            put__to__like__Q3XD(NULL,output_code__SI,(&__string_145));
           };
         };
-        Self__0LYD=(__INTEGER)(Self__0LYD +  1);
+        Self__IPYD=(__INTEGER)(Self__IPYD +  1);
       };
-      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;
+      s__2PYD=NULL;
+      is_first__1PYD=TRUE__;
+      __tmp__AQYD=((__FAST_ARRAYoITM_SLOTo *)list_tmp__RMTD)->parent_arrayed_collection__QMTD.upper__NNTD;
+      Self__IH5D= 0;
+      while ((Self__IH5D <= __tmp__AQYD)) {
+        s__2PYD=((void **)((__FAST_ARRAYoITM_SLOTo *)list_tmp__RMTD)->parent_arrayed_collection__QMTD.storage__1OWE)[Self__IH5D];
+        if (((struct ___OBJ *)s__2PYD)->__id==__ITM_SLOT__) {
+          __tmp__ROTD=((__ITM_SLOT *)s__2PYD)->id_section__F3C;
         } else {
-          __tmp__DLTD=((__ITM_SLOT_OPERATOR *)s__OMYD)->parent_itm_slot__BT5B.id_section__F2C;
+          __tmp__ROTD=((__ITM_SLOT_OPERATOR *)s__2PYD)->parent_itm_slot__NW5B.id_section__F3C;
         };
-        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;
+        Self__VJ2G=((__SECTION_ *)__tmp__ROTD);
+        if ((((void *)Self__VJ2G->name__11DC == (void *)(&__string_23)) || ((void *)Self__VJ2G->name__11DC == (void *)(&__string_24)))) {
+          if (((struct ___OBJ *)s__2PYD)->__id==__ITM_SLOT__) {
+            __tmp__NQYD=((__ITM_SLOT *)s__2PYD)->stat_shorter__XNTD;
           } else {
-            __tmp__5MYD=((__ITM_SLOT_OPERATOR *)s__OMYD)->parent_itm_slot__BT5B.stat_shorter__JKTD;
+            __tmp__NQYD=((__ITM_SLOT_OPERATOR *)s__2PYD)->parent_itm_slot__NW5B.stat_shorter__XNTD;
           };
-          __tmp__CNYD=(__tmp__5MYD ==  1);
+          __tmp__QQYD=(__tmp__NQYD ==  1);
         } else {
-          __tmp__CNYD=FALSE__;
+          __tmp__QQYD=FALSE__;
         };
-        if (__tmp__CNYD) {
-          if (is_first__NMYD) {
+        if (__tmp__QQYD) {
+          if (is_first__1PYD) {
             if (((void *)(&__string_181) == (void *)NULL)) {
-              put__to__like__C0XD((&__string_182),output_code__SI,(&__string_146));
+              put__to__like__Q3XD((&__string_182),output_code__SI,(&__string_146));
             } else {
-              put__to__like__C0XD((&__string_181),output_code__SI,(&__string_146));
+              put__to__like__Q3XD((&__string_181),output_code__SI,(&__string_146));
             };
-            is_first__NMYD=FALSE__;
+            is_first__1PYD=FALSE__;
           };
-          if (((struct ___OBJ *)s__OMYD)->__id==__ITM_SLOT__) {
-            ((__ITM_SLOT *)s__OMYD)->stat_shorter__JKTD= 2;
+          if (((struct ___OBJ *)s__2PYD)->__id==__ITM_SLOT__) {
+            ((__ITM_SLOT *)s__2PYD)->stat_shorter__XNTD= 2;
           } else {
-            ((__ITM_SLOT_OPERATOR *)s__OMYD)->parent_itm_slot__BT5B.stat_shorter__JKTD= 2;
+            ((__ITM_SLOT_OPERATOR *)s__2PYD)->parent_itm_slot__NW5B.stat_shorter__XNTD= 2;
           };
-          ((__STRING *)string_tmp2__O4I)->count__EGC= 0;
-          if (((struct ___OBJ *)s__OMYD)->__id==__ITM_SLOT__) {
-            pretty_name_in__ER4F(s__OMYD,string_tmp2__O4I);
+          ((__STRING *)string_tmp2__0BJ)->count__EGC= 0;
+          if (((struct ___OBJ *)s__2PYD)->__id==__ITM_SLOT__) {
+            pretty_name_in__LW4F(s__2PYD,string_tmp2__0BJ);
           } else {
-            pretty_name_in__ZS4F(s__OMYD,string_tmp2__O4I);
+            pretty_name_in__AY4F(s__2PYD,string_tmp2__0BJ);
           };
-          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;
+          put__to__like__Q3XD(string_tmp2__0BJ,output_code__SI,(&__string_147));
+          if (((struct ___OBJ *)s__2PYD)->__id==__ITM_SLOT__) {
+            __tmp__URYD=((__ITM_SLOT *)s__2PYD)->parent_named__15.parent_itm_object__4.position__GFJ;
           } else {
-            __tmp__GOYD=((__ITM_SLOT_OPERATOR *)s__OMYD)->parent_itm_slot__BT5B.parent_named__15.parent_itm_object__4.position__0BJ;
+            __tmp__URYD=((__ITM_SLOT_OPERATOR *)s__2PYD)->parent_itm_slot__NW5B.parent_named__15.parent_itm_object__4.position__GFJ;
           };
-          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;
+          copy__JDS(string_tmp__VH,((__PROTOTYPE *)((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__XVT)[(__INTEGER)(((__INTEGER )((__UINTEGER_32 )__tmp__URYD)) &  511)])->filename__XRG);
+          append__ROS(string_tmp__VH,(&__string_183));
+          if (((struct ___OBJ *)s__2PYD)->__id==__ITM_SLOT__) {
+            __tmp__ZRYD=((__ITM_SLOT *)s__2PYD)->parent_named__15.parent_itm_object__4.position__GFJ;
           } else {
-            __tmp__LOYD=((__ITM_SLOT_OPERATOR *)s__OMYD)->parent_itm_slot__BT5B.parent_named__15.parent_itm_object__4.position__0BJ;
+            __tmp__ZRYD=((__ITM_SLOT_OPERATOR *)s__2PYD)->parent_itm_slot__NW5B.parent_named__15.parent_itm_object__4.position__GFJ;
           };
-          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));
+          append_in__RKH((__UINTEGER_32)(((__UINTEGER_32 )__tmp__ZRYD) >>  17),string_tmp__VH);
+          put__to__like__Q3XD(string_tmp__VH,output_code__SI,(&__string_149));
+          put__to__like__Q3XD((&__string_184),output_code__SI,(&__string_148));
           ((__STRING *)string_tmp__VH)->count__EGC= 0;
-          if (((struct ___OBJ *)s__OMYD)->__id==__ITM_SLOT__) {
-            __tmp__UOYD=((__ITM_SLOT *)s__OMYD)->id_section__F2C;
+          if (((struct ___OBJ *)s__2PYD)->__id==__ITM_SLOT__) {
+            __tmp__CSYD=((__ITM_SLOT *)s__2PYD)->id_section__F3C;
           } else {
-            __tmp__UOYD=((__ITM_SLOT_OPERATOR *)s__OMYD)->parent_itm_slot__BT5B.id_section__F2C;
+            __tmp__CSYD=((__ITM_SLOT_OPERATOR *)s__2PYD)->parent_itm_slot__NW5B.id_section__F3C;
           };
-          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);
+          append_in__YZ4F(__tmp__CSYD,string_tmp__VH);
+          put__to__like__Q3XD(string_tmp__VH,output_code__SI,(&__string_120));
+          put__to__like__Q3XD((&__string_185),output_code__SI,(&__string_148));
+          if (((struct ___OBJ *)s__2PYD)->__id==__ITM_SLOT__) {
+            shorter_profile_in__004F(s__2PYD,output_code__SI);
           } else {
-            shorter_profile_in__QW4F(s__OMYD,output_code__SI);
+            shorter_profile_in__X14F(s__2PYD,output_code__SI);
           };
           ((__STRING *)string_tmp__VH)->count__EGC= 0;
-          if (((struct ___OBJ *)s__OMYD)->__id==__ITM_SLOT__) {
-            __tmp__2OYD=((__ITM_SLOT *)s__OMYD)->parent_named__15.name__LI;
+          if (((struct ___OBJ *)s__2PYD)->__id==__ITM_SLOT__) {
+            __tmp__KSYD=((__ITM_SLOT *)s__2PYD)->parent_named__15.name__LI;
           } else {
-            __tmp__2OYD=((__ITM_SLOT_OPERATOR *)s__OMYD)->parent_itm_slot__BT5B.parent_named__15.name__LI;
+            __tmp__KSYD=((__ITM_SLOT_OPERATOR *)s__2PYD)->parent_itm_slot__NW5B.parent_named__15.name__LI;
           };
-          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__);
+          get_all_comment_slot__in__QK4E(Self__QLTD,__tmp__KSYD,string_tmp__VH);
+          shorter_comment__in__light__DO4E(string_tmp__VH,output_code__SI,FALSE__);
         };
-        Self__0D5D=(__INTEGER)(Self__0D5D +  1);
+        Self__IH5D=(__INTEGER)(Self__IH5D +  1);
       };
-      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;
+      s__YSYD=NULL;
+      is_first__XSYD=TRUE__;
+      __tmp__2SYD=((__FAST_ARRAYoITM_SLOTo *)list_tmp__RMTD)->parent_arrayed_collection__QMTD.upper__NNTD;
+      Self__XH5D= 0;
+      while ((Self__XH5D <= __tmp__2SYD)) {
+        s__YSYD=((void **)((__FAST_ARRAYoITM_SLOTo *)list_tmp__RMTD)->parent_arrayed_collection__QMTD.storage__1OWE)[Self__XH5D];
+        if (((struct ___OBJ *)s__YSYD)->__id==__ITM_SLOT__) {
+          __tmp__1OTD=((__ITM_SLOT *)s__YSYD)->parent_named__15.name__LI;
         } else {
-          __tmp__NLTD=((__ITM_SLOT_OPERATOR *)s__KPYD)->parent_itm_slot__BT5B.parent_named__15.name__LI;
+          __tmp__1OTD=((__ITM_SLOT_OPERATOR *)s__YSYD)->parent_itm_slot__NW5B.parent_named__15.name__LI;
         };
-        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);
+        Self__YALH=((__STRING_CONSTANT *)__tmp__1OTD);
+        result__VALH=FALSE__;
+        i__WALH= 0;
+        if ((((__STRING_CONSTANT *)(&__string_179))->count__DD <= Self__YALH->count__DD)) {
+          i__WALH=((__STRING_CONSTANT *)(&__string_179))->count__DD;
+          while ((! ((i__WALH ==  0) || (((__CHARACTER *)Self__YALH->storage__FRO)[(__INTEGER)(i__WALH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_179))->storage__FRO)[(__INTEGER)(i__WALH -  1)])))) {
+            i__WALH=(__INTEGER)(i__WALH -  1);
           };
-          result__WYKH=(i__XYKH ==  0);
+          result__VALH=(i__WALH ==  0);
         };
-        if (result__WYKH) {
-          if (((struct ___OBJ *)s__KPYD)->__id==__ITM_SLOT__) {
-            __tmp__1PYD=((__ITM_SLOT *)s__KPYD)->stat_shorter__JKTD;
+        if (result__VALH) {
+          if (((struct ___OBJ *)s__YSYD)->__id==__ITM_SLOT__) {
+            __tmp__JTYD=((__ITM_SLOT *)s__YSYD)->stat_shorter__XNTD;
           } else {
-            __tmp__1PYD=((__ITM_SLOT_OPERATOR *)s__KPYD)->parent_itm_slot__BT5B.stat_shorter__JKTD;
+            __tmp__JTYD=((__ITM_SLOT_OPERATOR *)s__YSYD)->parent_itm_slot__NW5B.stat_shorter__XNTD;
           };
-          __tmp__4PYD=(__tmp__1PYD ==  1);
+          __tmp__MTYD=(__tmp__JTYD ==  1);
         } else {
-          __tmp__4PYD=FALSE__;
+          __tmp__MTYD=FALSE__;
         };
-        if (__tmp__4PYD) {
-          if (is_first__JPYD) {
+        if (__tmp__MTYD) {
+          if (is_first__XSYD) {
             if (((void *)(&__string_186) == (void *)NULL)) {
-              put__to__like__C0XD((&__string_182),output_code__SI,(&__string_146));
+              put__to__like__Q3XD((&__string_182),output_code__SI,(&__string_146));
             } else {
-              put__to__like__C0XD((&__string_186),output_code__SI,(&__string_146));
+              put__to__like__Q3XD((&__string_186),output_code__SI,(&__string_146));
             };
-            is_first__JPYD=FALSE__;
+            is_first__XSYD=FALSE__;
           };
-          if (((struct ___OBJ *)s__KPYD)->__id==__ITM_SLOT__) {
-            ((__ITM_SLOT *)s__KPYD)->stat_shorter__JKTD= 2;
+          if (((struct ___OBJ *)s__YSYD)->__id==__ITM_SLOT__) {
+            ((__ITM_SLOT *)s__YSYD)->stat_shorter__XNTD= 2;
           } else {
-            ((__ITM_SLOT_OPERATOR *)s__KPYD)->parent_itm_slot__BT5B.stat_shorter__JKTD= 2;
+            ((__ITM_SLOT_OPERATOR *)s__YSYD)->parent_itm_slot__NW5B.stat_shorter__XNTD= 2;
           };
-          ((__STRING *)string_tmp2__O4I)->count__EGC= 0;
-          if (((struct ___OBJ *)s__KPYD)->__id==__ITM_SLOT__) {
-            pretty_name_in__ER4F(s__KPYD,string_tmp2__O4I);
+          ((__STRING *)string_tmp2__0BJ)->count__EGC= 0;
+          if (((struct ___OBJ *)s__YSYD)->__id==__ITM_SLOT__) {
+            pretty_name_in__LW4F(s__YSYD,string_tmp2__0BJ);
           } else {
-            pretty_name_in__ZS4F(s__KPYD,string_tmp2__O4I);
+            pretty_name_in__AY4F(s__YSYD,string_tmp2__0BJ);
           };
-          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;
+          put__to__like__Q3XD(string_tmp2__0BJ,output_code__SI,(&__string_147));
+          if (((struct ___OBJ *)s__YSYD)->__id==__ITM_SLOT__) {
+            __tmp__QUYD=((__ITM_SLOT *)s__YSYD)->parent_named__15.parent_itm_object__4.position__GFJ;
           } else {
-            __tmp__CRYD=((__ITM_SLOT_OPERATOR *)s__KPYD)->parent_itm_slot__BT5B.parent_named__15.parent_itm_object__4.position__0BJ;
+            __tmp__QUYD=((__ITM_SLOT_OPERATOR *)s__YSYD)->parent_itm_slot__NW5B.parent_named__15.parent_itm_object__4.position__GFJ;
           };
-          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;
+          copy__JDS(string_tmp__VH,((__PROTOTYPE *)((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__XVT)[(__INTEGER)(((__INTEGER )((__UINTEGER_32 )__tmp__QUYD)) &  511)])->filename__XRG);
+          append__ROS(string_tmp__VH,(&__string_183));
+          if (((struct ___OBJ *)s__YSYD)->__id==__ITM_SLOT__) {
+            __tmp__VUYD=((__ITM_SLOT *)s__YSYD)->parent_named__15.parent_itm_object__4.position__GFJ;
           } else {
-            __tmp__HRYD=((__ITM_SLOT_OPERATOR *)s__KPYD)->parent_itm_slot__BT5B.parent_named__15.parent_itm_object__4.position__0BJ;
+            __tmp__VUYD=((__ITM_SLOT_OPERATOR *)s__YSYD)->parent_itm_slot__NW5B.parent_named__15.parent_itm_object__4.position__GFJ;
           };
-          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));
+          append_in__RKH((__UINTEGER_32)(((__UINTEGER_32 )__tmp__VUYD) >>  17),string_tmp__VH);
+          put__to__like__Q3XD(string_tmp__VH,output_code__SI,(&__string_149));
+          put__to__like__Q3XD((&__string_184),output_code__SI,(&__string_148));
           ((__STRING *)string_tmp__VH)->count__EGC= 0;
-          if (((struct ___OBJ *)s__KPYD)->__id==__ITM_SLOT__) {
-            __tmp__QRYD=((__ITM_SLOT *)s__KPYD)->id_section__F2C;
+          if (((struct ___OBJ *)s__YSYD)->__id==__ITM_SLOT__) {
+            __tmp__4UYD=((__ITM_SLOT *)s__YSYD)->id_section__F3C;
           } else {
-            __tmp__QRYD=((__ITM_SLOT_OPERATOR *)s__KPYD)->parent_itm_slot__BT5B.id_section__F2C;
+            __tmp__4UYD=((__ITM_SLOT_OPERATOR *)s__YSYD)->parent_itm_slot__NW5B.id_section__F3C;
           };
-          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);
+          append_in__YZ4F(__tmp__4UYD,string_tmp__VH);
+          put__to__like__Q3XD(string_tmp__VH,output_code__SI,(&__string_120));
+          put__to__like__Q3XD((&__string_185),output_code__SI,(&__string_148));
+          if (((struct ___OBJ *)s__YSYD)->__id==__ITM_SLOT__) {
+            shorter_profile_in__004F(s__YSYD,output_code__SI);
           } else {
-            shorter_profile_in__QW4F(s__KPYD,output_code__SI);
+            shorter_profile_in__X14F(s__YSYD,output_code__SI);
           };
           ((__STRING *)string_tmp__VH)->count__EGC= 0;
-          if (((struct ___OBJ *)s__KPYD)->__id==__ITM_SLOT__) {
-            __tmp__YRYD=((__ITM_SLOT *)s__KPYD)->parent_named__15.name__LI;
+          if (((struct ___OBJ *)s__YSYD)->__id==__ITM_SLOT__) {
+            __tmp__GVYD=((__ITM_SLOT *)s__YSYD)->parent_named__15.name__LI;
           } else {
-            __tmp__YRYD=((__ITM_SLOT_OPERATOR *)s__KPYD)->parent_itm_slot__BT5B.parent_named__15.name__LI;
+            __tmp__GVYD=((__ITM_SLOT_OPERATOR *)s__YSYD)->parent_itm_slot__NW5B.parent_named__15.name__LI;
           };
-          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__);
+          get_all_comment_slot__in__QK4E(Self__QLTD,__tmp__GVYD,string_tmp__VH);
+          shorter_comment__in__light__DO4E(string_tmp__VH,output_code__SI,FALSE__);
         };
-        Self__JE5D=(__INTEGER)(Self__JE5D +  1);
+        Self__XH5D=(__INTEGER)(Self__XH5D +  1);
       };
-      __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;
+      __tmp__EPTD=((__FAST_ARRAYoITM_SLOTo *)list_tmp__RMTD)->parent_arrayed_collection__QMTD.upper__NNTD;
+      Self__PVYD= 0;
+      while ((Self__PVYD <= __tmp__EPTD)) {
+        s__TLTD=((void **)((__FAST_ARRAYoITM_SLOTo *)list_tmp__RMTD)->parent_arrayed_collection__QMTD.storage__1OWE)[Self__PVYD];
+        if (((struct ___OBJ *)s__TLTD)->__id==__ITM_SLOT__) {
+          __tmp__MPTD=((__ITM_SLOT *)s__TLTD)->stat_shorter__XNTD;
         } else {
-          __tmp__4LTD=((__ITM_SLOT_OPERATOR *)s__FITD)->parent_itm_slot__BT5B.stat_shorter__JKTD;
+          __tmp__MPTD=((__ITM_SLOT_OPERATOR *)s__TLTD)->parent_itm_slot__NW5B.stat_shorter__XNTD;
         };
-        if ((__tmp__4LTD ==  1)) {
-          if (((struct ___OBJ *)s__FITD)->__id==__ITM_SLOT__) {
-            __tmp__EMTD=((__ITM_SLOT *)s__FITD)->comment_chapter__T0HC;
+        if ((__tmp__MPTD ==  1)) {
+          if (((struct ___OBJ *)s__TLTD)->__id==__ITM_SLOT__) {
+            __tmp__SPTD=((__ITM_SLOT *)s__TLTD)->comment_chapter__B4HC;
           } else {
-            __tmp__EMTD=((__ITM_SLOT_OPERATOR *)s__FITD)->parent_itm_slot__BT5B.comment_chapter__T0HC;
+            __tmp__SPTD=((__ITM_SLOT_OPERATOR *)s__TLTD)->parent_itm_slot__NW5B.comment_chapter__B4HC;
           };
-          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;
+          title__SLTD=__tmp__SPTD;
+          t__ZFRE=__tmp__SPTD;
+          s__2FRE=NULL;
+          is_first__1FRE=TRUE__;
+          __tmp__AGRE=((__FAST_ARRAYoITM_SLOTo *)list_tmp__RMTD)->parent_arrayed_collection__QMTD.upper__NNTD;
+          Self__DKSE= 0;
+          while ((Self__DKSE <= __tmp__AGRE)) {
+            s__2FRE=((void **)((__FAST_ARRAYoITM_SLOTo *)list_tmp__RMTD)->parent_arrayed_collection__QMTD.storage__1OWE)[Self__DKSE];
+            if (((struct ___OBJ *)s__2FRE)->__id==__ITM_SLOT__) {
+              __tmp__ZPTD=((__ITM_SLOT *)s__2FRE)->comment_chapter__B4HC;
             } else {
-              __tmp__LMTD=((__ITM_SLOT_OPERATOR *)s__JBRE)->parent_itm_slot__BT5B.comment_chapter__T0HC;
+              __tmp__ZPTD=((__ITM_SLOT_OPERATOR *)s__2FRE)->parent_itm_slot__NW5B.comment_chapter__B4HC;
             };
-            if (((void *)__tmp__LMTD == (void *)title__EITD)) {
-              if (((struct ___OBJ *)s__JBRE)->__id==__ITM_SLOT__) {
-                __tmp__0BRE=((__ITM_SLOT *)s__JBRE)->stat_shorter__JKTD;
+            if (((void *)__tmp__ZPTD == (void *)title__SLTD)) {
+              if (((struct ___OBJ *)s__2FRE)->__id==__ITM_SLOT__) {
+                __tmp__NGRE=((__ITM_SLOT *)s__2FRE)->stat_shorter__XNTD;
               } else {
-                __tmp__0BRE=((__ITM_SLOT_OPERATOR *)s__JBRE)->parent_itm_slot__BT5B.stat_shorter__JKTD;
+                __tmp__NGRE=((__ITM_SLOT_OPERATOR *)s__2FRE)->parent_itm_slot__NW5B.stat_shorter__XNTD;
               };
-              __tmp__3BRE=(__tmp__0BRE ==  1);
+              __tmp__QGRE=(__tmp__NGRE ==  1);
             } else {
-              __tmp__3BRE=FALSE__;
+              __tmp__QGRE=FALSE__;
             };
-            if (__tmp__3BRE) {
-              if (is_first__IBRE) {
-                if (((void *)t__GBRE == (void *)NULL)) {
-                  put__to__like__C0XD((&__string_182),output_code__SI,(&__string_146));
+            if (__tmp__QGRE) {
+              if (is_first__1FRE) {
+                if (((void *)t__ZFRE == (void *)NULL)) {
+                  put__to__like__Q3XD((&__string_182),output_code__SI,(&__string_146));
                 } else {
-                  put__to__like__C0XD(t__GBRE,output_code__SI,(&__string_146));
+                  put__to__like__Q3XD(t__ZFRE,output_code__SI,(&__string_146));
                 };
-                is_first__IBRE=FALSE__;
+                is_first__1FRE=FALSE__;
               };
-              if (((struct ___OBJ *)s__JBRE)->__id==__ITM_SLOT__) {
-                ((__ITM_SLOT *)s__JBRE)->stat_shorter__JKTD= 2;
+              if (((struct ___OBJ *)s__2FRE)->__id==__ITM_SLOT__) {
+                ((__ITM_SLOT *)s__2FRE)->stat_shorter__XNTD= 2;
               } else {
-                ((__ITM_SLOT_OPERATOR *)s__JBRE)->parent_itm_slot__BT5B.stat_shorter__JKTD= 2;
+                ((__ITM_SLOT_OPERATOR *)s__2FRE)->parent_itm_slot__NW5B.stat_shorter__XNTD= 2;
               };
-              ((__STRING *)string_tmp2__O4I)->count__EGC= 0;
-              if (((struct ___OBJ *)s__JBRE)->__id==__ITM_SLOT__) {
-                pretty_name_in__ER4F(s__JBRE,string_tmp2__O4I);
+              ((__STRING *)string_tmp2__0BJ)->count__EGC= 0;
+              if (((struct ___OBJ *)s__2FRE)->__id==__ITM_SLOT__) {
+                pretty_name_in__LW4F(s__2FRE,string_tmp2__0BJ);
               } else {
-                pretty_name_in__ZS4F(s__JBRE,string_tmp2__O4I);
+                pretty_name_in__AY4F(s__2FRE,string_tmp2__0BJ);
               };
-              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;
+              put__to__like__Q3XD(string_tmp2__0BJ,output_code__SI,(&__string_147));
+              if (((struct ___OBJ *)s__2FRE)->__id==__ITM_SLOT__) {
+                __tmp__UHRE=((__ITM_SLOT *)s__2FRE)->parent_named__15.parent_itm_object__4.position__GFJ;
               } else {
-                __tmp__BDRE=((__ITM_SLOT_OPERATOR *)s__JBRE)->parent_itm_slot__BT5B.parent_named__15.parent_itm_object__4.position__0BJ;
+                __tmp__UHRE=((__ITM_SLOT_OPERATOR *)s__2FRE)->parent_itm_slot__NW5B.parent_named__15.parent_itm_object__4.position__GFJ;
               };
-              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;
+              copy__JDS(string_tmp__VH,((__PROTOTYPE *)((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__XVT)[(__INTEGER)(((__INTEGER )((__UINTEGER_32 )__tmp__UHRE)) &  511)])->filename__XRG);
+              append__ROS(string_tmp__VH,(&__string_183));
+              if (((struct ___OBJ *)s__2FRE)->__id==__ITM_SLOT__) {
+                __tmp__ZHRE=((__ITM_SLOT *)s__2FRE)->parent_named__15.parent_itm_object__4.position__GFJ;
               } else {
-                __tmp__GDRE=((__ITM_SLOT_OPERATOR *)s__JBRE)->parent_itm_slot__BT5B.parent_named__15.parent_itm_object__4.position__0BJ;
+                __tmp__ZHRE=((__ITM_SLOT_OPERATOR *)s__2FRE)->parent_itm_slot__NW5B.parent_named__15.parent_itm_object__4.position__GFJ;
               };
-              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));
+              append_in__RKH((__UINTEGER_32)(((__UINTEGER_32 )__tmp__ZHRE) >>  17),string_tmp__VH);
+              put__to__like__Q3XD(string_tmp__VH,output_code__SI,(&__string_149));
+              put__to__like__Q3XD((&__string_184),output_code__SI,(&__string_148));
               ((__STRING *)string_tmp__VH)->count__EGC= 0;
-              if (((struct ___OBJ *)s__JBRE)->__id==__ITM_SLOT__) {
-                __tmp__PDRE=((__ITM_SLOT *)s__JBRE)->id_section__F2C;
+              if (((struct ___OBJ *)s__2FRE)->__id==__ITM_SLOT__) {
+                __tmp__CIRE=((__ITM_SLOT *)s__2FRE)->id_section__F3C;
               } else {
-                __tmp__PDRE=((__ITM_SLOT_OPERATOR *)s__JBRE)->parent_itm_slot__BT5B.id_section__F2C;
+                __tmp__CIRE=((__ITM_SLOT_OPERATOR *)s__2FRE)->parent_itm_slot__NW5B.id_section__F3C;
               };
-              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);
+              append_in__YZ4F(__tmp__CIRE,string_tmp__VH);
+              put__to__like__Q3XD(string_tmp__VH,output_code__SI,(&__string_120));
+              put__to__like__Q3XD((&__string_185),output_code__SI,(&__string_148));
+              if (((struct ___OBJ *)s__2FRE)->__id==__ITM_SLOT__) {
+                shorter_profile_in__004F(s__2FRE,output_code__SI);
               } else {
-                shorter_profile_in__QW4F(s__JBRE,output_code__SI);
+                shorter_profile_in__X14F(s__2FRE,output_code__SI);
               };
               ((__STRING *)string_tmp__VH)->count__EGC= 0;
-              if (((struct ___OBJ *)s__JBRE)->__id==__ITM_SLOT__) {
-                __tmp__XDRE=((__ITM_SLOT *)s__JBRE)->parent_named__15.name__LI;
+              if (((struct ___OBJ *)s__2FRE)->__id==__ITM_SLOT__) {
+                __tmp__KIRE=((__ITM_SLOT *)s__2FRE)->parent_named__15.name__LI;
               } else {
-                __tmp__XDRE=((__ITM_SLOT_OPERATOR *)s__JBRE)->parent_itm_slot__BT5B.parent_named__15.name__LI;
+                __tmp__KIRE=((__ITM_SLOT_OPERATOR *)s__2FRE)->parent_itm_slot__NW5B.parent_named__15.name__LI;
               };
-              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__);
+              get_all_comment_slot__in__QK4E(Self__QLTD,__tmp__KIRE,string_tmp__VH);
+              shorter_comment__in__light__DO4E(string_tmp__VH,output_code__SI,FALSE__);
             };
-            Self__PFSE=(__INTEGER)(Self__PFSE +  1);
+            Self__DKSE=(__INTEGER)(Self__DKSE +  1);
           };
         };
-        Self__BSYD=(__INTEGER)(Self__BSYD +  1);
+        Self__PVYD=(__INTEGER)(Self__PVYD +  1);
       };
-      __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;
+      __tmp__EQTD=((__FAST_ARRAYoITM_SLOTo *)list_tmp__RMTD)->parent_arrayed_collection__QMTD.upper__NNTD;
+      Self__4VYD= 0;
+      while ((Self__4VYD <= __tmp__EQTD)) {
+        __tmp__LQTD=((void **)((__FAST_ARRAYoITM_SLOTo *)list_tmp__RMTD)->parent_arrayed_collection__QMTD.storage__1OWE)[Self__4VYD];
+        if (((struct ___OBJ *)__tmp__LQTD)->__id==__ITM_SLOT__) {
+          ((__ITM_SLOT *)__tmp__LQTD)->stat_shorter__XNTD= 0;
         } else {
-          ((__ITM_SLOT_OPERATOR *)__tmp__3MTD)->parent_itm_slot__BT5B.stat_shorter__JKTD= 0;
+          ((__ITM_SLOT_OPERATOR *)__tmp__LQTD)->parent_itm_slot__NW5B.stat_shorter__XNTD= 0;
         };
-        Self__QSYD=(__INTEGER)(Self__QSYD +  1);
+        Self__4VYD=(__INTEGER)(Self__4VYD +  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);
+      save_file__with__3DC(add_ext__PCF(((__PROTOTYPE *)p__AB)->parent_named__5.name__LI),output_code__SI);
+      Self__M4QC=(__INTEGER)(Self__M4QC +  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__N4R;
-  __POINTER ptr__ZSB,ptr_table__2YKH,next__1YKH,result__3YKH;
-  __POINTER ptr_table__MSH,next__RSH,result__PSH;
+  __STRING *result__YSB,*Self__ZBS;
+  __POINTER ptr__ZSB,ptr_table__1ALH,next__0ALH,result__2ALH;
+  __POINTER ptr_table__YVH,next__3VH,result__1VH;
   __INTEGER typ_id__5SB;
-  __UINTEGER_32 sz__2SB,a__2HHH,new_size__3HHH,t__BIHH,a__AIHH;
-  __UINTEGER_32 new_size__LSH,lab_type__NSH;
+  __UINTEGER_32 sz__2SB,a__XOHH,new_size__YOHH,t__2OHH,a__1OHH;
+  __UINTEGER_32 new_size__XVH,lab_type__ZVH;
   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__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;
+      a__XOHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__YOHH=(__UINTEGER_32)((__UINTEGER_32)(sz__2SB + a__XOHH) & (__UINTEGER_32)(~ a__XOHH));
+      ptr_table__1ALH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__YOHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__0ALH=((__POINTER )(NULL));
+      result__2ALH=((__POINTER *)ptr_table__1ALH)[ 0];
+      if ((result__2ALH == (void *)NULL)) {
+        result__2ALH=new_lab__FTJ(new_size__YOHH);
+        next__0ALH=(void *)((unsigned long)result__2ALH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YOHH)));
+        ((__POINTER *)next__0ALH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__1ALH)[ 0]=next__0ALH;
       } else {
-        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)));
+        next__0ALH=((__POINTER *)result__2ALH)[ 0];
+        if ((next__0ALH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2ALH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__YOHH <<  1)) <=  4096)) {
+            next__0ALH=(void *)((unsigned long)result__2ALH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YOHH)));
           } else {
-            next__1YKH=new_lab__ZPJ(new_size__3HHH);
+            next__0ALH=new_lab__FTJ(new_size__YOHH);
           };
-          ((__POINTER *)next__1YKH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__2YKH)[ 0]=next__1YKH;
+          ((__POINTER *)next__0ALH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__1ALH)[ 0]=next__0ALH;
         } else {
-          ((__POINTER *)result__3YKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1YKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__3YKH=next__1YKH;
+          ((__POINTER *)result__2ALH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0ALH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__2ALH=next__0ALH;
         };
       };
-      ptr__ZSB=result__3YKH;
+      ptr__ZSB=result__2ALH;
     } else {
-      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;
+      t__2OHH=((__UINTEGER_32 )typ_id__5SB);
+      a__1OHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__XVH=(__UINTEGER_32)((__UINTEGER_32)(sz__2SB + a__1OHH) & (__UINTEGER_32)(~ a__1OHH));
+      ptr_table__YVH=((__POINTER )(&(table_type[(t__2OHH)])));
+      lab_type__ZVH=(__UINTEGER_32)(t__2OHH |  1);
+      next__3VH=((__POINTER )(NULL));
+      result__1VH=((__POINTER *)ptr_table__YVH)[ 0];
+      if ((result__1VH == (void *)NULL)) {
+        result__1VH=new_lab__FTJ(lab_type__ZVH);
+        next__3VH=(void *)((unsigned long)result__1VH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XVH)));
+        ((__POINTER *)next__3VH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__YVH)[ 0]=next__3VH;
       } else {
-        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)));
+        next__3VH=((__POINTER *)result__1VH)[ 0];
+        if ((next__3VH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1VH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__XVH <<  1)) <=  4096)) {
+            next__3VH=(void *)((unsigned long)result__1VH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XVH)));
           } else {
-            next__RSH=new_lab__ZPJ(lab_type__NSH);
+            next__3VH=new_lab__FTJ(lab_type__ZVH);
           };
-          ((__POINTER *)next__RSH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__MSH)[ 0]=next__RSH;
+          ((__POINTER *)next__3VH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__YVH)[ 0]=next__3VH;
         } else {
-          ((__POINTER *)result__PSH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RSH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__PSH=next__RSH;
+          ((__POINTER *)result__1VH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3VH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__1VH=next__3VH;
         };
       };
-      ptr__ZSB=result__PSH;
+      ptr__ZSB=result__1VH;
     };
     result__YSB=((__STRING *)ptr__ZSB);
     *(result__YSB) = *(STRING__);
   };
-  Self__N4R=((__STRING *)result__YSB);
+  Self__ZBS=((__STRING *)result__YSB);
   if ((needed_capacity__1BB >  0)) {
-    if ((Self__N4R->capacity__24R < needed_capacity__1BB)) {
-      Self__N4R->storage__F5R=create__3IEB(needed_capacity__1BB);
-      Self__N4R->capacity__24R=needed_capacity__1BB;
+    if ((Self__ZBS->capacity__ICS < needed_capacity__1BB)) {
+      Self__ZBS->storage__RCS=create__JMEB(needed_capacity__1BB);
+      Self__ZBS->capacity__ICS=needed_capacity__1BB;
     };
   };
-  Self__N4R->count__EGC= 0;
+  Self__ZBS->count__EGC= 0;
   return(result__YSB);
 }
 
-static __POINTER new_lab__ZPJ(__UINTEGER_32 t__1PJ)
+static __POINTER new_lab__FTJ(__UINTEGER_32 t__HTJ)
 // ({UINTEGER_32}) With resultNo recursive, No inlinable.
 {
-  __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:
+  __UINTEGER_32 idx__JTJ,pv__QTJ;
+  void *blc__MTJ,*prev__NTJ,*prev__BLEH,*next__CLEH;
+  __MEMORY *Self__PLAH,*Self__ALEH;
+  __POINTER result__OTJ;
+  __BOOLEAN __tmp__QUJ;
+  idx__JTJ= 0;
+  blc__MTJ=NULL;
+  prev__NTJ=NULL;
+  pv__QTJ= 0;
+  while_do__MEK:
   {
-    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));
+    if ((idx__JTJ < nb_page__XTJ)) {
+      blc__MTJ=((void *)(last_block[(idx__JTJ)]));
+      __tmp__QUJ=(((__UINTEGER_32)(((__MEMORY *)blc__MTJ)->map_size_and_id__YTB &  4294967292LU) <  4096) || ((__UINTEGER_32)(((__MEMORY *)blc__MTJ)->map_size_and_id__YTB &  1) ==  1));
     } else {
-      __tmp__ERJ=FALSE__;
+      __tmp__QUJ=FALSE__;
     };
-    if (__tmp__ERJ) {
-      idx__3PJ=(__UINTEGER_32)(idx__3PJ +  1);
-      goto while_do__ABK;
+    if (__tmp__QUJ) {
+      idx__JTJ=(__UINTEGER_32)(idx__JTJ +  1);
+      goto while_do__MEK;
     };
   };
-  if ((idx__3PJ >= nb_page__LQJ)) {
-    blc__AQJ=new_page__K34();
+  if ((idx__JTJ >= nb_page__XTJ)) {
+    blc__MTJ=new_page__YC5();
   };
-  ((__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;
+  ((__MEMORY *)blc__MTJ)->map_size_and_id__YTB=(__UINTEGER_32)(((__MEMORY *)blc__MTJ)->map_size_and_id__YTB -  4096);
+  Self__PLAH=((__MEMORY *)blc__MTJ);
+  result__OTJ=((__POINTER )((void *)(void *)((unsigned long)(void *)((unsigned long)((__POINTER )Self__PLAH) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )(__UINTEGER_32)(Self__PLAH->map_size_and_id__YTB &  4294967292LU))))));
+  if (((__UINTEGER_32)(((__MEMORY *)blc__MTJ)->map_size_and_id__YTB &  4294967292LU) < ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    Self__ALEH=((__MEMORY *)blc__MTJ);
+    prev__BLEH=Self__ALEH->map_previous_free__0TB;
+    next__CLEH=Self__ALEH->map_next_free__ZTB;
+    if (((void *)prev__BLEH == (void *)NULL)) {
+      first_free__NFVB=next__CLEH;
     } else {
-      ((__MEMORY *)prev__KEEH)->map_next_free__ZTB=next__LEEH;
+      ((__MEMORY *)prev__BLEH)->map_next_free__ZTB=next__CLEH;
     };
-    if (((void *)next__LEEH != (void *)NULL)) {
-      ((__MEMORY *)next__LEEH)->map_previous_free__0TB=prev__KEEH;
+    if (((void *)next__CLEH != (void *)NULL)) {
+      ((__MEMORY *)next__CLEH)->map_previous_free__0TB=prev__BLEH;
     };
-    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);
+    pv__QTJ=((__MEMORY *)blc__MTJ)->map_previous_linear__XTB;
+    if ((pv__QTJ !=  4294967295LU)) {
+      prev__NTJ=((void *)(void *)((unsigned long)begin_memory__SXH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )pv__QTJ))));
+      ((__MEMORY *)prev__NTJ)->map_size_and_id__YTB=(__UINTEGER_32)((__UINTEGER_32)(((__MEMORY *)prev__NTJ)->map_size_and_id__YTB + ((__MEMORY *)blc__MTJ)->map_size_and_id__YTB) +  8);
+      last_block[(idx__JTJ)] = (prev__NTJ);
     };
   };
-  ((__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 *)))))));
+  ((__POINTER *)result__OTJ)[ 0]=((__POINTER )t__HTJ);
+  return((void *)((unsigned long)result__OTJ - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *)))))));
 }
 
-static void** create__DERB(__INTEGER nb_elements__FERB)
+static void** create__PHRB(__INTEGER nb_elements__RHRB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__NDEH,a__53FH,new_size__ODEH,new_size2__PDEH,a__D4FH;
+  __UINTEGER_32 new_size__E4FH;
+  __POINTER result__MDEH,ptr_table__SEJH,next__REJH,result__TEJH;
+  void *result__WEJH;
+  __INTEGER Self__TDNC;
+  void **Result__XFUB;
+  sz__NDEH=((__UINTEGER_32 )(__INTEGER)(nb_elements__RHRB * ((__INTEGER )(sizeof(void *)))));
+  result__MDEH=((__POINTER )(NULL));
+  a__53FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__ODEH=(__UINTEGER_32)((__UINTEGER_32)(sz__NDEH + a__53FH) & (__UINTEGER_32)(~ a__53FH));
+  new_size2__PDEH=(__UINTEGER_32)(new_size__ODEH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__PDEH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__D4FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__E4FH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__PDEH + a__D4FH) & (__UINTEGER_32)(~ a__D4FH));
+    ptr_table__SEJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__E4FH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__REJH=((__POINTER )(NULL));
+    result__TEJH=((__POINTER *)ptr_table__SEJH)[ 0];
+    if ((result__TEJH == (void *)NULL)) {
+      result__TEJH=new_lab__FTJ(new_size__E4FH);
+      next__REJH=(void *)((unsigned long)result__TEJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__E4FH)));
+      ((__POINTER *)next__REJH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__SEJH)[ 0]=next__REJH;
+    } else {
+      next__REJH=((__POINTER *)result__TEJH)[ 0];
+      if ((next__REJH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TEJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__E4FH <<  1)) <=  4096)) {
+          next__REJH=(void *)((unsigned long)result__TEJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__E4FH)));
+        } else {
+          next__REJH=new_lab__FTJ(new_size__E4FH);
+        };
+        ((__POINTER *)next__REJH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__SEJH)[ 0]=next__REJH;
+      } else {
+        ((__POINTER *)result__TEJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__REJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__TEJH=next__REJH;
+      };
+    };
+    ((__POINTER *)result__TEJH)[ 0]=((__POINTER ) 3);
+    result__MDEH=(void *)((unsigned long)result__TEJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__WEJH=first_free__NFVB;
+    while ((((void *)result__WEJH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__WEJH)->map_size_and_id__YTB &  4294967292LU) < new_size__ODEH))) {
+      result__WEJH=((__MEMORY *)result__WEJH)->map_next_free__ZTB;
     };
-    if (((void *)result__X2IH == (void *)NULL)) {
-      result__X2IH=new_page__K34();
+    if (((void *)result__WEJH == (void *)NULL)) {
+      result__WEJH=new_page__YC5();
     };
-    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)));
+    to_busy__index__MWFC(result__WEJH,new_size__ODEH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__WEJH)) - (unsigned long)begin_memory__SXH)))) >>  26));
+    result__MDEH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__WEJH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__XFUB=((void **)result__MDEH);
+  Self__TDNC=(__INTEGER)(nb_elements__RHRB -  1);
+  while ((Self__TDNC >=  0)) {
+    Result__XFUB[Self__TDNC]=NULL;
+    Self__TDNC=(__INTEGER)(Self__TDNC -  1);
   };
-  return(Result__LCUB);
+  return(Result__XFUB);
 }
 
-static void add_last__3IT(__STRING *Self__4IT,__CHARACTER ch__5IT)
+static void add_last__GOT(__STRING *Self__HOT,__CHARACTER ch__IOT)
 // ({STRING},{CHARACTER}) VoidNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER new_capacity__JOT,old_nb_elts__DIFH,upper__APHH,Self__4OHH;
+  __CHARACTER *Self__CIFH,*new__FIFH;
+  new_capacity__JOT= 0;
+  if ((Self__HOT->capacity__ICS <= Self__HOT->count__EGC)) {
+    if ((Self__HOT->capacity__ICS ==  0)) {
+      Self__HOT->capacity__ICS= 32;
+      Self__HOT->storage__RCS=create__JMEB( 32);
+    } else {
+      new_capacity__JOT=(__INTEGER)(Self__HOT->capacity__ICS <<  1);
+      Self__CIFH=((__CHARACTER *)Self__HOT->storage__RCS);
+      old_nb_elts__DIFH=Self__HOT->capacity__ICS;
+      new__FIFH=((__CHARACTER *)realloc_dynamic__old_size__new_size__ZHLC(((__POINTER )Self__CIFH),((__UINTEGER_32 )old_nb_elts__DIFH),((__UINTEGER_32 )new_capacity__JOT)));
+      upper__APHH=(__INTEGER)(new_capacity__JOT -  1);
+      Self__4OHH=old_nb_elts__DIFH;
+      while ((Self__4OHH <= upper__APHH)) {
+        new__FIFH[Self__4OHH]='\0';
+        Self__4OHH=(__INTEGER)(Self__4OHH +  1);
+      };
+      Self__HOT->storage__RCS=new__FIFH;
+      Self__HOT->capacity__ICS=new_capacity__JOT;
+    };
+  };
+  ((__CHARACTER *)Self__HOT->storage__RCS)[Self__HOT->count__EGC]=ch__IOT;
+  Self__HOT->count__EGC=(__INTEGER)(Self__HOT->count__EGC +  1);
 }
 
-static void add_last__2OV(__FAST_ARRAYoSTRINGo *Self__3OV,void *element__4OV)
+static void add_last__ISV(__FAST_ARRAYoSTRINGo *Self__JSV,void *element__KSV)
 // ({FAST_ARRAYoSTRINGo},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER new_capacity__LSV,__tmp__PTV,__tmp__GLEC,Self__APVD;
+  __BOOLEAN __tmp__ZSV;
+  void **__tmp__OTV,**new__SKEC;
+  new_capacity__LSV= 0;
+  if (((__INTEGER)(Self__JSV->parent_arrayed_collection__RKC.upper__UKC +  1) <= (__INTEGER)(Self__JSV->parent_arrayed_collection__RKC.capacity__2GT -  1))) {
+    Self__JSV->parent_arrayed_collection__RKC.upper__UKC=(__INTEGER)(Self__JSV->parent_arrayed_collection__RKC.upper__UKC +  1);
+    __tmp__ZSV=TRUE__;
   } else {
-    __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;
+    __tmp__ZSV=FALSE__;
+  };
+  if ((! __tmp__ZSV)) {
+    if ((Self__JSV->parent_arrayed_collection__RKC.capacity__2GT ==  0)) {
+      Self__JSV->parent_arrayed_collection__RKC.storage__HHT=create__PHRB( 2);
+      Self__JSV->parent_arrayed_collection__RKC.capacity__2GT= 2;
+      Self__JSV->parent_arrayed_collection__RKC.upper__UKC= 0;
+    } else {
+      new_capacity__LSV=(__INTEGER)(Self__JSV->parent_arrayed_collection__RKC.capacity__2GT <<  1);
+      __tmp__OTV=Self__JSV->parent_arrayed_collection__RKC.storage__HHT;
+      __tmp__PTV=Self__JSV->parent_arrayed_collection__RKC.capacity__2GT;
+      new__SKEC=((void **)realloc_dynamic__old_size__new_size__ZHLC(((__POINTER )((void **)__tmp__OTV)),((__UINTEGER_32 )(__INTEGER)(__tmp__PTV * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__LSV * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__GLEC=(__INTEGER)(new_capacity__LSV -  1);
+      Self__APVD=__tmp__PTV;
+      while ((Self__APVD <= __tmp__GLEC)) {
+        new__SKEC[Self__APVD]=NULL;
+        Self__APVD=(__INTEGER)(Self__APVD +  1);
+      };
+      Self__JSV->parent_arrayed_collection__RKC.storage__HHT=new__SKEC;
+      Self__JSV->parent_arrayed_collection__RKC.capacity__2GT=new_capacity__LSV;
+      Self__JSV->parent_arrayed_collection__RKC.upper__UKC=(__INTEGER)(Self__JSV->parent_arrayed_collection__RKC.upper__UKC +  1);
+    };
+  };
+  ((void **)Self__JSV->parent_arrayed_collection__RKC.storage__HHT)[Self__JSV->parent_arrayed_collection__RKC.upper__UKC]=element__KSV;
 }
 
-static __INTEGER prime_number_ceiling__T11(__INTEGER integer__V11)
+static __INTEGER prime_number_ceiling__541(__INTEGER integer__B51)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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__511=FALSE__;
-  };
-  if (__tmp__511) {
-    __tmp__M21=TRUE__;
-  } else {
-    result__YNCB=(integer__V11 <=  23);
-    if (result__YNCB) {
-      result__X11= 23;
-    };
-    __tmp__M21=result__YNCB;
-  };
-  if (__tmp__M21) {
-    __tmp__Z21=TRUE__;
-  } else {
-    result__KOCB=(integer__V11 <=  53);
-    if (result__KOCB) {
-      result__X11= 53;
-    };
-    __tmp__Z21=result__KOCB;
-  };
-  if (__tmp__Z21) {
-    __tmp__G31=TRUE__;
-  } else {
-    result__2OCB=(integer__V11 <=  97);
-    if (result__2OCB) {
-      result__X11= 97;
-    };
-    __tmp__G31=result__2OCB;
-  };
-  if (__tmp__G31) {
-    __tmp__T31=TRUE__;
+  __INTEGER result__D51;
+  __BOOLEAN __tmp__L51,__tmp__Y51,result__ERCB,__tmp__FA2,result__WRCB;
+  __BOOLEAN __tmp__SA2,result__ISCB,__tmp__5A2,result__0SCB,__tmp__MB2;
+  __BOOLEAN result__MTCB,__tmp__ZB2,result__4TCB,__tmp__GC2;
+  __BOOLEAN result__QUCB,__tmp__TC2,result__CVCB,__tmp__AD2;
+  __BOOLEAN result__UVCB,__tmp__ND2,result__GWCB,__tmp__0D2;
+  __BOOLEAN result__YWCB,__tmp__HE2,result__KXCB,__tmp__UE2;
+  __BOOLEAN result__2XCB,__tmp__BF2,result__OYCB,__tmp__OF2;
+  __BOOLEAN result__AZCB,__tmp__1F2,result__SZCB,__tmp__IG2;
+  __BOOLEAN result__E0CB,__tmp__VG2,result__W0CB,__tmp__CH2;
+  __BOOLEAN result__I1CB,__tmp__PH2,result__01CB,__tmp__2H2;
+  __BOOLEAN result__M2CB,__tmp__JI2,result__42CB,__tmp__WI2;
+  __BOOLEAN result__Q3CB,__tmp__DJ2,result__C4CB,__tmp__QJ2;
+  __BOOLEAN result__U4CB;
+  result__D51= 0;
+  if ((integer__B51 <=  11)) {
+    result__D51= 11;
+    __tmp__L51=TRUE__;
   } else {
-    result__OPCB=(integer__V11 <=  193);
-    if (result__OPCB) {
-      result__X11= 193;
-    };
-    __tmp__T31=result__OPCB;
-  };
-  if (__tmp__T31) {
-    __tmp__A41=TRUE__;
-  } else {
-    result__AQCB=(integer__V11 <=  389);
-    if (result__AQCB) {
-      result__X11= 389;
-    };
-    __tmp__A41=result__AQCB;
+    __tmp__L51=FALSE__;
   };
-  if (__tmp__A41) {
-    __tmp__N41=TRUE__;
+  if (__tmp__L51) {
+    __tmp__Y51=TRUE__;
   } else {
-    result__SQCB=(integer__V11 <=  769);
-    if (result__SQCB) {
-      result__X11= 769;
-    };
-    __tmp__N41=result__SQCB;
-  };
-  if (__tmp__N41) {
-    __tmp__041=TRUE__;
-  } else {
-    result__ERCB=(integer__V11 <=  1543);
+    result__ERCB=(integer__B51 <=  23);
     if (result__ERCB) {
-      result__X11= 1543;
+      result__D51= 23;
     };
-    __tmp__041=result__ERCB;
+    __tmp__Y51=result__ERCB;
   };
-  if (__tmp__041) {
-    __tmp__H51=TRUE__;
+  if (__tmp__Y51) {
+    __tmp__FA2=TRUE__;
   } else {
-    result__WRCB=(integer__V11 <=  3079);
+    result__WRCB=(integer__B51 <=  53);
     if (result__WRCB) {
-      result__X11= 3079;
+      result__D51= 53;
     };
-    __tmp__H51=result__WRCB;
+    __tmp__FA2=result__WRCB;
   };
-  if (__tmp__H51) {
-    __tmp__U51=TRUE__;
+  if (__tmp__FA2) {
+    __tmp__SA2=TRUE__;
   } else {
-    result__ISCB=(integer__V11 <=  6151);
+    result__ISCB=(integer__B51 <=  97);
     if (result__ISCB) {
-      result__X11= 6151;
+      result__D51= 97;
     };
-    __tmp__U51=result__ISCB;
+    __tmp__SA2=result__ISCB;
   };
-  if (__tmp__U51) {
-    __tmp__BA2=TRUE__;
+  if (__tmp__SA2) {
+    __tmp__5A2=TRUE__;
   } else {
-    result__0SCB=(integer__V11 <=  12289);
+    result__0SCB=(integer__B51 <=  193);
     if (result__0SCB) {
-      result__X11= 12289;
+      result__D51= 193;
     };
-    __tmp__BA2=result__0SCB;
+    __tmp__5A2=result__0SCB;
   };
-  if (__tmp__BA2) {
-    __tmp__OA2=TRUE__;
+  if (__tmp__5A2) {
+    __tmp__MB2=TRUE__;
   } else {
-    result__MTCB=(integer__V11 <=  24593);
+    result__MTCB=(integer__B51 <=  389);
     if (result__MTCB) {
-      result__X11= 24593;
+      result__D51= 389;
     };
-    __tmp__OA2=result__MTCB;
+    __tmp__MB2=result__MTCB;
   };
-  if (__tmp__OA2) {
-    __tmp__1A2=TRUE__;
+  if (__tmp__MB2) {
+    __tmp__ZB2=TRUE__;
   } else {
-    result__4TCB=(integer__V11 <=  49157);
+    result__4TCB=(integer__B51 <=  769);
     if (result__4TCB) {
-      result__X11= 49157;
+      result__D51= 769;
     };
-    __tmp__1A2=result__4TCB;
+    __tmp__ZB2=result__4TCB;
   };
-  if (__tmp__1A2) {
-    __tmp__IB2=TRUE__;
+  if (__tmp__ZB2) {
+    __tmp__GC2=TRUE__;
   } else {
-    result__QUCB=(integer__V11 <=  98317);
+    result__QUCB=(integer__B51 <=  1543);
     if (result__QUCB) {
-      result__X11= 98317;
+      result__D51= 1543;
     };
-    __tmp__IB2=result__QUCB;
+    __tmp__GC2=result__QUCB;
   };
-  if (__tmp__IB2) {
-    __tmp__VB2=TRUE__;
+  if (__tmp__GC2) {
+    __tmp__TC2=TRUE__;
   } else {
-    result__CVCB=(integer__V11 <=  196613);
+    result__CVCB=(integer__B51 <=  3079);
     if (result__CVCB) {
-      result__X11= 196613;
+      result__D51= 3079;
     };
-    __tmp__VB2=result__CVCB;
+    __tmp__TC2=result__CVCB;
   };
-  if (__tmp__VB2) {
-    __tmp__CC2=TRUE__;
+  if (__tmp__TC2) {
+    __tmp__AD2=TRUE__;
   } else {
-    result__UVCB=(integer__V11 <=  393241);
+    result__UVCB=(integer__B51 <=  6151);
     if (result__UVCB) {
-      result__X11= 393241;
+      result__D51= 6151;
     };
-    __tmp__CC2=result__UVCB;
+    __tmp__AD2=result__UVCB;
   };
-  if (__tmp__CC2) {
-    __tmp__PC2=TRUE__;
+  if (__tmp__AD2) {
+    __tmp__ND2=TRUE__;
   } else {
-    result__GWCB=(integer__V11 <=  786433);
+    result__GWCB=(integer__B51 <=  12289);
     if (result__GWCB) {
-      result__X11= 786433;
+      result__D51= 12289;
     };
-    __tmp__PC2=result__GWCB;
+    __tmp__ND2=result__GWCB;
   };
-  if (__tmp__PC2) {
-    __tmp__2C2=TRUE__;
+  if (__tmp__ND2) {
+    __tmp__0D2=TRUE__;
   } else {
-    result__YWCB=(integer__V11 <=  1572869);
+    result__YWCB=(integer__B51 <=  24593);
     if (result__YWCB) {
-      result__X11= 1572869;
+      result__D51= 24593;
     };
-    __tmp__2C2=result__YWCB;
+    __tmp__0D2=result__YWCB;
   };
-  if (__tmp__2C2) {
-    __tmp__JD2=TRUE__;
+  if (__tmp__0D2) {
+    __tmp__HE2=TRUE__;
   } else {
-    result__KXCB=(integer__V11 <=  3145739);
+    result__KXCB=(integer__B51 <=  49157);
     if (result__KXCB) {
-      result__X11= 3145739;
+      result__D51= 49157;
     };
-    __tmp__JD2=result__KXCB;
+    __tmp__HE2=result__KXCB;
   };
-  if (__tmp__JD2) {
-    __tmp__WD2=TRUE__;
+  if (__tmp__HE2) {
+    __tmp__UE2=TRUE__;
   } else {
-    result__2XCB=(integer__V11 <=  6291469);
+    result__2XCB=(integer__B51 <=  98317);
     if (result__2XCB) {
-      result__X11= 6291469;
+      result__D51= 98317;
     };
-    __tmp__WD2=result__2XCB;
+    __tmp__UE2=result__2XCB;
   };
-  if (__tmp__WD2) {
-    __tmp__DE2=TRUE__;
+  if (__tmp__UE2) {
+    __tmp__BF2=TRUE__;
   } else {
-    result__OYCB=(integer__V11 <=  12582917);
+    result__OYCB=(integer__B51 <=  196613);
     if (result__OYCB) {
-      result__X11= 12582917;
+      result__D51= 196613;
     };
-    __tmp__DE2=result__OYCB;
+    __tmp__BF2=result__OYCB;
   };
-  if (__tmp__DE2) {
-    __tmp__QE2=TRUE__;
+  if (__tmp__BF2) {
+    __tmp__OF2=TRUE__;
   } else {
-    result__AZCB=(integer__V11 <=  25165843);
+    result__AZCB=(integer__B51 <=  393241);
     if (result__AZCB) {
-      result__X11= 25165843;
+      result__D51= 393241;
     };
-    __tmp__QE2=result__AZCB;
+    __tmp__OF2=result__AZCB;
   };
-  if (__tmp__QE2) {
-    __tmp__3E2=TRUE__;
+  if (__tmp__OF2) {
+    __tmp__1F2=TRUE__;
   } else {
-    result__SZCB=(integer__V11 <=  50331653);
+    result__SZCB=(integer__B51 <=  786433);
     if (result__SZCB) {
-      result__X11= 50331653;
+      result__D51= 786433;
     };
-    __tmp__3E2=result__SZCB;
+    __tmp__1F2=result__SZCB;
   };
-  if (__tmp__3E2) {
-    __tmp__KF2=TRUE__;
+  if (__tmp__1F2) {
+    __tmp__IG2=TRUE__;
   } else {
-    result__E0CB=(integer__V11 <=  100663319);
+    result__E0CB=(integer__B51 <=  1572869);
     if (result__E0CB) {
-      result__X11= 100663319;
+      result__D51= 1572869;
     };
-    __tmp__KF2=result__E0CB;
+    __tmp__IG2=result__E0CB;
   };
-  if (__tmp__KF2) {
-    __tmp__XF2=TRUE__;
+  if (__tmp__IG2) {
+    __tmp__VG2=TRUE__;
   } else {
-    result__W0CB=(integer__V11 <=  201326611);
+    result__W0CB=(integer__B51 <=  3145739);
     if (result__W0CB) {
-      result__X11= 201326611;
+      result__D51= 3145739;
     };
-    __tmp__XF2=result__W0CB;
+    __tmp__VG2=result__W0CB;
   };
-  if (__tmp__XF2) {
-    __tmp__EG2=TRUE__;
+  if (__tmp__VG2) {
+    __tmp__CH2=TRUE__;
   } else {
-    result__I1CB=(integer__V11 <=  402653189);
+    result__I1CB=(integer__B51 <=  6291469);
     if (result__I1CB) {
-      result__X11= 402653189;
+      result__D51= 6291469;
+    };
+    __tmp__CH2=result__I1CB;
+  };
+  if (__tmp__CH2) {
+    __tmp__PH2=TRUE__;
+  } else {
+    result__01CB=(integer__B51 <=  12582917);
+    if (result__01CB) {
+      result__D51= 12582917;
+    };
+    __tmp__PH2=result__01CB;
+  };
+  if (__tmp__PH2) {
+    __tmp__2H2=TRUE__;
+  } else {
+    result__M2CB=(integer__B51 <=  25165843);
+    if (result__M2CB) {
+      result__D51= 25165843;
+    };
+    __tmp__2H2=result__M2CB;
+  };
+  if (__tmp__2H2) {
+    __tmp__JI2=TRUE__;
+  } else {
+    result__42CB=(integer__B51 <=  50331653);
+    if (result__42CB) {
+      result__D51= 50331653;
+    };
+    __tmp__JI2=result__42CB;
+  };
+  if (__tmp__JI2) {
+    __tmp__WI2=TRUE__;
+  } else {
+    result__Q3CB=(integer__B51 <=  100663319);
+    if (result__Q3CB) {
+      result__D51= 100663319;
+    };
+    __tmp__WI2=result__Q3CB;
+  };
+  if (__tmp__WI2) {
+    __tmp__DJ2=TRUE__;
+  } else {
+    result__C4CB=(integer__B51 <=  201326611);
+    if (result__C4CB) {
+      result__D51= 201326611;
     };
-    __tmp__EG2=result__I1CB;
+    __tmp__DJ2=result__C4CB;
   };
-  if ((! __tmp__EG2)) {
-    if ((integer__V11 <=  805306457)) {
-      result__X11= 805306457;
+  if (__tmp__DJ2) {
+    __tmp__QJ2=TRUE__;
+  } else {
+    result__U4CB=(integer__B51 <=  402653189);
+    if (result__U4CB) {
+      result__D51= 402653189;
+    };
+    __tmp__QJ2=result__U4CB;
+  };
+  if ((! __tmp__QJ2)) {
+    if ((integer__B51 <=  805306457)) {
+      result__D51= 805306457;
     } else {
-      result__X11= 1610612741;
+      result__D51= 1610612741;
     };
   };
-  return(result__X11);
+  return(result__D51);
 }
 
-static void** create__T43(__INTEGER nb_elements__V43)
+static void** create__BE4(__INTEGER nb_elements__DE4)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__RIFH,a__WIFH,new_size__SIFH,new_size2__TIFH,a__0IFH;
+  __UINTEGER_32 new_size__1IFH;
+  __POINTER result__QIFH,ptr_table__JTIH,next__ITIH,result__KTIH;
+  void *result__5ALH;
+  __INTEGER Self__R4JC;
+  void **Result__H0EB;
+  sz__RIFH=((__UINTEGER_32 )(__INTEGER)(nb_elements__DE4 * ((__INTEGER )(sizeof(void *)))));
+  result__QIFH=((__POINTER )(NULL));
+  a__WIFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__SIFH=(__UINTEGER_32)((__UINTEGER_32)(sz__RIFH + a__WIFH) & (__UINTEGER_32)(~ a__WIFH));
+  new_size2__TIFH=(__UINTEGER_32)(new_size__SIFH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__TIFH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__0IFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__1IFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__TIFH + a__0IFH) & (__UINTEGER_32)(~ a__0IFH));
+    ptr_table__JTIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__1IFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__ITIH=((__POINTER )(NULL));
+    result__KTIH=((__POINTER *)ptr_table__JTIH)[ 0];
+    if ((result__KTIH == (void *)NULL)) {
+      result__KTIH=new_lab__FTJ(new_size__1IFH);
+      next__ITIH=(void *)((unsigned long)result__KTIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1IFH)));
+      ((__POINTER *)next__ITIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__JTIH)[ 0]=next__ITIH;
+    } else {
+      next__ITIH=((__POINTER *)result__KTIH)[ 0];
+      if ((next__ITIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__KTIH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__1IFH <<  1)) <=  4096)) {
+          next__ITIH=(void *)((unsigned long)result__KTIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1IFH)));
+        } else {
+          next__ITIH=new_lab__FTJ(new_size__1IFH);
+        };
+        ((__POINTER *)next__ITIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__JTIH)[ 0]=next__ITIH;
+      } else {
+        ((__POINTER *)result__KTIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ITIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__KTIH=next__ITIH;
+      };
+    };
+    ((__POINTER *)result__KTIH)[ 0]=((__POINTER ) 3);
+    result__QIFH=(void *)((unsigned long)result__KTIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__5ALH=first_free__NFVB;
+    while ((((void *)result__5ALH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__5ALH)->map_size_and_id__YTB &  4294967292LU) < new_size__SIFH))) {
+      result__5ALH=((__MEMORY *)result__5ALH)->map_next_free__ZTB;
     };
-    if (((void *)result__AZKH == (void *)NULL)) {
-      result__AZKH=new_page__K34();
+    if (((void *)result__5ALH == (void *)NULL)) {
+      result__5ALH=new_page__YC5();
     };
-    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)));
+    to_busy__index__MWFC(result__5ALH,new_size__SIFH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__5ALH)) - (unsigned long)begin_memory__SXH)))) >>  26));
+    result__QIFH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__5ALH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__H0EB=((void **)result__QIFH);
+  Self__R4JC=(__INTEGER)(nb_elements__DE4 -  1);
+  while ((Self__R4JC >=  0)) {
+    Result__H0EB[Self__R4JC]=NULL;
+    Self__R4JC=(__INTEGER)(Self__R4JC -  1);
   };
-  return(Result__KWEB);
+  return(Result__H0EB);
 }
 
-static void** create__RITC(__INTEGER nb_elements__TITC)
+static void** create__5LTC(__INTEGER nb_elements__BMTC)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__3IFH,a__CJFH,new_size__4IFH,new_size2__5IFH,a__GJFH;
+  __UINTEGER_32 new_size__HJFH;
+  __POINTER result__2IFH,ptr_table__OTIH,next__NTIH,result__PTIH;
+  void *result__CBLH;
+  __INTEGER Self__1TWD;
+  void **Result__KI3C;
+  sz__3IFH=((__UINTEGER_32 )(__INTEGER)(nb_elements__BMTC * ((__INTEGER )(sizeof(void *)))));
+  result__2IFH=((__POINTER )(NULL));
+  a__CJFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__4IFH=(__UINTEGER_32)((__UINTEGER_32)(sz__3IFH + a__CJFH) & (__UINTEGER_32)(~ a__CJFH));
+  new_size2__5IFH=(__UINTEGER_32)(new_size__4IFH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__5IFH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__GJFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__HJFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__5IFH + a__GJFH) & (__UINTEGER_32)(~ a__GJFH));
+    ptr_table__OTIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__HJFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__NTIH=((__POINTER )(NULL));
+    result__PTIH=((__POINTER *)ptr_table__OTIH)[ 0];
+    if ((result__PTIH == (void *)NULL)) {
+      result__PTIH=new_lab__FTJ(new_size__HJFH);
+      next__NTIH=(void *)((unsigned long)result__PTIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HJFH)));
+      ((__POINTER *)next__NTIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__OTIH)[ 0]=next__NTIH;
+    } else {
+      next__NTIH=((__POINTER *)result__PTIH)[ 0];
+      if ((next__NTIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__PTIH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__HJFH <<  1)) <=  4096)) {
+          next__NTIH=(void *)((unsigned long)result__PTIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HJFH)));
+        } else {
+          next__NTIH=new_lab__FTJ(new_size__HJFH);
+        };
+        ((__POINTER *)next__NTIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__OTIH)[ 0]=next__NTIH;
+      } else {
+        ((__POINTER *)result__PTIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NTIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__PTIH=next__NTIH;
+      };
+    };
+    ((__POINTER *)result__PTIH)[ 0]=((__POINTER ) 3);
+    result__2IFH=(void *)((unsigned long)result__PTIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__CBLH=first_free__NFVB;
+    while ((((void *)result__CBLH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__CBLH)->map_size_and_id__YTB &  4294967292LU) < new_size__4IFH))) {
+      result__CBLH=((__MEMORY *)result__CBLH)->map_next_free__ZTB;
     };
-    if (((void *)result__DZKH == (void *)NULL)) {
-      result__DZKH=new_page__K34();
+    if (((void *)result__CBLH == (void *)NULL)) {
+      result__CBLH=new_page__YC5();
     };
-    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)));
+    to_busy__index__MWFC(result__CBLH,new_size__4IFH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__CBLH)) - (unsigned long)begin_memory__SXH)))) >>  26));
+    result__2IFH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__CBLH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__KI3C=((void **)result__2IFH);
+  Self__1TWD=(__INTEGER)(nb_elements__BMTC -  1);
+  while ((Self__1TWD >=  0)) {
+    Result__KI3C[Self__1TWD]=NULL;
+    Self__1TWD=(__INTEGER)(Self__1TWD -  1);
   };
-  return(Result__2E3C);
+  return(Result__KI3C);
 }
 
-static void** create__QDSB(__INTEGER nb_elements__SDSB)
+static void** create__2GSB(__INTEGER nb_elements__4GSB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__JJFH,a__OJFH,new_size__KJFH,new_size2__LJFH,a__SJFH;
+  __UINTEGER_32 new_size__TJFH;
+  __POINTER result__IJFH,ptr_table__TTIH,next__STIH,result__UTIH;
+  void *result__FBLH;
+  __INTEGER Self__ZKNC;
+  void **Result__VLVB;
+  sz__JJFH=((__UINTEGER_32 )(__INTEGER)(nb_elements__4GSB * ((__INTEGER )(sizeof(void *)))));
+  result__IJFH=((__POINTER )(NULL));
+  a__OJFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__KJFH=(__UINTEGER_32)((__UINTEGER_32)(sz__JJFH + a__OJFH) & (__UINTEGER_32)(~ a__OJFH));
+  new_size2__LJFH=(__UINTEGER_32)(new_size__KJFH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__LJFH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__SJFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__TJFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__LJFH + a__SJFH) & (__UINTEGER_32)(~ a__SJFH));
+    ptr_table__TTIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__TJFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__STIH=((__POINTER )(NULL));
+    result__UTIH=((__POINTER *)ptr_table__TTIH)[ 0];
+    if ((result__UTIH == (void *)NULL)) {
+      result__UTIH=new_lab__FTJ(new_size__TJFH);
+      next__STIH=(void *)((unsigned long)result__UTIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TJFH)));
+      ((__POINTER *)next__STIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__TTIH)[ 0]=next__STIH;
+    } else {
+      next__STIH=((__POINTER *)result__UTIH)[ 0];
+      if ((next__STIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__UTIH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__TJFH <<  1)) <=  4096)) {
+          next__STIH=(void *)((unsigned long)result__UTIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TJFH)));
+        } else {
+          next__STIH=new_lab__FTJ(new_size__TJFH);
+        };
+        ((__POINTER *)next__STIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__TTIH)[ 0]=next__STIH;
+      } else {
+        ((__POINTER *)result__UTIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__STIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__UTIH=next__STIH;
+      };
+    };
+    ((__POINTER *)result__UTIH)[ 0]=((__POINTER ) 3);
+    result__IJFH=(void *)((unsigned long)result__UTIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__FBLH=first_free__NFVB;
+    while ((((void *)result__FBLH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__FBLH)->map_size_and_id__YTB &  4294967292LU) < new_size__KJFH))) {
+      result__FBLH=((__MEMORY *)result__FBLH)->map_next_free__ZTB;
     };
-    if (((void *)result__GZKH == (void *)NULL)) {
-      result__GZKH=new_page__K34();
+    if (((void *)result__FBLH == (void *)NULL)) {
+      result__FBLH=new_page__YC5();
     };
-    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)));
+    to_busy__index__MWFC(result__FBLH,new_size__KJFH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__FBLH)) - (unsigned long)begin_memory__SXH)))) >>  26));
+    result__IJFH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__FBLH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__VLVB=((void **)result__IJFH);
+  Self__ZKNC=(__INTEGER)(nb_elements__4GSB -  1);
+  while ((Self__ZKNC >=  0)) {
+    Result__VLVB[Self__ZKNC]=NULL;
+    Self__ZKNC=(__INTEGER)(Self__ZKNC -  1);
   };
-  return(Result__JIVB);
+  return(Result__VLVB);
 }
 
-static void** create__3C4(__INTEGER nb_elements__5C4)
+static void** create__LI4(__INTEGER nb_elements__NI4)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__VJFH,a__0JFH,new_size__WJFH,new_size2__XJFH,a__4JFH;
+  __UINTEGER_32 new_size__5JFH;
+  __POINTER result__UJFH,ptr_table__YTIH,next__XTIH,result__ZTIH;
+  void *result__IBLH;
+  __INTEGER Self__Y5JC;
+  void **Result__IAFB;
+  sz__VJFH=((__UINTEGER_32 )(__INTEGER)(nb_elements__NI4 * ((__INTEGER )(sizeof(void *)))));
+  result__UJFH=((__POINTER )(NULL));
+  a__0JFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__WJFH=(__UINTEGER_32)((__UINTEGER_32)(sz__VJFH + a__0JFH) & (__UINTEGER_32)(~ a__0JFH));
+  new_size2__XJFH=(__UINTEGER_32)(new_size__WJFH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__XJFH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__4JFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__5JFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__XJFH + a__4JFH) & (__UINTEGER_32)(~ a__4JFH));
+    ptr_table__YTIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__5JFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__XTIH=((__POINTER )(NULL));
+    result__ZTIH=((__POINTER *)ptr_table__YTIH)[ 0];
+    if ((result__ZTIH == (void *)NULL)) {
+      result__ZTIH=new_lab__FTJ(new_size__5JFH);
+      next__XTIH=(void *)((unsigned long)result__ZTIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5JFH)));
+      ((__POINTER *)next__XTIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__YTIH)[ 0]=next__XTIH;
+    } else {
+      next__XTIH=((__POINTER *)result__ZTIH)[ 0];
+      if ((next__XTIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ZTIH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__5JFH <<  1)) <=  4096)) {
+          next__XTIH=(void *)((unsigned long)result__ZTIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5JFH)));
+        } else {
+          next__XTIH=new_lab__FTJ(new_size__5JFH);
+        };
+        ((__POINTER *)next__XTIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__YTIH)[ 0]=next__XTIH;
+      } else {
+        ((__POINTER *)result__ZTIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XTIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__ZTIH=next__XTIH;
+      };
+    };
+    ((__POINTER *)result__ZTIH)[ 0]=((__POINTER ) 3);
+    result__UJFH=(void *)((unsigned long)result__ZTIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__IBLH=first_free__NFVB;
+    while ((((void *)result__IBLH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__IBLH)->map_size_and_id__YTB &  4294967292LU) < new_size__WJFH))) {
+      result__IBLH=((__MEMORY *)result__IBLH)->map_next_free__ZTB;
     };
-    if (((void *)result__JZKH == (void *)NULL)) {
-      result__JZKH=new_page__K34();
+    if (((void *)result__IBLH == (void *)NULL)) {
+      result__IBLH=new_page__YC5();
     };
-    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)));
+    to_busy__index__MWFC(result__IBLH,new_size__WJFH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__IBLH)) - (unsigned long)begin_memory__SXH)))) >>  26));
+    result__UJFH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__IBLH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__IAFB=((void **)result__UJFH);
+  Self__Y5JC=(__INTEGER)(nb_elements__NI4 -  1);
+  while ((Self__Y5JC >=  0)) {
+    Result__IAFB[Self__Y5JC]=NULL;
+    Self__Y5JC=(__INTEGER)(Self__Y5JC -  1);
   };
-  return(Result__L2EB);
+  return(Result__IAFB);
 }
 
-static void** create__IW2(__INTEGER nb_elements__KW2)
+static void** create__UZ2(__INTEGER nb_elements__WZ2)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__BKFH,a__GKFH,new_size__CKFH,new_size2__DKFH,a__KKFH;
+  __UINTEGER_32 new_size__LKFH;
+  __POINTER result__AKFH,ptr_table__3TIH,next__2TIH,result__4TIH;
+  void *result__LBLH;
+  __INTEGER Self__0XJC;
+  void **Result__LRDB;
+  sz__BKFH=((__UINTEGER_32 )(__INTEGER)(nb_elements__WZ2 * ((__INTEGER )(sizeof(void *)))));
+  result__AKFH=((__POINTER )(NULL));
+  a__GKFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__CKFH=(__UINTEGER_32)((__UINTEGER_32)(sz__BKFH + a__GKFH) & (__UINTEGER_32)(~ a__GKFH));
+  new_size2__DKFH=(__UINTEGER_32)(new_size__CKFH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__DKFH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__KKFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__LKFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__DKFH + a__KKFH) & (__UINTEGER_32)(~ a__KKFH));
+    ptr_table__3TIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__LKFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__2TIH=((__POINTER )(NULL));
+    result__4TIH=((__POINTER *)ptr_table__3TIH)[ 0];
+    if ((result__4TIH == (void *)NULL)) {
+      result__4TIH=new_lab__FTJ(new_size__LKFH);
+      next__2TIH=(void *)((unsigned long)result__4TIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LKFH)));
+      ((__POINTER *)next__2TIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__3TIH)[ 0]=next__2TIH;
+    } else {
+      next__2TIH=((__POINTER *)result__4TIH)[ 0];
+      if ((next__2TIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4TIH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__LKFH <<  1)) <=  4096)) {
+          next__2TIH=(void *)((unsigned long)result__4TIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LKFH)));
+        } else {
+          next__2TIH=new_lab__FTJ(new_size__LKFH);
+        };
+        ((__POINTER *)next__2TIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__3TIH)[ 0]=next__2TIH;
+      } else {
+        ((__POINTER *)result__4TIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2TIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__4TIH=next__2TIH;
+      };
+    };
+    ((__POINTER *)result__4TIH)[ 0]=((__POINTER ) 3);
+    result__AKFH=(void *)((unsigned long)result__4TIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__LBLH=first_free__NFVB;
+    while ((((void *)result__LBLH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__LBLH)->map_size_and_id__YTB &  4294967292LU) < new_size__CKFH))) {
+      result__LBLH=((__MEMORY *)result__LBLH)->map_next_free__ZTB;
     };
-    if (((void *)result__MZKH == (void *)NULL)) {
-      result__MZKH=new_page__K34();
+    if (((void *)result__LBLH == (void *)NULL)) {
+      result__LBLH=new_page__YC5();
     };
-    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)));
+    to_busy__index__MWFC(result__LBLH,new_size__CKFH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__LBLH)) - (unsigned long)begin_memory__SXH)))) >>  26));
+    result__AKFH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__LBLH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__LRDB=((void **)result__AKFH);
+  Self__0XJC=(__INTEGER)(nb_elements__WZ2 -  1);
+  while ((Self__0XJC >=  0)) {
+    Result__LRDB[Self__0XJC]=NULL;
+    Self__0XJC=(__INTEGER)(Self__0XJC -  1);
   };
-  return(Result__5NDB);
+  return(Result__LRDB);
 }
 
-static void** create__WHRB(__INTEGER nb_elements__YHRB)
+static void** create__CLRB(__INTEGER nb_elements__ELRB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__NKFH,a__SKFH,new_size__OKFH,new_size2__PKFH,a__WKFH;
+  __UINTEGER_32 new_size__XKFH;
+  __POINTER result__MKFH,ptr_table__CUIH,next__BUIH,result__DUIH;
+  void *result__OBLH;
+  __INTEGER Self__0ENC;
+  void **Result__MKUB;
+  sz__NKFH=((__UINTEGER_32 )(__INTEGER)(nb_elements__ELRB * ((__INTEGER )(sizeof(void *)))));
+  result__MKFH=((__POINTER )(NULL));
+  a__SKFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__OKFH=(__UINTEGER_32)((__UINTEGER_32)(sz__NKFH + a__SKFH) & (__UINTEGER_32)(~ a__SKFH));
+  new_size2__PKFH=(__UINTEGER_32)(new_size__OKFH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__PKFH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__WKFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__XKFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__PKFH + a__WKFH) & (__UINTEGER_32)(~ a__WKFH));
+    ptr_table__CUIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__XKFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__BUIH=((__POINTER )(NULL));
+    result__DUIH=((__POINTER *)ptr_table__CUIH)[ 0];
+    if ((result__DUIH == (void *)NULL)) {
+      result__DUIH=new_lab__FTJ(new_size__XKFH);
+      next__BUIH=(void *)((unsigned long)result__DUIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XKFH)));
+      ((__POINTER *)next__BUIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__CUIH)[ 0]=next__BUIH;
+    } else {
+      next__BUIH=((__POINTER *)result__DUIH)[ 0];
+      if ((next__BUIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DUIH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__XKFH <<  1)) <=  4096)) {
+          next__BUIH=(void *)((unsigned long)result__DUIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XKFH)));
+        } else {
+          next__BUIH=new_lab__FTJ(new_size__XKFH);
+        };
+        ((__POINTER *)next__BUIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__CUIH)[ 0]=next__BUIH;
+      } else {
+        ((__POINTER *)result__DUIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BUIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__DUIH=next__BUIH;
+      };
+    };
+    ((__POINTER *)result__DUIH)[ 0]=((__POINTER ) 3);
+    result__MKFH=(void *)((unsigned long)result__DUIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__OBLH=first_free__NFVB;
+    while ((((void *)result__OBLH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__OBLH)->map_size_and_id__YTB &  4294967292LU) < new_size__OKFH))) {
+      result__OBLH=((__MEMORY *)result__OBLH)->map_next_free__ZTB;
     };
-    if (((void *)result__PZKH == (void *)NULL)) {
-      result__PZKH=new_page__K34();
+    if (((void *)result__OBLH == (void *)NULL)) {
+      result__OBLH=new_page__YC5();
     };
-    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)));
+    to_busy__index__MWFC(result__OBLH,new_size__OKFH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__OBLH)) - (unsigned long)begin_memory__SXH)))) >>  26));
+    result__MKFH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__OBLH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__MKUB=((void **)result__MKFH);
+  Self__0ENC=(__INTEGER)(nb_elements__ELRB -  1);
+  while ((Self__0ENC >=  0)) {
+    Result__MKUB[Self__0ENC]=NULL;
+    Self__0ENC=(__INTEGER)(Self__0ENC -  1);
   };
-  return(Result__AHUB);
+  return(Result__MKUB);
 }
 
-static __FAST_ARRAYoITM_TYPE_MONOo* create_with_capacity__MCR(__INTEGER new_count__OCR)
+static __FAST_ARRAYoITM_TYPE_MONOo* create_with_capacity__YFR(__INTEGER new_count__0FR)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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__;
+  __POINTER ptr__WLR,ptr_table__HUIH,next__GUIH,result__IUIH;
+  __POINTER ptr_table__MUIH,next__LUIH,result__NUIH;
+  __INTEGER typ_id__1LR;
+  __UINTEGER_32 sz__YLR,a__0KFH,new_size__1KFH,t__5KFH,a__4KFH;
+  __UINTEGER_32 new_size__PUIH,lab_type__OUIH;
+  __FAST_ARRAYoITM_TYPE_MONOo *result__VLR,*Self__HKW;
+  result__VLR=NULL;
+  ptr__WLR=((__POINTER )(NULL));
+  typ_id__1LR= 0;
+  sz__YLR=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_TYPE_MONOo));
+  if ((sz__YLR ==  0)) {
+    result__VLR=FAST_ARRAYoITM_TYPE_MONOo__;
   } else {
-    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);
+    typ_id__1LR=__FAST_ARRAYoITM_TYPE_MONOo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__YLR);
+    if ((typ_id__1LR == (__INTEGER)(-  1))) {
+      a__0KFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__1KFH=(__UINTEGER_32)((__UINTEGER_32)(sz__YLR + a__0KFH) & (__UINTEGER_32)(~ a__0KFH));
+      ptr_table__HUIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__1KFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__GUIH=((__POINTER )(NULL));
+      result__IUIH=((__POINTER *)ptr_table__HUIH)[ 0];
+      if ((result__IUIH == (void *)NULL)) {
+        result__IUIH=new_lab__FTJ(new_size__1KFH);
+        next__GUIH=(void *)((unsigned long)result__IUIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1KFH)));
+        ((__POINTER *)next__GUIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__HUIH)[ 0]=next__GUIH;
+      } else {
+        next__GUIH=((__POINTER *)result__IUIH)[ 0];
+        if ((next__GUIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__IUIH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__1KFH <<  1)) <=  4096)) {
+            next__GUIH=(void *)((unsigned long)result__IUIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1KFH)));
+          } else {
+            next__GUIH=new_lab__FTJ(new_size__1KFH);
+          };
+          ((__POINTER *)next__GUIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__HUIH)[ 0]=next__GUIH;
+        } else {
+          ((__POINTER *)result__IUIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GUIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__IUIH=next__GUIH;
+        };
+      };
+      ptr__WLR=result__IUIH;
+    } else {
+      t__5KFH=((__UINTEGER_32 )typ_id__1LR);
+      a__4KFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__PUIH=(__UINTEGER_32)((__UINTEGER_32)(sz__YLR + a__4KFH) & (__UINTEGER_32)(~ a__4KFH));
+      ptr_table__MUIH=((__POINTER )(&(table_type[(t__5KFH)])));
+      lab_type__OUIH=(__UINTEGER_32)(t__5KFH |  1);
+      next__LUIH=((__POINTER )(NULL));
+      result__NUIH=((__POINTER *)ptr_table__MUIH)[ 0];
+      if ((result__NUIH == (void *)NULL)) {
+        result__NUIH=new_lab__FTJ(lab_type__OUIH);
+        next__LUIH=(void *)((unsigned long)result__NUIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PUIH)));
+        ((__POINTER *)next__LUIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__MUIH)[ 0]=next__LUIH;
+      } else {
+        next__LUIH=((__POINTER *)result__NUIH)[ 0];
+        if ((next__LUIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__NUIH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__PUIH <<  1)) <=  4096)) {
+            next__LUIH=(void *)((unsigned long)result__NUIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PUIH)));
+          } else {
+            next__LUIH=new_lab__FTJ(lab_type__OUIH);
+          };
+          ((__POINTER *)next__LUIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__MUIH)[ 0]=next__LUIH;
+        } else {
+          ((__POINTER *)result__NUIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LUIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__NUIH=next__LUIH;
+        };
+      };
+      ptr__WLR=result__NUIH;
+    };
+    result__VLR=((__FAST_ARRAYoITM_TYPE_MONOo *)ptr__WLR);
+    *(result__VLR) = *(FAST_ARRAYoITM_TYPE_MONOo__);
+  };
+  Self__HKW=((__FAST_ARRAYoITM_TYPE_MONOo *)result__VLR);
+  if ((Self__HKW->parent_arrayed_collection__EYC.capacity__HOV < new_count__0FR)) {
+    Self__HKW->parent_arrayed_collection__EYC.storage__ZMV=create__JDRB(new_count__0FR);
+    Self__HKW->parent_arrayed_collection__EYC.capacity__HOV=new_count__0FR;
+  };
+  Self__HKW->parent_arrayed_collection__EYC.upper__SIV=(__INTEGER)(-  1);
+  return(result__VLR);
 }
 
-static void** create__XWBB(__INTEGER nb_elements__ZWBB)
+static void** create__D0BB(__INTEGER nb_elements__F0BB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__BLFH,a__GLFH,new_size__CLFH,new_size2__DLFH,a__KLFH;
+  __UINTEGER_32 new_size__LLFH;
+  __POINTER result__ALFH,ptr_table__RUIH,next__QUIH,result__SUIH;
+  void *result__RBLH;
+  __INTEGER Self__MPKC;
+  void **Result__RYIB;
+  sz__BLFH=((__UINTEGER_32 )(__INTEGER)(nb_elements__F0BB * ((__INTEGER )(sizeof(void *)))));
+  result__ALFH=((__POINTER )(NULL));
+  a__GLFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__CLFH=(__UINTEGER_32)((__UINTEGER_32)(sz__BLFH + a__GLFH) & (__UINTEGER_32)(~ a__GLFH));
+  new_size2__DLFH=(__UINTEGER_32)(new_size__CLFH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__DLFH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__KLFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__LLFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__DLFH + a__KLFH) & (__UINTEGER_32)(~ a__KLFH));
+    ptr_table__RUIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__LLFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__QUIH=((__POINTER )(NULL));
+    result__SUIH=((__POINTER *)ptr_table__RUIH)[ 0];
+    if ((result__SUIH == (void *)NULL)) {
+      result__SUIH=new_lab__FTJ(new_size__LLFH);
+      next__QUIH=(void *)((unsigned long)result__SUIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LLFH)));
+      ((__POINTER *)next__QUIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__RUIH)[ 0]=next__QUIH;
+    } else {
+      next__QUIH=((__POINTER *)result__SUIH)[ 0];
+      if ((next__QUIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__SUIH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__LLFH <<  1)) <=  4096)) {
+          next__QUIH=(void *)((unsigned long)result__SUIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LLFH)));
+        } else {
+          next__QUIH=new_lab__FTJ(new_size__LLFH);
+        };
+        ((__POINTER *)next__QUIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__RUIH)[ 0]=next__QUIH;
+      } else {
+        ((__POINTER *)result__SUIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QUIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__SUIH=next__QUIH;
+      };
+    };
+    ((__POINTER *)result__SUIH)[ 0]=((__POINTER ) 3);
+    result__ALFH=(void *)((unsigned long)result__SUIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__RBLH=first_free__NFVB;
+    while ((((void *)result__RBLH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__RBLH)->map_size_and_id__YTB &  4294967292LU) < new_size__CLFH))) {
+      result__RBLH=((__MEMORY *)result__RBLH)->map_next_free__ZTB;
     };
-    if (((void *)result__SZKH == (void *)NULL)) {
-      result__SZKH=new_page__K34();
+    if (((void *)result__RBLH == (void *)NULL)) {
+      result__RBLH=new_page__YC5();
     };
-    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)));
+    to_busy__index__MWFC(result__RBLH,new_size__CLFH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__RBLH)) - (unsigned long)begin_memory__SXH)))) >>  26));
+    result__ALFH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__RBLH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__RYIB=((void **)result__ALFH);
+  Self__MPKC=(__INTEGER)(nb_elements__F0BB -  1);
+  while ((Self__MPKC >=  0)) {
+    Result__RYIB[Self__MPKC]=NULL;
+    Self__MPKC=(__INTEGER)(Self__MPKC -  1);
   };
-  return(Result__FVIB);
+  return(Result__RYIB);
 }
 
-static void** create__WJXB(__INTEGER nb_elements__YJXB)
+static void** create__CNXB(__INTEGER nb_elements__ENXB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__NLFH,a__SLFH,new_size__OLFH,new_size2__PLFH,a__WLFH;
+  __UINTEGER_32 new_size__XLFH;
+  __POINTER result__MLFH,ptr_table__WUIH,next__VUIH,result__XUIH;
+  void *result__UBLH;
+  __INTEGER Self__Z2OC;
+  void **Result__VY0B;
+  sz__NLFH=((__UINTEGER_32 )(__INTEGER)(nb_elements__ENXB * ((__INTEGER )(sizeof(void *)))));
+  result__MLFH=((__POINTER )(NULL));
+  a__SLFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__OLFH=(__UINTEGER_32)((__UINTEGER_32)(sz__NLFH + a__SLFH) & (__UINTEGER_32)(~ a__SLFH));
+  new_size2__PLFH=(__UINTEGER_32)(new_size__OLFH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__PLFH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__WLFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__XLFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__PLFH + a__WLFH) & (__UINTEGER_32)(~ a__WLFH));
+    ptr_table__WUIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__XLFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__VUIH=((__POINTER )(NULL));
+    result__XUIH=((__POINTER *)ptr_table__WUIH)[ 0];
+    if ((result__XUIH == (void *)NULL)) {
+      result__XUIH=new_lab__FTJ(new_size__XLFH);
+      next__VUIH=(void *)((unsigned long)result__XUIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XLFH)));
+      ((__POINTER *)next__VUIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__WUIH)[ 0]=next__VUIH;
+    } else {
+      next__VUIH=((__POINTER *)result__XUIH)[ 0];
+      if ((next__VUIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XUIH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__XLFH <<  1)) <=  4096)) {
+          next__VUIH=(void *)((unsigned long)result__XUIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XLFH)));
+        } else {
+          next__VUIH=new_lab__FTJ(new_size__XLFH);
+        };
+        ((__POINTER *)next__VUIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__WUIH)[ 0]=next__VUIH;
+      } else {
+        ((__POINTER *)result__XUIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VUIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__XUIH=next__VUIH;
+      };
+    };
+    ((__POINTER *)result__XUIH)[ 0]=((__POINTER ) 3);
+    result__MLFH=(void *)((unsigned long)result__XUIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__UBLH=first_free__NFVB;
+    while ((((void *)result__UBLH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__UBLH)->map_size_and_id__YTB &  4294967292LU) < new_size__OLFH))) {
+      result__UBLH=((__MEMORY *)result__UBLH)->map_next_free__ZTB;
     };
-    if (((void *)result__VZKH == (void *)NULL)) {
-      result__VZKH=new_page__K34();
+    if (((void *)result__UBLH == (void *)NULL)) {
+      result__UBLH=new_page__YC5();
     };
-    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)));
+    to_busy__index__MWFC(result__UBLH,new_size__OLFH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__UBLH)) - (unsigned long)begin_memory__SXH)))) >>  26));
+    result__MLFH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__UBLH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__VY0B=((void **)result__MLFH);
+  Self__Z2OC=(__INTEGER)(nb_elements__ENXB -  1);
+  while ((Self__Z2OC >=  0)) {
+    Result__VY0B[Self__Z2OC]=NULL;
+    Self__Z2OC=(__INTEGER)(Self__Z2OC -  1);
   };
-  return(Result__JV0B);
+  return(Result__VY0B);
 }
 
-static void** create__RSWB(__INTEGER nb_elements__TSWB)
+static void** create__3VWB(__INTEGER nb_elements__5VWB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__ZLFH,a__4LFH,new_size__0LFH,new_size2__1LFH,a__CMFH;
+  __UINTEGER_32 new_size__DMFH;
+  __POINTER result__YLFH,ptr_table__1UIH,next__0UIH,result__2UIH;
+  void *result__XBLH;
+  __INTEGER Self__S1OC;
+  void **Result__4K0B;
+  sz__ZLFH=((__UINTEGER_32 )(__INTEGER)(nb_elements__5VWB * ((__INTEGER )(sizeof(void *)))));
+  result__YLFH=((__POINTER )(NULL));
+  a__4LFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__0LFH=(__UINTEGER_32)((__UINTEGER_32)(sz__ZLFH + a__4LFH) & (__UINTEGER_32)(~ a__4LFH));
+  new_size2__1LFH=(__UINTEGER_32)(new_size__0LFH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__1LFH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__CMFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__DMFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__1LFH + a__CMFH) & (__UINTEGER_32)(~ a__CMFH));
+    ptr_table__1UIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__DMFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__0UIH=((__POINTER )(NULL));
+    result__2UIH=((__POINTER *)ptr_table__1UIH)[ 0];
+    if ((result__2UIH == (void *)NULL)) {
+      result__2UIH=new_lab__FTJ(new_size__DMFH);
+      next__0UIH=(void *)((unsigned long)result__2UIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DMFH)));
+      ((__POINTER *)next__0UIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__1UIH)[ 0]=next__0UIH;
+    } else {
+      next__0UIH=((__POINTER *)result__2UIH)[ 0];
+      if ((next__0UIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2UIH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__DMFH <<  1)) <=  4096)) {
+          next__0UIH=(void *)((unsigned long)result__2UIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DMFH)));
+        } else {
+          next__0UIH=new_lab__FTJ(new_size__DMFH);
+        };
+        ((__POINTER *)next__0UIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__1UIH)[ 0]=next__0UIH;
+      } else {
+        ((__POINTER *)result__2UIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0UIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__2UIH=next__0UIH;
+      };
+    };
+    ((__POINTER *)result__2UIH)[ 0]=((__POINTER ) 3);
+    result__YLFH=(void *)((unsigned long)result__2UIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__XBLH=first_free__NFVB;
+    while ((((void *)result__XBLH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__XBLH)->map_size_and_id__YTB &  4294967292LU) < new_size__0LFH))) {
+      result__XBLH=((__MEMORY *)result__XBLH)->map_next_free__ZTB;
     };
-    if (((void *)result__YZKH == (void *)NULL)) {
-      result__YZKH=new_page__K34();
+    if (((void *)result__XBLH == (void *)NULL)) {
+      result__XBLH=new_page__YC5();
     };
-    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)));
+    to_busy__index__MWFC(result__XBLH,new_size__0LFH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__XBLH)) - (unsigned long)begin_memory__SXH)))) >>  26));
+    result__YLFH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__XBLH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__4K0B=((void **)result__YLFH);
+  Self__S1OC=(__INTEGER)(nb_elements__5VWB -  1);
+  while ((Self__S1OC >=  0)) {
+    Result__4K0B[Self__S1OC]=NULL;
+    Self__S1OC=(__INTEGER)(Self__S1OC -  1);
   };
-  return(Result__SH0B);
+  return(Result__4K0B);
 }
 
-static void** create__QQXB(__INTEGER nb_elements__SQXB)
+static void** create__2TXB(__INTEGER nb_elements__4TXB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__FMFH,a__KMFH,new_size__GMFH,new_size2__HMFH,a__OMFH;
+  __UINTEGER_32 new_size__PMFH;
+  __POINTER result__EMFH,ptr_table__AVIH,next__5UIH,result__BVIH;
+  void *result__0BLH;
+  __INTEGER Self__A4OC;
+  void **Result__LA1B;
+  sz__FMFH=((__UINTEGER_32 )(__INTEGER)(nb_elements__4TXB * ((__INTEGER )(sizeof(void *)))));
+  result__EMFH=((__POINTER )(NULL));
+  a__KMFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__GMFH=(__UINTEGER_32)((__UINTEGER_32)(sz__FMFH + a__KMFH) & (__UINTEGER_32)(~ a__KMFH));
+  new_size2__HMFH=(__UINTEGER_32)(new_size__GMFH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__HMFH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__OMFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__PMFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__HMFH + a__OMFH) & (__UINTEGER_32)(~ a__OMFH));
+    ptr_table__AVIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__PMFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__5UIH=((__POINTER )(NULL));
+    result__BVIH=((__POINTER *)ptr_table__AVIH)[ 0];
+    if ((result__BVIH == (void *)NULL)) {
+      result__BVIH=new_lab__FTJ(new_size__PMFH);
+      next__5UIH=(void *)((unsigned long)result__BVIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PMFH)));
+      ((__POINTER *)next__5UIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__AVIH)[ 0]=next__5UIH;
+    } else {
+      next__5UIH=((__POINTER *)result__BVIH)[ 0];
+      if ((next__5UIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BVIH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__PMFH <<  1)) <=  4096)) {
+          next__5UIH=(void *)((unsigned long)result__BVIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PMFH)));
+        } else {
+          next__5UIH=new_lab__FTJ(new_size__PMFH);
+        };
+        ((__POINTER *)next__5UIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__AVIH)[ 0]=next__5UIH;
+      } else {
+        ((__POINTER *)result__BVIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5UIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__BVIH=next__5UIH;
+      };
+    };
+    ((__POINTER *)result__BVIH)[ 0]=((__POINTER ) 3);
+    result__EMFH=(void *)((unsigned long)result__BVIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__0BLH=first_free__NFVB;
+    while ((((void *)result__0BLH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__0BLH)->map_size_and_id__YTB &  4294967292LU) < new_size__GMFH))) {
+      result__0BLH=((__MEMORY *)result__0BLH)->map_next_free__ZTB;
     };
-    if (((void *)result__1ZKH == (void *)NULL)) {
-      result__1ZKH=new_page__K34();
+    if (((void *)result__0BLH == (void *)NULL)) {
+      result__0BLH=new_page__YC5();
     };
-    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)));
+    to_busy__index__MWFC(result__0BLH,new_size__GMFH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__0BLH)) - (unsigned long)begin_memory__SXH)))) >>  26));
+    result__EMFH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__0BLH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__LA1B=((void **)result__EMFH);
+  Self__A4OC=(__INTEGER)(nb_elements__4TXB -  1);
+  while ((Self__A4OC >=  0)) {
+    Result__LA1B[Self__A4OC]=NULL;
+    Self__A4OC=(__INTEGER)(Self__A4OC -  1);
   };
-  return(Result__520B);
+  return(Result__LA1B);
 }
 
-static void** create__RE5(__INTEGER nb_elements__TE5)
+static void** create__5J5(__INTEGER nb_elements__BK5)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__RMFH,a__WMFH,new_size__SMFH,new_size2__TMFH,a__0MFH;
+  __UINTEGER_32 new_size__1MFH;
+  __POINTER result__QMFH,ptr_table__FVIH,next__EVIH,result__GVIH;
+  void *result__3BLH;
+  __INTEGER Self__VDKC;
+  void **Result__JCGB;
+  sz__RMFH=((__UINTEGER_32 )(__INTEGER)(nb_elements__BK5 * ((__INTEGER )(sizeof(void *)))));
+  result__QMFH=((__POINTER )(NULL));
+  a__WMFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__SMFH=(__UINTEGER_32)((__UINTEGER_32)(sz__RMFH + a__WMFH) & (__UINTEGER_32)(~ a__WMFH));
+  new_size2__TMFH=(__UINTEGER_32)(new_size__SMFH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__TMFH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__0MFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__1MFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__TMFH + a__0MFH) & (__UINTEGER_32)(~ a__0MFH));
+    ptr_table__FVIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__1MFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__EVIH=((__POINTER )(NULL));
+    result__GVIH=((__POINTER *)ptr_table__FVIH)[ 0];
+    if ((result__GVIH == (void *)NULL)) {
+      result__GVIH=new_lab__FTJ(new_size__1MFH);
+      next__EVIH=(void *)((unsigned long)result__GVIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1MFH)));
+      ((__POINTER *)next__EVIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__FVIH)[ 0]=next__EVIH;
+    } else {
+      next__EVIH=((__POINTER *)result__GVIH)[ 0];
+      if ((next__EVIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GVIH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__1MFH <<  1)) <=  4096)) {
+          next__EVIH=(void *)((unsigned long)result__GVIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1MFH)));
+        } else {
+          next__EVIH=new_lab__FTJ(new_size__1MFH);
+        };
+        ((__POINTER *)next__EVIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__FVIH)[ 0]=next__EVIH;
+      } else {
+        ((__POINTER *)result__GVIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EVIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__GVIH=next__EVIH;
+      };
+    };
+    ((__POINTER *)result__GVIH)[ 0]=((__POINTER ) 3);
+    result__QMFH=(void *)((unsigned long)result__GVIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__3BLH=first_free__NFVB;
+    while ((((void *)result__3BLH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__3BLH)->map_size_and_id__YTB &  4294967292LU) < new_size__SMFH))) {
+      result__3BLH=((__MEMORY *)result__3BLH)->map_next_free__ZTB;
     };
-    if (((void *)result__4ZKH == (void *)NULL)) {
-      result__4ZKH=new_page__K34();
+    if (((void *)result__3BLH == (void *)NULL)) {
+      result__3BLH=new_page__YC5();
     };
-    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)));
+    to_busy__index__MWFC(result__3BLH,new_size__SMFH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__3BLH)) - (unsigned long)begin_memory__SXH)))) >>  26));
+    result__QMFH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__3BLH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__JCGB=((void **)result__QMFH);
+  Self__VDKC=(__INTEGER)(nb_elements__BK5 -  1);
+  while ((Self__VDKC >=  0)) {
+    Result__JCGB[Self__VDKC]=NULL;
+    Self__VDKC=(__INTEGER)(Self__VDKC -  1);
   };
-  return(Result__M4FB);
+  return(Result__JCGB);
 }
 
-static void fast_put__to__PLZ(__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *Self__QLZ,void *v__RLZ,void *k__SLZ)
+static void fast_put__to__ORZ(__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *Self__PRZ,void *v__QRZ,void *k__RRZ)
 // ({HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo},{ITM_TYPE_PARAMETERxITM_TYPE_SIMPLE},{NULLxSTRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __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)));
+  __STRING_CONSTANT *Self__54HH,*Self__E5HH;
+  __INTEGER result__44HH,__tmp__A5HH,Self__B5HH,idx__ZRZ,idx__JETB;
+  __INTEGER new_capacity__KETB,i__LETB,result__D5HH,__tmp__F5HH;
+  __INTEGER Self__G5HH,typ_id__YGTB;
+  __POINTER ptr__TGTB,ptr_table__KVIH,next__JVIH,result__LVIH;
+  __POINTER ptr_table__PVIH,next__OVIH,result__QVIH;
+  __UINTEGER_32 sz__VGTB,a__ABGH,new_size__BBGH,t__FBGH,a__EBGH;
+  __UINTEGER_32 new_size__SVIH,lab_type__RVIH;
+  void *node__0RZ,*node1__NETB,*node2__OETB,*__tmp__HTZ;
+  void **old_buckets__METB;
+  __HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *result__SGTB;
+  __HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *Self__F0EC;
+  Self__54HH=((__STRING_CONSTANT *)k__RRZ);
+  result__44HH= 0;
+  __tmp__A5HH=Self__54HH->count__DD;
+  Self__B5HH= 1;
+  while ((Self__B5HH <= __tmp__A5HH)) {
+    result__44HH=(__INTEGER)((__INTEGER)( 5 * result__44HH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__54HH->storage__FRO)[(__INTEGER)(Self__B5HH -  1)])));
+    Self__B5HH=(__INTEGER)(Self__B5HH +  1);
+  };
+  if ((result__44HH <  0)) {
+    result__44HH=(__INTEGER)(~ result__44HH);
+  };
+  idx__ZRZ=(__INTEGER)(result__44HH % Self__PRZ->capacity__U4T);
+  node__0RZ=((void **)Self__PRZ->buckets__Z4T)[idx__ZRZ];
+  while ((! (((void *)node__0RZ == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node__0RZ)->key__F5T == (void *)k__RRZ)))) {
+    node__0RZ=((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node__0RZ)->next__Q5T;
+  };
+  if (((void *)node__0RZ == (void *)NULL)) {
+    if ((Self__PRZ->capacity__U4T == Self__PRZ->count__HIZ)) {
+      idx__JETB= 0;
+      node1__NETB=NULL;
+      node2__OETB=NULL;
+      old_buckets__METB=Self__PRZ->buckets__Z4T;
+      new_capacity__KETB=prime_number_ceiling__541((__INTEGER)(Self__PRZ->capacity__U4T +  1));
+      Self__PRZ->buckets__Z4T=create__5J5(new_capacity__KETB);
+      i__LETB=(__INTEGER)(Self__PRZ->capacity__U4T -  1);
+      Self__PRZ->capacity__U4T=new_capacity__KETB;
+      while ((i__LETB >=  0)) {
+        node1__NETB=((void **)old_buckets__METB)[i__LETB];
+        while (((void *)node1__NETB != (void *)NULL)) {
+          node2__OETB=((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node1__NETB)->next__Q5T;
+          Self__E5HH=((__STRING_CONSTANT *)((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node1__NETB)->key__F5T);
+          result__D5HH= 0;
+          __tmp__F5HH=Self__E5HH->count__DD;
+          Self__G5HH= 1;
+          while ((Self__G5HH <= __tmp__F5HH)) {
+            result__D5HH=(__INTEGER)((__INTEGER)( 5 * result__D5HH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__E5HH->storage__FRO)[(__INTEGER)(Self__G5HH -  1)])));
+            Self__G5HH=(__INTEGER)(Self__G5HH +  1);
+          };
+          if ((result__D5HH <  0)) {
+            result__D5HH=(__INTEGER)(~ result__D5HH);
+          };
+          idx__JETB=(__INTEGER)(result__D5HH % Self__PRZ->capacity__U4T);
+          ((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node1__NETB)->next__Q5T=((void **)Self__PRZ->buckets__Z4T)[idx__JETB];
+          ((void **)Self__PRZ->buckets__Z4T)[idx__JETB]=node1__NETB;
+          node1__NETB=node2__OETB;
+        };
+        i__LETB=(__INTEGER)(i__LETB -  1);
+      };
+      idx__ZRZ=(__INTEGER)(result__44HH % new_capacity__KETB);
+    };
+    __tmp__HTZ=((void **)Self__PRZ->buckets__Z4T)[idx__ZRZ];
+    result__SGTB=NULL;
+    ptr__TGTB=((__POINTER )(NULL));
+    typ_id__YGTB= 0;
+    sz__VGTB=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo));
+    if ((sz__VGTB ==  0)) {
+      result__SGTB=HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo__;
+    } else {
+      typ_id__YGTB=__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo__;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__VGTB);
+      if ((typ_id__YGTB == (__INTEGER)(-  1))) {
+        a__ABGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__BBGH=(__UINTEGER_32)((__UINTEGER_32)(sz__VGTB + a__ABGH) & (__UINTEGER_32)(~ a__ABGH));
+        ptr_table__KVIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__BBGH / ((__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__FTJ(new_size__BBGH);
+          next__JVIH=(void *)((unsigned long)result__LVIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BBGH)));
+          ((__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__SXH)))) &  4095) + (__UINTEGER_32)(new_size__BBGH <<  1)) <=  4096)) {
+              next__JVIH=(void *)((unsigned long)result__LVIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BBGH)));
             } else {
-              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)));
+              next__JVIH=new_lab__FTJ(new_size__BBGH);
+            };
+            ((__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__TGTB=result__LVIH;
+      } else {
+        t__FBGH=((__UINTEGER_32 )typ_id__YGTB);
+        a__EBGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__SVIH=(__UINTEGER_32)((__UINTEGER_32)(sz__VGTB + a__EBGH) & (__UINTEGER_32)(~ a__EBGH));
+        ptr_table__PVIH=((__POINTER )(&(table_type[(t__FBGH)])));
+        lab_type__RVIH=(__UINTEGER_32)(t__FBGH |  1);
+        next__OVIH=((__POINTER )(NULL));
+        result__QVIH=((__POINTER *)ptr_table__PVIH)[ 0];
+        if ((result__QVIH == (void *)NULL)) {
+          result__QVIH=new_lab__FTJ(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__SXH)))) &  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__ZNIH=new_lab__ZPJ(lab_type__2NIH);
+              next__OVIH=new_lab__FTJ(lab_type__RVIH);
             };
-            ((__POINTER *)next__ZNIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__0NIH)[ 0]=next__ZNIH;
+            ((__POINTER *)next__OVIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__PVIH)[ 0]=next__OVIH;
           } else {
-            ((__POINTER *)result__1NIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZNIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__1NIH=next__ZNIH;
+            ((__POINTER *)result__QVIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OVIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__QVIH=next__OVIH;
           };
         };
-        ptr__FDTB=result__1NIH;
+        ptr__TGTB=result__QVIH;
       };
-      result__EDTB=((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)ptr__FDTB);
-      *(result__EDTB) = *(HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo__);
+      result__SGTB=((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)ptr__TGTB);
+      *(result__SGTB) = *(HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo__);
     };
-    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);
+    Self__F0EC=((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)result__SGTB);
+    Self__F0EC->item__Y5T=v__QRZ;
+    Self__F0EC->key__F5T=k__RRZ;
+    Self__F0EC->next__Q5T=__tmp__HTZ;
+    node__0RZ=result__SGTB;
+    ((void **)Self__PRZ->buckets__Z4T)[idx__ZRZ]=result__SGTB;
+    Self__PRZ->count__HIZ=(__INTEGER)(Self__PRZ->count__HIZ +  1);
   } else {
-    ((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node__1LZ)->item__P0T=v__RLZ;
+    ((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node__0RZ)->item__Y5T=v__QRZ;
   };
 }
 
-static void** create__2FYB(__INTEGER nb_elements__4FYB)
+static void** create__IJYB(__INTEGER nb_elements__KJYB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__FNFH,a__KNFH,new_size__GNFH,new_size2__HNFH,a__ONFH;
+  __UINTEGER_32 new_size__PNFH;
+  __POINTER result__ENFH,ptr_table__UVIH,next__TVIH,result__VVIH;
+  void *result__ACLH;
+  __INTEGER Self__H5OC;
+  void **Result__JK1B;
+  sz__FNFH=((__UINTEGER_32 )(__INTEGER)(nb_elements__KJYB * ((__INTEGER )(sizeof(void *)))));
+  result__ENFH=((__POINTER )(NULL));
+  a__KNFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__GNFH=(__UINTEGER_32)((__UINTEGER_32)(sz__FNFH + a__KNFH) & (__UINTEGER_32)(~ a__KNFH));
+  new_size2__HNFH=(__UINTEGER_32)(new_size__GNFH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__HNFH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__ONFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__PNFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__HNFH + a__ONFH) & (__UINTEGER_32)(~ a__ONFH));
+    ptr_table__UVIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__PNFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__TVIH=((__POINTER )(NULL));
+    result__VVIH=((__POINTER *)ptr_table__UVIH)[ 0];
+    if ((result__VVIH == (void *)NULL)) {
+      result__VVIH=new_lab__FTJ(new_size__PNFH);
+      next__TVIH=(void *)((unsigned long)result__VVIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PNFH)));
+      ((__POINTER *)next__TVIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__UVIH)[ 0]=next__TVIH;
+    } 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__SXH)))) &  4095) + (__UINTEGER_32)(new_size__PNFH <<  1)) <=  4096)) {
+          next__TVIH=(void *)((unsigned long)result__VVIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PNFH)));
+        } else {
+          next__TVIH=new_lab__FTJ(new_size__PNFH);
+        };
+        ((__POINTER *)next__TVIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__UVIH)[ 0]=next__TVIH;
+      } else {
+        ((__POINTER *)result__VVIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TVIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__VVIH=next__TVIH;
+      };
+    };
+    ((__POINTER *)result__VVIH)[ 0]=((__POINTER ) 3);
+    result__ENFH=(void *)((unsigned long)result__VVIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__ACLH=first_free__NFVB;
+    while ((((void *)result__ACLH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__ACLH)->map_size_and_id__YTB &  4294967292LU) < new_size__GNFH))) {
+      result__ACLH=((__MEMORY *)result__ACLH)->map_next_free__ZTB;
     };
-    if (((void *)result__B0KH == (void *)NULL)) {
-      result__B0KH=new_page__K34();
+    if (((void *)result__ACLH == (void *)NULL)) {
+      result__ACLH=new_page__YC5();
     };
-    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)));
+    to_busy__index__MWFC(result__ACLH,new_size__GNFH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__ACLH)) - (unsigned long)begin_memory__SXH)))) >>  26));
+    result__ENFH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__ACLH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__JK1B=((void **)result__ENFH);
+  Self__H5OC=(__INTEGER)(nb_elements__KJYB -  1);
+  while ((Self__H5OC >=  0)) {
+    Result__JK1B[Self__H5OC]=NULL;
+    Self__H5OC=(__INTEGER)(Self__H5OC -  1);
   };
-  return(Result__3G1B);
+  return(Result__JK1B);
 }
 
-static void* get__QRI(void *n__SRI)
+static void* get__2UI(void *n__4UI)
 // ({NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  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)));
+  void *result__GVI;
+  __ITM_TYPE_SIMPLE *result__QNL,*Self__XTU;
+  __POINTER ptr__RNL,ptr_table__ZVIH,next__YVIH,result__0VIH;
+  __POINTER ptr_table__4VIH,next__3VIH,result__5VIH;
+  __INTEGER typ_id__WNL;
+  __UINTEGER_32 sz__TNL,a__SNFH,new_size__TNFH,t__XNFH,a__WNFH;
+  __UINTEGER_32 new_size__BWIH,lab_type__AWIH;
+  result__GVI=fast_reference_at__F4T(dico__LVI,n__4UI);
+  if (((void *)result__GVI == (void *)NULL)) {
+    result__QNL=NULL;
+    ptr__RNL=((__POINTER )(NULL));
+    typ_id__WNL= 0;
+    sz__TNL=((__UINTEGER_32 )sizeof(__ITM_TYPE_SIMPLE));
+    if ((sz__TNL ==  0)) {
+      result__QNL=ITM_TYPE_SIMPLE__;
+    } else {
+      typ_id__WNL=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__TNL);
+      if ((typ_id__WNL == (__INTEGER)(-  1))) {
+        a__SNFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__TNFH=(__UINTEGER_32)((__UINTEGER_32)(sz__TNL + a__SNFH) & (__UINTEGER_32)(~ a__SNFH));
+        ptr_table__ZVIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__TNFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__YVIH=((__POINTER )(NULL));
+        result__0VIH=((__POINTER *)ptr_table__ZVIH)[ 0];
+        if ((result__0VIH == (void *)NULL)) {
+          result__0VIH=new_lab__FTJ(new_size__TNFH);
+          next__YVIH=(void *)((unsigned long)result__0VIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TNFH)));
+          ((__POINTER *)next__YVIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__ZVIH)[ 0]=next__YVIH;
+        } else {
+          next__YVIH=((__POINTER *)result__0VIH)[ 0];
+          if ((next__YVIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__0VIH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__TNFH <<  1)) <=  4096)) {
+              next__YVIH=(void *)((unsigned long)result__0VIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TNFH)));
             } else {
-              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)));
+              next__YVIH=new_lab__FTJ(new_size__TNFH);
+            };
+            ((__POINTER *)next__YVIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__ZVIH)[ 0]=next__YVIH;
+          } else {
+            ((__POINTER *)result__0VIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YVIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__0VIH=next__YVIH;
+          };
+        };
+        ptr__RNL=result__0VIH;
+      } else {
+        t__XNFH=((__UINTEGER_32 )typ_id__WNL);
+        a__WNFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__BWIH=(__UINTEGER_32)((__UINTEGER_32)(sz__TNL + a__WNFH) & (__UINTEGER_32)(~ a__WNFH));
+        ptr_table__4VIH=((__POINTER )(&(table_type[(t__XNFH)])));
+        lab_type__AWIH=(__UINTEGER_32)(t__XNFH |  1);
+        next__3VIH=((__POINTER )(NULL));
+        result__5VIH=((__POINTER *)ptr_table__4VIH)[ 0];
+        if ((result__5VIH == (void *)NULL)) {
+          result__5VIH=new_lab__FTJ(lab_type__AWIH);
+          next__3VIH=(void *)((unsigned long)result__5VIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BWIH)));
+          ((__POINTER *)next__3VIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__4VIH)[ 0]=next__3VIH;
+        } else {
+          next__3VIH=((__POINTER *)result__5VIH)[ 0];
+          if ((next__3VIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__5VIH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__BWIH <<  1)) <=  4096)) {
+              next__3VIH=(void *)((unsigned long)result__5VIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BWIH)));
             } else {
-              next__IOIH=new_lab__ZPJ(lab_type__LOIH);
+              next__3VIH=new_lab__FTJ(lab_type__AWIH);
             };
-            ((__POINTER *)next__IOIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__JOIH)[ 0]=next__IOIH;
+            ((__POINTER *)next__3VIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__4VIH)[ 0]=next__3VIH;
           } else {
-            ((__POINTER *)result__KOIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__IOIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__KOIH=next__IOIH;
+            ((__POINTER *)result__5VIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3VIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__5VIH=next__3VIH;
           };
         };
-        ptr__FKL=result__KOIH;
+        ptr__RNL=result__5VIH;
       };
-      result__EKL=((__ITM_TYPE_SIMPLE *)ptr__FKL);
-      *(result__EKL) = *(ITM_TYPE_SIMPLE__);
+      result__QNL=((__ITM_TYPE_SIMPLE *)ptr__RNL);
+      *(result__QNL) = *(ITM_TYPE_SIMPLE__);
     };
-    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;
+    Self__XTU=((__ITM_TYPE_SIMPLE *)result__QNL);
+    Self__XTU->name__0YP=n__4UI;
+    fast_put__to__ORZ(dico__LVI,Self__XTU,n__4UI);
+    result__GVI=result__QNL;
   };
-  return(result__0RI);
+  return(result__GVI);
 }
 
-static void** create__OFQB(__INTEGER nb_elements__QFQB)
+static void** create__AJQB(__INTEGER nb_elements__CJQB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__ZNFH,a__4NFH,new_size__0NFH,new_size2__1NFH,a__COFH;
+  __UINTEGER_32 new_size__DOFH;
+  __POINTER result__YNFH,ptr_table__DWIH,next__CWIH,result__EWIH;
+  void *result__DCLH;
+  __INTEGER Self__M0MC;
+  void **Result__JCTB;
+  sz__ZNFH=((__UINTEGER_32 )(__INTEGER)(nb_elements__CJQB * ((__INTEGER )(sizeof(void *)))));
+  result__YNFH=((__POINTER )(NULL));
+  a__4NFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__0NFH=(__UINTEGER_32)((__UINTEGER_32)(sz__ZNFH + a__4NFH) & (__UINTEGER_32)(~ a__4NFH));
+  new_size2__1NFH=(__UINTEGER_32)(new_size__0NFH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__1NFH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__COFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__DOFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__1NFH + a__COFH) & (__UINTEGER_32)(~ a__COFH));
+    ptr_table__DWIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__DOFH / ((__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__FTJ(new_size__DOFH);
+      next__CWIH=(void *)((unsigned long)result__EWIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DOFH)));
+      ((__POINTER *)next__CWIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__DWIH)[ 0]=next__CWIH;
+    } else {
+      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__SXH)))) &  4095) + (__UINTEGER_32)(new_size__DOFH <<  1)) <=  4096)) {
+          next__CWIH=(void *)((unsigned long)result__EWIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DOFH)));
+        } else {
+          next__CWIH=new_lab__FTJ(new_size__DOFH);
+        };
+        ((__POINTER *)next__CWIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__DWIH)[ 0]=next__CWIH;
+      } else {
+        ((__POINTER *)result__EWIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CWIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__EWIH=next__CWIH;
+      };
+    };
+    ((__POINTER *)result__EWIH)[ 0]=((__POINTER ) 3);
+    result__YNFH=(void *)((unsigned long)result__EWIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__DCLH=first_free__NFVB;
+    while ((((void *)result__DCLH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__DCLH)->map_size_and_id__YTB &  4294967292LU) < new_size__0NFH))) {
+      result__DCLH=((__MEMORY *)result__DCLH)->map_next_free__ZTB;
     };
-    if (((void *)result__E0KH == (void *)NULL)) {
-      result__E0KH=new_page__K34();
+    if (((void *)result__DCLH == (void *)NULL)) {
+      result__DCLH=new_page__YC5();
     };
-    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)));
+    to_busy__index__MWFC(result__DCLH,new_size__0NFH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__DCLH)) - (unsigned long)begin_memory__SXH)))) >>  26));
+    result__YNFH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__DCLH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__JCTB=((void **)result__YNFH);
+  Self__M0MC=(__INTEGER)(nb_elements__CJQB -  1);
+  while ((Self__M0MC >=  0)) {
+    Result__JCTB[Self__M0MC]=NULL;
+    Self__M0MC=(__INTEGER)(Self__M0MC -  1);
   };
-  return(Result__14SB);
+  return(Result__JCTB);
 }
 
-static void** create__4ZPB(__INTEGER nb_elements__A0PB)
+static void** create__Q3PB(__INTEGER nb_elements__S3PB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__FOFH,a__KOFH,new_size__GOFH,new_size2__HOFH,a__OOFH;
+  __UINTEGER_32 new_size__POFH;
+  __POINTER result__EOFH,ptr_table__IWIH,next__HWIH,result__JWIH;
+  void *result__GCLH;
+  __INTEGER Self__FZMC;
+  void **Result__4ZSB;
+  sz__FOFH=((__UINTEGER_32 )(__INTEGER)(nb_elements__S3PB * ((__INTEGER )(sizeof(void *)))));
+  result__EOFH=((__POINTER )(NULL));
+  a__KOFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__GOFH=(__UINTEGER_32)((__UINTEGER_32)(sz__FOFH + a__KOFH) & (__UINTEGER_32)(~ a__KOFH));
+  new_size2__HOFH=(__UINTEGER_32)(new_size__GOFH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__HOFH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__OOFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__POFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__HOFH + a__OOFH) & (__UINTEGER_32)(~ a__OOFH));
+    ptr_table__IWIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__POFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__HWIH=((__POINTER )(NULL));
+    result__JWIH=((__POINTER *)ptr_table__IWIH)[ 0];
+    if ((result__JWIH == (void *)NULL)) {
+      result__JWIH=new_lab__FTJ(new_size__POFH);
+      next__HWIH=(void *)((unsigned long)result__JWIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__POFH)));
+      ((__POINTER *)next__HWIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__IWIH)[ 0]=next__HWIH;
+    } else {
+      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__SXH)))) &  4095) + (__UINTEGER_32)(new_size__POFH <<  1)) <=  4096)) {
+          next__HWIH=(void *)((unsigned long)result__JWIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__POFH)));
+        } else {
+          next__HWIH=new_lab__FTJ(new_size__POFH);
+        };
+        ((__POINTER *)next__HWIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__IWIH)[ 0]=next__HWIH;
+      } else {
+        ((__POINTER *)result__JWIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HWIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__JWIH=next__HWIH;
+      };
+    };
+    ((__POINTER *)result__JWIH)[ 0]=((__POINTER ) 3);
+    result__EOFH=(void *)((unsigned long)result__JWIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__GCLH=first_free__NFVB;
+    while ((((void *)result__GCLH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__GCLH)->map_size_and_id__YTB &  4294967292LU) < new_size__GOFH))) {
+      result__GCLH=((__MEMORY *)result__GCLH)->map_next_free__ZTB;
     };
-    if (((void *)result__H0KH == (void *)NULL)) {
-      result__H0KH=new_page__K34();
+    if (((void *)result__GCLH == (void *)NULL)) {
+      result__GCLH=new_page__YC5();
     };
-    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)));
+    to_busy__index__MWFC(result__GCLH,new_size__GOFH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__GCLH)) - (unsigned long)begin_memory__SXH)))) >>  26));
+    result__EOFH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__GCLH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__4ZSB=((void **)result__EOFH);
+  Self__FZMC=(__INTEGER)(nb_elements__S3PB -  1);
+  while ((Self__FZMC >=  0)) {
+    Result__4ZSB[Self__FZMC]=NULL;
+    Self__FZMC=(__INTEGER)(Self__FZMC -  1);
   };
-  return(Result__QWSB);
+  return(Result__4ZSB);
 }
 
-static void** create__A2ZB(__INTEGER nb_elements__C2ZB)
+static void** create__M5ZB(__INTEGER nb_elements__O5ZB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__ROFH,a__WOFH,new_size__SOFH,new_size2__TOFH,a__0OFH;
+  __UINTEGER_32 new_size__1OFH;
+  __POINTER result__QOFH,ptr_table__NWIH,next__MWIH,result__OWIH;
+  void *result__JCLH;
+  __INTEGER Self__TCPC;
+  void **Result__EG2B;
+  sz__ROFH=((__UINTEGER_32 )(__INTEGER)(nb_elements__O5ZB * ((__INTEGER )(sizeof(void *)))));
+  result__QOFH=((__POINTER )(NULL));
+  a__WOFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__SOFH=(__UINTEGER_32)((__UINTEGER_32)(sz__ROFH + a__WOFH) & (__UINTEGER_32)(~ a__WOFH));
+  new_size2__TOFH=(__UINTEGER_32)(new_size__SOFH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__TOFH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__0OFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__1OFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__TOFH + a__0OFH) & (__UINTEGER_32)(~ a__0OFH));
+    ptr_table__NWIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__1OFH / ((__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__FTJ(new_size__1OFH);
+      next__MWIH=(void *)((unsigned long)result__OWIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1OFH)));
+      ((__POINTER *)next__MWIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__NWIH)[ 0]=next__MWIH;
+    } else {
+      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__SXH)))) &  4095) + (__UINTEGER_32)(new_size__1OFH <<  1)) <=  4096)) {
+          next__MWIH=(void *)((unsigned long)result__OWIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1OFH)));
+        } else {
+          next__MWIH=new_lab__FTJ(new_size__1OFH);
+        };
+        ((__POINTER *)next__MWIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__NWIH)[ 0]=next__MWIH;
+      } else {
+        ((__POINTER *)result__OWIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MWIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__OWIH=next__MWIH;
+      };
+    };
+    ((__POINTER *)result__OWIH)[ 0]=((__POINTER ) 3);
+    result__QOFH=(void *)((unsigned long)result__OWIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__JCLH=first_free__NFVB;
+    while ((((void *)result__JCLH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__JCLH)->map_size_and_id__YTB &  4294967292LU) < new_size__SOFH))) {
+      result__JCLH=((__MEMORY *)result__JCLH)->map_next_free__ZTB;
     };
-    if (((void *)result__K0KH == (void *)NULL)) {
-      result__K0KH=new_page__K34();
+    if (((void *)result__JCLH == (void *)NULL)) {
+      result__JCLH=new_page__YC5();
     };
-    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)));
+    to_busy__index__MWFC(result__JCLH,new_size__SOFH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__JCLH)) - (unsigned long)begin_memory__SXH)))) >>  26));
+    result__QOFH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__JCLH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__EG2B=((void **)result__QOFH);
+  Self__TCPC=(__INTEGER)(nb_elements__O5ZB -  1);
+  while ((Self__TCPC >=  0)) {
+    Result__EG2B[Self__TCPC]=NULL;
+    Self__TCPC=(__INTEGER)(Self__TCPC -  1);
   };
-  return(Result__YC2B);
+  return(Result__EG2B);
 }
 
-static __FAST_ARRAYoSTRING_CONSTANTo* create_with_capacity__LHRC(__INTEGER new_count__NHRC)
+static __FAST_ARRAYoSTRING_CONSTANTo* create_with_capacity__ZKRC(__INTEGER new_count__1KRC)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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__;
+  __POINTER ptr__5G1C,ptr_table__SWIH,next__RWIH,result__TWIH;
+  __POINTER ptr_table__XWIH,next__WWIH,result__YWIH;
+  __INTEGER typ_id__EH1C;
+  __UINTEGER_32 sz__BH1C,a__4OFH,new_size__5OFH,t__DPFH,a__CPFH;
+  __UINTEGER_32 new_size__0WIH,lab_type__ZWIH;
+  __FAST_ARRAYoSTRING_CONSTANTo *result__4G1C,*Self__AASD;
+  result__4G1C=NULL;
+  ptr__5G1C=((__POINTER )(NULL));
+  typ_id__EH1C= 0;
+  sz__BH1C=((__UINTEGER_32 )sizeof(__FAST_ARRAYoSTRING_CONSTANTo));
+  if ((sz__BH1C ==  0)) {
+    result__4G1C=FAST_ARRAYoSTRING_CONSTANTo__;
   } else {
-    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);
+    typ_id__EH1C=__FAST_ARRAYoSTRING_CONSTANTo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__BH1C);
+    if ((typ_id__EH1C == (__INTEGER)(-  1))) {
+      a__4OFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__5OFH=(__UINTEGER_32)((__UINTEGER_32)(sz__BH1C + a__4OFH) & (__UINTEGER_32)(~ a__4OFH));
+      ptr_table__SWIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__5OFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__RWIH=((__POINTER )(NULL));
+      result__TWIH=((__POINTER *)ptr_table__SWIH)[ 0];
+      if ((result__TWIH == (void *)NULL)) {
+        result__TWIH=new_lab__FTJ(new_size__5OFH);
+        next__RWIH=(void *)((unsigned long)result__TWIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5OFH)));
+        ((__POINTER *)next__RWIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__SWIH)[ 0]=next__RWIH;
+      } else {
+        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__SXH)))) &  4095) + (__UINTEGER_32)(new_size__5OFH <<  1)) <=  4096)) {
+            next__RWIH=(void *)((unsigned long)result__TWIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5OFH)));
+          } else {
+            next__RWIH=new_lab__FTJ(new_size__5OFH);
+          };
+          ((__POINTER *)next__RWIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__SWIH)[ 0]=next__RWIH;
+        } else {
+          ((__POINTER *)result__TWIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RWIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__TWIH=next__RWIH;
+        };
+      };
+      ptr__5G1C=result__TWIH;
+    } else {
+      t__DPFH=((__UINTEGER_32 )typ_id__EH1C);
+      a__CPFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__0WIH=(__UINTEGER_32)((__UINTEGER_32)(sz__BH1C + a__CPFH) & (__UINTEGER_32)(~ a__CPFH));
+      ptr_table__XWIH=((__POINTER )(&(table_type[(t__DPFH)])));
+      lab_type__ZWIH=(__UINTEGER_32)(t__DPFH |  1);
+      next__WWIH=((__POINTER )(NULL));
+      result__YWIH=((__POINTER *)ptr_table__XWIH)[ 0];
+      if ((result__YWIH == (void *)NULL)) {
+        result__YWIH=new_lab__FTJ(lab_type__ZWIH);
+        next__WWIH=(void *)((unsigned long)result__YWIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0WIH)));
+        ((__POINTER *)next__WWIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__XWIH)[ 0]=next__WWIH;
+      } else {
+        next__WWIH=((__POINTER *)result__YWIH)[ 0];
+        if ((next__WWIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YWIH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__0WIH <<  1)) <=  4096)) {
+            next__WWIH=(void *)((unsigned long)result__YWIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0WIH)));
+          } else {
+            next__WWIH=new_lab__FTJ(lab_type__ZWIH);
+          };
+          ((__POINTER *)next__WWIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__XWIH)[ 0]=next__WWIH;
+        } else {
+          ((__POINTER *)result__YWIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WWIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__YWIH=next__WWIH;
+        };
+      };
+      ptr__5G1C=result__YWIH;
+    };
+    result__4G1C=((__FAST_ARRAYoSTRING_CONSTANTo *)ptr__5G1C);
+    *(result__4G1C) = *(FAST_ARRAYoSTRING_CONSTANTo__);
+  };
+  Self__AASD=((__FAST_ARRAYoSTRING_CONSTANTo *)result__4G1C);
+  if ((Self__AASD->parent_arrayed_collection__ABJ.capacity__QDPD < new_count__1KRC)) {
+    Self__AASD->parent_arrayed_collection__ABJ.storage__LEPD=create__BMHE(new_count__1KRC);
+    Self__AASD->parent_arrayed_collection__ABJ.capacity__QDPD=new_count__1KRC;
+  };
+  Self__AASD->parent_arrayed_collection__ABJ.upper__VBPD=(__INTEGER)(-  1);
+  return(result__4G1C);
 }
 
-static void** create__EGUF(__INTEGER nb_elements__GGUF)
+static void** create__LLUF(__INTEGER nb_elements__NLUF)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__FPFH,a__KPFH,new_size__GPFH,new_size2__HPFH,a__OPFH;
+  __UINTEGER_32 new_size__PPFH;
+  __POINTER result__EPFH,ptr_table__2WIH,next__1WIH,result__3WIH;
+  void *result__MCLH;
+  __INTEGER Self__FIAG;
+  void **Result__V1YF;
+  sz__FPFH=((__UINTEGER_32 )(__INTEGER)(nb_elements__NLUF * ((__INTEGER )(sizeof(void *)))));
+  result__EPFH=((__POINTER )(NULL));
+  a__KPFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__GPFH=(__UINTEGER_32)((__UINTEGER_32)(sz__FPFH + a__KPFH) & (__UINTEGER_32)(~ a__KPFH));
+  new_size2__HPFH=(__UINTEGER_32)(new_size__GPFH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__HPFH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__OPFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__PPFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__HPFH + a__OPFH) & (__UINTEGER_32)(~ a__OPFH));
+    ptr_table__2WIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__PPFH / ((__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__FTJ(new_size__PPFH);
+      next__1WIH=(void *)((unsigned long)result__3WIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PPFH)));
+      ((__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__SXH)))) &  4095) + (__UINTEGER_32)(new_size__PPFH <<  1)) <=  4096)) {
+          next__1WIH=(void *)((unsigned long)result__3WIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PPFH)));
+        } else {
+          next__1WIH=new_lab__FTJ(new_size__PPFH);
+        };
+        ((__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;
+      };
+    };
+    ((__POINTER *)result__3WIH)[ 0]=((__POINTER ) 3);
+    result__EPFH=(void *)((unsigned long)result__3WIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__MCLH=first_free__NFVB;
+    while ((((void *)result__MCLH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__MCLH)->map_size_and_id__YTB &  4294967292LU) < new_size__GPFH))) {
+      result__MCLH=((__MEMORY *)result__MCLH)->map_next_free__ZTB;
     };
-    if (((void *)result__N0KH == (void *)NULL)) {
-      result__N0KH=new_page__K34();
+    if (((void *)result__MCLH == (void *)NULL)) {
+      result__MCLH=new_page__YC5();
     };
-    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)));
+    to_busy__index__MWFC(result__MCLH,new_size__GPFH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__MCLH)) - (unsigned long)begin_memory__SXH)))) >>  26));
+    result__EPFH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__MCLH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__V1YF=((void **)result__EPFH);
+  Self__FIAG=(__INTEGER)(nb_elements__NLUF -  1);
+  while ((Self__FIAG >=  0)) {
+    Result__V1YF[Self__FIAG]=NULL;
+    Self__FIAG=(__INTEGER)(Self__FIAG -  1);
   };
-  return(Result__OWYF);
+  return(Result__V1YF);
 }
 
-static void** create__SIGF(__INTEGER nb_elements__UIGF)
+static void** create__YNGF(__INTEGER nb_elements__0NGF)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__RPFH,a__WPFH,new_size__SPFH,new_size2__TPFH,a__0PFH;
+  __UINTEGER_32 new_size__1PFH;
+  __POINTER result__QPFH,ptr_table__BXIH,next__AXIH,result__CXIH;
+  void *result__PCLH;
+  __INTEGER Self__KARF;
+  void **Result__IUKF;
+  sz__RPFH=((__UINTEGER_32 )(__INTEGER)(nb_elements__0NGF * ((__INTEGER )(sizeof(void *)))));
+  result__QPFH=((__POINTER )(NULL));
+  a__WPFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__SPFH=(__UINTEGER_32)((__UINTEGER_32)(sz__RPFH + a__WPFH) & (__UINTEGER_32)(~ a__WPFH));
+  new_size2__TPFH=(__UINTEGER_32)(new_size__SPFH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__TPFH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__0PFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__1PFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__TPFH + a__0PFH) & (__UINTEGER_32)(~ a__0PFH));
+    ptr_table__BXIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__1PFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__AXIH=((__POINTER )(NULL));
+    result__CXIH=((__POINTER *)ptr_table__BXIH)[ 0];
+    if ((result__CXIH == (void *)NULL)) {
+      result__CXIH=new_lab__FTJ(new_size__1PFH);
+      next__AXIH=(void *)((unsigned long)result__CXIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1PFH)));
+      ((__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__SXH)))) &  4095) + (__UINTEGER_32)(new_size__1PFH <<  1)) <=  4096)) {
+          next__AXIH=(void *)((unsigned long)result__CXIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1PFH)));
+        } else {
+          next__AXIH=new_lab__FTJ(new_size__1PFH);
+        };
+        ((__POINTER *)next__AXIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__BXIH)[ 0]=next__AXIH;
+      } else {
+        ((__POINTER *)result__CXIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__AXIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__CXIH=next__AXIH;
+      };
+    };
+    ((__POINTER *)result__CXIH)[ 0]=((__POINTER ) 3);
+    result__QPFH=(void *)((unsigned long)result__CXIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__PCLH=first_free__NFVB;
+    while ((((void *)result__PCLH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__PCLH)->map_size_and_id__YTB &  4294967292LU) < new_size__SPFH))) {
+      result__PCLH=((__MEMORY *)result__PCLH)->map_next_free__ZTB;
     };
-    if (((void *)result__Q0KH == (void *)NULL)) {
-      result__Q0KH=new_page__K34();
+    if (((void *)result__PCLH == (void *)NULL)) {
+      result__PCLH=new_page__YC5();
     };
-    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)));
+    to_busy__index__MWFC(result__PCLH,new_size__SPFH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__PCLH)) - (unsigned long)begin_memory__SXH)))) >>  26));
+    result__QPFH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__PCLH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__IUKF=((void **)result__QPFH);
+  Self__KARF=(__INTEGER)(nb_elements__0NGF -  1);
+  while ((Self__KARF >=  0)) {
+    Result__IUKF[Self__KARF]=NULL;
+    Self__KARF=(__INTEGER)(Self__KARF -  1);
   };
-  return(Result__CPKF);
+  return(Result__IUKF);
 }
 
-static void** create__5JYF(__INTEGER nb_elements__BKYF)
+static void** create__GPYF(__INTEGER nb_elements__IPYF)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__3PFH,a__CQFH,new_size__4PFH,new_size2__5PFH,a__GQFH;
+  __UINTEGER_32 new_size__HQFH;
+  __POINTER result__2PFH,ptr_table__GXIH,next__FXIH,result__HXIH;
+  void *result__SCLH;
+  __INTEGER Self__5LAG;
+  void **Result__MA1F;
+  sz__3PFH=((__UINTEGER_32 )(__INTEGER)(nb_elements__IPYF * ((__INTEGER )(sizeof(void *)))));
+  result__2PFH=((__POINTER )(NULL));
+  a__CQFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__4PFH=(__UINTEGER_32)((__UINTEGER_32)(sz__3PFH + a__CQFH) & (__UINTEGER_32)(~ a__CQFH));
+  new_size2__5PFH=(__UINTEGER_32)(new_size__4PFH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__5PFH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__GQFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__HQFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__5PFH + a__GQFH) & (__UINTEGER_32)(~ a__GQFH));
+    ptr_table__GXIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__HQFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__FXIH=((__POINTER )(NULL));
+    result__HXIH=((__POINTER *)ptr_table__GXIH)[ 0];
+    if ((result__HXIH == (void *)NULL)) {
+      result__HXIH=new_lab__FTJ(new_size__HQFH);
+      next__FXIH=(void *)((unsigned long)result__HXIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HQFH)));
+      ((__POINTER *)next__FXIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__GXIH)[ 0]=next__FXIH;
+    } else {
+      next__FXIH=((__POINTER *)result__HXIH)[ 0];
+      if ((next__FXIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HXIH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__HQFH <<  1)) <=  4096)) {
+          next__FXIH=(void *)((unsigned long)result__HXIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HQFH)));
+        } else {
+          next__FXIH=new_lab__FTJ(new_size__HQFH);
+        };
+        ((__POINTER *)next__FXIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__GXIH)[ 0]=next__FXIH;
+      } else {
+        ((__POINTER *)result__HXIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FXIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__HXIH=next__FXIH;
+      };
+    };
+    ((__POINTER *)result__HXIH)[ 0]=((__POINTER ) 3);
+    result__2PFH=(void *)((unsigned long)result__HXIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__SCLH=first_free__NFVB;
+    while ((((void *)result__SCLH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__SCLH)->map_size_and_id__YTB &  4294967292LU) < new_size__4PFH))) {
+      result__SCLH=((__MEMORY *)result__SCLH)->map_next_free__ZTB;
     };
-    if (((void *)result__T0KH == (void *)NULL)) {
-      result__T0KH=new_page__K34();
+    if (((void *)result__SCLH == (void *)NULL)) {
+      result__SCLH=new_page__YC5();
     };
-    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)));
+    to_busy__index__MWFC(result__SCLH,new_size__4PFH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__SCLH)) - (unsigned long)begin_memory__SXH)))) >>  26));
+    result__2PFH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__SCLH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__MA1F=((void **)result__2PFH);
+  Self__5LAG=(__INTEGER)(nb_elements__IPYF -  1);
+  while ((Self__5LAG >=  0)) {
+    Result__MA1F[Self__5LAG]=NULL;
+    Self__5LAG=(__INTEGER)(Self__5LAG -  1);
   };
-  return(Result__F10F);
+  return(Result__MA1F);
 }
 
-static void** create__UYIE(__INTEGER nb_elements__WYIE)
+static void** create__C2IE(__INTEGER nb_elements__E2IE)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__2OJB,a__KQFH,new_size__4OJB,new_size2__BPJB,a__OQFH;
+  __UINTEGER_32 new_size__PQFH;
+  __POINTER result__EPJB,ptr_table__LXIH,next__KXIH,result__MXIH;
+  void *result__OEVB;
+  __INTEGER Self__PXYE;
+  void **Result__R5NE;
+  sz__2OJB=((__UINTEGER_32 )(__INTEGER)(nb_elements__E2IE * ((__INTEGER )(sizeof(void *)))));
+  result__EPJB=((__POINTER )(NULL));
+  a__KQFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__4OJB=(__UINTEGER_32)((__UINTEGER_32)(sz__2OJB + a__KQFH) & (__UINTEGER_32)(~ a__KQFH));
+  new_size2__BPJB=(__UINTEGER_32)(new_size__4OJB + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__BPJB <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__OQFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__PQFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__BPJB + a__OQFH) & (__UINTEGER_32)(~ a__OQFH));
+    ptr_table__LXIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__PQFH / ((__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__FTJ(new_size__PQFH);
+      next__KXIH=(void *)((unsigned long)result__MXIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PQFH)));
+      ((__POINTER *)next__KXIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__LXIH)[ 0]=next__KXIH;
+    } 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__SXH)))) &  4095) + (__UINTEGER_32)(new_size__PQFH <<  1)) <=  4096)) {
+          next__KXIH=(void *)((unsigned long)result__MXIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PQFH)));
+        } else {
+          next__KXIH=new_lab__FTJ(new_size__PQFH);
+        };
+        ((__POINTER *)next__KXIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__LXIH)[ 0]=next__KXIH;
+      } else {
+        ((__POINTER *)result__MXIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KXIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__MXIH=next__KXIH;
+      };
+    };
+    ((__POINTER *)result__MXIH)[ 0]=((__POINTER ) 3);
+    result__EPJB=(void *)((unsigned long)result__MXIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__OEVB=first_free__NFVB;
+    while ((((void *)result__OEVB != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__OEVB)->map_size_and_id__YTB &  4294967292LU) < new_size__4OJB))) {
+      result__OEVB=((__MEMORY *)result__OEVB)->map_next_free__ZTB;
     };
-    if (((void *)result__CBVB == (void *)NULL)) {
-      result__CBVB=new_page__K34();
+    if (((void *)result__OEVB == (void *)NULL)) {
+      result__OEVB=new_page__YC5();
     };
-    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)));
+    to_busy__index__MWFC(result__OEVB,new_size__4OJB,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__OEVB)) - (unsigned long)begin_memory__SXH)))) >>  26));
+    result__EPJB=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__OEVB)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__R5NE=((void **)result__EPJB);
+  Self__PXYE=(__INTEGER)(nb_elements__E2IE -  1);
+  while ((Self__PXYE >=  0)) {
+    Result__R5NE[Self__PXYE]=NULL;
+    Self__PXYE=(__INTEGER)(Self__PXYE -  1);
   };
-  return(Result__J1NE);
+  return(Result__R5NE);
 }
 
-static void* new_page__K34()
+static void* new_page__YC5()
 // () With resultNo recursive, No inlinable.
 {
-  __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;
+  __UINTEGER_64 cap__J3SB,old_size__1C5;
+  __POINTER mem__M3SB;
+  void *block__BD5;
+  if ((capacity_max__CD5 ==  0)) {
+    mem__M3SB=((__POINTER )(NULL));
+    cap__J3SB= 33554432;
     do {
-      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));
+      cap__J3SB=(__UINTEGER_64)(cap__J3SB <<  1);
+      mem__M3SB=((__POINTER )(malloc((cap__J3SB))));
+      if ((mem__M3SB != (void *)NULL)) {
+        free((mem__M3SB));
+      };
+    } while ((! ((mem__M3SB == (void *)NULL) || (cap__J3SB == ((__UINTEGER_64 )(2048LU << 20))))));
+    if ((mem__M3SB == (void *)NULL)) {
+      cap__J3SB=(__UINTEGER_64)(cap__J3SB >>  1);
+    };
+    get_begin_memory__EEQB=((__POINTER )(malloc((cap__J3SB))));
+    capacity_max__CD5=cap__J3SB;
+    begin_memory__SXH=get_begin_memory__EEQB;
+  };
+  old_size__1C5=((__UINTEGER_64 )(__UINTEGER_32)(nb_page__XTJ <<  26));
+  nb_page__XTJ=(__UINTEGER_32)(nb_page__XTJ +  1);
+  if (((__UINTEGER_64)(old_size__1C5 +  67108864) > capacity_max__CD5)) {
+    print__DJD((&__string_187));
     exit(( 1));
   };
-  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);
+  block__BD5=((void *)(void *)((unsigned long)begin_memory__SXH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )old_size__1C5)))));
+  ((__MEMORY *)block__BD5)->map_previous_linear__XTB= 4294967295LU;
+  ((__MEMORY *)block__BD5)->map_size_and_id__YTB= 67108858;
+  ((__MEMORY *)block__BD5)->map_next_free__ZTB=first_free__NFVB;
+  ((__MEMORY *)block__BD5)->map_previous_free__0TB=NULL;
+  if (((void *)first_free__NFVB != (void *)NULL)) {
+    ((__MEMORY *)first_free__NFVB)->map_previous_free__0TB=block__BD5;
+  };
+  first_free__NFVB=block__BD5;
+  last_block[((__UINTEGER_32)(nb_page__XTJ -  1))] = (block__BD5);
+  return(block__BD5);
 }
 
-static void to_busy__index__4SFC(__MEMORY *Self__5SFC,__UINTEGER_32 sz__ATFC,__UINTEGER_32 idx__BTFC)
+static void to_busy__index__MWFC(__MEMORY *Self__NWFC,__UINTEGER_32 sz__OWFC,__UINTEGER_32 idx__PWFC)
 // ({MEMORY},{UINTEGER_32},{UINTEGER_32}) VoidNo recursive, No inlinable.
 {
-  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;
+  void *new__WWFC,*prev__RGOC,*next__SGOC;
+  __UINTEGER_32 siz__QWFC,new_size__TWFC;
+  __MEMORY *Self__2UCC,*Self__ELAH;
+  new__WWFC=NULL;
+  prev__RGOC=Self__NWFC->map_previous_free__0TB;
+  next__SGOC=Self__NWFC->map_next_free__ZTB;
+  if (((void *)prev__RGOC == (void *)NULL)) {
+    first_free__NFVB=next__SGOC;
   } else {
-    ((__MEMORY *)prev__DDOC)->map_next_free__ZTB=next__EDOC;
+    ((__MEMORY *)prev__RGOC)->map_next_free__ZTB=next__SGOC;
   };
-  if (((void *)next__EDOC != (void *)NULL)) {
-    ((__MEMORY *)next__EDOC)->map_previous_free__0TB=prev__DDOC;
+  if (((void *)next__SGOC != (void *)NULL)) {
+    ((__MEMORY *)next__SGOC)->map_previous_free__0TB=prev__RGOC;
   };
-  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;
+  siz__QWFC=Self__NWFC->map_size_and_id__YTB;
+  new_size__TWFC=(__UINTEGER_32)(siz__QWFC - sz__OWFC);
+  if ((new_size__TWFC > (__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )(MINIMUM_SIZE)) +  2) +  8))) {
+    siz__QWFC=sz__OWFC;
+    new__WWFC=((void *)(void *)((unsigned long)(void *)((unsigned long)((__POINTER )Self__NWFC) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )sz__OWFC))));
+    ((__MEMORY *)new__WWFC)->map_previous_linear__XTB=((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )Self__NWFC) - (unsigned long)begin_memory__SXH))));
+    ((__MEMORY *)new__WWFC)->map_size_and_id__YTB=(__UINTEGER_32)(new_size__TWFC -  8);
+    Self__2UCC=((__MEMORY *)new__WWFC);
+    Self__2UCC->map_next_free__ZTB=first_free__NFVB;
+    Self__2UCC->map_previous_free__0TB=NULL;
+    if (((void *)first_free__NFVB != (void *)NULL)) {
+      ((__MEMORY *)first_free__NFVB)->map_previous_free__0TB=Self__2UCC;
     };
-    first_free__BCVB=Self__ORCC;
-    if (((__UINTEGER_32)(((__MEMORY *)new__ITFC)->map_size_and_id__YTB &  2) !=  0)) {
-      last_block[(idx__BTFC)] = (new__ITFC);
+    first_free__NFVB=Self__2UCC;
+    if (((__UINTEGER_32)(((__MEMORY *)new__WWFC)->map_size_and_id__YTB &  2) !=  0)) {
+      last_block[(idx__PWFC)] = (new__WWFC);
     } else {
-      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__ELAH=((__MEMORY *)new__WWFC);
+      ((__MEMORY *)((void *)(void *)((unsigned long)(void *)((unsigned long)((__POINTER )Self__ELAH) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )(__UINTEGER_32)(Self__ELAH->map_size_and_id__YTB &  4294967292LU))))))->map_previous_linear__XTB=((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)new__WWFC)) - (unsigned long)begin_memory__SXH))));
     };
   };
-  Self__5SFC->map_size_and_id__YTB=(__UINTEGER_32)(siz__CTFC |  1);
+  Self__NWFC->map_size_and_id__YTB=(__UINTEGER_32)(siz__QWFC |  1);
 }
 
-static void** create__02XC(__INTEGER nb_elements__22XC)
+static void** create__IAYC(__INTEGER nb_elements__KAYC)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__RTDH,a__SQFH,new_size__STDH,new_size2__TTDH,a__WQFH;
+  __UINTEGER_32 new_size__XQFH;
+  __POINTER result__QTDH,ptr_table__QXIH,next__PXIH,result__RXIH;
+  void *result__UXIH;
+  __INTEGER Self__0VWD;
+  void **Result__AY5C;
+  sz__RTDH=((__UINTEGER_32 )(__INTEGER)(nb_elements__KAYC * ((__INTEGER )(sizeof(void *)))));
+  result__QTDH=((__POINTER )(NULL));
+  a__SQFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__STDH=(__UINTEGER_32)((__UINTEGER_32)(sz__RTDH + a__SQFH) & (__UINTEGER_32)(~ a__SQFH));
+  new_size2__TTDH=(__UINTEGER_32)(new_size__STDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__TTDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__WQFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__XQFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__TTDH + a__WQFH) & (__UINTEGER_32)(~ a__WQFH));
+    ptr_table__QXIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__XQFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__PXIH=((__POINTER )(NULL));
+    result__RXIH=((__POINTER *)ptr_table__QXIH)[ 0];
+    if ((result__RXIH == (void *)NULL)) {
+      result__RXIH=new_lab__FTJ(new_size__XQFH);
+      next__PXIH=(void *)((unsigned long)result__RXIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XQFH)));
+      ((__POINTER *)next__PXIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__QXIH)[ 0]=next__PXIH;
+    } 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__SXH)))) &  4095) + (__UINTEGER_32)(new_size__XQFH <<  1)) <=  4096)) {
+          next__PXIH=(void *)((unsigned long)result__RXIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XQFH)));
+        } else {
+          next__PXIH=new_lab__FTJ(new_size__XQFH);
+        };
+        ((__POINTER *)next__PXIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__QXIH)[ 0]=next__PXIH;
+      } else {
+        ((__POINTER *)result__RXIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PXIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__RXIH=next__PXIH;
+      };
+    };
+    ((__POINTER *)result__RXIH)[ 0]=((__POINTER ) 3);
+    result__QTDH=(void *)((unsigned long)result__RXIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__UXIH=first_free__NFVB;
+    while ((((void *)result__UXIH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__UXIH)->map_size_and_id__YTB &  4294967292LU) < new_size__STDH))) {
+      result__UXIH=((__MEMORY *)result__UXIH)->map_next_free__ZTB;
     };
-    if (((void *)result__5PIH == (void *)NULL)) {
-      result__5PIH=new_page__K34();
+    if (((void *)result__UXIH == (void *)NULL)) {
+      result__UXIH=new_page__YC5();
     };
-    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)));
+    to_busy__index__MWFC(result__UXIH,new_size__STDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__UXIH)) - (unsigned long)begin_memory__SXH)))) >>  26));
+    result__QTDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__UXIH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__AY5C=((void **)result__QTDH);
+  Self__0VWD=(__INTEGER)(nb_elements__KAYC -  1);
+  while ((Self__0VWD >=  0)) {
+    Result__AY5C[Self__0VWD]=NULL;
+    Self__0VWD=(__INTEGER)(Self__0VWD -  1);
   };
-  return(Result__SU5C);
+  return(Result__AY5C);
 }
 
-static void** create__3BYC(__INTEGER nb_elements__5BYC)
+static void** create__LFYC(__INTEGER nb_elements__NFYC)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__VTDH,a__3QFH,new_size__WTDH,new_size2__XTDH,a__BRFH;
+  __UINTEGER_32 new_size__CRFH;
+  __POINTER result__UTDH,ptr_table__YXIH,next__XXIH,result__ZXIH;
+  void *result__2XIH;
+  __INTEGER Self__UZWD;
+  void **Result__K35C;
+  sz__VTDH=((__UINTEGER_32 )(__INTEGER)(nb_elements__NFYC * ((__INTEGER )(sizeof(void *)))));
+  result__UTDH=((__POINTER )(NULL));
+  a__3QFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__WTDH=(__UINTEGER_32)((__UINTEGER_32)(sz__VTDH + a__3QFH) & (__UINTEGER_32)(~ a__3QFH));
+  new_size2__XTDH=(__UINTEGER_32)(new_size__WTDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__XTDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__BRFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__CRFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__XTDH + a__BRFH) & (__UINTEGER_32)(~ a__BRFH));
+    ptr_table__YXIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__CRFH / ((__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__FTJ(new_size__CRFH);
+      next__XXIH=(void *)((unsigned long)result__ZXIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CRFH)));
+      ((__POINTER *)next__XXIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__YXIH)[ 0]=next__XXIH;
+    } else {
+      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__SXH)))) &  4095) + (__UINTEGER_32)(new_size__CRFH <<  1)) <=  4096)) {
+          next__XXIH=(void *)((unsigned long)result__ZXIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CRFH)));
+        } else {
+          next__XXIH=new_lab__FTJ(new_size__CRFH);
+        };
+        ((__POINTER *)next__XXIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__YXIH)[ 0]=next__XXIH;
+      } else {
+        ((__POINTER *)result__ZXIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XXIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__ZXIH=next__XXIH;
+      };
+    };
+    ((__POINTER *)result__ZXIH)[ 0]=((__POINTER ) 3);
+    result__UTDH=(void *)((unsigned long)result__ZXIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__2XIH=first_free__NFVB;
+    while ((((void *)result__2XIH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__2XIH)->map_size_and_id__YTB &  4294967292LU) < new_size__WTDH))) {
+      result__2XIH=((__MEMORY *)result__2XIH)->map_next_free__ZTB;
     };
-    if (((void *)result__HQIH == (void *)NULL)) {
-      result__HQIH=new_page__K34();
+    if (((void *)result__2XIH == (void *)NULL)) {
+      result__2XIH=new_page__YC5();
     };
-    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)));
+    to_busy__index__MWFC(result__2XIH,new_size__WTDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__2XIH)) - (unsigned long)begin_memory__SXH)))) >>  26));
+    result__UTDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__2XIH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__K35C=((void **)result__UTDH);
+  Self__UZWD=(__INTEGER)(nb_elements__NFYC -  1);
+  while ((Self__UZWD >=  0)) {
+    Result__K35C[Self__UZWD]=NULL;
+    Self__UZWD=(__INTEGER)(Self__UZWD -  1);
   };
-  return(Result__2Z5C);
+  return(Result__K35C);
 }
 
-static void** create__VMBD(__INTEGER nb_elements__XMBD)
+static void** create__DQBD(__INTEGER nb_elements__FQBD)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__ZTDH,a__IRFH,new_size__0TDH,new_size2__1TDH,a__MRFH;
+  __UINTEGER_32 new_size__NRFH;
+  __POINTER result__YTDH,ptr_table__AYIH,next__5XIH,result__BYIH;
+  void *result__EYIH;
+  __INTEGER Self__5HXD;
+  void **Result__EEGD;
+  sz__ZTDH=((__UINTEGER_32 )(__INTEGER)(nb_elements__FQBD * ((__INTEGER )(sizeof(void *)))));
+  result__YTDH=((__POINTER )(NULL));
+  a__IRFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__0TDH=(__UINTEGER_32)((__UINTEGER_32)(sz__ZTDH + a__IRFH) & (__UINTEGER_32)(~ a__IRFH));
+  new_size2__1TDH=(__UINTEGER_32)(new_size__0TDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__1TDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__MRFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__NRFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__1TDH + a__MRFH) & (__UINTEGER_32)(~ a__MRFH));
+    ptr_table__AYIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__NRFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__5XIH=((__POINTER )(NULL));
+    result__BYIH=((__POINTER *)ptr_table__AYIH)[ 0];
+    if ((result__BYIH == (void *)NULL)) {
+      result__BYIH=new_lab__FTJ(new_size__NRFH);
+      next__5XIH=(void *)((unsigned long)result__BYIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NRFH)));
+      ((__POINTER *)next__5XIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__AYIH)[ 0]=next__5XIH;
+    } else {
+      next__5XIH=((__POINTER *)result__BYIH)[ 0];
+      if ((next__5XIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BYIH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__NRFH <<  1)) <=  4096)) {
+          next__5XIH=(void *)((unsigned long)result__BYIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NRFH)));
+        } else {
+          next__5XIH=new_lab__FTJ(new_size__NRFH);
+        };
+        ((__POINTER *)next__5XIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__AYIH)[ 0]=next__5XIH;
+      } else {
+        ((__POINTER *)result__BYIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5XIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__BYIH=next__5XIH;
+      };
+    };
+    ((__POINTER *)result__BYIH)[ 0]=((__POINTER ) 3);
+    result__YTDH=(void *)((unsigned long)result__BYIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__EYIH=first_free__NFVB;
+    while ((((void *)result__EYIH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__EYIH)->map_size_and_id__YTB &  4294967292LU) < new_size__0TDH))) {
+      result__EYIH=((__MEMORY *)result__EYIH)->map_next_free__ZTB;
     };
-    if (((void *)result__PQIH == (void *)NULL)) {
-      result__PQIH=new_page__K34();
+    if (((void *)result__EYIH == (void *)NULL)) {
+      result__EYIH=new_page__YC5();
     };
-    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)));
+    to_busy__index__MWFC(result__EYIH,new_size__0TDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__EYIH)) - (unsigned long)begin_memory__SXH)))) >>  26));
+    result__YTDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__EYIH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__EEGD=((void **)result__YTDH);
+  Self__5HXD=(__INTEGER)(nb_elements__FQBD -  1);
+  while ((Self__5HXD >=  0)) {
+    Result__EEGD[Self__5HXD]=NULL;
+    Self__5HXD=(__INTEGER)(Self__5HXD -  1);
   };
-  return(Result__WAGD);
+  return(Result__EEGD);
 }
 
-static void** create__UCFF(__INTEGER nb_elements__WCFF)
+static void** create__QHFF(__INTEGER nb_elements__SHFF)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__3TDH,a__TRFH,new_size__4TDH,new_size2__5TDH,a__XRFH;
+  __UINTEGER_32 new_size__YRFH;
+  __POINTER result__2TDH,ptr_table__IYIH,next__HYIH,result__JYIH;
+  void *result__MYIH;
+  __INTEGER Self__F4QF;
+  void **Result__WXJF;
+  sz__3TDH=((__UINTEGER_32 )(__INTEGER)(nb_elements__SHFF * ((__INTEGER )(sizeof(void *)))));
+  result__2TDH=((__POINTER )(NULL));
+  a__TRFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__4TDH=(__UINTEGER_32)((__UINTEGER_32)(sz__3TDH + a__TRFH) & (__UINTEGER_32)(~ a__TRFH));
+  new_size2__5TDH=(__UINTEGER_32)(new_size__4TDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__5TDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__XRFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__YRFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__5TDH + a__XRFH) & (__UINTEGER_32)(~ a__XRFH));
+    ptr_table__IYIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__YRFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__HYIH=((__POINTER )(NULL));
+    result__JYIH=((__POINTER *)ptr_table__IYIH)[ 0];
+    if ((result__JYIH == (void *)NULL)) {
+      result__JYIH=new_lab__FTJ(new_size__YRFH);
+      next__HYIH=(void *)((unsigned long)result__JYIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YRFH)));
+      ((__POINTER *)next__HYIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__IYIH)[ 0]=next__HYIH;
+    } else {
+      next__HYIH=((__POINTER *)result__JYIH)[ 0];
+      if ((next__HYIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__JYIH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__YRFH <<  1)) <=  4096)) {
+          next__HYIH=(void *)((unsigned long)result__JYIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YRFH)));
+        } else {
+          next__HYIH=new_lab__FTJ(new_size__YRFH);
+        };
+        ((__POINTER *)next__HYIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__IYIH)[ 0]=next__HYIH;
+      } else {
+        ((__POINTER *)result__JYIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HYIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__JYIH=next__HYIH;
+      };
+    };
+    ((__POINTER *)result__JYIH)[ 0]=((__POINTER ) 3);
+    result__2TDH=(void *)((unsigned long)result__JYIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__MYIH=first_free__NFVB;
+    while ((((void *)result__MYIH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__MYIH)->map_size_and_id__YTB &  4294967292LU) < new_size__4TDH))) {
+      result__MYIH=((__MEMORY *)result__MYIH)->map_next_free__ZTB;
     };
-    if (((void *)result__XQIH == (void *)NULL)) {
-      result__XQIH=new_page__K34();
+    if (((void *)result__MYIH == (void *)NULL)) {
+      result__MYIH=new_page__YC5();
     };
-    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)));
+    to_busy__index__MWFC(result__MYIH,new_size__4TDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__MYIH)) - (unsigned long)begin_memory__SXH)))) >>  26));
+    result__2TDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__MYIH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__WXJF=((void **)result__2TDH);
+  Self__F4QF=(__INTEGER)(nb_elements__SHFF -  1);
+  while ((Self__F4QF >=  0)) {
+    Result__WXJF[Self__F4QF]=NULL;
+    Self__F4QF=(__INTEGER)(Self__F4QF -  1);
   };
-  return(Result__QSJF);
+  return(Result__WXJF);
 }
 
-static void** create__3G2(__INTEGER nb_elements__5G2)
+static void** create__JK2(__INTEGER nb_elements__LK2)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__BUDH,a__4RFH,new_size__CUDH,new_size2__DUDH,a__CSFH;
+  __UINTEGER_32 new_size__DSFH;
+  __POINTER result__AUDH,ptr_table__QYIH,next__PYIH,result__RYIH;
+  void *result__UYIH;
+  __INTEGER Self__TWJC;
+  void **Result__ABDB;
+  sz__BUDH=((__UINTEGER_32 )(__INTEGER)(nb_elements__LK2 * ((__INTEGER )(sizeof(void *)))));
+  result__AUDH=((__POINTER )(NULL));
+  a__4RFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__CUDH=(__UINTEGER_32)((__UINTEGER_32)(sz__BUDH + a__4RFH) & (__UINTEGER_32)(~ a__4RFH));
+  new_size2__DUDH=(__UINTEGER_32)(new_size__CUDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__DUDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__CSFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__DSFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__DUDH + a__CSFH) & (__UINTEGER_32)(~ a__CSFH));
+    ptr_table__QYIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__DSFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__PYIH=((__POINTER )(NULL));
+    result__RYIH=((__POINTER *)ptr_table__QYIH)[ 0];
+    if ((result__RYIH == (void *)NULL)) {
+      result__RYIH=new_lab__FTJ(new_size__DSFH);
+      next__PYIH=(void *)((unsigned long)result__RYIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DSFH)));
+      ((__POINTER *)next__PYIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__QYIH)[ 0]=next__PYIH;
+    } else {
+      next__PYIH=((__POINTER *)result__RYIH)[ 0];
+      if ((next__PYIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__RYIH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__DSFH <<  1)) <=  4096)) {
+          next__PYIH=(void *)((unsigned long)result__RYIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DSFH)));
+        } else {
+          next__PYIH=new_lab__FTJ(new_size__DSFH);
+        };
+        ((__POINTER *)next__PYIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__QYIH)[ 0]=next__PYIH;
+      } else {
+        ((__POINTER *)result__RYIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PYIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__RYIH=next__PYIH;
+      };
+    };
+    ((__POINTER *)result__RYIH)[ 0]=((__POINTER ) 3);
+    result__AUDH=(void *)((unsigned long)result__RYIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__UYIH=first_free__NFVB;
+    while ((((void *)result__UYIH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__UYIH)->map_size_and_id__YTB &  4294967292LU) < new_size__CUDH))) {
+      result__UYIH=((__MEMORY *)result__UYIH)->map_next_free__ZTB;
     };
-    if (((void *)result__5QIH == (void *)NULL)) {
-      result__5QIH=new_page__K34();
+    if (((void *)result__UYIH == (void *)NULL)) {
+      result__UYIH=new_page__YC5();
     };
-    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)));
+    to_busy__index__MWFC(result__UYIH,new_size__CUDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__UYIH)) - (unsigned long)begin_memory__SXH)))) >>  26));
+    result__AUDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__UYIH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__ABDB=((void **)result__AUDH);
+  Self__TWJC=(__INTEGER)(nb_elements__LK2 -  1);
+  while ((Self__TWJC >=  0)) {
+    Result__ABDB[Self__TWJC]=NULL;
+    Self__TWJC=(__INTEGER)(Self__TWJC -  1);
   };
-  return(Result__U3CB);
+  return(Result__ABDB);
 }
 
-static void add__MVR(__HASHED_SEToABSTRACT_STRINGo *Self__NVR,void *e__OVR)
+static void add__YYR(__HASHED_SEToABSTRACT_STRINGo *Self__ZYR,void *e__0YR)
 // ({HASHED_SEToABSTRACT_STRINGo},{STRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __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)));
+  __INTEGER result__XYIH,__tmp__ZYIH,Self__0YIH,idx__CZR,typ_id__4YIH;
+  __POINTER ptr__3YIH,ptr_table__IZIH,next__HZIH,result__JZIH;
+  __POINTER ptr_table__NZIH,next__MZIH,result__OZIH;
+  __UINTEGER_32 sz__5YIH,a__AZIH,new_size__BZIH,t__CZIH,a__DZIH;
+  __UINTEGER_32 new_size__QZIH,lab_type__PZIH;
+  void *node__FZR,*n__GZIH;
+  __HASHED_SET_NODEoABSTRACT_STRINGo *result__2YIH,*Self__EZIH;
+  has__DQW(Self__ZYR,e__0YR);
+  has__DQW(Self__ZYR,e__0YR);
+  result__XYIH= 0;
+  __tmp__ZYIH=((__STRING_CONSTANT *)e__0YR)->count__DD;
+  Self__0YIH= 1;
+  while ((Self__0YIH <= __tmp__ZYIH)) {
+    result__XYIH=(__INTEGER)((__INTEGER)( 5 * result__XYIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)e__0YR)->storage__FRO)[(__INTEGER)(Self__0YIH -  1)])));
+    Self__0YIH=(__INTEGER)(Self__0YIH +  1);
+  };
+  if ((result__XYIH <  0)) {
+    result__XYIH=(__INTEGER)(~ result__XYIH);
+  };
+  idx__CZR=(__INTEGER)(result__XYIH % Self__ZYR->capacity__JZR);
+  node__FZR=((void **)Self__ZYR->buckets__OZR)[idx__CZR];
+  while ((! (((void *)node__FZR == (void *)NULL) || __infix_equal_equal__GAEB(((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__FZR)->item__0ZR,e__0YR)))) {
+    node__FZR=((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__FZR)->next__G0R;
+  };
+  if (((void *)node__FZR == (void *)NULL)) {
+    if ((Self__ZYR->capacity__JZR == Self__ZYR->count__P0R)) {
+      increase_capacity__ISNB(Self__ZYR);
+      idx__CZR=(__INTEGER)(result__XYIH % Self__ZYR->capacity__JZR);
+    };
+    n__GZIH=((void **)Self__ZYR->buckets__OZR)[idx__CZR];
+    result__2YIH=NULL;
+    ptr__3YIH=((__POINTER )(NULL));
+    typ_id__4YIH= 0;
+    sz__5YIH=((__UINTEGER_32 )sizeof(__HASHED_SET_NODEoABSTRACT_STRINGo));
+    if ((sz__5YIH ==  0)) {
+      result__2YIH=HASHED_SET_NODEoABSTRACT_STRINGo__;
+    } else {
+      typ_id__4YIH=__HASHED_SET_NODEoABSTRACT_STRINGo__;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__5YIH);
+      if ((typ_id__4YIH == (__INTEGER)(-  1))) {
+        a__AZIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__BZIH=(__UINTEGER_32)((__UINTEGER_32)(sz__5YIH + a__AZIH) & (__UINTEGER_32)(~ a__AZIH));
+        ptr_table__IZIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__BZIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__HZIH=((__POINTER )(NULL));
+        result__JZIH=((__POINTER *)ptr_table__IZIH)[ 0];
+        if ((result__JZIH == (void *)NULL)) {
+          result__JZIH=new_lab__FTJ(new_size__BZIH);
+          next__HZIH=(void *)((unsigned long)result__JZIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BZIH)));
+          ((__POINTER *)next__HZIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__IZIH)[ 0]=next__HZIH;
+        } else {
+          next__HZIH=((__POINTER *)result__JZIH)[ 0];
+          if ((next__HZIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__JZIH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__BZIH <<  1)) <=  4096)) {
+              next__HZIH=(void *)((unsigned long)result__JZIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BZIH)));
             } else {
-              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)));
+              next__HZIH=new_lab__FTJ(new_size__BZIH);
+            };
+            ((__POINTER *)next__HZIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__IZIH)[ 0]=next__HZIH;
+          } else {
+            ((__POINTER *)result__JZIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HZIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__JZIH=next__HZIH;
+          };
+        };
+        ptr__3YIH=result__JZIH;
+      } else {
+        t__CZIH=((__UINTEGER_32 )typ_id__4YIH);
+        a__DZIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__QZIH=(__UINTEGER_32)((__UINTEGER_32)(sz__5YIH + a__DZIH) & (__UINTEGER_32)(~ a__DZIH));
+        ptr_table__NZIH=((__POINTER )(&(table_type[(t__CZIH)])));
+        lab_type__PZIH=(__UINTEGER_32)(t__CZIH |  1);
+        next__MZIH=((__POINTER )(NULL));
+        result__OZIH=((__POINTER *)ptr_table__NZIH)[ 0];
+        if ((result__OZIH == (void *)NULL)) {
+          result__OZIH=new_lab__FTJ(lab_type__PZIH);
+          next__MZIH=(void *)((unsigned long)result__OZIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QZIH)));
+          ((__POINTER *)next__MZIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__NZIH)[ 0]=next__MZIH;
+        } else {
+          next__MZIH=((__POINTER *)result__OZIH)[ 0];
+          if ((next__MZIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__OZIH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__QZIH <<  1)) <=  4096)) {
+              next__MZIH=(void *)((unsigned long)result__OZIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QZIH)));
             } else {
-              next__XRIH=new_lab__ZPJ(lab_type__0RIH);
+              next__MZIH=new_lab__FTJ(lab_type__PZIH);
             };
-            ((__POINTER *)next__XRIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__YRIH)[ 0]=next__XRIH;
+            ((__POINTER *)next__MZIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__NZIH)[ 0]=next__MZIH;
           } else {
-            ((__POINTER *)result__ZRIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XRIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__ZRIH=next__XRIH;
+            ((__POINTER *)result__OZIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MZIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__OZIH=next__MZIH;
           };
         };
-        ptr__IRIH=result__ZRIH;
+        ptr__3YIH=result__OZIH;
       };
-      result__HRIH=((__HASHED_SET_NODEoABSTRACT_STRINGo *)ptr__IRIH);
-      *(result__HRIH) = *(HASHED_SET_NODEoABSTRACT_STRINGo__);
+      result__2YIH=((__HASHED_SET_NODEoABSTRACT_STRINGo *)ptr__3YIH);
+      *(result__2YIH) = *(HASHED_SET_NODEoABSTRACT_STRINGo__);
     };
-    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);
+    Self__EZIH=((__HASHED_SET_NODEoABSTRACT_STRINGo *)result__2YIH);
+    Self__EZIH->item__0ZR=e__0YR;
+    Self__EZIH->next__G0R=n__GZIH;
+    node__FZR=result__2YIH;
+    ((void **)Self__ZYR->buckets__OZR)[idx__CZR]=result__2YIH;
+    Self__ZYR->count__P0R=(__INTEGER)(Self__ZYR->count__P0R +  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__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;
+  __BOOLEAN __tmp__5HB,__tmp__MIB,result__AGDB,__tmp__ZIB,result__SGDB;
+  __BOOLEAN __tmp__GJB,result__EHDB,__tmp__TJB,result__WHDB,__tmp__AKB;
+  __BOOLEAN result__IIDB,__tmp__NKB,result__0IDB,__tmp__0KB;
+  __BOOLEAN result__MJDB,__tmp__HLB,result__4JDB,__tmp__ULB;
+  __BOOLEAN result__QKDB,__tmp__BMB,result__CLDB,__tmp__OMB;
+  __BOOLEAN result__ULDB,__tmp__1MB,result__GMDB,__tmp__INB;
+  __BOOLEAN result__YMDB,__tmp__VNB,result__KNDB,__tmp__COB;
+  __BOOLEAN result__2NDB,__tmp__POB,result__OODB;
   c__LHB='\0';
-  copy__35R(string_tmp__VH,(&__string_81));
+  copy__JDS(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__ZNO)[(__INTEGER)(Self__KWB -  1)];
+    c__LHB=((__CHARACTER *)((__STRING_CONSTANT *)op__JHB)->storage__FRO)[(__INTEGER)(Self__KWB -  1)];
     if ((c__LHB == '+')) {
-      append__FLS(string_tmp__VH,(&__string_188));
+      append__ROS(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__UCDB=(c__LHB == '-');
-      if (result__UCDB) {
-        append__FLS(string_tmp__VH,(&__string_189));
+      result__AGDB=(c__LHB == '-');
+      if (result__AGDB) {
+        append__ROS(string_tmp__VH,(&__string_189));
       };
-      __tmp__MIB=result__UCDB;
+      __tmp__MIB=result__AGDB;
     };
     if (__tmp__MIB) {
       __tmp__ZIB=TRUE__;
     } else {
-      result__GDDB=(c__LHB == '~');
-      if (result__GDDB) {
-        append__FLS(string_tmp__VH,(&__string_190));
+      result__SGDB=(c__LHB == '~');
+      if (result__SGDB) {
+        append__ROS(string_tmp__VH,(&__string_190));
       };
-      __tmp__ZIB=result__GDDB;
+      __tmp__ZIB=result__SGDB;
     };
     if (__tmp__ZIB) {
       __tmp__GJB=TRUE__;
     } else {
-      result__YDDB=(c__LHB == '!');
-      if (result__YDDB) {
-        append__FLS(string_tmp__VH,(&__string_191));
+      result__EHDB=(c__LHB == '!');
+      if (result__EHDB) {
+        append__ROS(string_tmp__VH,(&__string_191));
       };
-      __tmp__GJB=result__YDDB;
+      __tmp__GJB=result__EHDB;
     };
     if (__tmp__GJB) {
       __tmp__TJB=TRUE__;
     } else {
-      result__KEDB=(c__LHB == '/');
-      if (result__KEDB) {
-        append__FLS(string_tmp__VH,(&__string_192));
+      result__WHDB=(c__LHB == '/');
+      if (result__WHDB) {
+        append__ROS(string_tmp__VH,(&__string_192));
       };
-      __tmp__TJB=result__KEDB;
+      __tmp__TJB=result__WHDB;
     };
     if (__tmp__TJB) {
       __tmp__AKB=TRUE__;
     } else {
-      result__2EDB=(c__LHB == '*');
-      if (result__2EDB) {
-        append__FLS(string_tmp__VH,(&__string_193));
+      result__IIDB=(c__LHB == '*');
+      if (result__IIDB) {
+        append__ROS(string_tmp__VH,(&__string_193));
       };
-      __tmp__AKB=result__2EDB;
+      __tmp__AKB=result__IIDB;
     };
     if (__tmp__AKB) {
       __tmp__NKB=TRUE__;
     } else {
-      result__OFDB=(c__LHB == '^');
-      if (result__OFDB) {
-        append__FLS(string_tmp__VH,(&__string_194));
+      result__0IDB=(c__LHB == '^');
+      if (result__0IDB) {
+        append__ROS(string_tmp__VH,(&__string_194));
       };
-      __tmp__NKB=result__OFDB;
+      __tmp__NKB=result__0IDB;
     };
     if (__tmp__NKB) {
       __tmp__0KB=TRUE__;
     } else {
-      result__AGDB=(c__LHB == '%');
-      if (result__AGDB) {
-        append__FLS(string_tmp__VH,(&__string_195));
+      result__MJDB=(c__LHB == '%');
+      if (result__MJDB) {
+        append__ROS(string_tmp__VH,(&__string_195));
       };
-      __tmp__0KB=result__AGDB;
+      __tmp__0KB=result__MJDB;
     };
     if (__tmp__0KB) {
       __tmp__HLB=TRUE__;
     } else {
-      result__SGDB=(c__LHB == '>');
-      if (result__SGDB) {
-        append__FLS(string_tmp__VH,(&__string_196));
+      result__4JDB=(c__LHB == '>');
+      if (result__4JDB) {
+        append__ROS(string_tmp__VH,(&__string_196));
       };
-      __tmp__HLB=result__SGDB;
+      __tmp__HLB=result__4JDB;
     };
     if (__tmp__HLB) {
       __tmp__ULB=TRUE__;
     } else {
-      result__EHDB=(c__LHB == '<');
-      if (result__EHDB) {
-        append__FLS(string_tmp__VH,(&__string_197));
+      result__QKDB=(c__LHB == '<');
+      if (result__QKDB) {
+        append__ROS(string_tmp__VH,(&__string_197));
       };
-      __tmp__ULB=result__EHDB;
+      __tmp__ULB=result__QKDB;
     };
     if (__tmp__ULB) {
       __tmp__BMB=TRUE__;
     } else {
-      result__WHDB=(c__LHB == '=');
-      if (result__WHDB) {
-        append__FLS(string_tmp__VH,(&__string_198));
+      result__CLDB=(c__LHB == '=');
+      if (result__CLDB) {
+        append__ROS(string_tmp__VH,(&__string_198));
       };
-      __tmp__BMB=result__WHDB;
+      __tmp__BMB=result__CLDB;
     };
     if (__tmp__BMB) {
       __tmp__OMB=TRUE__;
     } else {
-      result__IIDB=(c__LHB == '\\');
-      if (result__IIDB) {
-        append__FLS(string_tmp__VH,(&__string_199));
+      result__ULDB=(c__LHB == '\\');
+      if (result__ULDB) {
+        append__ROS(string_tmp__VH,(&__string_199));
       };
-      __tmp__OMB=result__IIDB;
+      __tmp__OMB=result__ULDB;
     };
     if (__tmp__OMB) {
       __tmp__1MB=TRUE__;
     } else {
-      result__0IDB=(c__LHB == '|');
-      if (result__0IDB) {
-        append__FLS(string_tmp__VH,(&__string_200));
+      result__GMDB=(c__LHB == '|');
+      if (result__GMDB) {
+        append__ROS(string_tmp__VH,(&__string_200));
       };
-      __tmp__1MB=result__0IDB;
+      __tmp__1MB=result__GMDB;
     };
     if (__tmp__1MB) {
       __tmp__INB=TRUE__;
     } else {
-      result__MJDB=(c__LHB == '&');
-      if (result__MJDB) {
-        append__FLS(string_tmp__VH,(&__string_201));
+      result__YMDB=(c__LHB == '&');
+      if (result__YMDB) {
+        append__ROS(string_tmp__VH,(&__string_201));
       };
-      __tmp__INB=result__MJDB;
+      __tmp__INB=result__YMDB;
     };
     if (__tmp__INB) {
       __tmp__VNB=TRUE__;
     } else {
-      result__4JDB=(c__LHB == '$');
-      if (result__4JDB) {
-        append__FLS(string_tmp__VH,(&__string_202));
+      result__KNDB=(c__LHB == '$');
+      if (result__KNDB) {
+        append__ROS(string_tmp__VH,(&__string_202));
       };
-      __tmp__VNB=result__4JDB;
+      __tmp__VNB=result__KNDB;
     };
     if (__tmp__VNB) {
       __tmp__COB=TRUE__;
     } else {
-      result__QKDB=(c__LHB == '#');
-      if (result__QKDB) {
-        append__FLS(string_tmp__VH,(&__string_203));
+      result__2NDB=(c__LHB == '#');
+      if (result__2NDB) {
+        append__ROS(string_tmp__VH,(&__string_203));
       };
-      __tmp__COB=result__QKDB;
+      __tmp__COB=result__2NDB;
     };
     if (__tmp__COB) {
       __tmp__POB=TRUE__;
     } else {
-      result__CLDB=(c__LHB == '@');
-      if (result__CLDB) {
-        append__FLS(string_tmp__VH,(&__string_204));
+      result__OODB=(c__LHB == '@');
+      if (result__OODB) {
+        append__ROS(string_tmp__VH,(&__string_204));
       };
-      __tmp__POB=result__CLDB;
+      __tmp__POB=result__OODB;
     };
     if ((! __tmp__POB)) {
       if ((c__LHB == '?')) {
-        append__FLS(string_tmp__VH,(&__string_205));
+        append__ROS(string_tmp__VH,(&__string_205));
       };
     };
     Self__KWB=(__INTEGER)(Self__KWB +  1);
@@ -11263,601 +11263,601 @@ static void* operator__name__GHB(void *op__JHB)
   return(get__YWB(string_tmp__VH));
 }
 
-static void print__DID(__STRING_CONSTANT *Self__EID)
+static void print__DJD(__STRING_CONSTANT *Self__EJD)
 // ({STRING_CONSTANT}) VoidRecursive, No inlinable.
 {
-  put_string__5FF(Self__EID);
+  put_string__DJF(Self__EJD);
 }
 
 static void* get__YWB(void *str__0WB)
 // ({NULLxSTRING}) With resultNo recursive, No inlinable.
 {
   void *result__2WB,*__tmp__0XB;
-  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;
+  void *result__5LS;
+  __STRING *Self__JGX;
+  __INTEGER result__LGX,__tmp__MGX,Self__VV2,typ_id__UMD,c__AGT;
+  __INTEGER Self__3RHH,result__1ZIH,__tmp__3ZIH,Self__4ZIH,idx__B4S;
+  __INTEGER typ_id__SGJB;
+  __STRING_CONSTANT *result__OMD,*result__DIF,*Self__4FT,*Self__2ZIH;
+  __POINTER ptr__PMD,ptr_table__SZIH,next__RZIH,result__TZIH;
+  __POINTER ptr_table__XZIH,next__WZIH,result__YZIH,ptr__NGJB;
+  __POINTER ptr_table__B0IH,next__A0IH,result__C0IH,ptr_table__G0IH;
+  __POINTER next__F0IH,result__H0IH;
+  __UINTEGER_32 sz__RMD,a__2SFH,new_size__3SFH,t__BTFH,a__ATFH;
+  __UINTEGER_32 new_size__0ZIH,lab_type__ZZIH,sz__PGJB,a__VBGH;
+  __UINTEGER_32 new_size__WBGH,t__0BGH,a__ZBGH,new_size__J0IH;
+  __UINTEGER_32 lab_type__I0IH;
+  __HASHED_SEToABSTRACT_STRINGo *Self__MLS,*Self__Y3S;
+  void *node__4LS,*node__C4S,*n__PKCB;
+  __CHARACTER *Self__4RHH,*model__5RHH;
+  __HASHED_SET_NODEoABSTRACT_STRINGo *result__MGJB,*Self__EDDC;
   result__2WB=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;
-    sz__RLD=((__UINTEGER_32 )sizeof(__STRING_CONSTANT));
-    if ((sz__RLD ==  0)) {
-      result__OLD=STRING_CONSTANT__;
-    } else {
-      typ_id__ULD=-1;
-      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__RLD);
-      if ((typ_id__ULD == (__INTEGER)(-  1))) {
-        a__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)));
+  Self__MLS=((__HASHED_SEToABSTRACT_STRINGo *)list__FK);
+  result__5LS=NULL;
+  Self__JGX=((__STRING *)str__0WB);
+  result__LGX= 0;
+  __tmp__MGX=Self__JGX->count__EGC;
+  Self__VV2= 1;
+  while ((Self__VV2 <= __tmp__MGX)) {
+    result__LGX=(__INTEGER)((__INTEGER)( 5 * result__LGX) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__JGX->storage__RCS)[(__INTEGER)(Self__VV2 -  1)])));
+    Self__VV2=(__INTEGER)(Self__VV2 +  1);
+  };
+  if ((result__LGX <  0)) {
+    result__LGX=(__INTEGER)(~ result__LGX);
+  };
+  node__4LS=((void **)Self__MLS->buckets__OZR)[(__INTEGER)(result__LGX % Self__MLS->capacity__JZR)];
+  while ((! (((void *)node__4LS == (void *)NULL) || __infix_equal_equal__GAEB(((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__4LS)->item__0ZR,str__0WB)))) {
+    node__4LS=((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__4LS)->next__G0R;
+  };
+  if (((void *)node__4LS != (void *)NULL)) {
+    result__5LS=((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__4LS)->item__0ZR;
+  };
+  if (((void *)result__5LS == (void *)NULL)) {
+    result__OMD=NULL;
+    ptr__PMD=((__POINTER )(NULL));
+    typ_id__UMD= 0;
+    sz__RMD=((__UINTEGER_32 )sizeof(__STRING_CONSTANT));
+    if ((sz__RMD ==  0)) {
+      result__OMD=STRING_CONSTANT__;
+    } else {
+      typ_id__UMD=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__RMD);
+      if ((typ_id__UMD == (__INTEGER)(-  1))) {
+        a__2SFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__3SFH=(__UINTEGER_32)((__UINTEGER_32)(sz__RMD + a__2SFH) & (__UINTEGER_32)(~ a__2SFH));
+        ptr_table__SZIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__3SFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__RZIH=((__POINTER )(NULL));
+        result__TZIH=((__POINTER *)ptr_table__SZIH)[ 0];
+        if ((result__TZIH == (void *)NULL)) {
+          result__TZIH=new_lab__FTJ(new_size__3SFH);
+          next__RZIH=(void *)((unsigned long)result__TZIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3SFH)));
+          ((__POINTER *)next__RZIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__SZIH)[ 0]=next__RZIH;
+        } else {
+          next__RZIH=((__POINTER *)result__TZIH)[ 0];
+          if ((next__RZIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TZIH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__3SFH <<  1)) <=  4096)) {
+              next__RZIH=(void *)((unsigned long)result__TZIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3SFH)));
             } else {
-              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)));
+              next__RZIH=new_lab__FTJ(new_size__3SFH);
+            };
+            ((__POINTER *)next__RZIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__SZIH)[ 0]=next__RZIH;
+          } else {
+            ((__POINTER *)result__TZIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RZIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__TZIH=next__RZIH;
+          };
+        };
+        ptr__PMD=result__TZIH;
+      } else {
+        t__BTFH=((__UINTEGER_32 )typ_id__UMD);
+        a__ATFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__0ZIH=(__UINTEGER_32)((__UINTEGER_32)(sz__RMD + a__ATFH) & (__UINTEGER_32)(~ a__ATFH));
+        ptr_table__XZIH=((__POINTER )(&(table_type[(t__BTFH)])));
+        lab_type__ZZIH=(__UINTEGER_32)(t__BTFH |  1);
+        next__WZIH=((__POINTER )(NULL));
+        result__YZIH=((__POINTER *)ptr_table__XZIH)[ 0];
+        if ((result__YZIH == (void *)NULL)) {
+          result__YZIH=new_lab__FTJ(lab_type__ZZIH);
+          next__WZIH=(void *)((unsigned long)result__YZIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0ZIH)));
+          ((__POINTER *)next__WZIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__XZIH)[ 0]=next__WZIH;
+        } else {
+          next__WZIH=((__POINTER *)result__YZIH)[ 0];
+          if ((next__WZIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YZIH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__0ZIH <<  1)) <=  4096)) {
+              next__WZIH=(void *)((unsigned long)result__YZIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0ZIH)));
             } else {
-              next__BSIH=new_lab__ZPJ(lab_type__ESIH);
-            };
-            ((__POINTER *)next__BSIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__CSIH)[ 0]=next__BSIH;
-          } else {
-            ((__POINTER *)result__DSIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BSIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__DSIH=next__BSIH;
-          };
-        };
-        ptr__PLD=result__DSIH;
-      };
-      result__OLD=((__STRING_CONSTANT *)ptr__PLD);
-      *(result__OLD) = *(STRING_CONSTANT__);
-    };
-    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__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)));
+              next__WZIH=new_lab__FTJ(lab_type__ZZIH);
+            };
+            ((__POINTER *)next__WZIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__XZIH)[ 0]=next__WZIH;
+          } else {
+            ((__POINTER *)result__YZIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WZIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__YZIH=next__WZIH;
+          };
+        };
+        ptr__PMD=result__YZIH;
+      };
+      result__OMD=((__STRING_CONSTANT *)ptr__PMD);
+      *(result__OMD) = *(STRING_CONSTANT__);
+    };
+    result__DIF=result__OMD;
+    Self__4FT=((__STRING_CONSTANT *)result__OMD);
+    c__AGT=((__STRING *)str__0WB)->count__EGC;
+    if ((c__AGT !=  0)) {
+      Self__4FT->storage__FRO=create__JMEB((__INTEGER)(c__AGT +  1));
+      Self__4RHH=((__CHARACTER *)Self__4FT->storage__FRO);
+      model__5RHH=((__STRING *)str__0WB)->storage__RCS;
+      Self__3RHH=(__INTEGER)(c__AGT -  1);
+      while ((Self__3RHH >=  0)) {
+        Self__4RHH[Self__3RHH]=((__CHARACTER *)model__5RHH)[Self__3RHH];
+        Self__3RHH=(__INTEGER)(Self__3RHH -  1);
+      };
+      ((__CHARACTER *)Self__4FT->storage__FRO)[c__AGT]='\0';
+      Self__4FT->count__DD=c__AGT;
+    };
+    result__2WB=result__OMD;
+    Self__Y3S=((__HASHED_SEToABSTRACT_STRINGo *)list__FK);
+    fast_has__WAY(Self__Y3S,result__OMD);
+    fast_has__WAY(Self__Y3S,result__OMD);
+    Self__2ZIH=((__STRING_CONSTANT *)result__OMD);
+    result__1ZIH= 0;
+    __tmp__3ZIH=Self__2ZIH->count__DD;
+    Self__4ZIH= 1;
+    while ((Self__4ZIH <= __tmp__3ZIH)) {
+      result__1ZIH=(__INTEGER)((__INTEGER)( 5 * result__1ZIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__2ZIH->storage__FRO)[(__INTEGER)(Self__4ZIH -  1)])));
+      Self__4ZIH=(__INTEGER)(Self__4ZIH +  1);
+    };
+    if ((result__1ZIH <  0)) {
+      result__1ZIH=(__INTEGER)(~ result__1ZIH);
+    };
+    idx__B4S=(__INTEGER)(result__1ZIH % Self__Y3S->capacity__JZR);
+    node__C4S=((void **)Self__Y3S->buckets__OZR)[idx__B4S];
+    while ((! (((void *)node__C4S == (void *)NULL) || ((void *)((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__C4S)->item__0ZR == (void *)result__DIF)))) {
+      node__C4S=((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__C4S)->next__G0R;
+    };
+    if (((void *)node__C4S == (void *)NULL)) {
+      if ((Self__Y3S->capacity__JZR == Self__Y3S->count__P0R)) {
+        increase_capacity__ISNB(Self__Y3S);
+        idx__B4S=(__INTEGER)(result__1ZIH % Self__Y3S->capacity__JZR);
+      };
+      n__PKCB=((void **)Self__Y3S->buckets__OZR)[idx__B4S];
+      result__MGJB=NULL;
+      ptr__NGJB=((__POINTER )(NULL));
+      typ_id__SGJB= 0;
+      sz__PGJB=((__UINTEGER_32 )sizeof(__HASHED_SET_NODEoABSTRACT_STRINGo));
+      if ((sz__PGJB ==  0)) {
+        result__MGJB=HASHED_SET_NODEoABSTRACT_STRINGo__;
+      } else {
+        typ_id__SGJB=__HASHED_SET_NODEoABSTRACT_STRINGo__;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__PGJB);
+        if ((typ_id__SGJB == (__INTEGER)(-  1))) {
+          a__VBGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__WBGH=(__UINTEGER_32)((__UINTEGER_32)(sz__PGJB + a__VBGH) & (__UINTEGER_32)(~ a__VBGH));
+          ptr_table__B0IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__WBGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__A0IH=((__POINTER )(NULL));
+          result__C0IH=((__POINTER *)ptr_table__B0IH)[ 0];
+          if ((result__C0IH == (void *)NULL)) {
+            result__C0IH=new_lab__FTJ(new_size__WBGH);
+            next__A0IH=(void *)((unsigned long)result__C0IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WBGH)));
+            ((__POINTER *)next__A0IH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__B0IH)[ 0]=next__A0IH;
+          } else {
+            next__A0IH=((__POINTER *)result__C0IH)[ 0];
+            if ((next__A0IH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__C0IH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__WBGH <<  1)) <=  4096)) {
+                next__A0IH=(void *)((unsigned long)result__C0IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WBGH)));
               } else {
-                next__LSIH=new_lab__ZPJ(new_size__10FH);
+                next__A0IH=new_lab__FTJ(new_size__WBGH);
               };
-              ((__POINTER *)next__LSIH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__MSIH)[ 0]=next__LSIH;
+              ((__POINTER *)next__A0IH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__B0IH)[ 0]=next__A0IH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__C0IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__A0IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__C0IH=next__A0IH;
+            };
+          };
+          ptr__NGJB=result__C0IH;
+        } else {
+          t__0BGH=((__UINTEGER_32 )typ_id__SGJB);
+          a__ZBGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__J0IH=(__UINTEGER_32)((__UINTEGER_32)(sz__PGJB + a__ZBGH) & (__UINTEGER_32)(~ a__ZBGH));
+          ptr_table__G0IH=((__POINTER )(&(table_type[(t__0BGH)])));
+          lab_type__I0IH=(__UINTEGER_32)(t__0BGH |  1);
+          next__F0IH=((__POINTER )(NULL));
+          result__H0IH=((__POINTER *)ptr_table__G0IH)[ 0];
+          if ((result__H0IH == (void *)NULL)) {
+            result__H0IH=new_lab__FTJ(lab_type__I0IH);
+            next__F0IH=(void *)((unsigned long)result__H0IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__J0IH)));
+            ((__POINTER *)next__F0IH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__G0IH)[ 0]=next__F0IH;
+          } else {
+            next__F0IH=((__POINTER *)result__H0IH)[ 0];
+            if ((next__F0IH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__H0IH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__J0IH <<  1)) <=  4096)) {
+                next__F0IH=(void *)((unsigned long)result__H0IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__J0IH)));
               } else {
-                next__QSIH=new_lab__ZPJ(lab_type__TSIH);
+                next__F0IH=new_lab__FTJ(lab_type__I0IH);
               };
-              ((__POINTER *)next__QSIH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__RSIH)[ 0]=next__QSIH;
+              ((__POINTER *)next__F0IH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__G0IH)[ 0]=next__F0IH;
             } else {
-              ((__POINTER *)result__SSIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QSIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__SSIH=next__QSIH;
+              ((__POINTER *)result__H0IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__F0IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__H0IH=next__F0IH;
             };
           };
-          ptr__BDJB=result__SSIH;
+          ptr__NGJB=result__H0IH;
         };
-        result__ADJB=((__HASHED_SET_NODEoABSTRACT_STRINGo *)ptr__BDJB);
-        *(result__ADJB) = *(HASHED_SET_NODEoABSTRACT_STRINGo__);
+        result__MGJB=((__HASHED_SET_NODEoABSTRACT_STRINGo *)ptr__NGJB);
+        *(result__MGJB) = *(HASHED_SET_NODEoABSTRACT_STRINGo__);
       };
-      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);
+      Self__EDDC=((__HASHED_SET_NODEoABSTRACT_STRINGo *)result__MGJB);
+      Self__EDDC->item__0ZR=result__OMD;
+      Self__EDDC->next__G0R=n__PKCB;
+      node__C4S=result__MGJB;
+      ((void **)Self__Y3S->buckets__OZR)[idx__B4S]=result__MGJB;
+      Self__Y3S->count__P0R=(__INTEGER)(Self__Y3S->count__P0R +  1);
     };
   } else {
-    if (result__TIS==NULL) {
+    if (result__5LS==NULL) {
       __tmp__0XB=NULL;
     } else {
-      __tmp__0XB=((void *)result__TIS);
+      __tmp__0XB=((void *)result__5LS);
     };
     result__2WB=__tmp__0XB;
   };
   return(result__2WB);
 }
 
-static void copy__35R(__STRING *Self__45R,void *other__55R)
+static void copy__JDS(__STRING *Self__KDS,void *other__LDS)
 // ({STRING},{NULLxSTRING_CONSTANTxSTRING}) VoidNo recursive, No inlinable.
 {
-  __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;
+  __INTEGER __tmp__MDS,Self__ISHH;
+  __CHARACTER *__tmp__BES,*__tmp__DES,*Self__JSHH,*model__KSHH;
+  if (((struct ___OBJ *)other__LDS)->__id==__STRING_CONSTANT__) {
+    __tmp__MDS=((__STRING_CONSTANT *)other__LDS)->count__DD;
   } else {
-    __tmp__AAS=((__STRING *)other__55R)->count__EGC;
+    __tmp__MDS=((__STRING *)other__LDS)->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;
+  Self__KDS->count__EGC=__tmp__MDS;
+  if ((__tmp__MDS >  0)) {
+    if ((Self__KDS->capacity__ICS < __tmp__MDS)) {
+      Self__KDS->storage__RCS=create__JMEB(__tmp__MDS);
+      Self__KDS->capacity__ICS=Self__KDS->count__EGC;
     };
-    __tmp__VAS=Self__45R->storage__F5R;
-    if (((struct ___OBJ *)other__55R)->__id==__STRING_CONSTANT__) {
-      __tmp__XAS=((__STRING_CONSTANT *)other__55R)->storage__ZNO;
+    __tmp__BES=Self__KDS->storage__RCS;
+    if (((struct ___OBJ *)other__LDS)->__id==__STRING_CONSTANT__) {
+      __tmp__DES=((__STRING_CONSTANT *)other__LDS)->storage__FRO;
     } else {
-      __tmp__XAS=((__STRING *)other__55R)->storage__F5R;
+      __tmp__DES=((__STRING *)other__LDS)->storage__RCS;
     };
-    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);
+    Self__JSHH=((__CHARACTER *)__tmp__BES);
+    model__KSHH=__tmp__DES;
+    Self__ISHH=(__INTEGER)(Self__KDS->count__EGC -  1);
+    while ((Self__ISHH >=  0)) {
+      Self__JSHH[Self__ISHH]=((__CHARACTER *)model__KSHH)[Self__ISHH];
+      Self__ISHH=(__INTEGER)(Self__ISHH -  1);
     };
   };
 }
 
-static void append__FLS(__STRING *Self__GLS,void *other__HLS)
+static void append__ROS(__STRING *Self__SOS,void *other__TOS)
 // ({STRING},{NULLxSTRING_CONSTANTxSTRING}) VoidNo recursive, No inlinable.
 {
-  __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;
+  __INTEGER __tmp__2OS,needed_capacity__VOS,old_nb_elts__S3DC;
+  __INTEGER upper__SSHH,Self__QSHH,dest__ONBC,src_capacity__PNBC;
+  __INTEGER i2__5NBC,i1__4NBC;
+  __CHARACTER *Self__R3DC,*new__J4DC,*__tmp__ZPS,*__tmp__0PS,*Self__MNBC;
+  __CHARACTER *src__NNBC;
+  if (((struct ___OBJ *)other__TOS)->__id==__STRING_CONSTANT__) {
+    __tmp__2OS=((__STRING_CONSTANT *)other__TOS)->count__DD;
   } else {
-    __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;
+    __tmp__2OS=((__STRING *)other__TOS)->count__EGC;
+  };
+  needed_capacity__VOS=(__INTEGER)(Self__SOS->count__EGC + __tmp__2OS);
+  if ((Self__SOS->capacity__ICS < needed_capacity__VOS)) {
+    if ((Self__SOS->capacity__ICS ==  0)) {
+      Self__SOS->capacity__ICS=needed_capacity__VOS;
+      Self__SOS->storage__RCS=create__JMEB(needed_capacity__VOS);
+    } else {
+      Self__R3DC=((__CHARACTER *)Self__SOS->storage__RCS);
+      old_nb_elts__S3DC=Self__SOS->capacity__ICS;
+      new__J4DC=((__CHARACTER *)realloc_dynamic__old_size__new_size__ZHLC(((__POINTER )Self__R3DC),((__UINTEGER_32 )old_nb_elts__S3DC),((__UINTEGER_32 )needed_capacity__VOS)));
+      upper__SSHH=(__INTEGER)(needed_capacity__VOS -  1);
+      Self__QSHH=old_nb_elts__S3DC;
+      while ((Self__QSHH <= upper__SSHH)) {
+        new__J4DC[Self__QSHH]='\0';
+        Self__QSHH=(__INTEGER)(Self__QSHH +  1);
+      };
+      Self__SOS->storage__RCS=new__J4DC;
+      Self__SOS->capacity__ICS=needed_capacity__VOS;
+    };
+  };
+  __tmp__ZPS=Self__SOS->storage__RCS;
+  if (((struct ___OBJ *)other__TOS)->__id==__STRING_CONSTANT__) {
+    __tmp__0PS=((__STRING_CONSTANT *)other__TOS)->storage__FRO;
   } else {
-    __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;
+    __tmp__0PS=((__STRING *)other__TOS)->storage__RCS;
+  };
+  Self__MNBC=((__CHARACTER *)__tmp__ZPS);
+  src__NNBC=__tmp__0PS;
+  dest__ONBC=Self__SOS->count__EGC;
+  src_capacity__PNBC=__tmp__2OS;
+  i2__5NBC= 0;
+  i1__4NBC=dest__ONBC;
+  while ((i2__5NBC != src_capacity__PNBC)) {
+    Self__MNBC[i1__4NBC]=((__CHARACTER *)src__NNBC)[i2__5NBC];
+    i2__5NBC=(__INTEGER)(i2__5NBC +  1);
+    i1__4NBC=(__INTEGER)(i1__4NBC +  1);
+  };
+  Self__SOS->count__EGC=needed_capacity__VOS;
 }
 
-static void* parent_directory__1ED()
+static void* parent_directory__1FD()
 // () With resultNo recursive, No inlinable.
 {
-  __STRING *Self__2LHH,*Self__VSIH;
-  void *__tmp__LFD;
-  void *__tmp__MFD,*result__5ED;
-  __CHARACTER *cwd__4ED;
-  ((__STRING *)string_tmp__AFD)->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';
+  __STRING *Self__XSHH,*Self__K0IH;
+  void *__tmp__LGD;
+  void *__tmp__MGD,*result__5FD;
+  __CHARACTER *cwd__4FD;
+  ((__STRING *)string_tmp__AGD)->count__EGC= 0;
+  Self__XSHH=((__STRING *)string_tmp__AGD);
+  if ((Self__XSHH->capacity__ICS > Self__XSHH->count__EGC)) {
+    ((__CHARACTER *)Self__XSHH->storage__RCS)[Self__XSHH->count__EGC]='\0';
   } else {
-    add_last__3IT(Self__2LHH,'\0');
-    Self__2LHH->count__EGC=(__INTEGER)(Self__2LHH->count__EGC -  1);
-  };
-  cwd__4ED=Self__2LHH->storage__F5R;
-  getcwd((cwd__4ED),255);
-  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__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__QAF(string_tmp__AFD);
-  if (__tmp__LFD==NULL) {
-    __tmp__MFD=NULL;
+    add_last__GOT(Self__XSHH,'\0');
+    Self__XSHH->count__EGC=(__INTEGER)(Self__XSHH->count__EGC -  1);
+  };
+  cwd__4FD=Self__XSHH->storage__RCS;
+  getcwd((cwd__4FD),255);
+  Self__K0IH=((__STRING *)string_tmp__AGD);
+  Self__K0IH->count__EGC= 0;
+  while ((((__CHARACTER *)cwd__4FD)[Self__K0IH->count__EGC] != '\0')) {
+    Self__K0IH->count__EGC=(__INTEGER)(Self__K0IH->count__EGC +  1);
+  };
+  if (((void *)Self__K0IH->storage__RCS != (void *)cwd__4FD)) {
+    Self__K0IH->storage__RCS=cwd__4FD;
+    Self__K0IH->capacity__ICS=(__INTEGER)(Self__K0IH->count__EGC +  1);
+  };
+  __tmp__LGD=physical_get_entry__UDF(string_tmp__AGD);
+  if (__tmp__LGD==NULL) {
+    __tmp__MGD=NULL;
   } else {
-    switch (((struct ___OBJ *)__tmp__LFD)->__id) {
+    switch (((struct ___OBJ *)__tmp__LGD)->__id) {
     case __DIRECTORY_UNIX__: {
-      __tmp__MFD=((void *)__tmp__LFD);
+      __tmp__MGD=((void *)__tmp__LGD);
     } break;
     case __FILE_UNIX__: {
-      __tmp__MFD=NULL;
+      __tmp__MGD=NULL;
     } break;
     }
   };
-  result__5ED=__tmp__MFD;
-  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);
+  result__5FD=__tmp__MGD;
+  put__to__B1S(alias__RGD,__tmp__MGD,((__DIRECTORY_UNIX *)__tmp__MGD)->parent_entry_unix__GGD.parent_entry__FGD.path__BD);
+  FILE_SYSTEM__->parent_directory__1GD=__tmp__MGD;
+  FILE_SYSTEM__->parent_directory__2GD=0;
+  return(__tmp__MGD);
 }
 
-static void* get_entry__GZAC(void *p__IZAC)
+static void* get_entry__S2AC(void *p__U2AC)
 // ({NULLxSTRING_CONSTANTxSTRING}) With resultNo recursive, No inlinable.
 {
-  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) {
+  void *result__W2AC;
+  __INTEGER idx__X2AC,idx__I0HH,n__N0HH,n__O0HH,__tmp__B5AC;
+  void *__tmp__RIIC,*__tmp__M5AC,*dir__K5AC;
+  __STRING *Self__CTFH,*Self__M0HH;
+  __CHARACTER *Self__K0HH;
+  __BOOLEAN __tmp__Q4AC,__tmp__14AC;
+  result__W2AC=NULL;
+  idx__X2AC= 0;
+  if (FILE_SYSTEM__->parent_directory__2GD==0) {
   } else {
-    parent_directory__1ED();
+    parent_directory__1FD();
   };
-  if (FILE_SYSTEM__->parent_directory__2FD==0) {
-    __tmp__DFIC=FILE_SYSTEM__->parent_directory__1FD;
+  if (FILE_SYSTEM__->parent_directory__2GD==0) {
+    __tmp__RIIC=FILE_SYSTEM__->parent_directory__1GD;
   } else {
-    __tmp__DFIC=parent_directory__1ED();
+    __tmp__RIIC=parent_directory__1FD();
   };
-  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) {
+  copy__JDS(string_tmp2__Y2AC,((__DIRECTORY_UNIX *)__tmp__RIIC)->parent_entry_unix__GGD.parent_entry__FGD.path__BD);
+  if (FILE_SYSTEM__->parent_directory__2GD==0) {
   } else {
-    parent_directory__1ED();
+    parent_directory__1FD();
   };
-  add_last__3IT(string_tmp2__MZAC,'/');
-  if (FILE_SYSTEM__->parent_directory__2FD==0) {
+  add_last__GOT(string_tmp2__Y2AC,'/');
+  if (FILE_SYSTEM__->parent_directory__2GD==0) {
   } else {
-    parent_directory__1ED();
+    parent_directory__1FD();
   };
-  append__FLS(string_tmp2__MZAC,p__IZAC);
-  if (FILE_SYSTEM__->parent_directory__2FD==0) {
+  append__ROS(string_tmp2__Y2AC,p__U2AC);
+  if (FILE_SYSTEM__->parent_directory__2GD==0) {
   } else {
-    parent_directory__1ED();
+    parent_directory__1FD();
   };
-  if (FILE_SYSTEM__->parent_directory__2FD==0) {
+  if (FILE_SYSTEM__->parent_directory__2GD==0) {
   } else {
-    parent_directory__1ED();
+    parent_directory__1FD();
   };
-  reduce_path__K3HC(string_tmp2__MZAC);
-  if (FILE_SYSTEM__->parent_directory__2FD==0) {
+  reduce_path__YAIC(string_tmp2__Y2AC);
+  if (FILE_SYSTEM__->parent_directory__2GD==0) {
   } else {
-    parent_directory__1ED();
+    parent_directory__1FD();
   };
-  if (FILE_SYSTEM__->parent_directory__2FD==0) {
+  if (FILE_SYSTEM__->parent_directory__2GD==0) {
   } else {
-    parent_directory__1ED();
+    parent_directory__1FD();
   };
-  copy__35R(string_tmp3__SZAC,string_tmp2__MZAC);
+  copy__JDS(string_tmp3__42AC,string_tmp2__Y2AC);
   do {
-    if (FILE_SYSTEM__->parent_directory__2FD==0) {
+    if (FILE_SYSTEM__->parent_directory__2GD==0) {
     } else {
-      parent_directory__1ED();
+      parent_directory__1FD();
     };
-    if (FILE_SYSTEM__->parent_directory__2FD==0) {
+    if (FILE_SYSTEM__->parent_directory__2GD==0) {
     } else {
-      parent_directory__1ED();
+      parent_directory__1FD();
     };
-    result__KZAC=reference_at__NV0C(alias__RFD,string_tmp2__MZAC);
-    if (((void *)result__KZAC == (void *)NULL)) {
-      if (FILE_SYSTEM__->parent_directory__2FD==0) {
+    result__W2AC=reference_at__1Y0C(alias__RGD,string_tmp2__Y2AC);
+    if (((void *)result__W2AC == (void *)NULL)) {
+      if (FILE_SYSTEM__->parent_directory__2GD==0) {
       } else {
-        parent_directory__1ED();
+        parent_directory__1FD();
       };
-      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);
+      Self__CTFH=((__STRING *)string_tmp2__Y2AC);
+      Self__K0HH=((__CHARACTER *)Self__CTFH->storage__RCS);
+      idx__I0HH=(__INTEGER)(Self__CTFH->count__EGC -  1);
+      while ((! ((idx__I0HH <  0) || ('/' == Self__K0HH[idx__I0HH])))) {
+        idx__I0HH=(__INTEGER)(idx__I0HH -  1);
       };
-      idx__LZAC=(__INTEGER)( 1 + idx__NTHH);
-      if ((idx__LZAC >  0)) {
-        if (FILE_SYSTEM__->parent_directory__2FD==0) {
+      idx__X2AC=(__INTEGER)( 1 + idx__I0HH);
+      if ((idx__X2AC >  0)) {
+        if (FILE_SYSTEM__->parent_directory__2GD==0) {
         } else {
-          parent_directory__1ED();
+          parent_directory__1FD();
         };
-        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;
+        Self__M0HH=((__STRING *)string_tmp2__Y2AC);
+        n__N0HH=(__INTEGER)(idx__X2AC -  1);
+        if ((n__N0HH < Self__M0HH->count__EGC)) {
+          n__O0HH=(__INTEGER)(Self__M0HH->count__EGC - n__N0HH);
+          if ((n__O0HH > Self__M0HH->count__EGC)) {
+            Self__M0HH->count__EGC= 0;
           } else {
-            Self__RTHH->count__EGC=(__INTEGER)(Self__RTHH->count__EGC - n__TTHH);
+            Self__M0HH->count__EGC=(__INTEGER)(Self__M0HH->count__EGC - n__O0HH);
           };
         };
       } else {
-        if (FILE_SYSTEM__->parent_directory__2FD==0) {
+        if (FILE_SYSTEM__->parent_directory__2GD==0) {
         } else {
-          parent_directory__1ED();
+          parent_directory__1FD();
         };
-        ((__STRING *)string_tmp2__MZAC)->count__EGC= 0;
+        ((__STRING *)string_tmp2__Y2AC)->count__EGC= 0;
       };
     };
-    if (((void *)result__KZAC == (void *)NULL)) {
-      if (FILE_SYSTEM__->parent_directory__2FD==0) {
+    if (((void *)result__W2AC == (void *)NULL)) {
+      if (FILE_SYSTEM__->parent_directory__2GD==0) {
       } else {
-        parent_directory__1ED();
+        parent_directory__1FD();
       };
-      __tmp__E1AC=(((__STRING *)string_tmp2__MZAC)->count__EGC !=  0);
+      __tmp__Q4AC=(((__STRING *)string_tmp2__Y2AC)->count__EGC !=  0);
     } else {
-      __tmp__E1AC=FALSE__;
+      __tmp__Q4AC=FALSE__;
     };
-  } while (__tmp__E1AC);
-  if (((void *)result__KZAC == (void *)NULL)) {
-    if (FILE_SYSTEM__->parent_directory__2FD==0) {
+  } while (__tmp__Q4AC);
+  if (((void *)result__W2AC == (void *)NULL)) {
+    if (FILE_SYSTEM__->parent_directory__2GD==0) {
     } else {
-      parent_directory__1ED();
+      parent_directory__1FD();
     };
-    if (FILE_SYSTEM__->parent_directory__2FD==0) {
+    if (FILE_SYSTEM__->parent_directory__2GD==0) {
     } else {
-      parent_directory__1ED();
+      parent_directory__1FD();
     };
-    result__KZAC=physical_get_entry__BY0C(string_tmp3__SZAC);
-    __tmp__P1AC=TRUE__;
+    result__W2AC=physical_get_entry__P10C(string_tmp3__42AC);
+    __tmp__14AC=TRUE__;
   } else {
-    __tmp__P1AC=FALSE__;
+    __tmp__14AC=FALSE__;
   };
-  if ((! __tmp__P1AC)) {
-    if (FILE_SYSTEM__->parent_directory__2FD==0) {
+  if ((! __tmp__14AC)) {
+    if (FILE_SYSTEM__->parent_directory__2GD==0) {
     } else {
-      parent_directory__1ED();
+      parent_directory__1FD();
     };
-    __tmp__V1AC=((__STRING *)string_tmp3__SZAC)->count__EGC;
-    if (FILE_SYSTEM__->parent_directory__2FD==0) {
+    __tmp__B5AC=((__STRING *)string_tmp3__42AC)->count__EGC;
+    if (FILE_SYSTEM__->parent_directory__2GD==0) {
     } else {
-      parent_directory__1ED();
+      parent_directory__1FD();
     };
-    if ((__tmp__V1AC != ((__STRING *)string_tmp2__MZAC)->count__EGC)) {
-      if (result__KZAC==NULL) {
-        __tmp__A2AC=NULL;
+    if ((__tmp__B5AC != ((__STRING *)string_tmp2__Y2AC)->count__EGC)) {
+      if (result__W2AC==NULL) {
+        __tmp__M5AC=NULL;
       } else {
-        switch (((struct ___OBJ *)result__KZAC)->__id) {
+        switch (((struct ___OBJ *)result__W2AC)->__id) {
         case __DIRECTORY_UNIX__: {
-          __tmp__A2AC=((void *)result__KZAC);
+          __tmp__M5AC=((void *)result__W2AC);
         } break;
         case __FILE_UNIX__: {
-          __tmp__A2AC=NULL;
+          __tmp__M5AC=NULL;
         } break;
         }
       };
-      dir__41AC=__tmp__A2AC;
-      if (FILE_SYSTEM__->parent_directory__2FD==0) {
+      dir__K5AC=__tmp__M5AC;
+      if (FILE_SYSTEM__->parent_directory__2GD==0) {
       } else {
-        parent_directory__1ED();
+        parent_directory__1FD();
       };
-      result__KZAC=physical_get_entry__QAF(string_tmp3__SZAC);
+      result__W2AC=physical_get_entry__UDF(string_tmp3__42AC);
     };
   };
-  return(result__KZAC);
+  return(result__W2AC);
 }
 
-static void put_string__L0F(void *s__N0F)
+static void put_string__P3F(void *s__R3F)
 // ({NULLxSTRING_CONSTANTxSTRING}) VoidNo recursive, No inlinable.
 {
-  __INTEGER __tmp__20F,__tmp__40F,Self__PVG,limit_up__QVG;
-  __CHARACTER __tmp__F1F;
-  if (((struct ___OBJ *)s__N0F)->__id==__STRING_CONSTANT__) {
-    __tmp__20F= 1;
+  __INTEGER __tmp__A4F,__tmp__C4F,Self__1YG,limit_up__2YG;
+  __CHARACTER __tmp__J4F;
+  if (((struct ___OBJ *)s__R3F)->__id==__STRING_CONSTANT__) {
+    __tmp__A4F= 1;
   } else {
-    __tmp__20F= 1;
+    __tmp__A4F= 1;
   };
-  if (((struct ___OBJ *)s__N0F)->__id==__STRING_CONSTANT__) {
-    __tmp__40F=((__STRING_CONSTANT *)s__N0F)->count__DD;
+  if (((struct ___OBJ *)s__R3F)->__id==__STRING_CONSTANT__) {
+    __tmp__C4F=((__STRING_CONSTANT *)s__R3F)->count__DD;
   } else {
-    __tmp__40F=((__STRING *)s__N0F)->count__EGC;
+    __tmp__C4F=((__STRING *)s__R3F)->count__EGC;
   };
-  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)];
+  Self__1YG=__tmp__A4F;
+  limit_up__2YG=__tmp__C4F;
+  while ((Self__1YG <= limit_up__2YG)) {
+    if (((struct ___OBJ *)s__R3F)->__id==__STRING_CONSTANT__) {
+      __tmp__J4F=((__CHARACTER *)((__STRING_CONSTANT *)s__R3F)->storage__FRO)[(__INTEGER)(Self__1YG -  1)];
     } else {
-      __tmp__F1F=((__CHARACTER *)((__STRING *)s__N0F)->storage__F5R)[(__INTEGER)(Self__PVG -  1)];
+      __tmp__J4F=((__CHARACTER *)((__STRING *)s__R3F)->storage__RCS)[(__INTEGER)(Self__1YG -  1)];
     };
-    fputc((int)(__tmp__F1F),stderr);
-    Self__PVG=(__INTEGER)(Self__PVG +  1);
+    fputc((int)(__tmp__J4F),stderr);
+    Self__1YG=(__INTEGER)(Self__1YG +  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__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;
+  __PROTOTYPE *result__JVC,*Self__QTS;
+  __POINTER ptr__KVC,ptr_table__O0IH,next__N0IH,result__P0IH;
+  __POINTER ptr_table__T0IH,next__S0IH,result__U0IH,ptr__OF3;
+  __POINTER ptr_table__B1IH,next__A1IH,result__C1IH,ptr_table__G1IH;
+  __POINTER next__F1IH,result__H1IH,ptr__O5GD,ptr_table__Q1IH;
+  __POINTER next__P1IH,result__R1IH,ptr_table__V1IH,next__U1IH;
+  __POINTER result__W1IH,file__UTS,ptr__TL3,ptr_table__01IH,next__Z1IH;
+  __POINTER result__11IH,ptr_table__51IH,next__41IH,result__A2IH;
+  __INTEGER typ_id__PVC,idx__Q0HH,idx__XTS,len__Z0IH,__tmp__00IH;
+  __INTEGER __tmp__20IH,Self__30IH,typ_id__TF3,new_capacity__0TX;
+  __INTEGER __tmp__4UX,__tmp__0QEC,Self__4SVD,result__K1IH,__tmp__M1IH;
+  __INTEGER Self__N1IH,idx__VPBC,idx__D3GD,new_capacity__E3GD,i__F3GD;
+  __INTEGER result__IOW,__tmp__JOW,Self__5T1,typ_id__T5GD,result__1WX;
+  __INTEGER typ_id__YL3,new_capacity__1PJC;
+  __UINTEGER_32 sz__MVC,a__LTFH,new_size__MTFH,t__QTFH,a__PTFH;
+  __UINTEGER_32 new_size__W0IH,lab_type__V0IH,sz__QF3,a__TTFH;
+  __UINTEGER_32 new_size__UTFH,t__YTFH,a__XTFH,new_size__J1IH;
+  __UINTEGER_32 lab_type__I1IH,sz__Q5GD,a__KUFH,new_size__LUFH,t__PUFH;
+  __UINTEGER_32 a__OUFH,new_size__Y1IH,lab_type__X1IH,sz__VL3,a__SUFH;
+  __UINTEGER_32 new_size__TUFH,t__XUFH,a__WUFH,new_size__C2IH;
+  __UINTEGER_32 lab_type__B2IH;
+  __STRING_CONSTANT *Self__ASX,*Self__L1IH,*Self__GOW;
+  __STRING *Self__0SHH,*Self__CTHH,*Self__FTHH,*Self__NZS;
+  void *__tmp__FVS;
+  __CHARACTER *Self__S0HH,*ptr__EXX;
+  __FAST_ARRAYoITM_TYPE_PARAMETERo *result__NF3,*Self__I5BC;
+  __FAST_ARRAYoPROTOTYPEo *Self__YTX;
+  __BOOLEAN __tmp__IUX;
+  void **__tmp__3UX,**new__GQEC;
+  __HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *Self__LPBC;
+  void *node__XPBC,*node1__H3GD,*node2__I3GD,*__tmp__LRBC;
+  void **old_buckets__G3GD;
+  __HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *result__N5GD;
+  __HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *Self__T5SD;
+  __HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *result__SL3,*Self__4ACC;
   result__JVC=NULL;
   ptr__KVC=((__POINTER )(NULL));
   typ_id__PVC= 0;
@@ -11868,789 +11868,817 @@ 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__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;
+      a__LTFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__MTFH=(__UINTEGER_32)((__UINTEGER_32)(sz__MVC + a__LTFH) & (__UINTEGER_32)(~ a__LTFH));
+      ptr_table__O0IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__MTFH / ((__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__FTJ(new_size__MTFH);
+        next__N0IH=(void *)((unsigned long)result__P0IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MTFH)));
+        ((__POINTER *)next__N0IH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__O0IH)[ 0]=next__N0IH;
       } else {
-        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)));
+        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__SXH)))) &  4095) + (__UINTEGER_32)(new_size__MTFH <<  1)) <=  4096)) {
+            next__N0IH=(void *)((unsigned long)result__P0IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MTFH)));
           } else {
-            next__YSIH=new_lab__ZPJ(new_size__WMFH);
+            next__N0IH=new_lab__FTJ(new_size__MTFH);
           };
-          ((__POINTER *)next__YSIH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__ZSIH)[ 0]=next__YSIH;
+          ((__POINTER *)next__N0IH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__O0IH)[ 0]=next__N0IH;
         } else {
-          ((__POINTER *)result__0SIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YSIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__0SIH=next__YSIH;
+          ((__POINTER *)result__P0IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__N0IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__P0IH=next__N0IH;
         };
       };
-      ptr__KVC=result__0SIH;
+      ptr__KVC=result__P0IH;
     } else {
-      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;
+      t__QTFH=((__UINTEGER_32 )typ_id__PVC);
+      a__PTFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__W0IH=(__UINTEGER_32)((__UINTEGER_32)(sz__MVC + a__PTFH) & (__UINTEGER_32)(~ a__PTFH));
+      ptr_table__T0IH=((__POINTER )(&(table_type[(t__QTFH)])));
+      lab_type__V0IH=(__UINTEGER_32)(t__QTFH |  1);
+      next__S0IH=((__POINTER )(NULL));
+      result__U0IH=((__POINTER *)ptr_table__T0IH)[ 0];
+      if ((result__U0IH == (void *)NULL)) {
+        result__U0IH=new_lab__FTJ(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__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)));
+        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__SXH)))) &  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__3SIH=new_lab__ZPJ(lab_type__ATIH);
+            next__S0IH=new_lab__FTJ(lab_type__V0IH);
           };
-          ((__POINTER *)next__3SIH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__4SIH)[ 0]=next__3SIH;
+          ((__POINTER *)next__S0IH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__T0IH)[ 0]=next__S0IH;
         } else {
-          ((__POINTER *)result__5SIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3SIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__5SIH=next__3SIH;
+          ((__POINTER *)result__U0IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__S0IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__U0IH=next__S0IH;
         };
       };
-      ptr__KVC=result__5SIH;
+      ptr__KVC=result__U0IH;
     };
     result__JVC=((__PROTOTYPE *)ptr__KVC);
     *(result__JVC) = *(PROTOTYPE__);
   };
-  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);
+  Self__QTS=((__PROTOTYPE *)result__JVC);
+  Self__QTS->filename__XRG=f__LBC;
+  Self__QTS->parent_named__5.name__LI=n__MBC;
+  Self__ASX=((__STRING_CONSTANT *)n__MBC);
+  Self__S0HH=((__CHARACTER *)Self__ASX->storage__FRO);
+  idx__Q0HH=(__INTEGER)(Self__ASX->count__DD -  1);
+  while ((! ((idx__Q0HH <  0) || ('.' == Self__S0HH[idx__Q0HH])))) {
+    idx__Q0HH=(__INTEGER)(idx__Q0HH -  1);
+  };
+  idx__XTS=(__INTEGER)( 1 + idx__Q0HH);
+  if ((idx__XTS !=  0)) {
+    copy__JDS(string_tmp__VH,n__MBC);
+    Self__0SHH=((__STRING *)string_tmp__VH);
+    if ((idx__XTS > Self__0SHH->count__EGC)) {
+      Self__0SHH->count__EGC= 0;
+    } else {
+      if ((idx__XTS >  0)) {
+        len__Z0IH=(__INTEGER)((__INTEGER)(idx__XTS -  1) +  1);
+        if ((len__Z0IH >  0)) {
+          __tmp__00IH=(__INTEGER)(idx__XTS +  1);
+          __tmp__20IH=Self__0SHH->count__EGC;
+          Self__30IH=__tmp__00IH;
+          while ((Self__30IH <= __tmp__20IH)) {
+            ((__CHARACTER *)Self__0SHH->storage__RCS)[(__INTEGER)((__INTEGER)(Self__30IH - len__Z0IH) -  1)]=((__CHARACTER *)Self__0SHH->storage__RCS)[(__INTEGER)(Self__30IH -  1)];
+            Self__30IH=(__INTEGER)(Self__30IH +  1);
+          };
+          Self__0SHH->count__EGC=(__INTEGER)(Self__0SHH->count__EGC - len__Z0IH);
+        };
+      };
+    };
+    Self__QTS->shortname__AJE=get__YWB(string_tmp__VH);
   } else {
-    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__;
+    Self__QTS->shortname__AJE=n__MBC;
+  };
+  result__NF3=NULL;
+  ptr__OF3=((__POINTER )(NULL));
+  typ_id__TF3= 0;
+  sz__QF3=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_TYPE_PARAMETERo));
+  if ((sz__QF3 ==  0)) {
+    result__NF3=FAST_ARRAYoITM_TYPE_PARAMETERo__;
   } else {
-    typ_id__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__;
+    typ_id__TF3=__FAST_ARRAYoITM_TYPE_PARAMETERo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__QF3);
+    if ((typ_id__TF3 == (__INTEGER)(-  1))) {
+      a__TTFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__UTFH=(__UINTEGER_32)((__UINTEGER_32)(sz__QF3 + a__TTFH) & (__UINTEGER_32)(~ a__TTFH));
+      ptr_table__B1IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__UTFH / ((__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__FTJ(new_size__UTFH);
+        next__A1IH=(void *)((unsigned long)result__C1IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UTFH)));
+        ((__POINTER *)next__A1IH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__B1IH)[ 0]=next__A1IH;
+      } else {
+        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__SXH)))) &  4095) + (__UINTEGER_32)(new_size__UTFH <<  1)) <=  4096)) {
+            next__A1IH=(void *)((unsigned long)result__C1IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UTFH)));
+          } else {
+            next__A1IH=new_lab__FTJ(new_size__UTFH);
+          };
+          ((__POINTER *)next__A1IH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__B1IH)[ 0]=next__A1IH;
+        } else {
+          ((__POINTER *)result__C1IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__A1IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__C1IH=next__A1IH;
+        };
+      };
+      ptr__OF3=result__C1IH;
+    } else {
+      t__YTFH=((__UINTEGER_32 )typ_id__TF3);
+      a__XTFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__J1IH=(__UINTEGER_32)((__UINTEGER_32)(sz__QF3 + a__XTFH) & (__UINTEGER_32)(~ a__XTFH));
+      ptr_table__G1IH=((__POINTER )(&(table_type[(t__YTFH)])));
+      lab_type__I1IH=(__UINTEGER_32)(t__YTFH |  1);
+      next__F1IH=((__POINTER )(NULL));
+      result__H1IH=((__POINTER *)ptr_table__G1IH)[ 0];
+      if ((result__H1IH == (void *)NULL)) {
+        result__H1IH=new_lab__FTJ(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__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__SXH)))) &  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__F1IH=new_lab__FTJ(lab_type__I1IH);
+          };
+          ((__POINTER *)next__F1IH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__G1IH)[ 0]=next__F1IH;
+        } else {
+          ((__POINTER *)result__H1IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__F1IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__H1IH=next__F1IH;
+        };
+      };
+      ptr__OF3=result__H1IH;
+    };
+    result__NF3=((__FAST_ARRAYoITM_TYPE_PARAMETERo *)ptr__OF3);
+    *(result__NF3) = *(FAST_ARRAYoITM_TYPE_PARAMETERo__);
+  };
+  Self__I5BC=((__FAST_ARRAYoITM_TYPE_PARAMETERo *)result__NF3);
+  if ((Self__I5BC->parent_arrayed_collection__ONE.capacity__CEBC <  0)) {
+    Self__I5BC->parent_arrayed_collection__ONE.storage__4EBC=create__M31C( 0);
+    Self__I5BC->parent_arrayed_collection__ONE.capacity__CEBC= 0;
+  };
+  Self__I5BC->parent_arrayed_collection__ONE.upper__AEBC=(__INTEGER)(-  1);
+  Self__QTS->idf_generic_list__PNE=result__NF3;
+  Self__QTS->index__YOG=(__INTEGER)(((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.upper__HJ +  1);
+  Self__YTX=((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ);
+  new_capacity__0TX= 0;
+  if (((__INTEGER)(Self__YTX->parent_arrayed_collection__AJ.upper__HJ +  1) <= (__INTEGER)(Self__YTX->parent_arrayed_collection__AJ.capacity__KFU -  1))) {
+    Self__YTX->parent_arrayed_collection__AJ.upper__HJ=(__INTEGER)(Self__YTX->parent_arrayed_collection__AJ.upper__HJ +  1);
+    __tmp__IUX=TRUE__;
   } else {
-    __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)));
+    __tmp__IUX=FALSE__;
+  };
+  if ((! __tmp__IUX)) {
+    if ((Self__YTX->parent_arrayed_collection__AJ.capacity__KFU ==  0)) {
+      Self__YTX->parent_arrayed_collection__AJ.storage__XVT=create__2GSB( 2);
+      Self__YTX->parent_arrayed_collection__AJ.capacity__KFU= 2;
+      Self__YTX->parent_arrayed_collection__AJ.upper__HJ= 0;
+    } else {
+      new_capacity__0TX=(__INTEGER)(Self__YTX->parent_arrayed_collection__AJ.capacity__KFU <<  1);
+      __tmp__3UX=Self__YTX->parent_arrayed_collection__AJ.storage__XVT;
+      __tmp__4UX=Self__YTX->parent_arrayed_collection__AJ.capacity__KFU;
+      new__GQEC=((void **)realloc_dynamic__old_size__new_size__ZHLC(((__POINTER )((void **)__tmp__3UX)),((__UINTEGER_32 )(__INTEGER)(__tmp__4UX * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__0TX * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__0QEC=(__INTEGER)(new_capacity__0TX -  1);
+      Self__4SVD=__tmp__4UX;
+      while ((Self__4SVD <= __tmp__0QEC)) {
+        new__GQEC[Self__4SVD]=NULL;
+        Self__4SVD=(__INTEGER)(Self__4SVD +  1);
+      };
+      Self__YTX->parent_arrayed_collection__AJ.storage__XVT=new__GQEC;
+      Self__YTX->parent_arrayed_collection__AJ.capacity__KFU=new_capacity__0TX;
+      Self__YTX->parent_arrayed_collection__AJ.upper__HJ=(__INTEGER)(Self__YTX->parent_arrayed_collection__AJ.upper__HJ +  1);
+    };
+  };
+  ((void **)Self__YTX->parent_arrayed_collection__AJ.storage__XVT)[Self__YTX->parent_arrayed_collection__AJ.upper__HJ]=Self__QTS;
+  Self__LPBC=((__HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *)prototype_dico__5TS);
+  Self__L1IH=((__STRING_CONSTANT *)f__LBC);
+  result__K1IH= 0;
+  __tmp__M1IH=Self__L1IH->count__DD;
+  Self__N1IH= 1;
+  while ((Self__N1IH <= __tmp__M1IH)) {
+    result__K1IH=(__INTEGER)((__INTEGER)( 5 * result__K1IH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__L1IH->storage__FRO)[(__INTEGER)(Self__N1IH -  1)])));
+    Self__N1IH=(__INTEGER)(Self__N1IH +  1);
+  };
+  if ((result__K1IH <  0)) {
+    result__K1IH=(__INTEGER)(~ result__K1IH);
+  };
+  idx__VPBC=(__INTEGER)(result__K1IH % Self__LPBC->capacity__ZPBC);
+  node__XPBC=((void **)Self__LPBC->buckets__4PBC)[idx__VPBC];
+  while ((! (((void *)node__XPBC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__XPBC)->key__KQBC == (void *)f__LBC)))) {
+    node__XPBC=((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__XPBC)->next__VQBC;
+  };
+  if (((void *)node__XPBC == (void *)NULL)) {
+    if ((Self__LPBC->capacity__ZPBC == Self__LPBC->count__4QBC)) {
+      idx__D3GD= 0;
+      node1__H3GD=NULL;
+      node2__I3GD=NULL;
+      old_buckets__G3GD=Self__LPBC->buckets__4PBC;
+      new_capacity__E3GD=prime_number_ceiling__541((__INTEGER)(Self__LPBC->capacity__ZPBC +  1));
+      Self__LPBC->buckets__4PBC=create__5LTC(new_capacity__E3GD);
+      i__F3GD=(__INTEGER)(Self__LPBC->capacity__ZPBC -  1);
+      Self__LPBC->capacity__ZPBC=new_capacity__E3GD;
+      while ((i__F3GD >=  0)) {
+        node1__H3GD=((void **)old_buckets__G3GD)[i__F3GD];
+        while (((void *)node1__H3GD != (void *)NULL)) {
+          node2__I3GD=((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node1__H3GD)->next__VQBC;
+          Self__GOW=((__STRING_CONSTANT *)((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node1__H3GD)->key__KQBC);
+          result__IOW= 0;
+          __tmp__JOW=Self__GOW->count__DD;
+          Self__5T1= 1;
+          while ((Self__5T1 <= __tmp__JOW)) {
+            result__IOW=(__INTEGER)((__INTEGER)( 5 * result__IOW) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__GOW->storage__FRO)[(__INTEGER)(Self__5T1 -  1)])));
+            Self__5T1=(__INTEGER)(Self__5T1 +  1);
+          };
+          if ((result__IOW <  0)) {
+            result__IOW=(__INTEGER)(~ result__IOW);
+          };
+          idx__D3GD=(__INTEGER)(result__IOW % Self__LPBC->capacity__ZPBC);
+          ((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node1__H3GD)->next__VQBC=((void **)Self__LPBC->buckets__4PBC)[idx__D3GD];
+          ((void **)Self__LPBC->buckets__4PBC)[idx__D3GD]=node1__H3GD;
+          node1__H3GD=node2__I3GD;
+        };
+        i__F3GD=(__INTEGER)(i__F3GD -  1);
+      };
+      idx__VPBC=(__INTEGER)(result__K1IH % new_capacity__E3GD);
+    };
+    __tmp__LRBC=((void **)Self__LPBC->buckets__4PBC)[idx__VPBC];
+    result__N5GD=NULL;
+    ptr__O5GD=((__POINTER )(NULL));
+    typ_id__T5GD= 0;
+    sz__Q5GD=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo));
+    if ((sz__Q5GD ==  0)) {
+      result__N5GD=HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__;
+    } else {
+      typ_id__T5GD=__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__Q5GD);
+      if ((typ_id__T5GD == (__INTEGER)(-  1))) {
+        a__KUFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__LUFH=(__UINTEGER_32)((__UINTEGER_32)(sz__Q5GD + a__KUFH) & (__UINTEGER_32)(~ a__KUFH));
+        ptr_table__Q1IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__LUFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__P1IH=((__POINTER )(NULL));
+        result__R1IH=((__POINTER *)ptr_table__Q1IH)[ 0];
+        if ((result__R1IH == (void *)NULL)) {
+          result__R1IH=new_lab__FTJ(new_size__LUFH);
+          next__P1IH=(void *)((unsigned long)result__R1IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LUFH)));
+          ((__POINTER *)next__P1IH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__Q1IH)[ 0]=next__P1IH;
+        } else {
+          next__P1IH=((__POINTER *)result__R1IH)[ 0];
+          if ((next__P1IH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__R1IH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__LUFH <<  1)) <=  4096)) {
+              next__P1IH=(void *)((unsigned long)result__R1IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LUFH)));
             } else {
-              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)));
+              next__P1IH=new_lab__FTJ(new_size__LUFH);
+            };
+            ((__POINTER *)next__P1IH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__Q1IH)[ 0]=next__P1IH;
+          } else {
+            ((__POINTER *)result__R1IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__P1IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__R1IH=next__P1IH;
+          };
+        };
+        ptr__O5GD=result__R1IH;
+      } else {
+        t__PUFH=((__UINTEGER_32 )typ_id__T5GD);
+        a__OUFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__Y1IH=(__UINTEGER_32)((__UINTEGER_32)(sz__Q5GD + a__OUFH) & (__UINTEGER_32)(~ a__OUFH));
+        ptr_table__V1IH=((__POINTER )(&(table_type[(t__PUFH)])));
+        lab_type__X1IH=(__UINTEGER_32)(t__PUFH |  1);
+        next__U1IH=((__POINTER )(NULL));
+        result__W1IH=((__POINTER *)ptr_table__V1IH)[ 0];
+        if ((result__W1IH == (void *)NULL)) {
+          result__W1IH=new_lab__FTJ(lab_type__X1IH);
+          next__U1IH=(void *)((unsigned long)result__W1IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Y1IH)));
+          ((__POINTER *)next__U1IH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__V1IH)[ 0]=next__U1IH;
+        } else {
+          next__U1IH=((__POINTER *)result__W1IH)[ 0];
+          if ((next__U1IH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__W1IH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__Y1IH <<  1)) <=  4096)) {
+              next__U1IH=(void *)((unsigned long)result__W1IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Y1IH)));
             } else {
-              next__4TIH=new_lab__ZPJ(lab_type__BUIH);
+              next__U1IH=new_lab__FTJ(lab_type__X1IH);
             };
-            ((__POINTER *)next__4TIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__5TIH)[ 0]=next__4TIH;
+            ((__POINTER *)next__U1IH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__V1IH)[ 0]=next__U1IH;
           } else {
-            ((__POINTER *)result__AUIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4TIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__AUIH=next__4TIH;
+            ((__POINTER *)result__W1IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__U1IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__W1IH=next__U1IH;
           };
         };
-        ptr__A2GD=result__AUIH;
+        ptr__O5GD=result__W1IH;
       };
-      result__51GD=((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)ptr__A2GD);
-      *(result__51GD) = *(HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__);
+      result__N5GD=((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)ptr__O5GD);
+      *(result__N5GD) = *(HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__);
     };
-    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);
+    Self__T5SD=((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)result__N5GD);
+    Self__T5SD->item__XBHD=Self__QTS;
+    Self__T5SD->key__KQBC=f__LBC;
+    Self__T5SD->next__VQBC=__tmp__LRBC;
+    node__XPBC=result__N5GD;
+    ((void **)Self__LPBC->buckets__4PBC)[idx__VPBC]=result__N5GD;
+    Self__LPBC->count__4QBC=(__INTEGER)(Self__LPBC->count__4QBC +  1);
   } else {
-    ((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__JMBC)->item__J4GD=Self__EQS;
+    ((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__XPBC)->item__XBHD=Self__QTS;
   };
-  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';
+  copy__JDS(string_tmp__SWX,f__LBC);
+  Self__CTHH=((__STRING *)string_tmp__SWX);
+  if ((Self__CTHH->capacity__ICS > Self__CTHH->count__EGC)) {
+    ((__CHARACTER *)Self__CTHH->storage__RCS)[Self__CTHH->count__EGC]='\0';
   } else {
-    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';
+    add_last__GOT(Self__CTHH,'\0');
+    Self__CTHH->count__EGC=(__INTEGER)(Self__CTHH->count__EGC -  1);
+  };
+  file__UTS=((__POINTER )(fopen((char*)(Self__CTHH->storage__RCS),"rb")));
+  fseek((FILE*)((file__UTS)),0,SEEK_END);
+  result__1WX=((__INTEGER )(ftell((FILE *)(file__UTS))));
+  fseek((FILE*)((file__UTS)),0,SEEK_SET);
+  Self__QTS->source__3BC=create__ZBB((__INTEGER)(result__1WX +  1));
+  __tmp__FVS=Self__QTS->source__3BC;
+  Self__FTHH=((__STRING *)__tmp__FVS);
+  if ((Self__FTHH->capacity__ICS > Self__FTHH->count__EGC)) {
+    ((__CHARACTER *)Self__FTHH->storage__RCS)[Self__FTHH->count__EGC]='\0';
   } else {
-    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__;
+    add_last__GOT(Self__FTHH,'\0');
+    Self__FTHH->count__EGC=(__INTEGER)(Self__FTHH->count__EGC -  1);
+  };
+  ptr__EXX=Self__FTHH->storage__RCS;
+  fread((void *)((ptr__EXX)),(size_t)(1), (size_t)((result__1WX)),(FILE*)((file__UTS)));
+  ((__CHARACTER *)ptr__EXX)[result__1WX]='\0';
+  Self__NZS=((__STRING *)__tmp__FVS);
+  Self__NZS->count__EGC= 0;
+  while ((((__CHARACTER *)ptr__EXX)[Self__NZS->count__EGC] != '\0')) {
+    Self__NZS->count__EGC=(__INTEGER)(Self__NZS->count__EGC +  1);
+  };
+  if (((void *)Self__NZS->storage__RCS != (void *)ptr__EXX)) {
+    Self__NZS->storage__RCS=ptr__EXX;
+    Self__NZS->capacity__ICS=(__INTEGER)(Self__NZS->count__EGC +  1);
+  };
+  fclose((FILE*)((file__UTS)));
+  result__SL3=NULL;
+  ptr__TL3=((__POINTER )(NULL));
+  typ_id__YL3= 0;
+  sz__VL3=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo));
+  if ((sz__VL3 ==  0)) {
+    result__SL3=HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo__;
   } else {
-    typ_id__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));
+    typ_id__YL3=__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__VL3);
+    if ((typ_id__YL3 == (__INTEGER)(-  1))) {
+      a__SUFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__TUFH=(__UINTEGER_32)((__UINTEGER_32)(sz__VL3 + a__SUFH) & (__UINTEGER_32)(~ a__SUFH));
+      ptr_table__01IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__TUFH / ((__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__FTJ(new_size__TUFH);
+        next__Z1IH=(void *)((unsigned long)result__11IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TUFH)));
+        ((__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__SXH)))) &  4095) + (__UINTEGER_32)(new_size__TUFH <<  1)) <=  4096)) {
+            next__Z1IH=(void *)((unsigned long)result__11IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TUFH)));
+          } else {
+            next__Z1IH=new_lab__FTJ(new_size__TUFH);
+          };
+          ((__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;
+        };
+      };
+      ptr__TL3=result__11IH;
+    } else {
+      t__XUFH=((__UINTEGER_32 )typ_id__YL3);
+      a__WUFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__C2IH=(__UINTEGER_32)((__UINTEGER_32)(sz__VL3 + a__WUFH) & (__UINTEGER_32)(~ a__WUFH));
+      ptr_table__51IH=((__POINTER )(&(table_type[(t__XUFH)])));
+      lab_type__B2IH=(__UINTEGER_32)(t__XUFH |  1);
+      next__41IH=((__POINTER )(NULL));
+      result__A2IH=((__POINTER *)ptr_table__51IH)[ 0];
+      if ((result__A2IH == (void *)NULL)) {
+        result__A2IH=new_lab__FTJ(lab_type__B2IH);
+        next__41IH=(void *)((unsigned long)result__A2IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__C2IH)));
+        ((__POINTER *)next__41IH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__51IH)[ 0]=next__41IH;
+      } else {
+        next__41IH=((__POINTER *)result__A2IH)[ 0];
+        if ((next__41IH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__A2IH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__C2IH <<  1)) <=  4096)) {
+            next__41IH=(void *)((unsigned long)result__A2IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__C2IH)));
+          } else {
+            next__41IH=new_lab__FTJ(lab_type__B2IH);
+          };
+          ((__POINTER *)next__41IH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__51IH)[ 0]=next__41IH;
+        } else {
+          ((__POINTER *)result__A2IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__41IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__A2IH=next__41IH;
+        };
+      };
+      ptr__TL3=result__A2IH;
+    };
+    result__SL3=((__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *)ptr__TL3);
+    *(result__SL3) = *(HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo__);
+  };
+  Self__4ACC=((__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *)result__SL3);
+  new_capacity__1PJC=prime_number_ceiling__541( 193);
+  Self__4ACC->buckets__2DGC=create__VUSC(new_capacity__1PJC);
+  Self__4ACC->capacity__FBCC=new_capacity__1PJC;
+  Self__4ACC->count__HSGC= 0;
+  Self__QTS->slot_list__MVS=result__SL3;
+  Self__QTS->parent_named__5.parent_itm_object__4.position__GFJ=((__POSITION )(__UINTEGER_32)(((__UINTEGER_32 )Self__QTS->index__YOG) |  131072));
   return(result__JVC);
 }
 
-static __BOOLEAN read_space__KSD()
+static __BOOLEAN read_space__MTD()
 // () With resultNo recursive, No inlinable.
 {
-  __INTEGER pos2__PSD,level_comment__QSD,stat__RSD,pos__OSD,posold__NSD;
-  __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;
-  pos__OSD=position__CCC;
-  posold__NSD=(__INTEGER)(-  1);
+  __INTEGER pos2__RTD,level_comment__STD,stat__TTD,pos__QTD,posold__PTD;
+  __INTEGER Self__WTDD,start__E2IH,end__D2IH,len__F2IH,__tmp__G2IH;
+  __INTEGER __tmp__I2IH,Self__J2IH,nb__L0D,p__M0D;
+  __STRING *Self__H2IH;
+  __POSITION pos__AZVG;
+  __CHARACTER result__FZDH,result__SZDH,result__1ZDH,result__E0DH;
+  __CHARACTER result__R0DH,result__40DH,result__H1DH,result__Q1DH;
+  __CHARACTER result__B2DH,result__O2DH,result__12DH,result__I3DH;
+  __CHARACTER result__DBF;
+  __BOOLEAN __tmp__3UD,__tmp__AYD,__tmp__54D;
+  pos2__RTD= 0;
+  level_comment__STD= 0;
+  stat__TTD= 0;
+  pos__QTD=position__CCC;
+  posold__PTD=(__INTEGER)(-  1);
   if (is_shorter2__VI) {
-    ((__STRING *)string_tmp3__0SD)->count__EGC= 0;
-    ((__STRING *)string_tmp4__2SD)->count__EGC= 0;
+    ((__STRING *)string_tmp3__2TD)->count__EGC= 0;
+    ((__STRING *)string_tmp4__4TD)->count__EGC= 0;
   };
-  while ((posold__NSD != position__CCC)) {
-    posold__NSD=position__CCC;
-    until_do__AMI:
+  while ((posold__PTD != position__CCC)) {
+    posold__PTD=position__CCC;
+    until_do__MPI:
     {
-      result__RSDH='\0';
+      result__FZDH='\0';
       if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__RSDH=((__CHARACTER )(( 0)));
+        result__FZDH=((__CHARACTER )(( 0)));
       } else {
-        result__RSDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+        result__FZDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__RSDH == ((__CHARACTER )(( 0))))) {
-        __tmp__1TD=TRUE__;
+      if ((result__FZDH == ((__CHARACTER )(( 0))))) {
+        __tmp__3UD=TRUE__;
       } else {
-        result__4SDH='\0';
+        result__SZDH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__4SDH=((__CHARACTER )(( 0)));
+          result__SZDH=((__CHARACTER )(( 0)));
         } else {
-          result__4SDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+          result__SZDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
         };
-        __tmp__1TD=(((__INTEGER_8 )result__4SDH) > ((__INTEGER_8 )' '));
+        __tmp__3UD=(((__INTEGER_8 )result__SZDH) > ((__INTEGER_8 )' '));
       };
-      if ((! __tmp__1TD)) {
+      if ((! __tmp__3UD)) {
         if ((is_shorter2__VI | is_shorter__LZ)) {
-          result__HTDH='\0';
+          result__1ZDH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__HTDH=((__CHARACTER )(( 0)));
+            result__1ZDH=((__CHARACTER )(( 0)));
           } else {
-            result__HTDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+            result__1ZDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__HTDH == '\n')) {
-            Self__IQDD=stat__RSD;
-            if ((stat__RSD ==  0)) {
-              stat__RSD= 1;
+          if ((result__1ZDH == '\n')) {
+            Self__WTDD=stat__TTD;
+            if ((stat__TTD ==  0)) {
+              stat__TTD= 1;
             };
-            if ((Self__IQDD ==  1)) {
-              stat__RSD= 2;
+            if ((Self__WTDD ==  1)) {
+              stat__TTD= 2;
             };
           };
         };
         position__CCC=(__INTEGER)(position__CCC +  1);
-        goto until_do__AMI;
+        goto until_do__MPI;
       };
     };
     if ((position__CCC < ((__STRING *)source__5BC)->count__EGC)) {
-      result__QTDH='\0';
+      result__E0DH='\0';
       if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__QTDH=((__CHARACTER )(( 0)));
+        result__E0DH=((__CHARACTER )(( 0)));
       } else {
-        result__QTDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+        result__E0DH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
       };
-      if (((result__QTDH == '/') && (((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)((__INTEGER)(position__CCC +  1) -  1)] == '/'))) {
+      if (((result__E0DH == '/') && (((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)((__INTEGER)(position__CCC +  1) -  1)] == '/'))) {
         position__CCC=(__INTEGER)(position__CCC +  2);
-        pos2__PSD=position__CCC;
-        until_do__KT2D:
+        pos2__RTD=position__CCC;
+        until_do__YW2D:
         {
-          result__3TDH='\0';
+          result__R0DH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__3TDH=((__CHARACTER )(( 0)));
+            result__R0DH=((__CHARACTER )(( 0)));
           } else {
-            result__3TDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+            result__R0DH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__3TDH == ((__CHARACTER )(( 0))))) {
-            __tmp__4WD=TRUE__;
+          if ((result__R0DH == ((__CHARACTER )(( 0))))) {
+            __tmp__AYD=TRUE__;
           } else {
-            result__KUDH='\0';
+            result__40DH='\0';
             if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-              result__KUDH=((__CHARACTER )(( 0)));
+              result__40DH=((__CHARACTER )(( 0)));
             } else {
-              result__KUDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+              result__40DH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
             };
-            __tmp__4WD=(result__KUDH == '\n');
+            __tmp__AYD=(result__40DH == '\n');
           };
-          if ((! __tmp__4WD)) {
+          if ((! __tmp__AYD)) {
             if (is_shorter2__VI) {
-              if (((stat__RSD ==  0) || (stat__RSD ==  1))) {
-                result__TUDH='\0';
+              if (((stat__TTD ==  0) || (stat__TTD ==  1))) {
+                result__H1DH='\0';
                 if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                  result__TUDH=((__CHARACTER )(( 0)));
+                  result__H1DH=((__CHARACTER )(( 0)));
                 } else {
-                  result__TUDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+                  result__H1DH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
                 };
-                add_last__3IT(string_tmp3__0SD,result__TUDH);
+                add_last__GOT(string_tmp3__2TD,result__H1DH);
               };
-              if ((stat__RSD ==  2)) {
-                result__2UDH='\0';
+              if ((stat__TTD ==  2)) {
+                result__Q1DH='\0';
                 if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                  result__2UDH=((__CHARACTER )(( 0)));
+                  result__Q1DH=((__CHARACTER )(( 0)));
                 } else {
-                  result__2UDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+                  result__Q1DH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
                 };
-                add_last__3IT(string_tmp4__2SD,result__2UDH);
+                add_last__GOT(string_tmp4__4TD,result__Q1DH);
               };
             };
             position__CCC=(__INTEGER)(position__CCC +  1);
-            goto until_do__KT2D;
+            goto until_do__YW2D;
           };
         };
         if (is_shorter2__VI) {
-          if (((stat__RSD ==  0) || (stat__RSD ==  1))) {
-            add_last__3IT(string_tmp3__0SD,'\n');
+          if (((stat__TTD ==  0) || (stat__TTD ==  1))) {
+            add_last__GOT(string_tmp3__2TD,'\n');
           };
-          if ((stat__RSD ==  2)) {
-            add_last__3IT(string_tmp4__2SD,'\n');
+          if ((stat__TTD ==  2)) {
+            add_last__GOT(string_tmp4__4TD,'\n');
           };
         };
         if (is_shorter__LZ) {
-          if (((stat__RSD ==  0) || (stat__RSD ==  1))) {
-            short__token__to__YBD((&__string_128),pos2__PSD,position__CCC);
+          Self__H2IH=((__STRING *)output_code__SI);
+          start__E2IH=(__INTEGER)((__INTEGER)(pos2__RTD -  2) + short_derive__PCC);
+          end__D2IH=(__INTEGER)((__INTEGER)(pos2__RTD -  1) + short_derive__PCC);
+          len__F2IH=(__INTEGER)((__INTEGER)(end__D2IH - start__E2IH) +  1);
+          if ((len__F2IH >  0)) {
+            __tmp__G2IH=(__INTEGER)(end__D2IH +  1);
+            __tmp__I2IH=Self__H2IH->count__EGC;
+            Self__J2IH=__tmp__G2IH;
+            while ((Self__J2IH <= __tmp__I2IH)) {
+              ((__CHARACTER *)Self__H2IH->storage__RCS)[(__INTEGER)((__INTEGER)(Self__J2IH - len__F2IH) -  1)]=((__CHARACTER *)Self__H2IH->storage__RCS)[(__INTEGER)(Self__J2IH -  1)];
+              Self__J2IH=(__INTEGER)(Self__J2IH +  1);
+            };
+            Self__H2IH->count__EGC=(__INTEGER)(Self__H2IH->count__EGC - len__F2IH);
+          };
+          short_derive__PCC=(__INTEGER)(short_derive__PCC -  2);
+          nb__L0D= 0;
+          p__M0D=(__INTEGER)(pos2__RTD -  3);
+          while (((p__M0D >=  1) && (((__INTEGER_8 )((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(p__M0D -  1)]) <= ((__INTEGER_8 )' ')))) {
+            if ((((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(p__M0D -  1)] == '\n')) {
+              nb__L0D=(__INTEGER)(nb__L0D +  1);
+            };
+            p__M0D=(__INTEGER)(p__M0D -  1);
           };
-          if ((stat__RSD ==  2)) {
-            short__token__to__YBD((&__string_127),pos2__PSD,position__CCC);
+          if ((nb__L0D >  1)) {
+            stat__TTD= 2;
+          };
+          if (((stat__TTD ==  0) || (stat__TTD ==  1))) {
+            short__token__to__YCD((&__string_128),pos2__RTD,position__CCC);
+          };
+          if ((stat__TTD ==  2)) {
+            short__token__to__YCD((&__string_127),pos2__RTD,position__CCC);
           };
         };
         position__CCC=(__INTEGER)(position__CCC +  1);
       };
     };
     if ((position__CCC < ((__STRING *)source__5BC)->count__EGC)) {
-      pos2__PSD=position__CCC;
-      result__FVDH='\0';
+      pos2__RTD=position__CCC;
+      result__B2DH='\0';
       if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__FVDH=((__CHARACTER )(( 0)));
+        result__B2DH=((__CHARACTER )(( 0)));
       } else {
-        result__FVDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+        result__B2DH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
       };
-      if (((result__FVDH == '/') && (((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)((__INTEGER)(position__CCC +  1) -  1)] == '*'))) {
+      if (((result__B2DH == '/') && (((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)((__INTEGER)(position__CCC +  1) -  1)] == '*'))) {
         position__CCC=(__INTEGER)(position__CCC +  2);
-        level_comment__QSD= 1;
-        until_do__MU2D:
+        level_comment__STD= 1;
+        until_do__0X2D:
         {
-          result__SVDH='\0';
+          result__O2DH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__SVDH=((__CHARACTER )(( 0)));
+            result__O2DH=((__CHARACTER )(( 0)));
           } else {
-            result__SVDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+            result__O2DH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((! ((result__SVDH == ((__CHARACTER )(( 0)))) || (level_comment__QSD ==  0)))) {
-            result__5VDH='\0';
+          if ((! ((result__O2DH == ((__CHARACTER )(( 0)))) || (level_comment__STD ==  0)))) {
+            result__12DH='\0';
             if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-              result__5VDH=((__CHARACTER )(( 0)));
+              result__12DH=((__CHARACTER )(( 0)));
             } else {
-              result__5VDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+              result__12DH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
             };
-            if (((result__5VDH == '/') && (((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)((__INTEGER)(position__CCC +  1) -  1)] == '*'))) {
-              level_comment__QSD=(__INTEGER)(level_comment__QSD +  1);
+            if (((result__12DH == '/') && (((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)((__INTEGER)(position__CCC +  1) -  1)] == '*'))) {
+              level_comment__STD=(__INTEGER)(level_comment__STD +  1);
               position__CCC=(__INTEGER)(position__CCC +  2);
-              __tmp__D2D=TRUE__;
+              __tmp__54D=TRUE__;
             } else {
-              __tmp__D2D=FALSE__;
+              __tmp__54D=FALSE__;
             };
-            if ((! __tmp__D2D)) {
-              result__MWDH='\0';
+            if ((! __tmp__54D)) {
+              result__I3DH='\0';
               if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                result__MWDH=((__CHARACTER )(( 0)));
+                result__I3DH=((__CHARACTER )(( 0)));
               } else {
-                result__MWDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+                result__I3DH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
               };
-              if (((result__MWDH == '*') && (((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)((__INTEGER)(position__CCC +  1) -  1)] == '/'))) {
-                level_comment__QSD=(__INTEGER)(level_comment__QSD -  1);
+              if (((result__I3DH == '*') && (((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)((__INTEGER)(position__CCC +  1) -  1)] == '/'))) {
+                level_comment__STD=(__INTEGER)(level_comment__STD -  1);
                 position__CCC=(__INTEGER)(position__CCC +  2);
               } else {
                 position__CCC=(__INTEGER)(position__CCC +  1);
               };
             };
-            goto until_do__MU2D;
+            goto until_do__0X2D;
           };
         };
-        if ((level_comment__QSD !=  0)) {
-          position__CCC=pos2__PSD;
-          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)) {
+        if ((level_comment__STD !=  0)) {
+          position__CCC=pos2__RTD;
+          pos__AZVG=current_position__EZF();
+          put_error__text__NPG( 0,(&__string_206));
+          put_position__XQG(pos__AZVG);
+          put_string__P3F(msg_err__SPG);
+          if ((type_error__RPG !=  2)) {
             exit(( 1));
           };
         };
-        short__token__to__YBD((&__string_70),pos2__PSD,position__CCC);
+        short__token__to__YCD((&__string_70),pos2__RTD,position__CCC);
       };
     };
   };
-  if ((is_shorter2__VI && (! skip_comment__A4D))) {
-    if ((((__STRING *)string_tmp3__0SD)->count__EGC ==  0)) {
-      last_comment_slot__S4D=NULL;
+  if ((is_shorter2__VI && (! skip_comment__2AE))) {
+    if ((((__STRING *)string_tmp3__2TD)->count__EGC ==  0)) {
+      last_comment_slot__OBE=NULL;
     } else {
-      last_comment_slot__S4D=get__YWB(string_tmp3__0SD);
+      last_comment_slot__OBE=get__YWB(string_tmp3__2TD);
     };
-    if ((((__STRING *)string_tmp4__2SD)->count__EGC !=  0)) {
-      last_comment_extern__JYC=get__YWB(string_tmp4__2SD);
+    if ((((__STRING *)string_tmp4__4TD)->count__EGC !=  0)) {
+      last_comment_extern__JZC=get__YWB(string_tmp4__4TD);
     };
   };
-  begin_position__I5D=position__CCC;
-  result__53E='\0';
+  begin_position__ECE=position__CCC;
+  result__DBF='\0';
   if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-    result__53E=((__CHARACTER )(( 0)));
+    result__DBF=((__CHARACTER )(( 0)));
   } else {
-    result__53E=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+    result__DBF=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
   };
-  return(((position__CCC != pos__OSD) | (result__53E != ((__CHARACTER )(( 0))))));
+  return(((position__CCC != pos__QTD) | (result__DBF != ((__CHARACTER )(( 0))))));
 }
 
-static __BOOLEAN read_identifier__E4K()
+static __BOOLEAN read_identifier__QBL()
 // () With resultNo recursive, No inlinable.
 {
-  __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__W4K=TRUE__;
+  __INTEGER posold__UBL,idx__VBL;
+  __POSITION pos__J11G;
+  __BOOLEAN result__TBL,__tmp__CCL,result__YUFH,__tmp__SDL,result__1UFH;
+  __BOOLEAN result__4UFH,__tmp__ODL,__tmp__PDL;
+  __CHARACTER result__BVDH,result__PVDH,result__2VDH,result__FWDH;
+  __CHARACTER result__OWDH,result__XWDH;
+  result__TBL=FALSE__;
+  posold__UBL= 0;
+  idx__VBL= 0;
+  if ((! read_space__MTD())) {
+    __tmp__CCL=TRUE__;
   } else {
-    result__NODH='\0';
+    result__BVDH='\0';
     if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-      result__NODH=((__CHARACTER )(( 0)));
+      result__BVDH=((__CHARACTER )(( 0)));
     } else {
-      result__NODH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+      result__BVDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
     };
-    result__COFH=FALSE__;
-    if ((((__INTEGER_8 )result__NODH) >= ((__INTEGER_8 )'a'))) {
-      result__COFH=(((__INTEGER_8 )result__NODH) <= ((__INTEGER_8 )'z'));
+    result__YUFH=FALSE__;
+    if ((((__INTEGER_8 )result__BVDH) >= ((__INTEGER_8 )'a'))) {
+      result__YUFH=(((__INTEGER_8 )result__BVDH) <= ((__INTEGER_8 )'z'));
     };
-    __tmp__W4K=(! result__COFH);
+    __tmp__CCL=(! result__YUFH);
   };
-  if (__tmp__W4K) {
-    result__H4K=FALSE__;
+  if (__tmp__CCL) {
+    result__TBL=FALSE__;
   } else {
-    posold__I4K=position__CCC;
+    posold__UBL=position__CCC;
     ((__STRING *)string_tmp__VH)->count__EGC= 0;
-    until_do__0VZE:
+    until_do__W0ZE:
     {
-      result__1ODH='\0';
+      result__PVDH='\0';
       if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__1ODH=((__CHARACTER )(( 0)));
+        result__PVDH=((__CHARACTER )(( 0)));
       } else {
-        result__1ODH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+        result__PVDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__1ODH == ((__CHARACTER )(( 0))))) {
-        __tmp__GAL=TRUE__;
+      if ((result__PVDH == ((__CHARACTER )(( 0))))) {
+        __tmp__SDL=TRUE__;
       } else {
-        result__IPDH='\0';
+        result__2VDH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__IPDH=((__CHARACTER )(( 0)));
+          result__2VDH=((__CHARACTER )(( 0)));
         } else {
-          result__IPDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+          result__2VDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
         };
-        result__FOFH=FALSE__;
-        if ((((__INTEGER_8 )result__IPDH) >= ((__INTEGER_8 )'a'))) {
-          result__FOFH=(((__INTEGER_8 )result__IPDH) <= ((__INTEGER_8 )'z'));
+        result__1UFH=FALSE__;
+        if ((((__INTEGER_8 )result__2VDH) >= ((__INTEGER_8 )'a'))) {
+          result__1UFH=(((__INTEGER_8 )result__2VDH) <= ((__INTEGER_8 )'z'));
         };
-        if ((! result__FOFH)) {
-          result__RPDH='\0';
+        if ((! result__1UFH)) {
+          result__FWDH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__RPDH=((__CHARACTER )(( 0)));
+            result__FWDH=((__CHARACTER )(( 0)));
           } else {
-            result__RPDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+            result__FWDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
           };
-          result__IOFH=FALSE__;
-          if ((((__INTEGER_8 )result__RPDH) >= ((__INTEGER_8 )'0'))) {
-            result__IOFH=(((__INTEGER_8 )result__RPDH) <= ((__INTEGER_8 )'9'));
+          result__4UFH=FALSE__;
+          if ((((__INTEGER_8 )result__FWDH) >= ((__INTEGER_8 )'0'))) {
+            result__4UFH=(((__INTEGER_8 )result__FWDH) <= ((__INTEGER_8 )'9'));
           };
-          __tmp__CAL=(! result__IOFH);
+          __tmp__ODL=(! result__4UFH);
         } else {
-          __tmp__CAL=FALSE__;
+          __tmp__ODL=FALSE__;
         };
-        if (__tmp__CAL) {
-          result__0PDH='\0';
+        if (__tmp__ODL) {
+          result__OWDH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__0PDH=((__CHARACTER )(( 0)));
+            result__OWDH=((__CHARACTER )(( 0)));
           } else {
-            result__0PDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+            result__OWDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
           };
-          __tmp__DAL=(result__0PDH != '_');
+          __tmp__PDL=(result__OWDH != '_');
         } else {
-          __tmp__DAL=FALSE__;
+          __tmp__PDL=FALSE__;
         };
-        __tmp__GAL=__tmp__DAL;
+        __tmp__SDL=__tmp__PDL;
       };
-      if ((! __tmp__GAL)) {
-        result__DQDH='\0';
+      if ((! __tmp__SDL)) {
+        result__XWDH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__DQDH=((__CHARACTER )(( 0)));
+          result__XWDH=((__CHARACTER )(( 0)));
         } else {
-          result__DQDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+          result__XWDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
         };
-        add_last__3IT(string_tmp__VH,result__DQDH);
+        add_last__GOT(string_tmp__VH,result__XWDH);
         position__CCC=(__INTEGER)(position__CCC +  1);
-        goto until_do__0VZE;
+        goto until_do__W0ZE;
       };
     };
     if ((((__STRING *)string_tmp__VH)->count__EGC !=  0)) {
-      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)) {
+      idx__VBL=first_substring_index__3ZZE(string_tmp__VH);
+      if ((idx__VBL !=  0)) {
+        position__CCC=(__INTEGER)(posold__UBL + idx__VBL);
+        pos__J11G=current_position__EZF();
+        put_error__text__NPG( 0,(&__string_207));
+        put_position__XQG(pos__J11G);
+        put_string__P3F(msg_err__SPG);
+        if ((type_error__RPG !=  2)) {
           exit(( 1));
         };
       };
-      last_string__V0C=get__YWB(string_tmp__VH);
-      result__H4K=TRUE__;
+      last_string__V1C=get__YWB(string_tmp__VH);
+      result__TBL=TRUE__;
     };
   };
-  return(result__H4K);
+  return(result__TBL);
 }
 
-static __POSITION current_position__AWF()
+static __POSITION current_position__EZF()
 // () With resultNo recursive, No inlinable.
 {
-  __POSITION result__DWF;
-  result__DWF=((__POSITION ) 0);
+  __POSITION result__HZF;
+  result__HZF=((__POSITION ) 0);
   while ((pos_cur__FCC != position__CCC)) {
-    if ((((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(pos_cur__FCC -  1)] == '\n')) {
+    if ((((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(pos_cur__FCC -  1)] == '\n')) {
       pos_col__HCC= 0;
       pos_line__GCC=(__INTEGER)(pos_line__GCC +  1);
     } else {
@@ -12659,383 +12687,383 @@ static __POSITION current_position__AWF()
     pos_cur__FCC=(__INTEGER)(pos_cur__FCC +  1);
   };
   if ((pos_line__GCC >  32767)) {
-    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)) {
+    result__HZF=((__POSITION )(__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((__PROTOTYPE *)object__ZBC)->index__YOG) | ((__UINTEGER_32 )(__INTEGER)(pos_col__HCC <<  9))) |  4294836224LU));
+    put_error__text__NPG( 0,(&__string_208));
+    put_position__XQG(result__HZF);
+    put_string__P3F(msg_err__SPG);
+    if ((type_error__RPG !=  2)) {
       exit(( 1));
     };
   };
   if ((pos_col__HCC >  255)) {
-    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)) {
+    result__HZF=((__POSITION )(__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((__PROTOTYPE *)object__ZBC)->index__YOG) |  130560) | ((__UINTEGER_32 )(__INTEGER)(pos_line__GCC <<  17))));
+    put_error__text__NPG( 0,(&__string_209));
+    put_position__XQG(result__HZF);
+    put_string__P3F(msg_err__SPG);
+    if ((type_error__RPG !=  2)) {
       exit(( 1));
     };
   };
-  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)))));
+  return(((__POSITION )(__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((__PROTOTYPE *)object__ZBC)->index__YOG) | ((__UINTEGER_32 )(__INTEGER)(pos_col__HCC <<  9))) | ((__UINTEGER_32 )(__INTEGER)(pos_line__GCC <<  17)))));
 }
 
-static void put_error__text__BMG(__INTEGER type__DMG,void *txt__EMG)
+static void put_error__text__NPG(__INTEGER type__PPG,void *txt__QPG)
 // ({INTEGER},{NULLxSTRING_CONSTANTxSTRING}) VoidNo recursive, No inlinable.
 {
-  type_error__FMG=type__DMG;
-  ((__STRING *)msg_err__GMG)->count__EGC= 0;
-  if ((type__DMG ==  0)) {
-    append__FLS(msg_err__GMG,(&__string_210));
+  type_error__RPG=type__PPG;
+  ((__STRING *)msg_err__SPG)->count__EGC= 0;
+  if ((type__PPG ==  0)) {
+    append__ROS(msg_err__SPG,(&__string_210));
   };
-  if ((type__DMG ==  1)) {
-    append__FLS(msg_err__GMG,(&__string_211));
+  if ((type__PPG ==  1)) {
+    append__ROS(msg_err__SPG,(&__string_211));
   };
-  if ((type__DMG ==  2)) {
-    append__FLS(msg_err__GMG,(&__string_212));
+  if ((type__PPG ==  2)) {
+    append__ROS(msg_err__SPG,(&__string_212));
   };
-  if ((type__DMG ==  3)) {
-    append__FLS(msg_err__GMG,(&__string_213));
+  if ((type__PPG ==  3)) {
+    append__ROS(msg_err__SPG,(&__string_213));
   };
-  append__FLS(msg_err__GMG,txt__EMG);
+  append__ROS(msg_err__SPG,txt__QPG);
 }
 
-static void put_position__LNG(__POSITION Self__MNG)
+static void put_position__XQG(__POSITION Self__YQG)
 // ({POSITION}) VoidNo recursive, No inlinable.
 {
-  __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);
+  __UINTEGER_32 c__0QG,__tmp__CSG,cols__3QG;
+  void *src__ARG;
+  __INTEGER pos__ZQG,Self__PNH,limit_up__QNH;
+  __CHARACTER char__BRG;
+  c__0QG= 0;
+  char__BRG='\0';
+  append__ROS(msg_err__SPG,(&__string_214));
+  append_in__RKH((__UINTEGER_32)(((__UINTEGER_32 )Self__YQG) >>  17),msg_err__SPG);
+  append__ROS(msg_err__SPG,(&__string_215));
+  append_in__RKH((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )Self__YQG) >>  9) &  255),msg_err__SPG);
+  append__ROS(msg_err__SPG,(&__string_216));
+  append__ROS(msg_err__SPG,((__PROTOTYPE *)((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__XVT)[(__INTEGER)(((__INTEGER )((__UINTEGER_32 )Self__YQG)) &  511)])->parent_named__5.name__LI);
+  add_last__GOT(msg_err__SPG,'(');
+  append__ROS(msg_err__SPG,((__PROTOTYPE *)((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__XVT)[(__INTEGER)(((__INTEGER )((__UINTEGER_32 )Self__YQG)) &  511)])->filename__XRG);
+  append__ROS(msg_err__SPG,(&__string_217));
+  src__ARG=((__PROTOTYPE *)((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__XVT)[(__INTEGER)(((__INTEGER )((__UINTEGER_32 )Self__YQG)) &  511)])->source__3BC;
+  pos__ZQG= 1;
+  __tmp__CSG=(__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )Self__YQG) >>  17) -  1);
+  Self__PNH= 1;
+  limit_up__QNH=((__INTEGER )__tmp__CSG);
+  while ((Self__PNH <= limit_up__QNH)) {
+    while ((((__CHARACTER *)((__STRING *)src__ARG)->storage__RCS)[(__INTEGER)(pos__ZQG -  1)] != '\n')) {
+      pos__ZQG=(__INTEGER)(pos__ZQG +  1);
+    };
+    pos__ZQG=(__INTEGER)(pos__ZQG +  1);
+    Self__PNH=(__INTEGER)(Self__PNH +  1);
   };
   ((__STRING *)string_tmp__VH)->count__EGC= 0;
-  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');
+  cols__3QG=(__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )Self__YQG) >>  9) &  255);
+  while ((! ((pos__ZQG > ((__STRING *)src__ARG)->count__EGC) || (((__CHARACTER *)((__STRING *)src__ARG)->storage__RCS)[(__INTEGER)(pos__ZQG -  1)] == '\n')))) {
+    char__BRG=((__CHARACTER *)((__STRING *)src__ARG)->storage__RCS)[(__INTEGER)(pos__ZQG -  1)];
+    add_last__GOT(msg_err__SPG,char__BRG);
+    if ((c__0QG < cols__3QG)) {
+      if ((char__BRG == '\t')) {
+        add_last__GOT(string_tmp__VH,'\t');
       } else {
-        add_last__3IT(string_tmp__VH,' ');
+        add_last__GOT(string_tmp__VH,' ');
       };
     };
-    c__ONG=(__UINTEGER_32)(c__ONG +  1);
-    pos__NNG=(__INTEGER)(pos__NNG +  1);
+    c__0QG=(__UINTEGER_32)(c__0QG +  1);
+    pos__ZQG=(__INTEGER)(pos__ZQG +  1);
   };
-  add_last__3IT(msg_err__GMG,'\n');
-  append__FLS(msg_err__GMG,string_tmp__VH);
-  append__FLS(msg_err__GMG,(&__string_218));
+  add_last__GOT(msg_err__SPG,'\n');
+  append__ROS(msg_err__SPG,string_tmp__VH);
+  append__ROS(msg_err__SPG,(&__string_218));
 }
 
-static __BOOLEAN read_symbol__GVJ(void *st__IVJ)
+static __BOOLEAN read_symbol__SYJ(void *st__UYJ)
 // ({STRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __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__MVJ=FALSE__;
+  __INTEGER posold__WYJ,j__XYJ;
+  __BOOLEAN result__YYJ,__tmp__A0J,__tmp__3ZJ;
+  __CHARACTER result__3XDH,result__KYDH;
+  posold__WYJ= 0;
+  j__XYJ= 0;
+  result__YYJ=FALSE__;
+  if ((! read_space__MTD())) {
+    result__YYJ=FALSE__;
   } else {
-    posold__KVJ=position__CCC;
-    j__LVJ= 1;
-    until_do__054:
+    posold__WYJ=position__CCC;
+    j__XYJ= 1;
+    until_do__IF5:
     {
-      result__JRDH='\0';
+      result__3XDH='\0';
       if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__JRDH=((__CHARACTER )(( 0)));
+        result__3XDH=((__CHARACTER )(( 0)));
       } else {
-        result__JRDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+        result__3XDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__JRDH == ((__CHARACTER )(( 0))))) {
-        __tmp__UWJ=TRUE__;
+      if ((result__3XDH == ((__CHARACTER )(( 0))))) {
+        __tmp__A0J=TRUE__;
       } else {
-        if ((j__LVJ > ((__STRING_CONSTANT *)st__IVJ)->count__DD)) {
-          __tmp__RWJ=TRUE__;
+        if ((j__XYJ > ((__STRING_CONSTANT *)st__UYJ)->count__DD)) {
+          __tmp__3ZJ=TRUE__;
         } else {
-          result__WRDH='\0';
+          result__KYDH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__WRDH=((__CHARACTER )(( 0)));
+            result__KYDH=((__CHARACTER )(( 0)));
           } else {
-            result__WRDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+            result__KYDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
           };
-          __tmp__RWJ=(result__WRDH != ((__CHARACTER *)((__STRING_CONSTANT *)st__IVJ)->storage__ZNO)[(__INTEGER)(j__LVJ -  1)]);
+          __tmp__3ZJ=(result__KYDH != ((__CHARACTER *)((__STRING_CONSTANT *)st__UYJ)->storage__FRO)[(__INTEGER)(j__XYJ -  1)]);
         };
-        __tmp__UWJ=__tmp__RWJ;
+        __tmp__A0J=__tmp__3ZJ;
       };
-      if ((! __tmp__UWJ)) {
-        j__LVJ=(__INTEGER)(j__LVJ +  1);
+      if ((! __tmp__A0J)) {
+        j__XYJ=(__INTEGER)(j__XYJ +  1);
         position__CCC=(__INTEGER)(position__CCC +  1);
-        goto until_do__054;
+        goto until_do__IF5;
       };
     };
-    if ((j__LVJ > ((__STRING_CONSTANT *)st__IVJ)->count__DD)) {
-      result__MVJ=TRUE__;
-      last_string__V0C=st__IVJ;
+    if ((j__XYJ > ((__STRING_CONSTANT *)st__UYJ)->count__DD)) {
+      result__YYJ=TRUE__;
+      last_string__V1C=st__UYJ;
     } else {
-      position__CCC=posold__KVJ;
-      result__MVJ=FALSE__;
+      position__CCC=posold__WYJ;
+      result__YYJ=FALSE__;
     };
   };
-  return(result__MVJ);
+  return(result__YYJ);
 }
 
-static __BOOLEAN read_short_elt__JIKB()
+static __BOOLEAN read_short_elt__VLKB()
 // () With resultNo recursive, No inlinable.
 {
-  __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__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)) {
+  __INTEGER j__ZLKB;
+  __POSITION pos__3KG;
+  __BOOLEAN result__YLKB,__tmp__MMKB;
+  __CHARACTER __tmp__RNKB;
+  result__YLKB=FALSE__;
+  j__ZLKB= 0;
+  if (read_identifier__QBL()) {
+    if (((void *)last_string__V1C != (void *)(&__string_115))) {
+      pos__3KG=current_position__EZF();
+      put_error__text__NPG( 2,(&__string_219));
+      put_position__XQG(pos__3KG);
+      put_string__P3F(msg_err__SPG);
+      if ((type_error__RPG !=  2)) {
         exit(( 1));
       };
     };
-    last_string__V0C=NULL;
-    result__MIKB=TRUE__;
-    __tmp__AJKB=TRUE__;
+    last_string__V1C=NULL;
+    result__YLKB=TRUE__;
+    __tmp__MMKB=TRUE__;
   } else {
-    __tmp__AJKB=FALSE__;
+    __tmp__MMKB=FALSE__;
   };
-  if ((! __tmp__AJKB)) {
-    if (read_string__PCQ()) {
+  if ((! __tmp__MMKB)) {
+    if (read_string__1FQ()) {
       ((__STRING *)string_tmp__VH)->count__EGC= 0;
-      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');
+      j__ZLKB= 1;
+      while ((j__ZLKB <= ((__STRING_CONSTANT *)last_string__V1C)->count__DD)) {
+        if ((((__CHARACTER *)((__STRING_CONSTANT *)last_string__V1C)->storage__FRO)[(__INTEGER)(j__ZLKB -  1)] == '\\')) {
+          j__ZLKB=(__INTEGER)(j__ZLKB +  1);
+          __tmp__RNKB=((__CHARACTER *)((__STRING_CONSTANT *)last_string__V1C)->storage__FRO)[(__INTEGER)(j__ZLKB -  1)];
+          if ((__tmp__RNKB == 'a')) {
+            add_last__GOT(string_tmp__VH,'\a');
           };
-          if ((__tmp__FKKB == 'b')) {
-            add_last__3IT(string_tmp__VH,'\b');
+          if ((__tmp__RNKB == 'b')) {
+            add_last__GOT(string_tmp__VH,'\b');
           };
-          if ((__tmp__FKKB == 'f')) {
-            add_last__3IT(string_tmp__VH,'\f');
+          if ((__tmp__RNKB == 'f')) {
+            add_last__GOT(string_tmp__VH,'\f');
           };
-          if ((__tmp__FKKB == 'n')) {
-            add_last__3IT(string_tmp__VH,'\n');
+          if ((__tmp__RNKB == 'n')) {
+            add_last__GOT(string_tmp__VH,'\n');
           };
-          if ((__tmp__FKKB == 'r')) {
-            add_last__3IT(string_tmp__VH,'\r');
+          if ((__tmp__RNKB == 'r')) {
+            add_last__GOT(string_tmp__VH,'\r');
           };
-          if ((__tmp__FKKB == 't')) {
-            add_last__3IT(string_tmp__VH,'\t');
+          if ((__tmp__RNKB == 't')) {
+            add_last__GOT(string_tmp__VH,'\t');
           };
-          if ((__tmp__FKKB == 'v')) {
-            add_last__3IT(string_tmp__VH,'\v');
+          if ((__tmp__RNKB == 'v')) {
+            add_last__GOT(string_tmp__VH,'\v');
           };
-          if ((__tmp__FKKB == '\\')) {
-            add_last__3IT(string_tmp__VH,'\\');
+          if ((__tmp__RNKB == '\\')) {
+            add_last__GOT(string_tmp__VH,'\\');
           };
-          if ((__tmp__FKKB == '?')) {
-            add_last__3IT(string_tmp__VH,'\?');
+          if ((__tmp__RNKB == '?')) {
+            add_last__GOT(string_tmp__VH,'\?');
           };
-          if ((__tmp__FKKB == '\'')) {
-            add_last__3IT(string_tmp__VH,'\'');
+          if ((__tmp__RNKB == '\'')) {
+            add_last__GOT(string_tmp__VH,'\'');
           };
-          if ((__tmp__FKKB == '\"')) {
-            add_last__3IT(string_tmp__VH,'\"');
+          if ((__tmp__RNKB == '\"')) {
+            add_last__GOT(string_tmp__VH,'\"');
           };
         } else {
-          add_last__3IT(string_tmp__VH,((__CHARACTER *)((__STRING_CONSTANT *)last_string__V0C)->storage__ZNO)[(__INTEGER)(j__NIKB -  1)]);
+          add_last__GOT(string_tmp__VH,((__CHARACTER *)((__STRING_CONSTANT *)last_string__V1C)->storage__FRO)[(__INTEGER)(j__ZLKB -  1)]);
         };
-        j__NIKB=(__INTEGER)(j__NIKB +  1);
+        j__ZLKB=(__INTEGER)(j__ZLKB +  1);
       };
-      last_string__V0C=get__YWB(string_tmp__VH);
-      result__MIKB=TRUE__;
+      last_string__V1C=get__YWB(string_tmp__VH);
+      result__YLKB=TRUE__;
     };
   };
-  return(result__MIKB);
+  return(result__YLKB);
 }
 
-static void fast_put__to__2YR(__HASHED_DICTIONARYoTYPExSTRING_CONSTANTo *Self__3YR,void *k__5YR)
+static void fast_put__to__I2R(__HASHED_DICTIONARYoTYPExSTRING_CONSTANTo *Self__J2R,void *k__L2R)
 // ({HASHED_DICTIONARYoTYPExSTRING_CONSTANTo},{STRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __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)));
+  __INTEGER result__U0HH,__tmp__W0HH,Self__X0HH,idx__T2R,idx__VUNB;
+  __INTEGER new_capacity__WUNB,i__XUNB,result__Z0HH,__tmp__10HH;
+  __INTEGER Self__20HH,typ_id__GXNB;
+  __STRING_CONSTANT *Self__00HH;
+  __POINTER ptr__BXNB,ptr_table__N2IH,next__M2IH,result__O2IH;
+  __POINTER ptr_table__S2IH,next__R2IH,result__T2IH;
+  __UINTEGER_32 sz__DXNB,a__QWFH,new_size__RWFH,t__VWFH,a__UWFH;
+  __UINTEGER_32 new_size__V2IH,lab_type__U2IH;
+  void *node__W2R,*node1__ZUNB,*node2__0UNB,*__tmp__K4R;
+  void **old_buckets__YUNB;
+  __HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *result__AXNB;
+  __HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *Self__QWDC;
+  result__U0HH= 0;
+  __tmp__W0HH=((__STRING_CONSTANT *)k__L2R)->count__DD;
+  Self__X0HH= 1;
+  while ((Self__X0HH <= __tmp__W0HH)) {
+    result__U0HH=(__INTEGER)((__INTEGER)( 5 * result__U0HH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)k__L2R)->storage__FRO)[(__INTEGER)(Self__X0HH -  1)])));
+    Self__X0HH=(__INTEGER)(Self__X0HH +  1);
+  };
+  if ((result__U0HH <  0)) {
+    result__U0HH=(__INTEGER)(~ result__U0HH);
+  };
+  idx__T2R=(__INTEGER)(result__U0HH % Self__J2R->capacity__Y2R);
+  node__W2R=((void **)Self__J2R->buckets__32R)[idx__T2R];
+  while ((! (((void *)node__W2R == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)node__W2R)->key__J3R == (void *)k__L2R)))) {
+    node__W2R=((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)node__W2R)->next__U3R;
+  };
+  if (((void *)node__W2R == (void *)NULL)) {
+    if ((Self__J2R->capacity__Y2R == Self__J2R->count__33R)) {
+      idx__VUNB= 0;
+      node1__ZUNB=NULL;
+      node2__0UNB=NULL;
+      old_buckets__YUNB=Self__J2R->buckets__32R;
+      new_capacity__WUNB=prime_number_ceiling__541((__INTEGER)(Self__J2R->capacity__Y2R +  1));
+      Self__J2R->buckets__32R=create__UZ2(new_capacity__WUNB);
+      i__XUNB=(__INTEGER)(Self__J2R->capacity__Y2R -  1);
+      Self__J2R->capacity__Y2R=new_capacity__WUNB;
+      while ((i__XUNB >=  0)) {
+        node1__ZUNB=((void **)old_buckets__YUNB)[i__XUNB];
+        while (((void *)node1__ZUNB != (void *)NULL)) {
+          node2__0UNB=((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)node1__ZUNB)->next__U3R;
+          Self__00HH=((__STRING_CONSTANT *)((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)node1__ZUNB)->key__J3R);
+          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__FRO)[(__INTEGER)(Self__20HH -  1)])));
+            Self__20HH=(__INTEGER)(Self__20HH +  1);
+          };
+          if ((result__Z0HH <  0)) {
+            result__Z0HH=(__INTEGER)(~ result__Z0HH);
+          };
+          idx__VUNB=(__INTEGER)(result__Z0HH % Self__J2R->capacity__Y2R);
+          ((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)node1__ZUNB)->next__U3R=((void **)Self__J2R->buckets__32R)[idx__VUNB];
+          ((void **)Self__J2R->buckets__32R)[idx__VUNB]=node1__ZUNB;
+          node1__ZUNB=node2__0UNB;
+        };
+        i__XUNB=(__INTEGER)(i__XUNB -  1);
+      };
+      idx__T2R=(__INTEGER)(result__U0HH % new_capacity__WUNB);
+    };
+    __tmp__K4R=((void **)Self__J2R->buckets__32R)[idx__T2R];
+    result__AXNB=NULL;
+    ptr__BXNB=((__POINTER )(NULL));
+    typ_id__GXNB= 0;
+    sz__DXNB=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo));
+    if ((sz__DXNB ==  0)) {
+      result__AXNB=HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo__;
+    } else {
+      typ_id__GXNB=__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo__;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__DXNB);
+      if ((typ_id__GXNB == (__INTEGER)(-  1))) {
+        a__QWFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__RWFH=(__UINTEGER_32)((__UINTEGER_32)(sz__DXNB + a__QWFH) & (__UINTEGER_32)(~ a__QWFH));
+        ptr_table__N2IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__RWFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__M2IH=((__POINTER )(NULL));
+        result__O2IH=((__POINTER *)ptr_table__N2IH)[ 0];
+        if ((result__O2IH == (void *)NULL)) {
+          result__O2IH=new_lab__FTJ(new_size__RWFH);
+          next__M2IH=(void *)((unsigned long)result__O2IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RWFH)));
+          ((__POINTER *)next__M2IH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__N2IH)[ 0]=next__M2IH;
+        } else {
+          next__M2IH=((__POINTER *)result__O2IH)[ 0];
+          if ((next__M2IH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__O2IH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__RWFH <<  1)) <=  4096)) {
+              next__M2IH=(void *)((unsigned long)result__O2IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RWFH)));
             } else {
-              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)));
+              next__M2IH=new_lab__FTJ(new_size__RWFH);
+            };
+            ((__POINTER *)next__M2IH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__N2IH)[ 0]=next__M2IH;
+          } else {
+            ((__POINTER *)result__O2IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__M2IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__O2IH=next__M2IH;
+          };
+        };
+        ptr__BXNB=result__O2IH;
+      } else {
+        t__VWFH=((__UINTEGER_32 )typ_id__GXNB);
+        a__UWFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__V2IH=(__UINTEGER_32)((__UINTEGER_32)(sz__DXNB + a__UWFH) & (__UINTEGER_32)(~ a__UWFH));
+        ptr_table__S2IH=((__POINTER )(&(table_type[(t__VWFH)])));
+        lab_type__U2IH=(__UINTEGER_32)(t__VWFH |  1);
+        next__R2IH=((__POINTER )(NULL));
+        result__T2IH=((__POINTER *)ptr_table__S2IH)[ 0];
+        if ((result__T2IH == (void *)NULL)) {
+          result__T2IH=new_lab__FTJ(lab_type__U2IH);
+          next__R2IH=(void *)((unsigned long)result__T2IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__V2IH)));
+          ((__POINTER *)next__R2IH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__S2IH)[ 0]=next__R2IH;
+        } else {
+          next__R2IH=((__POINTER *)result__T2IH)[ 0];
+          if ((next__R2IH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__T2IH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__V2IH <<  1)) <=  4096)) {
+              next__R2IH=(void *)((unsigned long)result__T2IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__V2IH)));
             } else {
-              next__SUIH=new_lab__ZPJ(lab_type__VUIH);
+              next__R2IH=new_lab__FTJ(lab_type__U2IH);
             };
-            ((__POINTER *)next__SUIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__TUIH)[ 0]=next__SUIH;
+            ((__POINTER *)next__R2IH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__S2IH)[ 0]=next__R2IH;
           } else {
-            ((__POINTER *)result__UUIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__SUIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__UUIH=next__SUIH;
+            ((__POINTER *)result__T2IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__R2IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__T2IH=next__R2IH;
           };
         };
-        ptr__VTNB=result__UUIH;
+        ptr__BXNB=result__T2IH;
       };
-      result__UTNB=((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)ptr__VTNB);
-      *(result__UTNB) = *(HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo__);
+      result__AXNB=((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)ptr__BXNB);
+      *(result__AXNB) = *(HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo__);
     };
-    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);
+    Self__QWDC=((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)result__AXNB);
+    Self__QWDC->key__J3R=k__L2R;
+    Self__QWDC->next__U3R=__tmp__K4R;
+    node__W2R=result__AXNB;
+    ((void **)Self__J2R->buckets__32R)[idx__T2R]=result__AXNB;
+    Self__J2R->count__33R=(__INTEGER)(Self__J2R->count__33R +  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__YCS;
-  __POINTER ptr__M1B,ptr_table__YUIH,next__XUIH,result__ZUIH;
-  __POINTER ptr_table__3UIH,next__2UIH,result__4UIH;
+  __TYPE_FULL *result__L1B,*Self__EGS;
+  __POINTER ptr__M1B,ptr_table__X2IH,next__W2IH,result__Y2IH;
+  __POINTER ptr_table__22IH,next__12IH,result__32IH;
   __INTEGER typ_id__R1B;
-  __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;
+  __UINTEGER_32 sz__O1B,a__YWFH,new_size__ZWFH,t__3WFH,a__2WFH;
+  __UINTEGER_32 new_size__52IH,lab_type__42IH;
+  void *__tmp__QGS,*__tmp__YGS;
+  __BOOLEAN __tmp__EHS,__tmp__FHS;
   result__L1B=NULL;
   ptr__M1B=((__POINTER )(NULL));
   typ_id__R1B= 0;
@@ -13046,1075 +13074,1075 @@ 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__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;
+      a__YWFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__ZWFH=(__UINTEGER_32)((__UINTEGER_32)(sz__O1B + a__YWFH) & (__UINTEGER_32)(~ a__YWFH));
+      ptr_table__X2IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ZWFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__W2IH=((__POINTER )(NULL));
+      result__Y2IH=((__POINTER *)ptr_table__X2IH)[ 0];
+      if ((result__Y2IH == (void *)NULL)) {
+        result__Y2IH=new_lab__FTJ(new_size__ZWFH);
+        next__W2IH=(void *)((unsigned long)result__Y2IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZWFH)));
+        ((__POINTER *)next__W2IH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__X2IH)[ 0]=next__W2IH;
       } else {
-        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)));
+        next__W2IH=((__POINTER *)result__Y2IH)[ 0];
+        if ((next__W2IH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__Y2IH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__ZWFH <<  1)) <=  4096)) {
+            next__W2IH=(void *)((unsigned long)result__Y2IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZWFH)));
           } else {
-            next__XUIH=new_lab__ZPJ(new_size__DQFH);
+            next__W2IH=new_lab__FTJ(new_size__ZWFH);
           };
-          ((__POINTER *)next__XUIH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__YUIH)[ 0]=next__XUIH;
+          ((__POINTER *)next__W2IH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__X2IH)[ 0]=next__W2IH;
         } else {
-          ((__POINTER *)result__ZUIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XUIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__ZUIH=next__XUIH;
+          ((__POINTER *)result__Y2IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__W2IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__Y2IH=next__W2IH;
         };
       };
-      ptr__M1B=result__ZUIH;
+      ptr__M1B=result__Y2IH;
     } else {
-      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;
+      t__3WFH=((__UINTEGER_32 )typ_id__R1B);
+      a__2WFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__52IH=(__UINTEGER_32)((__UINTEGER_32)(sz__O1B + a__2WFH) & (__UINTEGER_32)(~ a__2WFH));
+      ptr_table__22IH=((__POINTER )(&(table_type[(t__3WFH)])));
+      lab_type__42IH=(__UINTEGER_32)(t__3WFH |  1);
+      next__12IH=((__POINTER )(NULL));
+      result__32IH=((__POINTER *)ptr_table__22IH)[ 0];
+      if ((result__32IH == (void *)NULL)) {
+        result__32IH=new_lab__FTJ(lab_type__42IH);
+        next__12IH=(void *)((unsigned long)result__32IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__52IH)));
+        ((__POINTER *)next__12IH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__22IH)[ 0]=next__12IH;
       } else {
-        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)));
+        next__12IH=((__POINTER *)result__32IH)[ 0];
+        if ((next__12IH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__32IH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__52IH <<  1)) <=  4096)) {
+            next__12IH=(void *)((unsigned long)result__32IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__52IH)));
           } else {
-            next__2UIH=new_lab__ZPJ(lab_type__5UIH);
+            next__12IH=new_lab__FTJ(lab_type__42IH);
           };
-          ((__POINTER *)next__2UIH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__3UIH)[ 0]=next__2UIH;
+          ((__POINTER *)next__12IH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__22IH)[ 0]=next__12IH;
         } else {
-          ((__POINTER *)result__4UIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2UIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__4UIH=next__2UIH;
+          ((__POINTER *)result__32IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__12IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__32IH=next__12IH;
         };
       };
-      ptr__M1B=result__4UIH;
+      ptr__M1B=result__32IH;
     };
     result__L1B=((__TYPE_FULL *)ptr__M1B);
     *(result__L1B) = *(TYPE_FULL__);
   };
-  Self__YCS=((__TYPE_FULL *)result__L1B);
-  Self__YCS->flag__2CS=code__FRB;
+  Self__EGS=((__TYPE_FULL *)result__L1B);
+  Self__EGS->flag__IGS=code__FRB;
   if (((void *)typ__ERB != (void *)NULL)) {
     switch (((struct ___OBJ *)typ__ERB)->__id) {
     case __TYPE_NULL__: {
-      __tmp__EDS=(&__string_2);
+      __tmp__QGS=(&__string_2);
     } break;
     case __TYPE_VOID__: {
-      __tmp__EDS=(&__string_3);
+      __tmp__QGS=(&__string_3);
     } break;
     case __TYPE_CONTEXT__: {
-      __tmp__EDS=(&__string_45);
+      __tmp__QGS=(&__string_45);
     } break;
     case __TYPE_ID__: {
-      __tmp__EDS=(&__string_47);
+      __tmp__QGS=(&__string_47);
     } break;
     };
-    __tmp__YDS=((void *)__tmp__EDS != (void *)NULL);
+    __tmp__EHS=((void *)__tmp__QGS != (void *)NULL);
   } else {
-    __tmp__YDS=FALSE__;
+    __tmp__EHS=FALSE__;
   };
-  if (__tmp__YDS) {
+  if (__tmp__EHS) {
     switch (((struct ___OBJ *)typ__ERB)->__id) {
     case __TYPE_NULL__: {
-      __tmp__MDS=(&__string_2);
+      __tmp__YGS=(&__string_2);
     } break;
     case __TYPE_VOID__: {
-      __tmp__MDS=(&__string_3);
+      __tmp__YGS=(&__string_3);
     } break;
     case __TYPE_CONTEXT__: {
-      __tmp__MDS=(&__string_45);
+      __tmp__YGS=(&__string_45);
     } break;
     case __TYPE_ID__: {
-      __tmp__MDS=(&__string_47);
+      __tmp__YGS=(&__string_47);
     } break;
     };
-    __tmp__ZDS=__infix_equal_equal__02DB(__tmp__MDS,(&__string_33));
+    __tmp__FHS=__infix_equal_equal__GAEB(__tmp__YGS,(&__string_33));
   } else {
-    __tmp__ZDS=FALSE__;
+    __tmp__FHS=FALSE__;
   };
-  if ((__tmp__ZDS && (! ((__UINTEGER_8)(Self__YCS->flag__2CS &  1) !=  0)))) {
-    print__DID((&__string_220));
+  if ((__tmp__FHS && (! ((__UINTEGER_8)(Self__EGS->flag__IGS &  1) !=  0)))) {
+    print__DJD((&__string_220));
     fputc((int)('\n'),stdout);
     exit(( 1));
   };
   return(result__L1B);
 }
 
-static void** create__AWNB(__INTEGER nb_elements__CWNB)
+static void** create__MZNB(__INTEGER nb_elements__OZNB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__43DH,a__AXFH,new_size__53DH,new_size2__A4DH,a__EXFH;
+  __UINTEGER_32 new_size__FXFH;
+  __POINTER result__33DH,ptr_table__B3IH,next__A3IH,result__C3IH;
+  void *result__F3IH;
+  __INTEGER Self__DJMC;
+  void **Result__15RB;
+  sz__43DH=((__UINTEGER_32 )(__INTEGER)(nb_elements__OZNB * ((__INTEGER )(sizeof(void *)))));
+  result__33DH=((__POINTER )(NULL));
+  a__AXFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__53DH=(__UINTEGER_32)((__UINTEGER_32)(sz__43DH + a__AXFH) & (__UINTEGER_32)(~ a__AXFH));
+  new_size2__A4DH=(__UINTEGER_32)(new_size__53DH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__A4DH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__EXFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__FXFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__A4DH + a__EXFH) & (__UINTEGER_32)(~ a__EXFH));
+    ptr_table__B3IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__FXFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__A3IH=((__POINTER )(NULL));
+    result__C3IH=((__POINTER *)ptr_table__B3IH)[ 0];
+    if ((result__C3IH == (void *)NULL)) {
+      result__C3IH=new_lab__FTJ(new_size__FXFH);
+      next__A3IH=(void *)((unsigned long)result__C3IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FXFH)));
+      ((__POINTER *)next__A3IH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__B3IH)[ 0]=next__A3IH;
+    } else {
+      next__A3IH=((__POINTER *)result__C3IH)[ 0];
+      if ((next__A3IH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__C3IH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__FXFH <<  1)) <=  4096)) {
+          next__A3IH=(void *)((unsigned long)result__C3IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FXFH)));
+        } else {
+          next__A3IH=new_lab__FTJ(new_size__FXFH);
+        };
+        ((__POINTER *)next__A3IH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__B3IH)[ 0]=next__A3IH;
+      } else {
+        ((__POINTER *)result__C3IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__A3IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__C3IH=next__A3IH;
+      };
+    };
+    ((__POINTER *)result__C3IH)[ 0]=((__POINTER ) 3);
+    result__33DH=(void *)((unsigned long)result__C3IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__F3IH=first_free__NFVB;
+    while ((((void *)result__F3IH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__F3IH)->map_size_and_id__YTB &  4294967292LU) < new_size__53DH))) {
+      result__F3IH=((__MEMORY *)result__F3IH)->map_next_free__ZTB;
     };
-    if (((void *)result__GVIH == (void *)NULL)) {
-      result__GVIH=new_page__K34();
+    if (((void *)result__F3IH == (void *)NULL)) {
+      result__F3IH=new_page__YC5();
     };
-    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)));
+    to_busy__index__MWFC(result__F3IH,new_size__53DH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__F3IH)) - (unsigned long)begin_memory__SXH)))) >>  26));
+    result__33DH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__F3IH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__15RB=((void **)result__33DH);
+  Self__DJMC=(__INTEGER)(nb_elements__OZNB -  1);
+  while ((Self__DJMC >=  0)) {
+    Result__15RB[Self__DJMC]=NULL;
+    Self__DJMC=(__INTEGER)(Self__DJMC -  1);
   };
-  return(Result__P2RB);
+  return(Result__15RB);
 }
 
-static void add_last__S1R(__FAST_ARRAYoTYPE_IDo *Self__T1R,void *element__U1R)
+static void add_last__44R(__FAST_ARRAYoTYPE_IDo *Self__54R,void *element__A5R)
 // ({FAST_ARRAYoTYPE_IDo},{NULLxTYPE_ID}) VoidNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER new_capacity__B5R,__tmp__KAS,__tmp__WYDC,Self__GDVD;
+  __BOOLEAN __tmp__R5R;
+  void **__tmp__JAS,**new__CYDC;
+  new_capacity__B5R= 0;
+  if (((__INTEGER)(Self__54R->parent_arrayed_collection__ABB.upper__C5R +  1) <= (__INTEGER)(Self__54R->parent_arrayed_collection__ABB.capacity__E5R -  1))) {
+    Self__54R->parent_arrayed_collection__ABB.upper__C5R=(__INTEGER)(Self__54R->parent_arrayed_collection__ABB.upper__C5R +  1);
+    __tmp__R5R=TRUE__;
   } else {
-    __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;
+    __tmp__R5R=FALSE__;
+  };
+  if ((! __tmp__R5R)) {
+    if ((Self__54R->parent_arrayed_collection__ABB.capacity__E5R ==  0)) {
+      Self__54R->parent_arrayed_collection__ABB.storage__AAS=create__MZNB( 2);
+      Self__54R->parent_arrayed_collection__ABB.capacity__E5R= 2;
+      Self__54R->parent_arrayed_collection__ABB.upper__C5R= 0;
+    } else {
+      new_capacity__B5R=(__INTEGER)(Self__54R->parent_arrayed_collection__ABB.capacity__E5R <<  1);
+      __tmp__JAS=Self__54R->parent_arrayed_collection__ABB.storage__AAS;
+      __tmp__KAS=Self__54R->parent_arrayed_collection__ABB.capacity__E5R;
+      new__CYDC=((void **)realloc_dynamic__old_size__new_size__ZHLC(((__POINTER )((void **)__tmp__JAS)),((__UINTEGER_32 )(__INTEGER)(__tmp__KAS * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__B5R * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__WYDC=(__INTEGER)(new_capacity__B5R -  1);
+      Self__GDVD=__tmp__KAS;
+      while ((Self__GDVD <= __tmp__WYDC)) {
+        new__CYDC[Self__GDVD]=NULL;
+        Self__GDVD=(__INTEGER)(Self__GDVD +  1);
+      };
+      Self__54R->parent_arrayed_collection__ABB.storage__AAS=new__CYDC;
+      Self__54R->parent_arrayed_collection__ABB.capacity__E5R=new_capacity__B5R;
+      Self__54R->parent_arrayed_collection__ABB.upper__C5R=(__INTEGER)(Self__54R->parent_arrayed_collection__ABB.upper__C5R +  1);
+    };
+  };
+  ((void **)Self__54R->parent_arrayed_collection__ABB.storage__AAS)[Self__54R->parent_arrayed_collection__ABB.upper__C5R]=element__A5R;
 }
 
-static __BOOLEAN open__FDRD(__DIRECTORY_UNIX *Self__GDRD)
+static __BOOLEAN open__TGRD(__DIRECTORY_UNIX *Self__UGRD)
 // ({DIRECTORY_UNIX}) With resultNo recursive, No inlinable.
 {
-  __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)));
+  __POINTER dirent__0GRD,ptr__EXLE,ptr_table__J3IH,next__I3IH;
+  __POINTER result__K3IH,ptr_table__O3IH,next__N3IH,result__P3IH;
+  __POINTER dir__YGRD,ptr__Y3IH,ptr_table__C4IH,next__B4IH,result__D4IH;
+  __POINTER ptr_table__H4IH,next__G4IH,result__I4IH,ptr__QDOF;
+  __POINTER ptr_table__M4IH,next__L4IH,result__N4IH,ptr_table__R4IH;
+  __POINTER next__Q4IH,result__S4IH;
+  __INTEGER i__4GRD,typ_id__JXLE,i__T3IH,Self__HUFF,i__HYFH,j__JYFH;
+  __INTEGER Self__KUHH,idx__TU3E,idx__2C3,n__5XTD,n__JDGH,typ_id__Z3IH;
+  __INTEGER typ_id__VDOF;
+  __UINTEGER_32 sz__GXLE,a__TXFH,new_size__UXFH,t__YXFH,a__XXFH;
+  __UINTEGER_32 new_size__R3IH,lab_type__Q3IH,sz__03IH,a__13IH;
+  __UINTEGER_32 new_size__23IH,t__33IH,a__43IH,new_size__K4IH;
+  __UINTEGER_32 lab_type__J4IH,sz__SDOF,a__SEGH,new_size__TEGH,t__XEGH;
+  __UINTEGER_32 a__WEGH,new_size__U4IH,lab_type__T4IH;
+  __STRING *new__PYQE,*Self__0XFH,*Self__NM3E,*Self__GYFH,*Self__1ZSD;
+  __STRING *Self__4XTD;
+  void *other__IYFH;
+  void *result__SU3E;
+  void *__tmp__GX3E,*dir__EX3E;
+  void *__tmp__NJRD;
+  __CHARACTER *n__XGRD,*Self__U3IH,*other__V3IH,*Self__LUHH,*model__MUHH;
+  __CHARACTER *Self__QC3;
+  __BOOLEAN result__3GRD,result__ZXFH,__tmp__VW3E;
+  __LINKED_LISToENTRYo *result__DXLE,*Self__TLWE,*Self__0OMF;
+  __LINKED_LIST_NODEoENTRYo *result__X3IH,*Self__53IH,*result__PDOF;
+  __LINKED_LIST_NODEoENTRYo *Self__XLQF;
+  n__XGRD=NULL;
+  dirent__0GRD=((__POINTER )(NULL));
+  result__3GRD=FALSE__;
+  i__4GRD= 0;
+  if (((void *)Self__UGRD->parent_directory__HGD.list__CHRD == (void *)NULL)) {
+    result__DXLE=NULL;
+    ptr__EXLE=((__POINTER )(NULL));
+    typ_id__JXLE= 0;
+    sz__GXLE=((__UINTEGER_32 )sizeof(__LINKED_LISToENTRYo));
+    if ((sz__GXLE ==  0)) {
+      result__DXLE=LINKED_LISToENTRYo__;
+    } else {
+      typ_id__JXLE=__LINKED_LISToENTRYo__;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__GXLE);
+      if ((typ_id__JXLE == (__INTEGER)(-  1))) {
+        a__TXFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__UXFH=(__UINTEGER_32)((__UINTEGER_32)(sz__GXLE + a__TXFH) & (__UINTEGER_32)(~ a__TXFH));
+        ptr_table__J3IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__UXFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__I3IH=((__POINTER )(NULL));
+        result__K3IH=((__POINTER *)ptr_table__J3IH)[ 0];
+        if ((result__K3IH == (void *)NULL)) {
+          result__K3IH=new_lab__FTJ(new_size__UXFH);
+          next__I3IH=(void *)((unsigned long)result__K3IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UXFH)));
+          ((__POINTER *)next__I3IH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__J3IH)[ 0]=next__I3IH;
+        } 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__SXH)))) &  4095) + (__UINTEGER_32)(new_size__UXFH <<  1)) <=  4096)) {
+              next__I3IH=(void *)((unsigned long)result__K3IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UXFH)));
             } else {
-              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)));
+              next__I3IH=new_lab__FTJ(new_size__UXFH);
+            };
+            ((__POINTER *)next__I3IH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__J3IH)[ 0]=next__I3IH;
+          } else {
+            ((__POINTER *)result__K3IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__I3IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__K3IH=next__I3IH;
+          };
+        };
+        ptr__EXLE=result__K3IH;
+      } else {
+        t__YXFH=((__UINTEGER_32 )typ_id__JXLE);
+        a__XXFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__R3IH=(__UINTEGER_32)((__UINTEGER_32)(sz__GXLE + a__XXFH) & (__UINTEGER_32)(~ a__XXFH));
+        ptr_table__O3IH=((__POINTER )(&(table_type[(t__YXFH)])));
+        lab_type__Q3IH=(__UINTEGER_32)(t__YXFH |  1);
+        next__N3IH=((__POINTER )(NULL));
+        result__P3IH=((__POINTER *)ptr_table__O3IH)[ 0];
+        if ((result__P3IH == (void *)NULL)) {
+          result__P3IH=new_lab__FTJ(lab_type__Q3IH);
+          next__N3IH=(void *)((unsigned long)result__P3IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__R3IH)));
+          ((__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__SXH)))) &  4095) + (__UINTEGER_32)(new_size__R3IH <<  1)) <=  4096)) {
+              next__N3IH=(void *)((unsigned long)result__P3IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__R3IH)));
             } else {
-              next__OVIH=new_lab__ZPJ(lab_type__RVIH);
+              next__N3IH=new_lab__FTJ(lab_type__Q3IH);
             };
-            ((__POINTER *)next__OVIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__PVIH)[ 0]=next__OVIH;
+            ((__POINTER *)next__N3IH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__O3IH)[ 0]=next__N3IH;
           } else {
-            ((__POINTER *)result__QVIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OVIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__QVIH=next__OVIH;
+            ((__POINTER *)result__P3IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__N3IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__P3IH=next__N3IH;
           };
         };
-        ptr__WTLE=result__QVIH;
+        ptr__EXLE=result__P3IH;
       };
-      result__VTLE=((__LINKED_LISToENTRYo *)ptr__WTLE);
-      *(result__VTLE) = *(LINKED_LISToENTRYo__);
+      result__DXLE=((__LINKED_LISToENTRYo *)ptr__EXLE);
+      *(result__DXLE) = *(LINKED_LISToENTRYo__);
     };
-    Self__GDRD->parent_directory__HFD.list__UDRD=result__VTLE;
+    Self__UGRD->parent_directory__HGD.list__CHRD=result__DXLE;
   } else {
-    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__;
+    Self__TLWE=((__LINKED_LISToENTRYo *)Self__UGRD->parent_directory__HGD.list__CHRD);
+    if (((void *)Self__TLWE->first_link__VLWE != (void *)NULL)) {
+      Self__TLWE->first_link__VLWE=NULL;
+      Self__TLWE->mem_idx__2LWE= 0;
+      Self__TLWE->mem_lnk__3LWE=NULL;
+      Self__TLWE->parent_linked_collection__BHRD.upper__GQ3D= 0;
+      Self__TLWE->last_link__4LWE=NULL;
+    };
+  };
+  dir__YGRD=((__POINTER )(opendir((((__STRING_CONSTANT *)Self__UGRD->parent_entry_unix__GGD.parent_entry__FGD.path__BD)->storage__FRO))));
+  if ((dir__YGRD != (void *)NULL)) {
+    result__3GRD=TRUE__;
     do {
-      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__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);
+      dirent__0GRD=((__POINTER )(readdir((dir__YGRD))));
+      if ((dirent__0GRD != (void *)NULL)) {
+        n__XGRD=((__CHARACTER *)(((struct dirent *)(dirent__0GRD))->d_name));
+        ((__STRING *)string_tmp__AGD)->count__EGC= 0;
+        i__4GRD= 0;
+        while ((((__CHARACTER *)n__XGRD)[i__4GRD] != '\0')) {
+          add_last__GOT(string_tmp__AGD,((__CHARACTER *)n__XGRD)[i__4GRD]);
+          i__4GRD=(__INTEGER)(i__4GRD +  1);
+        };
+        new__PYQE=create__ZBB(((__STRING_CONSTANT *)(&__string_221))->count__DD);
+        copy__JDS(new__PYQE,(&__string_221));
+        Self__0XFH=((__STRING *)string_tmp__AGD);
+        result__ZXFH=FALSE__;
+        if ((Self__0XFH->count__EGC == new__PYQE->count__EGC)) {
+          if ((Self__0XFH->count__EGC ==  0)) {
+            result__ZXFH=TRUE__;
+          } else {
+            Self__U3IH=((__CHARACTER *)Self__0XFH->storage__RCS);
+            other__V3IH=new__PYQE->storage__RCS;
+            i__T3IH=(__INTEGER)(Self__0XFH->count__EGC -  1);
+            while (((i__T3IH >=  0) && (Self__U3IH[i__T3IH] == ((__CHARACTER *)other__V3IH)[i__T3IH]))) {
+              i__T3IH=(__INTEGER)(i__T3IH -  1);
+            };
+            result__ZXFH=(i__T3IH <  0);
+          };
+        };
+        if ((! result__ZXFH)) {
+          Self__NM3E=((__STRING *)string_tmp__AGD);
+          add_last__GOT(Self__NM3E,' ');
+          Self__HUFF=Self__NM3E->count__EGC;
+          while ((Self__HUFF >=  2)) {
+            ((__CHARACTER *)Self__NM3E->storage__RCS)[(__INTEGER)(Self__HUFF -  1)]=((__CHARACTER *)Self__NM3E->storage__RCS)[(__INTEGER)((__INTEGER)(Self__HUFF -  1) -  1)];
+            Self__HUFF=(__INTEGER)(Self__HUFF -  1);
+          };
+          ((__CHARACTER *)Self__NM3E->storage__RCS)[ 0]='/';
+          Self__GYFH=((__STRING *)string_tmp__AGD);
+          other__IYFH=Self__UGRD->parent_entry_unix__GGD.parent_entry__FGD.path__BD;
+          i__HYFH=Self__GYFH->count__EGC;
+          j__JYFH=((__STRING_CONSTANT *)other__IYFH)->count__DD;
+          resize__AYZ(Self__GYFH,(__INTEGER)(i__HYFH + j__JYFH));
+          if (((i__HYFH >  0) && (j__JYFH >  0))) {
+            move__to__by__0YCC(Self__GYFH->storage__RCS, 0,(__INTEGER)(i__HYFH -  1),j__JYFH);
+          };
+          Self__LUHH=((__CHARACTER *)Self__GYFH->storage__RCS);
+          model__MUHH=((__STRING_CONSTANT *)other__IYFH)->storage__FRO;
+          Self__KUHH=(__INTEGER)(j__JYFH -  1);
+          while ((Self__KUHH >=  0)) {
+            Self__LUHH[Self__KUHH]=((__CHARACTER *)model__MUHH)[Self__KUHH];
+            Self__KUHH=(__INTEGER)(Self__KUHH -  1);
+          };
+          reduce_path__VN3E(string_tmp__AGD);
+          result__SU3E=NULL;
+          idx__TU3E= 0;
+          copy__JDS(string_tmp2__Y2AC,Self__UGRD->parent_entry_unix__GGD.parent_entry__FGD.path__BD);
+          add_last__GOT(string_tmp2__Y2AC,'/');
+          append__ROS(string_tmp2__Y2AC,string_tmp__AGD);
+          reduce_path__VN3E(string_tmp2__Y2AC);
+          copy__JDS(string_tmp3__42AC,string_tmp2__Y2AC);
           do {
-            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;
+            result__SU3E=reference_at__1Y0C(alias__RGD,string_tmp2__Y2AC);
+            if (((void *)result__SU3E == (void *)NULL)) {
+              Self__1ZSD=((__STRING *)string_tmp2__Y2AC);
+              Self__QC3=((__CHARACTER *)Self__1ZSD->storage__RCS);
+              idx__2C3=(__INTEGER)(Self__1ZSD->count__EGC -  1);
+              while ((! ((idx__2C3 <  0) || ('/' == Self__QC3[idx__2C3])))) {
+                idx__2C3=(__INTEGER)(idx__2C3 -  1);
+              };
+              idx__TU3E=(__INTEGER)( 1 + idx__2C3);
+              if ((idx__TU3E >  0)) {
+                Self__4XTD=((__STRING *)string_tmp2__Y2AC);
+                n__5XTD=(__INTEGER)(idx__TU3E -  1);
+                if ((n__5XTD < Self__4XTD->count__EGC)) {
+                  n__JDGH=(__INTEGER)(Self__4XTD->count__EGC - n__5XTD);
+                  if ((n__JDGH > Self__4XTD->count__EGC)) {
+                    Self__4XTD->count__EGC= 0;
                   } else {
-                    Self__QUTD->count__EGC=(__INTEGER)(Self__QUTD->count__EGC - n__O2FH);
+                    Self__4XTD->count__EGC=(__INTEGER)(Self__4XTD->count__EGC - n__JDGH);
                   };
                 };
               } else {
-                ((__STRING *)string_tmp2__MZAC)->count__EGC= 0;
+                ((__STRING *)string_tmp2__Y2AC)->count__EGC= 0;
               };
             };
-          } 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) {
+          } while ((((void *)result__SU3E == (void *)NULL) && (((__STRING *)string_tmp2__Y2AC)->count__EGC !=  0)));
+          if (((void *)result__SU3E == (void *)NULL)) {
+            if (FILE_SYSTEM__->parent_directory__2GD==0) {
             } else {
-              parent_directory__1ED();
+              parent_directory__1FD();
             };
-            result__WP3E=physical_get_entry__BY0C(string_tmp3__SZAC);
-            __tmp__ZR3E=TRUE__;
+            result__SU3E=physical_get_entry__P10C(string_tmp3__42AC);
+            __tmp__VW3E=TRUE__;
           } else {
-            __tmp__ZR3E=FALSE__;
+            __tmp__VW3E=FALSE__;
           };
-          if ((! __tmp__ZR3E)) {
-            if ((((__STRING *)string_tmp3__SZAC)->count__EGC != ((__STRING *)string_tmp2__MZAC)->count__EGC)) {
-              if (result__WP3E==NULL) {
-                __tmp__KS3E=NULL;
+          if ((! __tmp__VW3E)) {
+            if ((((__STRING *)string_tmp3__42AC)->count__EGC != ((__STRING *)string_tmp2__Y2AC)->count__EGC)) {
+              if (result__SU3E==NULL) {
+                __tmp__GX3E=NULL;
               } else {
-                switch (((struct ___OBJ *)result__WP3E)->__id) {
+                switch (((struct ___OBJ *)result__SU3E)->__id) {
                 case __DIRECTORY_UNIX__: {
-                  __tmp__KS3E=((void *)result__WP3E);
+                  __tmp__GX3E=((void *)result__SU3E);
                 } break;
                 case __FILE_UNIX__: {
-                  __tmp__KS3E=NULL;
+                  __tmp__GX3E=NULL;
                 } break;
                 }
               };
-              dir__IS3E=__tmp__KS3E;
-              result__WP3E=physical_get_entry__QAF(string_tmp3__SZAC);
+              dir__EX3E=__tmp__GX3E;
+              result__SU3E=physical_get_entry__UDF(string_tmp3__42AC);
             };
           };
-          if (((void *)result__WP3E == (void *)NULL)) {
-            result__PDRD=FALSE__;
+          if (((void *)result__SU3E == (void *)NULL)) {
+            result__3GRD=FALSE__;
           } else {
-            if (((struct ___OBJ *)result__WP3E)->__id==__DIRECTORY_UNIX__) {
-              __tmp__5FRD=((__DIRECTORY_UNIX *)result__WP3E)->parent_entry_unix__GFD.parent_entry__FFD.path__BD;
+            if (((struct ___OBJ *)result__SU3E)->__id==__DIRECTORY_UNIX__) {
+              __tmp__NJRD=((__DIRECTORY_UNIX *)result__SU3E)->parent_entry_unix__GGD.parent_entry__FGD.path__BD;
             } else {
-              __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__;
+              __tmp__NJRD=((__FILE_UNIX *)result__SU3E)->parent_entry_unix__HEF.parent_entry__FGD.path__BD;
+            };
+            if ((((__STRING_CONSTANT *)__tmp__NJRD)->count__DD >= ((__STRING_CONSTANT *)Self__UGRD->parent_entry_unix__GGD.parent_entry__FGD.path__BD)->count__DD)) {
+              Self__0OMF=((__LINKED_LISToENTRYo *)Self__UGRD->parent_directory__HGD.list__CHRD);
+              if (((void *)Self__0OMF->first_link__VLWE == (void *)NULL)) {
+                result__X3IH=NULL;
+                ptr__Y3IH=((__POINTER )(NULL));
+                typ_id__Z3IH= 0;
+                sz__03IH=((__UINTEGER_32 )sizeof(__LINKED_LIST_NODEoENTRYo));
+                if ((sz__03IH ==  0)) {
+                  result__X3IH=LINKED_LIST_NODEoENTRYo__;
                 } else {
-                  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;
+                  typ_id__Z3IH=__LINKED_LIST_NODEoENTRYo__;
+                  clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__03IH);
+                  if ((typ_id__Z3IH == (__INTEGER)(-  1))) {
+                    a__13IH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__23IH=(__UINTEGER_32)((__UINTEGER_32)(sz__03IH + a__13IH) & (__UINTEGER_32)(~ a__13IH));
+                    ptr_table__C4IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__23IH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                    next__B4IH=((__POINTER )(NULL));
+                    result__D4IH=((__POINTER *)ptr_table__C4IH)[ 0];
+                    if ((result__D4IH == (void *)NULL)) {
+                      result__D4IH=new_lab__FTJ(new_size__23IH);
+                      next__B4IH=(void *)((unsigned long)result__D4IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__23IH)));
+                      ((__POINTER *)next__B4IH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__C4IH)[ 0]=next__B4IH;
                     } else {
-                      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)));
+                      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__SXH)))) &  4095) + (__UINTEGER_32)(new_size__23IH <<  1)) <=  4096)) {
+                          next__B4IH=(void *)((unsigned long)result__D4IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__23IH)));
                         } else {
-                          next__CWIH=new_lab__ZPJ(new_size__3VIH);
+                          next__B4IH=new_lab__FTJ(new_size__23IH);
                         };
-                        ((__POINTER *)next__CWIH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__DWIH)[ 0]=next__CWIH;
+                        ((__POINTER *)next__B4IH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__C4IH)[ 0]=next__B4IH;
                       } else {
-                        ((__POINTER *)result__EWIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CWIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__EWIH=next__CWIH;
+                        ((__POINTER *)result__D4IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__B4IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__D4IH=next__B4IH;
                       };
                     };
-                    ptr__ZVIH=result__EWIH;
+                    ptr__Y3IH=result__D4IH;
                   } else {
-                    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;
+                    t__33IH=((__UINTEGER_32 )typ_id__Z3IH);
+                    a__43IH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__K4IH=(__UINTEGER_32)((__UINTEGER_32)(sz__03IH + a__43IH) & (__UINTEGER_32)(~ a__43IH));
+                    ptr_table__H4IH=((__POINTER )(&(table_type[(t__33IH)])));
+                    lab_type__J4IH=(__UINTEGER_32)(t__33IH |  1);
+                    next__G4IH=((__POINTER )(NULL));
+                    result__I4IH=((__POINTER *)ptr_table__H4IH)[ 0];
+                    if ((result__I4IH == (void *)NULL)) {
+                      result__I4IH=new_lab__FTJ(lab_type__J4IH);
+                      next__G4IH=(void *)((unsigned long)result__I4IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__K4IH)));
+                      ((__POINTER *)next__G4IH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__H4IH)[ 0]=next__G4IH;
                     } else {
-                      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)));
+                      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__SXH)))) &  4095) + (__UINTEGER_32)(new_size__K4IH <<  1)) <=  4096)) {
+                          next__G4IH=(void *)((unsigned long)result__I4IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__K4IH)));
                         } else {
-                          next__HWIH=new_lab__ZPJ(lab_type__KWIH);
+                          next__G4IH=new_lab__FTJ(lab_type__J4IH);
                         };
-                        ((__POINTER *)next__HWIH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__IWIH)[ 0]=next__HWIH;
+                        ((__POINTER *)next__G4IH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__H4IH)[ 0]=next__G4IH;
                       } else {
-                        ((__POINTER *)result__JWIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HWIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__JWIH=next__HWIH;
+                        ((__POINTER *)result__I4IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__G4IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__I4IH=next__G4IH;
                       };
                     };
-                    ptr__ZVIH=result__JWIH;
+                    ptr__Y3IH=result__I4IH;
                   };
-                  result__YVIH=((__LINKED_LIST_NODEoENTRYo *)ptr__ZVIH);
-                  *(result__YVIH) = *(LINKED_LIST_NODEoENTRYo__);
+                  result__X3IH=((__LINKED_LIST_NODEoENTRYo *)ptr__Y3IH);
+                  *(result__X3IH) = *(LINKED_LIST_NODEoENTRYo__);
                 };
-                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;
+                Self__53IH=((__LINKED_LIST_NODEoENTRYo *)result__X3IH);
+                Self__53IH->item__P5WE=result__SU3E;
+                Self__53IH->next__V1FF=NULL;
+                Self__0OMF->first_link__VLWE=result__X3IH;
+                Self__0OMF->parent_linked_collection__BHRD.upper__GQ3D= 1;
+                Self__0OMF->last_link__4LWE=result__X3IH;
+                Self__0OMF->mem_idx__2LWE= 1;
+                Self__0OMF->mem_lnk__3LWE=result__X3IH;
               } else {
-                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__;
+                result__PDOF=NULL;
+                ptr__QDOF=((__POINTER )(NULL));
+                typ_id__VDOF= 0;
+                sz__SDOF=((__UINTEGER_32 )sizeof(__LINKED_LIST_NODEoENTRYo));
+                if ((sz__SDOF ==  0)) {
+                  result__PDOF=LINKED_LIST_NODEoENTRYo__;
                 } else {
-                  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;
+                  typ_id__VDOF=__LINKED_LIST_NODEoENTRYo__;
+                  clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__SDOF);
+                  if ((typ_id__VDOF == (__INTEGER)(-  1))) {
+                    a__SEGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__TEGH=(__UINTEGER_32)((__UINTEGER_32)(sz__SDOF + a__SEGH) & (__UINTEGER_32)(~ a__SEGH));
+                    ptr_table__M4IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__TEGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                    next__L4IH=((__POINTER )(NULL));
+                    result__N4IH=((__POINTER *)ptr_table__M4IH)[ 0];
+                    if ((result__N4IH == (void *)NULL)) {
+                      result__N4IH=new_lab__FTJ(new_size__TEGH);
+                      next__L4IH=(void *)((unsigned long)result__N4IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TEGH)));
+                      ((__POINTER *)next__L4IH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__M4IH)[ 0]=next__L4IH;
                     } else {
-                      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)));
+                      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__SXH)))) &  4095) + (__UINTEGER_32)(new_size__TEGH <<  1)) <=  4096)) {
+                          next__L4IH=(void *)((unsigned long)result__N4IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TEGH)));
                         } else {
-                          next__MWIH=new_lab__ZPJ(new_size__V3FH);
+                          next__L4IH=new_lab__FTJ(new_size__TEGH);
                         };
-                        ((__POINTER *)next__MWIH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__NWIH)[ 0]=next__MWIH;
+                        ((__POINTER *)next__L4IH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__M4IH)[ 0]=next__L4IH;
                       } else {
-                        ((__POINTER *)result__OWIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MWIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__OWIH=next__MWIH;
+                        ((__POINTER *)result__N4IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__L4IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__N4IH=next__L4IH;
                       };
                     };
-                    ptr__J4NF=result__OWIH;
+                    ptr__QDOF=result__N4IH;
                   } else {
-                    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;
+                    t__XEGH=((__UINTEGER_32 )typ_id__VDOF);
+                    a__WEGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__U4IH=(__UINTEGER_32)((__UINTEGER_32)(sz__SDOF + a__WEGH) & (__UINTEGER_32)(~ a__WEGH));
+                    ptr_table__R4IH=((__POINTER )(&(table_type[(t__XEGH)])));
+                    lab_type__T4IH=(__UINTEGER_32)(t__XEGH |  1);
+                    next__Q4IH=((__POINTER )(NULL));
+                    result__S4IH=((__POINTER *)ptr_table__R4IH)[ 0];
+                    if ((result__S4IH == (void *)NULL)) {
+                      result__S4IH=new_lab__FTJ(lab_type__T4IH);
+                      next__Q4IH=(void *)((unsigned long)result__S4IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__U4IH)));
+                      ((__POINTER *)next__Q4IH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__R4IH)[ 0]=next__Q4IH;
                     } else {
-                      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)));
+                      next__Q4IH=((__POINTER *)result__S4IH)[ 0];
+                      if ((next__Q4IH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__S4IH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__U4IH <<  1)) <=  4096)) {
+                          next__Q4IH=(void *)((unsigned long)result__S4IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__U4IH)));
                         } else {
-                          next__RWIH=new_lab__ZPJ(lab_type__UWIH);
+                          next__Q4IH=new_lab__FTJ(lab_type__T4IH);
                         };
-                        ((__POINTER *)next__RWIH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__SWIH)[ 0]=next__RWIH;
+                        ((__POINTER *)next__Q4IH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__R4IH)[ 0]=next__Q4IH;
                       } else {
-                        ((__POINTER *)result__TWIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RWIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__TWIH=next__RWIH;
+                        ((__POINTER *)result__S4IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__Q4IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__S4IH=next__Q4IH;
                       };
                     };
-                    ptr__J4NF=result__TWIH;
+                    ptr__QDOF=result__S4IH;
                   };
-                  result__I4NF=((__LINKED_LIST_NODEoENTRYo *)ptr__J4NF);
-                  *(result__I4NF) = *(LINKED_LIST_NODEoENTRYo__);
+                  result__PDOF=((__LINKED_LIST_NODEoENTRYo *)ptr__QDOF);
+                  *(result__PDOF) = *(LINKED_LIST_NODEoENTRYo__);
                 };
-                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;
+                Self__XLQF=((__LINKED_LIST_NODEoENTRYo *)result__PDOF);
+                Self__XLQF->item__P5WE=result__SU3E;
+                Self__XLQF->next__V1FF=NULL;
+                ((__LINKED_LIST_NODEoENTRYo *)Self__0OMF->last_link__4LWE)->next__V1FF=result__PDOF;
+                Self__0OMF->parent_linked_collection__BHRD.upper__GQ3D=(__INTEGER)(Self__0OMF->parent_linked_collection__BHRD.upper__GQ3D +  1);
+                Self__0OMF->last_link__4LWE=result__PDOF;
               };
             };
           };
         };
       };
-    } while (((dirent__MDRD != (void *)NULL) & result__PDRD));
-    closedir((dir__KDRD));
+    } while (((dirent__0GRD != (void *)NULL) & result__3GRD));
+    closedir((dir__YGRD));
   };
-  return(result__PDRD);
+  return(result__3GRD);
 }
 
-static void check_in__begin__0QQC(void *entry__2QQC,__INTEGER n__3QQC)
+static void check_in__begin__IUQC(void *entry__KUQC,__INTEGER n__LUQC)
 // ({NULLxDIRECTORY_UNIXxFILE_UNIX},{INTEGER}) VoidRecursive, No inlinable.
 {
-  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);
+  void *tok__NUQC,*__tmp__XUQC,*__tmp__HWQC,*k__MZDC,*k__CBFG;
+  void *__tmp__TYQC,*__tmp__YYQC;
+  void *dir__PUQC,*__tmp__4UQC;
+  __FILE_UNIX *Self__403G;
+  __INTEGER __tmp__DVQC,Self__KQ3D,__tmp__YVQC,Self__1Q3D,i1__JJS;
+  __INTEGER i2__KJS,Self__AQX,result__C1HH,__tmp__E1HH,Self__F1HH;
+  __INTEGER result__H1HH,__tmp__J1HH,Self__K1HH,__tmp__DXQC,Self__SAFG;
+  __INTEGER result__M1HH,__tmp__O1HH,Self__P1HH,result__R1HH;
+  __INTEGER __tmp__T1HH,Self__U1HH,result__01HH,__tmp__21HH,Self__31HH;
+  __INTEGER result__51HH,__tmp__B2HH,Self__C2HH,i__H3BD,j__I3BD;
+  __INTEGER Self__YDKB,result__I2HH,__tmp__K2HH,Self__L2HH,result__N2HH;
+  __INTEGER __tmp__P2HH,Self__Q2HH,len__DJT,__tmp__AKT,__tmp__BKT;
+  __INTEGER Self__IYEB,__tmp__5QS,Self__QVIC,result__W2HH,__tmp__Y2HH;
+  __INTEGER Self__Z2HH,result__12HH,__tmp__32HH,Self__42HH,__tmp__R1QC;
+  __INTEGER Self__5FSE;
+  void *__tmp__JVQC,*__tmp__4VQC,*__tmp__GWQC,*__tmp__SYQC,*__tmp__XYQC;
+  __STRING_CONSTANT *Self__FJS,*Self__N1HH,*Self__S1HH;
+  __STRING *Self__4RS,*Self__ETS,*Self__F3BD,*Self__B42,*Self__XQS;
+  void *tok_lst__OUQC;
+  __BOOLEAN __tmp__QUQC,__tmp__KVQC,__tmp__5VQC,result__IJS;
+  __CHARACTER Self__EZFH,result__DZFH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__40HH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__RUHH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__W1HH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__VUHH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__E2HH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__2UHH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__S2HH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__RX3;
+  void *node__A1HH,*node__TUHH,*node__Y1HH,*node__XUHH,*node__G2HH;
+  void *node__4UHH,*node__U2HH,*node__2X3;
+  __HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *Self__LZDC,*Self__BBFG;
+  void *node__VZDC,*node__MBFG;
+  __CHARACTER *Self__DNEB,*model__ENEB,*__tmp__2QS,*Self__QOBC;
+  tok__NUQC=NULL;
+  tok_lst__OUQC=NULL;
+  dir__PUQC=NULL;
+  if (((struct ___OBJ *)entry__KUQC)->__id==__DIRECTORY_UNIX__) {
+    __tmp__QUQC=open__TGRD(entry__KUQC);
   } else {
-    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);
+    Self__403G=((__FILE_UNIX *)entry__KUQC);
+    Self__403G->stream__4KRD=((__POINTER )(fopen((char*)(((__STRING_CONSTANT *)Self__403G->parent_entry_unix__HEF.parent_entry__FGD.path__BD)->storage__FRO),"r+b")));
+    __tmp__QUQC=(Self__403G->stream__4KRD != (void *)NULL);
   };
-  if ((! __tmp__CRQC)) {
-    print__DID((&__string_222));
-    if (((struct ___OBJ *)entry__2QQC)->__id==__DIRECTORY_UNIX__) {
-      __tmp__JRQC=((__DIRECTORY_UNIX *)entry__2QQC)->parent_entry_unix__GFD.parent_entry__FFD.path__BD;
+  if ((! __tmp__QUQC)) {
+    print__DJD((&__string_222));
+    if (((struct ___OBJ *)entry__KUQC)->__id==__DIRECTORY_UNIX__) {
+      __tmp__XUQC=((__DIRECTORY_UNIX *)entry__KUQC)->parent_entry_unix__GGD.parent_entry__FGD.path__BD;
     } else {
-      __tmp__JRQC=((__FILE_UNIX *)entry__2QQC)->parent_entry_unix__DBF.parent_entry__FFD.path__BD;
+      __tmp__XUQC=((__FILE_UNIX *)entry__KUQC)->parent_entry_unix__HEF.parent_entry__FGD.path__BD;
     };
-    print__DID(__tmp__JRQC);
-    print__DID((&__string_171));
+    print__DJD(__tmp__XUQC);
+    print__DJD((&__string_171));
   } else {
-    if (entry__2QQC==NULL) {
-      __tmp__QRQC=NULL;
+    if (entry__KUQC==NULL) {
+      __tmp__4UQC=NULL;
     } else {
-      switch (((struct ___OBJ *)entry__2QQC)->__id) {
+      switch (((struct ___OBJ *)entry__KUQC)->__id) {
       case __DIRECTORY_UNIX__: {
-        __tmp__QRQC=((void *)entry__2QQC);
+        __tmp__4UQC=((void *)entry__KUQC);
       } break;
       case __FILE_UNIX__: {
-        __tmp__QRQC=NULL;
+        __tmp__4UQC=NULL;
       } break;
       }
     };
-    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;
+    dir__PUQC=__tmp__4UQC;
+    __tmp__DVQC=((__LINKED_LISToENTRYo *)((__DIRECTORY_UNIX *)__tmp__4UQC)->parent_directory__HGD.list__CHRD)->parent_linked_collection__BHRD.upper__GQ3D;
+    Self__KQ3D= 1;
+    while ((Self__KQ3D <= __tmp__DVQC)) {
+      __tmp__JVQC=item__A3PE(dir__PUQC,Self__KQ3D);
+      if (((struct ___OBJ *)__tmp__JVQC)->__id==__DIRECTORY_UNIX__) {
+        __tmp__KVQC=((void *)((__DIRECTORY_UNIX *)__tmp__JVQC) != (void *)NULL);
+      } else {
+        __tmp__KVQC=FALSE__;
+      };
+      if (__tmp__KVQC) {
+        check_in__begin__IUQC(item__A3PE(dir__PUQC,Self__KQ3D),n__LUQC);
+      };
+      Self__KQ3D=(__INTEGER)(Self__KQ3D +  1);
+    };
+    __tmp__YVQC=((__LINKED_LISToENTRYo *)((__DIRECTORY_UNIX *)__tmp__4UQC)->parent_directory__HGD.list__CHRD)->parent_linked_collection__BHRD.upper__GQ3D;
+    Self__1Q3D= 1;
+    while ((Self__1Q3D <= __tmp__YVQC)) {
+      __tmp__4VQC=item__A3PE(dir__PUQC,Self__1Q3D);
+      if (((struct ___OBJ *)__tmp__4VQC)->__id==__DIRECTORY_UNIX__) {
+        __tmp__5VQC=((void *)((__DIRECTORY_UNIX *)__tmp__4VQC) != (void *)NULL);
+      } else {
+        __tmp__5VQC=FALSE__;
+      };
+      if ((! __tmp__5VQC)) {
+        __tmp__GWQC=item__A3PE(dir__PUQC,Self__1Q3D);
+        if (((struct ___OBJ *)__tmp__GWQC)->__id==__DIRECTORY_UNIX__) {
+          __tmp__HWQC=((__DIRECTORY_UNIX *)__tmp__GWQC)->parent_entry_unix__GGD.parent_entry__FGD.name__CQT;
+        } else {
+          __tmp__HWQC=((__FILE_UNIX *)__tmp__GWQC)->parent_entry_unix__HEF.parent_entry__FGD.name__CQT;
+        };
+        Self__FJS=((__STRING_CONSTANT *)__tmp__HWQC);
+        result__IJS=FALSE__;
+        i1__JJS= 0;
+        i2__KJS= 0;
+        if ((((__STRING_CONSTANT *)(&__string_159))->count__DD <= Self__FJS->count__DD)) {
+          i1__JJS=(__INTEGER)((__INTEGER)(Self__FJS->count__DD - ((__STRING_CONSTANT *)(&__string_159))->count__DD) +  1);
+          i2__KJS= 1;
+          while ((! (((i1__JJS > Self__FJS->count__DD) || (i2__KJS > ((__STRING_CONSTANT *)(&__string_159))->count__DD)) || (((__CHARACTER *)Self__FJS->storage__FRO)[(__INTEGER)(i1__JJS -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_159))->storage__FRO)[(__INTEGER)(i2__KJS -  1)])))) {
+            i1__JJS=(__INTEGER)(i1__JJS +  1);
+            i2__KJS=(__INTEGER)(i2__KJS +  1);
+          };
+          result__IJS=(i1__JJS > Self__FJS->count__DD);
+        };
+        if (result__IJS) {
+          copy__JDS(string_tmp__VH,__tmp__HWQC);
+          Self__4RS=((__STRING *)string_tmp__VH);
+          if (( 3 > Self__4RS->count__EGC)) {
+            Self__4RS->count__EGC= 0;
+          } else {
+            Self__4RS->count__EGC=(__INTEGER)(Self__4RS->count__EGC -  3);
+          };
+          Self__ETS=((__STRING *)string_tmp__VH);
+          Self__AQX=Self__ETS->count__EGC;
+          while ((Self__AQX >=  1)) {
+            Self__EZFH=((__CHARACTER *)Self__ETS->storage__RCS)[(__INTEGER)(Self__AQX -  1)];
+            result__DZFH='\0';
+            if (((((__INTEGER_8 )Self__EZFH) <  97) || (((__INTEGER_8 )Self__EZFH) >  122))) {
+              result__DZFH=Self__EZFH;
             } else {
-              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);
+              result__DZFH=((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )Self__EZFH) -  32))));
+            };
+            ((__CHARACTER *)Self__ETS->storage__RCS)[(__INTEGER)(Self__AQX -  1)]=result__DZFH;
+            Self__AQX=(__INTEGER)(Self__AQX -  1);
+          };
+          tok__NUQC=get__YWB(string_tmp__VH);
+          Self__40HH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
+          result__C1HH= 0;
+          __tmp__E1HH=((__STRING_CONSTANT *)(&__string_155))->count__DD;
+          Self__F1HH= 1;
+          while ((Self__F1HH <= __tmp__E1HH)) {
+            result__C1HH=(__INTEGER)((__INTEGER)( 5 * result__C1HH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_155))->storage__FRO)[(__INTEGER)(Self__F1HH -  1)])));
+            Self__F1HH=(__INTEGER)(Self__F1HH +  1);
+          };
+          if ((result__C1HH <  0)) {
+            result__C1HH=(__INTEGER)(~ result__C1HH);
+          };
+          node__A1HH=((void **)Self__40HH->buckets__PDT)[(__INTEGER)(result__C1HH % Self__40HH->capacity__KDT)];
+          while ((! (((void *)node__A1HH == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__A1HH)->key__1DT == (void *)(&__string_155))))) {
+            node__A1HH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__A1HH)->next__GET;
+          };
+          if (((void *)node__A1HH != (void *)NULL)) {
+            Self__RUHH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
+            result__H1HH= 0;
+            __tmp__J1HH=((__STRING_CONSTANT *)(&__string_155))->count__DD;
+            Self__K1HH= 1;
+            while ((Self__K1HH <= __tmp__J1HH)) {
+              result__H1HH=(__INTEGER)((__INTEGER)( 5 * result__H1HH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_155))->storage__FRO)[(__INTEGER)(Self__K1HH -  1)])));
+              Self__K1HH=(__INTEGER)(Self__K1HH +  1);
+            };
+            if ((result__H1HH <  0)) {
+              result__H1HH=(__INTEGER)(~ result__H1HH);
+            };
+            node__TUHH=((void **)Self__RUHH->buckets__PDT)[(__INTEGER)(result__H1HH % Self__RUHH->capacity__KDT)];
+            while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__TUHH)->key__1DT != (void *)(&__string_155))) {
+              node__TUHH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__TUHH)->next__GET;
+            };
+            tok_lst__OUQC=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__TUHH)->item__PY3;
+            __tmp__DXQC=((__LINKED_LISToSTRING_CONSTANTo *)tok_lst__OUQC)->parent_linked_collection__LD.upper__MED;
+            Self__SAFG= 1;
+            while ((Self__SAFG <= __tmp__DXQC)) {
+              if (((void *)item__Q2ND(tok_lst__OUQC,Self__SAFG) == (void *)NULL)) {
+                append__ROS(current_list__2B,tok__NUQC);
+                append__ROS(file_list__0B,tok__NUQC);
               } else {
-                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__L1EG=(__INTEGER)(Self__L1EG +  1);
-            };
-          } else {
-            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__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__RUHH <  0)) {
-            result__RUHH=(__INTEGER)(~ result__RUHH);
-          };
-          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__HWDC != (void *)NULL)) {
-            print__DID((&__string_223));
-            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);
+                append__ROS(current_list__2B,item__Q2ND(tok_lst__OUQC,Self__SAFG));
+                append__ROS(file_list__0B,item__Q2ND(tok_lst__OUQC,Self__SAFG));
+              };
+              Self__SAFG=(__INTEGER)(Self__SAFG +  1);
+            };
+          } else {
+            append__ROS(current_list__2B,tok__NUQC);
+            add_last__GOT(current_list__2B,'\n');
+            append__ROS(file_list__0B,tok__NUQC);
+            add_last__GOT(file_list__0B,'\n');
+          };
+          Self__LZDC=((__HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *)prototype_dico__5TS);
+          k__MZDC=tok__NUQC;
+          Self__N1HH=((__STRING_CONSTANT *)tok__NUQC);
+          result__M1HH= 0;
+          __tmp__O1HH=Self__N1HH->count__DD;
+          Self__P1HH= 1;
+          while ((Self__P1HH <= __tmp__O1HH)) {
+            result__M1HH=(__INTEGER)((__INTEGER)( 5 * result__M1HH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__N1HH->storage__FRO)[(__INTEGER)(Self__P1HH -  1)])));
+            Self__P1HH=(__INTEGER)(Self__P1HH +  1);
+          };
+          if ((result__M1HH <  0)) {
+            result__M1HH=(__INTEGER)(~ result__M1HH);
+          };
+          node__VZDC=((void **)Self__LZDC->buckets__4PBC)[(__INTEGER)(result__M1HH % Self__LZDC->capacity__ZPBC)];
+          while ((! (((void *)node__VZDC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__VZDC)->key__KQBC == (void *)k__MZDC)))) {
+            node__VZDC=((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__VZDC)->next__VQBC;
+          };
+          if (((void *)node__VZDC != (void *)NULL)) {
+            print__DJD((&__string_223));
+            Self__BBFG=((__HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *)prototype_dico__5TS);
+            k__CBFG=tok__NUQC;
+            Self__S1HH=((__STRING_CONSTANT *)tok__NUQC);
+            result__R1HH= 0;
+            __tmp__T1HH=Self__S1HH->count__DD;
+            Self__U1HH= 1;
+            while ((Self__U1HH <= __tmp__T1HH)) {
+              result__R1HH=(__INTEGER)((__INTEGER)( 5 * result__R1HH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__S1HH->storage__FRO)[(__INTEGER)(Self__U1HH -  1)])));
+              Self__U1HH=(__INTEGER)(Self__U1HH +  1);
+            };
+            if ((result__R1HH <  0)) {
+              result__R1HH=(__INTEGER)(~ result__R1HH);
+            };
+            node__MBFG=((void **)Self__BBFG->buckets__4PBC)[(__INTEGER)(result__R1HH % Self__BBFG->capacity__ZPBC)];
+            while (((void *)((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__MBFG)->key__KQBC != (void *)k__CBFG)) {
+              node__MBFG=((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__MBFG)->next__VQBC;
+            };
+            print__DJD(((__PROTOTYPE *)((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__MBFG)->item__XBHD)->filename__XRG);
             fputc((int)('\n'),stdout);
-            __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;
+            __tmp__SYQC=item__A3PE(dir__PUQC,Self__1Q3D);
+            if (((struct ___OBJ *)__tmp__SYQC)->__id==__DIRECTORY_UNIX__) {
+              __tmp__TYQC=((__DIRECTORY_UNIX *)__tmp__SYQC)->parent_entry_unix__GGD.parent_entry__FGD.path__BD;
             } else {
-              __tmp__FVQC=((__FILE_UNIX *)__tmp__EVQC)->parent_entry_unix__DBF.parent_entry__FFD.path__BD;
+              __tmp__TYQC=((__FILE_UNIX *)__tmp__SYQC)->parent_entry_unix__HEF.parent_entry__FGD.path__BD;
             };
-            print__DID(__tmp__FVQC);
+            print__DJD(__tmp__TYQC);
             fputc((int)('\n'),stdout);
             exit(( 1));
           };
-          __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;
+          __tmp__XYQC=item__A3PE(dir__PUQC,Self__1Q3D);
+          if (((struct ___OBJ *)__tmp__XYQC)->__id==__DIRECTORY_UNIX__) {
+            __tmp__YYQC=((__DIRECTORY_UNIX *)__tmp__XYQC)->parent_entry_unix__GGD.parent_entry__FGD.path__BD;
           } else {
-            __tmp__KVQC=((__FILE_UNIX *)__tmp__JVQC)->parent_entry_unix__DBF.parent_entry__FFD.path__BD;
+            __tmp__YYQC=((__FILE_UNIX *)__tmp__XYQC)->parent_entry_unix__HEF.parent_entry__FGD.path__BD;
           };
-          proto_input__BI=create__name__generic_count__JBC(__tmp__KVQC,tok__5QQC);
+          proto_input__BI=create__name__generic_count__JBC(__tmp__YYQC,tok__NUQC);
           go_on__SBC(proto_input__BI);
           if (is_shorter__LZ) {
-            save_file__with__3DC(add_ext__L5E(tok__5QQC),output_code__SI);
+            save_file__with__3DC(add_ext__PCF(tok__NUQC),output_code__SI);
           };
         };
       };
-      Self__NN3D=(__INTEGER)(Self__NN3D +  1);
+      Self__1Q3D=(__INTEGER)(Self__1Q3D +  1);
     };
     if ((((__STRING *)current_list__2B)->count__EGC !=  0)) {
-      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);
+      Self__W1HH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
+      result__01HH= 0;
+      __tmp__21HH=((__STRING_CONSTANT *)(&__string_154))->count__DD;
+      Self__31HH= 1;
+      while ((Self__31HH <= __tmp__21HH)) {
+        result__01HH=(__INTEGER)((__INTEGER)( 5 * result__01HH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_154))->storage__FRO)[(__INTEGER)(Self__31HH -  1)])));
+        Self__31HH=(__INTEGER)(Self__31HH +  1);
+      };
+      if ((result__01HH <  0)) {
+        result__01HH=(__INTEGER)(~ result__01HH);
+      };
+      node__Y1HH=((void **)Self__W1HH->buckets__PDT)[(__INTEGER)(result__01HH % Self__W1HH->capacity__KDT)];
+      while ((! (((void *)node__Y1HH == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__Y1HH)->key__1DT == (void *)(&__string_154))))) {
+        node__Y1HH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__Y1HH)->next__GET;
+      };
+      if (((void *)node__Y1HH != (void *)NULL)) {
+        Self__VUHH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
+        result__51HH= 0;
+        __tmp__B2HH=((__STRING_CONSTANT *)(&__string_154))->count__DD;
+        Self__C2HH= 1;
+        while ((Self__C2HH <= __tmp__B2HH)) {
+          result__51HH=(__INTEGER)((__INTEGER)( 5 * result__51HH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_154))->storage__FRO)[(__INTEGER)(Self__C2HH -  1)])));
+          Self__C2HH=(__INTEGER)(Self__C2HH +  1);
+        };
+        if ((result__51HH <  0)) {
+          result__51HH=(__INTEGER)(~ result__51HH);
+        };
+        node__XUHH=((void **)Self__VUHH->buckets__PDT)[(__INTEGER)(result__51HH % Self__VUHH->capacity__KDT)];
+        while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__XUHH)->key__1DT != (void *)(&__string_154))) {
+          node__XUHH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__XUHH)->next__GET;
+        };
+        tok__NUQC=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__XUHH)->item__PY3)->first_link__3WEC)->item__V0HD;
+        Self__F3BD=((__STRING *)current_list__2B);
+        i__H3BD=Self__F3BD->count__EGC;
+        j__I3BD=((__STRING_CONSTANT *)tok__NUQC)->count__DD;
+        resize__AYZ(Self__F3BD,(__INTEGER)(i__H3BD + j__I3BD));
+        if (((i__H3BD >  0) && (j__I3BD >  0))) {
+          move__to__by__0YCC(Self__F3BD->storage__RCS, 0,(__INTEGER)(i__H3BD -  1),j__I3BD);
+        };
+        Self__DNEB=((__CHARACTER *)Self__F3BD->storage__RCS);
+        model__ENEB=((__STRING_CONSTANT *)tok__NUQC)->storage__FRO;
+        Self__YDKB=(__INTEGER)(j__I3BD -  1);
+        while ((Self__YDKB >=  0)) {
+          Self__DNEB[Self__YDKB]=((__CHARACTER *)model__ENEB)[Self__YDKB];
+          Self__YDKB=(__INTEGER)(Self__YDKB -  1);
+        };
+      };
+      Self__E2HH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
+      result__I2HH= 0;
+      __tmp__K2HH=((__STRING_CONSTANT *)(&__string_156))->count__DD;
+      Self__L2HH= 1;
+      while ((Self__L2HH <= __tmp__K2HH)) {
+        result__I2HH=(__INTEGER)((__INTEGER)( 5 * result__I2HH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_156))->storage__FRO)[(__INTEGER)(Self__L2HH -  1)])));
+        Self__L2HH=(__INTEGER)(Self__L2HH +  1);
+      };
+      if ((result__I2HH <  0)) {
+        result__I2HH=(__INTEGER)(~ result__I2HH);
+      };
+      node__G2HH=((void **)Self__E2HH->buckets__PDT)[(__INTEGER)(result__I2HH % Self__E2HH->capacity__KDT)];
+      while ((! (((void *)node__G2HH == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__G2HH)->key__1DT == (void *)(&__string_156))))) {
+        node__G2HH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__G2HH)->next__GET;
+      };
+      if (((void *)node__G2HH != (void *)NULL)) {
+        Self__2UHH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
+        result__N2HH= 0;
+        __tmp__P2HH=((__STRING_CONSTANT *)(&__string_156))->count__DD;
+        Self__Q2HH= 1;
+        while ((Self__Q2HH <= __tmp__P2HH)) {
+          result__N2HH=(__INTEGER)((__INTEGER)( 5 * result__N2HH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_156))->storage__FRO)[(__INTEGER)(Self__Q2HH -  1)])));
+          Self__Q2HH=(__INTEGER)(Self__Q2HH +  1);
+        };
+        if ((result__N2HH <  0)) {
+          result__N2HH=(__INTEGER)(~ result__N2HH);
+        };
+        node__4UHH=((void **)Self__2UHH->buckets__PDT)[(__INTEGER)(result__N2HH % Self__2UHH->capacity__KDT)];
+        while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__4UHH)->key__1DT != (void *)(&__string_156))) {
+          node__4UHH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__4UHH)->next__GET;
+        };
+        tok__NUQC=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__4UHH)->item__PY3)->first_link__3WEC)->item__V0HD;
+        append__ROS(current_list__2B,tok__NUQC);
+      };
+      copy__JDS(string_tmp__VH,((__DIRECTORY_UNIX *)__tmp__4UQC)->parent_entry_unix__GGD.parent_entry__FGD.path__BD);
+      Self__B42=((__STRING *)string_tmp__VH);
+      if ((n__LUQC > Self__B42->count__EGC)) {
+        Self__B42->count__EGC= 0;
+      } else {
+        if ((n__LUQC >  0)) {
+          len__DJT=(__INTEGER)((__INTEGER)(n__LUQC -  1) +  1);
+          if ((len__DJT >  0)) {
+            __tmp__AKT=(__INTEGER)(n__LUQC +  1);
+            __tmp__BKT=Self__B42->count__EGC;
+            Self__IYEB=__tmp__AKT;
+            while ((Self__IYEB <= __tmp__BKT)) {
+              ((__CHARACTER *)Self__B42->storage__RCS)[(__INTEGER)((__INTEGER)(Self__IYEB - len__DJT) -  1)]=((__CHARACTER *)Self__B42->storage__RCS)[(__INTEGER)(Self__IYEB -  1)];
+              Self__IYEB=(__INTEGER)(Self__IYEB +  1);
+            };
+            Self__B42->count__EGC=(__INTEGER)(Self__B42->count__EGC - len__DJT);
           };
         };
       };
       if ((((__STRING *)string_tmp__VH)->count__EGC !=  0)) {
-        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);
+        Self__XQS=((__STRING *)string_tmp__VH);
+        __tmp__2QS=Self__XQS->storage__RCS;
+        __tmp__5QS=(__INTEGER)(Self__XQS->count__EGC -  1);
+        Self__QOBC=((__CHARACTER *)__tmp__2QS);
+        Self__QVIC=__tmp__5QS;
+        while ((Self__QVIC >=  0)) {
+          if (('/' == Self__QOBC[Self__QVIC])) {
+            Self__QOBC[Self__QVIC]='-';
+          };
+          Self__QVIC=(__INTEGER)(Self__QVIC -  1);
+        };
+        tok__NUQC=get__YWB(string_tmp__VH);
+        Self__S2HH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
+        result__W2HH= 0;
+        __tmp__Y2HH=((__STRING_CONSTANT *)(&__string_152))->count__DD;
+        Self__Z2HH= 1;
+        while ((Self__Z2HH <= __tmp__Y2HH)) {
+          result__W2HH=(__INTEGER)((__INTEGER)( 5 * result__W2HH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_152))->storage__FRO)[(__INTEGER)(Self__Z2HH -  1)])));
+          Self__Z2HH=(__INTEGER)(Self__Z2HH +  1);
+        };
+        if ((result__W2HH <  0)) {
+          result__W2HH=(__INTEGER)(~ result__W2HH);
+        };
+        node__U2HH=((void **)Self__S2HH->buckets__PDT)[(__INTEGER)(result__W2HH % Self__S2HH->capacity__KDT)];
+        while ((! (((void *)node__U2HH == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__U2HH)->key__1DT == (void *)(&__string_152))))) {
+          node__U2HH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__U2HH)->next__GET;
+        };
+        if (((void *)node__U2HH != (void *)NULL)) {
+          Self__RX3=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
+          result__12HH= 0;
+          __tmp__32HH=((__STRING_CONSTANT *)(&__string_152))->count__DD;
+          Self__42HH= 1;
+          while ((Self__42HH <= __tmp__32HH)) {
+            result__12HH=(__INTEGER)((__INTEGER)( 5 * result__12HH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_152))->storage__FRO)[(__INTEGER)(Self__42HH -  1)])));
+            Self__42HH=(__INTEGER)(Self__42HH +  1);
+          };
+          if ((result__12HH <  0)) {
+            result__12HH=(__INTEGER)(~ result__12HH);
+          };
+          node__2X3=((void **)Self__RX3->buckets__PDT)[(__INTEGER)(result__12HH % Self__RX3->capacity__KDT)];
+          while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__2X3)->key__1DT != (void *)(&__string_152))) {
+            node__2X3=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__2X3)->next__GET;
+          };
+          tok_lst__OUQC=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__2X3)->item__PY3;
+          __tmp__R1QC=((__LINKED_LISToSTRING_CONSTANTo *)tok_lst__OUQC)->parent_linked_collection__LD.upper__MED;
+          Self__5FSE= 1;
+          while ((Self__5FSE <= __tmp__R1QC)) {
+            if (((void *)item__Q2ND(tok_lst__OUQC,Self__5FSE) == (void *)NULL)) {
+              append__ROS(directory_list__YB,tok__NUQC);
             } else {
-              append__FLS(directory_list__YB,item__CZND(tok_lst__ARQC,Self__LBSE));
+              append__ROS(directory_list__YB,item__Q2ND(tok_lst__OUQC,Self__5FSE));
             };
-            Self__LBSE=(__INTEGER)(Self__LBSE +  1);
+            Self__5FSE=(__INTEGER)(Self__5FSE +  1);
           };
         } else {
-          append__FLS(directory_list__YB,tok__5QQC);
-          add_last__3IT(directory_list__YB,'\n');
+          append__ROS(directory_list__YB,tok__NUQC);
+          add_last__GOT(directory_list__YB,'\n');
         };
-        save_file__with__3DC(add_ext__L5E(tok__5QQC),current_list__2B);
+        save_file__with__3DC(add_ext__PCF(tok__NUQC),current_list__2B);
         ((__STRING *)current_list__2B)->count__EGC= 0;
       };
     };
   };
 }
 
-static void* add_ext__L5E(void *n__N5E)
+static void* add_ext__PCF(void *n__RCF)
 // ({NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER result__E3HH,__tmp__G3HH,Self__H3HH,result__J3HH;
+  __INTEGER __tmp__L3HH,Self__M3HH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__A3HH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__OYFH;
+  void *node__C3HH,*node__QYFH;
+  copy__JDS(string_tmp__VH,n__RCF);
+  Self__A3HH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
+  result__E3HH= 0;
+  __tmp__G3HH=((__STRING_CONSTANT *)(&__string_116))->count__DD;
+  Self__H3HH= 1;
+  while ((Self__H3HH <= __tmp__G3HH)) {
+    result__E3HH=(__INTEGER)((__INTEGER)( 5 * result__E3HH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_116))->storage__FRO)[(__INTEGER)(Self__H3HH -  1)])));
+    Self__H3HH=(__INTEGER)(Self__H3HH +  1);
+  };
+  if ((result__E3HH <  0)) {
+    result__E3HH=(__INTEGER)(~ result__E3HH);
+  };
+  node__C3HH=((void **)Self__A3HH->buckets__PDT)[(__INTEGER)(result__E3HH % Self__A3HH->capacity__KDT)];
+  while ((! (((void *)node__C3HH == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__C3HH)->key__1DT == (void *)(&__string_116))))) {
+    node__C3HH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__C3HH)->next__GET;
+  };
+  if (((void *)node__C3HH != (void *)NULL)) {
+    Self__OYFH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
+    result__J3HH= 0;
+    __tmp__L3HH=((__STRING_CONSTANT *)(&__string_116))->count__DD;
+    Self__M3HH= 1;
+    while ((Self__M3HH <= __tmp__L3HH)) {
+      result__J3HH=(__INTEGER)((__INTEGER)( 5 * result__J3HH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_116))->storage__FRO)[(__INTEGER)(Self__M3HH -  1)])));
+      Self__M3HH=(__INTEGER)(Self__M3HH +  1);
+    };
+    if ((result__J3HH <  0)) {
+      result__J3HH=(__INTEGER)(~ result__J3HH);
+    };
+    node__QYFH=((void **)Self__OYFH->buckets__PDT)[(__INTEGER)(result__J3HH % Self__OYFH->capacity__KDT)];
+    while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__QYFH)->key__1DT != (void *)(&__string_116))) {
+      node__QYFH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__QYFH)->next__GET;
+    };
+    append__ROS(string_tmp__VH,((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__QYFH)->item__PY3)->first_link__3WEC)->item__V0HD);
   } else {
-    append__FLS(string_tmp__VH,(&__string_224));
+    append__ROS(string_tmp__VH,(&__string_224));
   };
   return(get__YWB(string_tmp__VH));
 }
@@ -14122,346 +14150,347 @@ static void* add_ext__L5E(void *n__N5E)
 static void save_file__with__3DC(void *n__5DC,void *buf__AEC)
 // ({NULLxSTRING_CONSTANT},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __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;
+  __STRING *Self__SYFH,*Self__TET,*Self__HYS;
+  void *result__Q1AC,*__tmp__A2AC,*__tmp__BGC,*file__CEC;
+  void *__tmp__JAIC;
+  __POINTER stream__XHIC,ptr__CMPF;
+  void *__tmp__51AC;
+  __FILE_UNIX *Self__S13G,*Self__1HUE,*Self__EJUE;
   __INTEGER __tmp__GGC;
-  __BOOLEAN __tmp__XEC,result__LEIC;
+  __BOOLEAN __tmp__XEC,result__ZHIC;
   if (((void *)output_name__DI != (void *)NULL)) {
-    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)] != '/')) {
+    copy__JDS(string_tmp__VH,output_name__DI);
+    Self__SYFH=((__STRING *)string_tmp__VH);
+    if ((((__CHARACTER *)Self__SYFH->storage__RCS)[(__INTEGER)(Self__SYFH->count__EGC -  1)] != '/')) {
       __tmp__XEC=TRUE__;
     } else {
-      Self__HBT=((__STRING *)string_tmp__VH);
-      __tmp__XEC=(((__CHARACTER *)Self__HBT->storage__F5R)[(__INTEGER)(Self__HBT->count__EGC -  1)] != '\\');
+      Self__TET=((__STRING *)string_tmp__VH);
+      __tmp__XEC=(((__CHARACTER *)Self__TET->storage__RCS)[(__INTEGER)(Self__TET->count__EGC -  1)] != '\\');
     };
     if (__tmp__XEC) {
-      add_last__3IT(string_tmp__VH,'/');
+      add_last__GOT(string_tmp__VH,'/');
     };
   } else {
     ((__STRING *)string_tmp__VH)->count__EGC= 0;
   };
-  append__FLS(string_tmp__VH,n__5DC);
-  if (FILE_SYSTEM__->parent_directory__2FD==0) {
+  append__ROS(string_tmp__VH,n__5DC);
+  if (FILE_SYSTEM__->parent_directory__2GD==0) {
   } else {
-    parent_directory__1ED();
+    parent_directory__1FD();
   };
-  result__EYAC=NULL;
-  if (FILE_SYSTEM__->parent_directory__2FD==0) {
+  result__Q1AC=NULL;
+  if (FILE_SYSTEM__->parent_directory__2GD==0) {
   } else {
-    parent_directory__1ED();
+    parent_directory__1FD();
   };
-  if (FILE_SYSTEM__->parent_directory__2FD==0) {
-    __tmp__12HC=FILE_SYSTEM__->parent_directory__1FD;
+  if (FILE_SYSTEM__->parent_directory__2GD==0) {
+    __tmp__JAIC=FILE_SYSTEM__->parent_directory__1GD;
   } else {
-    __tmp__12HC=parent_directory__1ED();
+    __tmp__JAIC=parent_directory__1FD();
   };
-  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) {
+  copy__JDS(string_tmp__AGD,((__DIRECTORY_UNIX *)__tmp__JAIC)->parent_entry_unix__GGD.parent_entry__FGD.path__BD);
+  if (FILE_SYSTEM__->parent_directory__2GD==0) {
   } else {
-    parent_directory__1ED();
+    parent_directory__1FD();
   };
-  add_last__3IT(string_tmp__AFD,'/');
-  if (FILE_SYSTEM__->parent_directory__2FD==0) {
+  add_last__GOT(string_tmp__AGD,'/');
+  if (FILE_SYSTEM__->parent_directory__2GD==0) {
   } else {
-    parent_directory__1ED();
+    parent_directory__1FD();
   };
-  append__FLS(string_tmp__AFD,string_tmp__VH);
-  if (FILE_SYSTEM__->parent_directory__2FD==0) {
+  append__ROS(string_tmp__AGD,string_tmp__VH);
+  if (FILE_SYSTEM__->parent_directory__2GD==0) {
   } else {
-    parent_directory__1ED();
+    parent_directory__1FD();
   };
-  if (FILE_SYSTEM__->parent_directory__2FD==0) {
+  if (FILE_SYSTEM__->parent_directory__2GD==0) {
   } else {
-    parent_directory__1ED();
+    parent_directory__1FD();
   };
-  reduce_path__K3HC(string_tmp__AFD);
-  if (FILE_SYSTEM__->parent_directory__2FD==0) {
+  reduce_path__YAIC(string_tmp__AGD);
+  if (FILE_SYSTEM__->parent_directory__2GD==0) {
   } else {
-    parent_directory__1ED();
+    parent_directory__1FD();
   };
-  if (FILE_SYSTEM__->parent_directory__2FD==0) {
+  if (FILE_SYSTEM__->parent_directory__2GD==0) {
   } else {
-    parent_directory__1ED();
+    parent_directory__1FD();
   };
-  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';
+  result__ZHIC=FALSE__;
+  Self__HYS=((__STRING *)string_tmp__AGD);
+  if ((Self__HYS->capacity__ICS > Self__HYS->count__EGC)) {
+    ((__CHARACTER *)Self__HYS->storage__RCS)[Self__HYS->count__EGC]='\0';
   } else {
-    add_last__3IT(Self__1US,'\0');
-    Self__1US->count__EGC=(__INTEGER)(Self__1US->count__EGC -  1);
+    add_last__GOT(Self__HYS,'\0');
+    Self__HYS->count__EGC=(__INTEGER)(Self__HYS->count__EGC -  1);
   };
-  stream__JEIC=((__POINTER )(fopen((char*)(Self__1US->storage__F5R),"w+b")));
-  if ((stream__JEIC != (void *)NULL)) {
-    result__LEIC=(((__INTEGER )(fclose((FILE*)(stream__JEIC)))) ==  0);
+  stream__XHIC=((__POINTER )(fopen((char*)(Self__HYS->storage__RCS),"w+b")));
+  if ((stream__XHIC != (void *)NULL)) {
+    result__ZHIC=(((__INTEGER )(fclose((FILE*)(stream__XHIC)))) ==  0);
   };
-  if (result__LEIC) {
-    if (FILE_SYSTEM__->parent_directory__2FD==0) {
+  if (result__ZHIC) {
+    if (FILE_SYSTEM__->parent_directory__2GD==0) {
     } else {
-      parent_directory__1ED();
+      parent_directory__1FD();
     };
-    if (FILE_SYSTEM__->parent_directory__2FD==0) {
+    if (FILE_SYSTEM__->parent_directory__2GD==0) {
     } else {
-      parent_directory__1ED();
+      parent_directory__1FD();
     };
-    __tmp__TYAC=get_entry__GZAC(string_tmp__AFD);
-    if (__tmp__TYAC==NULL) {
-      __tmp__UYAC=NULL;
+    __tmp__51AC=get_entry__S2AC(string_tmp__AGD);
+    if (__tmp__51AC==NULL) {
+      __tmp__A2AC=NULL;
     } else {
-      switch (((struct ___OBJ *)__tmp__TYAC)->__id) {
+      switch (((struct ___OBJ *)__tmp__51AC)->__id) {
       case __DIRECTORY_UNIX__: {
-        __tmp__UYAC=NULL;
+        __tmp__A2AC=NULL;
       } break;
       case __FILE_UNIX__: {
-        __tmp__UYAC=((void *)__tmp__TYAC);
+        __tmp__A2AC=((void *)__tmp__51AC);
       } break;
       }
     };
-    result__EYAC=__tmp__UYAC;
+    result__Q1AC=__tmp__A2AC;
   };
-  if (((void *)result__EYAC == (void *)NULL)) {
-    put_string__L0F((&__string_225));
-    put_string__L0F(string_tmp__VH);
-    put_string__L0F((&__string_226));
+  if (((void *)result__Q1AC == (void *)NULL)) {
+    put_string__P3F((&__string_225));
+    put_string__P3F(string_tmp__VH);
+    put_string__P3F((&__string_226));
     exit(( 1));
   };
-  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));
+  Self__S13G=((__FILE_UNIX *)result__Q1AC);
+  Self__S13G->stream__4KRD=((__POINTER )(fopen((char*)(((__STRING_CONSTANT *)Self__S13G->parent_entry_unix__HEF.parent_entry__FGD.path__BD)->storage__FRO),"r+b")));
+  if ((! (Self__S13G->stream__4KRD != (void *)NULL))) {
+    put_string__P3F((&__string_225));
+    put_string__P3F(string_tmp__VH);
+    put_string__P3F((&__string_227));
     exit(( 1));
   };
-  if (result__EYAC==NULL) {
+  if (result__Q1AC==NULL) {
     __tmp__BGC=NULL;
   } else {
-    __tmp__BGC=((void *)result__EYAC);
+    __tmp__BGC=((void *)result__Q1AC);
   };
   file__CEC=__tmp__BGC;
   __tmp__GGC=((__STRING *)buf__AEC)->count__EGC;
-  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;
+  Self__1HUE=((__FILE_UNIX *)__tmp__BGC);
+  ptr__CMPF=((__POINTER )((__UINTEGER_8 *)((__STRING *)buf__AEC)->storage__RCS));
+  ptr__CMPF=(void *)((unsigned long)ptr__CMPF - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 0)));
+  fwrite((void *)((((__UINTEGER_8 *)ptr__CMPF))),(size_t)(1), (size_t)((__tmp__GGC)),(FILE*)((Self__1HUE->stream__4KRD)));
+  Self__EJUE=((__FILE_UNIX *)__tmp__BGC);
+  fclose((FILE*)((Self__EJUE->stream__4KRD)));
+  Self__EJUE->stream__4KRD=NULL;
 }
 
-static void resize__UUZ(__STRING *Self__VUZ,__INTEGER new_count__WUZ)
+static void resize__AYZ(__STRING *Self__BYZ,__INTEGER new_count__CYZ)
 // ({STRING},{INTEGER}) VoidNo recursive, No inlinable.
 {
-  __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;
+  __INTEGER old_nb_elts__EIEH,upper__DVHH,Self__BVHH,lower__HT3C;
+  __INTEGER upper__IT3C,Self__FYDD;
+  __CHARACTER *Self__DIEH,*new__GIEH,*Self__GT3C;
+  if ((! (new_count__CYZ <= Self__BYZ->count__EGC))) {
+    if ((Self__BYZ->capacity__ICS < new_count__CYZ)) {
+      if ((Self__BYZ->capacity__ICS ==  0)) {
+        Self__BYZ->storage__RCS=create__JMEB(new_count__CYZ);
+      } else {
+        Self__DIEH=((__CHARACTER *)Self__BYZ->storage__RCS);
+        old_nb_elts__EIEH=Self__BYZ->capacity__ICS;
+        new__GIEH=((__CHARACTER *)realloc_dynamic__old_size__new_size__ZHLC(((__POINTER )Self__DIEH),((__UINTEGER_32 )old_nb_elts__EIEH),((__UINTEGER_32 )new_count__CYZ)));
+        upper__DVHH=(__INTEGER)(new_count__CYZ -  1);
+        Self__BVHH=old_nb_elts__EIEH;
+        while ((Self__BVHH <= upper__DVHH)) {
+          new__GIEH[Self__BVHH]='\0';
+          Self__BVHH=(__INTEGER)(Self__BVHH +  1);
+        };
+        Self__BYZ->storage__RCS=new__GIEH;
+      };
+      Self__BYZ->capacity__ICS=new_count__CYZ;
+    } else {
+      Self__GT3C=((__CHARACTER *)Self__BYZ->storage__RCS);
+      lower__HT3C=Self__BYZ->count__EGC;
+      upper__IT3C=(__INTEGER)(new_count__CYZ -  1);
+      Self__FYDD=lower__HT3C;
+      while ((Self__FYDD <= upper__IT3C)) {
+        Self__GT3C[Self__FYDD]='\0';
+        Self__FYDD=(__INTEGER)(Self__FYDD +  1);
+      };
+    };
+  };
+  Self__BYZ->count__EGC=new_count__CYZ;
 }
 
-static void move__to__by__MVCC(__CHARACTER *Self__NVCC,__INTEGER lower__OVCC,__INTEGER upper__PVCC,__INTEGER offset__QVCC)
+static void move__to__by__0YCC(__CHARACTER *Self__1YCC,__INTEGER lower__2YCC,__INTEGER upper__3YCC,__INTEGER offset__4YCC)
 // ({NATIVE_ARRAYoExpanded_CHARACTERo},{INTEGER},{INTEGER},{INTEGER}) VoidNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER Self__EOHD,Self__TOHD;
+  if ((offset__4YCC !=  0)) {
+    if ((offset__4YCC <  0)) {
+      Self__EOHD=lower__2YCC;
+      while ((Self__EOHD <= upper__3YCC)) {
+        Self__1YCC[(__INTEGER)(Self__EOHD + offset__4YCC)]=Self__1YCC[Self__EOHD];
+        Self__EOHD=(__INTEGER)(Self__EOHD +  1);
       };
     } else {
-      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);
+      Self__TOHD=upper__3YCC;
+      while ((Self__TOHD >= lower__2YCC)) {
+        Self__1YCC[(__INTEGER)(Self__TOHD + offset__4YCC)]=Self__1YCC[Self__TOHD];
+        Self__TOHD=(__INTEGER)(Self__TOHD -  1);
       };
     };
   };
 }
 
-static __BOOLEAN __infix_equal_equal__02DB(__STRING_CONSTANT *Self__12DB,void *other__22DB)
+static __BOOLEAN __infix_equal_equal__GAEB(__STRING_CONSTANT *Self__HAEB,void *other__IAEB)
 // ({STRING_CONSTANT},{NULLxSTRING_CONSTANTxSTRING}) With resultNo recursive, No inlinable.
 {
-  __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;
+  __INTEGER __tmp__RAEB,__tmp__SAEB,i__W4IH;
+  __BOOLEAN result__KAEB;
+  __CHARACTER *__tmp__DBEB,*__tmp__EBEB,*Self__X4IH,*other__Y4IH;
+  result__KAEB=FALSE__;
+  __tmp__RAEB=Self__HAEB->count__DD;
+  if (((struct ___OBJ *)other__IAEB)->__id==__STRING_CONSTANT__) {
+    __tmp__SAEB=((__STRING_CONSTANT *)other__IAEB)->count__DD;
   } else {
-    __tmp__G3DB=((__STRING *)other__22DB)->count__EGC;
+    __tmp__SAEB=((__STRING *)other__IAEB)->count__EGC;
   };
-  if ((__tmp__F3DB == __tmp__G3DB)) {
-    if ((Self__12DB->count__DD ==  0)) {
-      result__42DB=TRUE__;
+  if ((__tmp__RAEB == __tmp__SAEB)) {
+    if ((Self__HAEB->count__DD ==  0)) {
+      result__KAEB=TRUE__;
     } else {
-      __tmp__X3DB=Self__12DB->storage__ZNO;
-      if (((struct ___OBJ *)other__22DB)->__id==__STRING_CONSTANT__) {
-        __tmp__Y3DB=((__STRING_CONSTANT *)other__22DB)->storage__ZNO;
+      __tmp__DBEB=Self__HAEB->storage__FRO;
+      if (((struct ___OBJ *)other__IAEB)->__id==__STRING_CONSTANT__) {
+        __tmp__EBEB=((__STRING_CONSTANT *)other__IAEB)->storage__FRO;
       } else {
-        __tmp__Y3DB=((__STRING *)other__22DB)->storage__F5R;
+        __tmp__EBEB=((__STRING *)other__IAEB)->storage__RCS;
       };
-      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);
+      Self__X4IH=((__CHARACTER *)__tmp__DBEB);
+      other__Y4IH=__tmp__EBEB;
+      i__W4IH=(__INTEGER)(Self__HAEB->count__DD -  1);
+      while (((i__W4IH >=  0) && (Self__X4IH[i__W4IH] == ((__CHARACTER *)other__Y4IH)[i__W4IH]))) {
+        i__W4IH=(__INTEGER)(i__W4IH -  1);
       };
-      result__42DB=(i__XWIH <  0);
+      result__KAEB=(i__W4IH <  0);
     };
   };
-  return(result__42DB);
+  return(result__KAEB);
 }
 
-static void* at__MI4(__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__NI4,void *k__OI4)
+static void* at__0N4(__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__1N4,void *k__2N4)
 // ({HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo},{STRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER result__O3HH,__tmp__Q3HH,Self__R3HH;
+  void *node__GO4;
+  result__O3HH= 0;
+  __tmp__Q3HH=((__STRING_CONSTANT *)k__2N4)->count__DD;
+  Self__R3HH= 1;
+  while ((Self__R3HH <= __tmp__Q3HH)) {
+    result__O3HH=(__INTEGER)((__INTEGER)( 5 * result__O3HH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)k__2N4)->storage__FRO)[(__INTEGER)(Self__R3HH -  1)])));
+    Self__R3HH=(__INTEGER)(Self__R3HH +  1);
+  };
+  if ((result__O3HH <  0)) {
+    result__O3HH=(__INTEGER)(~ result__O3HH);
+  };
+  node__GO4=((void **)Self__1N4->buckets__PDT)[(__INTEGER)(result__O3HH % Self__1N4->capacity__KDT)];
+  while ((! __infix_equal_equal__GAEB(((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__GO4)->key__1DT,k__2N4))) {
+    node__GO4=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__GO4)->next__GET;
+  };
+  return(((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__GO4)->item__PY3);
 }
 
 static void go_on__SBC(void *obj__UBC)
 // ({NULLxPROTOTYPE}) VoidNo recursive, No inlinable.
 {
-  __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;
+  __POINTER ptr__5GG,ptr_table__14IH,next__04IH,result__24IH;
+  __POINTER ptr_table__A5IH,next__54IH,result__B5IH,ptr__F5IH;
+  __POINTER ptr_table__N5IH,next__M5IH,result__O5IH,ptr_table__S5IH;
+  __POINTER next__R5IH,result__T5IH,ptr__TKID,ptr_table__X5IH;
+  __POINTER next__W5IH,result__Y5IH,ptr_table__25IH,next__15IH;
+  __POINTER result__35IH,ptr__EAJH,ptr_table__QAJH,next__PAJH;
+  __POINTER result__RAJH,ptr_table__VAJH,next__UAJH,result__WAJH;
+  __POINTER ptr__LBJH,ptr_table__XBJH,next__WBJH,result__YBJH;
+  __POINTER ptr_table__2BJH,next__1BJH,result__3BJH,ptr__BCJH;
+  __POINTER ptr_table__NCJH,next__MCJH,result__OCJH,ptr_table__SCJH;
+  __POINTER next__RCJH,result__TCJH,ptr__XCJH,ptr_table__ADJH;
+  __POINTER next__5CJH,result__BDJH,ptr_table__FDJH,next__EDJH;
+  __POINTER result__GDJH,ptr__KDJH,ptr_table__TDJH,next__SDJH;
+  __POINTER result__UDJH,ptr_table__YDJH,next__XDJH,result__ZDJH;
+  __INTEGER typ_id__EHG,new_capacity__1HY,old_derive__3XC,start__U3HH;
+  __INTEGER end__T3HH,len__V3HH,__tmp__W3HH,__tmp__Y3HH,Self__Z3HH;
+  __INTEGER pos_sec__2XC,typ_id__G5IH,h__P3FC,idx__Q3FC,idx__JIID;
+  __INTEGER new_capacity__KIID,i__LIID,typ_id__YKID,old_pos__2XOB;
+  __INTEGER old_derive__3XOB,typ_id__FAJH,new_capacity__HPHC;
+  __INTEGER other_upper__GPHC,Self__BAXD,new_capacity__SXHC,__tmp__WYHC;
+  __INTEGER __tmp__ELTD,Self__EGYE,__tmp__LHHC,typ_id__MBJH;
+  __INTEGER typ_id__CCJH,typ_id__YCJH,typ_id__LDJH,start__33HH;
+  __INTEGER end__23HH,len__43HH,__tmp__53HH,__tmp__B4HH,Self__C4HH;
+  __INTEGER __tmp__VL3B,Self__32PC,start__G4HH,end__F4HH,len__H4HH;
+  __INTEGER __tmp__I4HH,__tmp__K4HH,Self__L4HH;
+  __UINTEGER_32 sz__BHG,a__IZFH,new_size__JZFH,t__NZFH,a__MZFH;
+  __UINTEGER_32 new_size__D5IH,lab_type__C5IH,sz__H5IH,a__I5IH;
+  __UINTEGER_32 new_size__J5IH,t__K5IH,a__L5IH,new_size__V5IH;
+  __UINTEGER_32 lab_type__U5IH,sz__VKID,a__5ZFH,new_size__A0FH,t__E0FH;
+  __UINTEGER_32 a__D0FH,new_size__55IH,lab_type__45IH,sz__GAJH,a__HAJH;
+  __UINTEGER_32 new_size__IAJH,t__JAJH,a__KAJH,new_size__YAJH;
+  __UINTEGER_32 lab_type__XAJH,sz__NBJH,a__OBJH,new_size__PBJH,t__QBJH;
+  __UINTEGER_32 a__RBJH,new_size__5BJH,lab_type__4BJH,sz__DCJH,a__ECJH;
+  __UINTEGER_32 new_size__FCJH,t__GCJH,a__HCJH,new_size__VCJH;
+  __UINTEGER_32 lab_type__UCJH,sz__ZCJH,a__0CJH,new_size__1CJH,t__2CJH;
+  __UINTEGER_32 a__3CJH,new_size__IDJH,lab_type__HDJH,sz__MDJH,a__NDJH;
+  __UINTEGER_32 new_size__ODJH,t__PDJH,a__QDJH,new_size__1DJH;
+  __UINTEGER_32 lab_type__0DJH;
+  __STRING *Self__X3HH,*Self__A4HH,*Self__J4HH;
+  __POSITION pos__KEWG,pos__MEWG,pos__OEWG,pos__ZEWG,pos__1EWG;
+  __POSITION pos__4EWG,pos__AFWG,p__MAJH,__tmp__3HHC,__tmp__KIHC;
+  __POSITION pos__PJWG,pos__RJWG,pos__TJWG,pos__VJWG,pos__M4ID;
+  __POSITION pos__3JWG,__tmp__GJBD,__tmp__OJBD,__tmp__CKBD,__tmp__LKBD;
+  __POSITION pos__HKWG,__tmp__RBPB,__tmp__TBPB,pos__CLWG,pos__ELWG;
+  void *n__ITOB,*__tmp__C2OB,*n__ZIBD,*__tmp__I3OB,*__tmp__Y3OB;
+  void *__tmp__GBPB,*__tmp__NHZB;
+  __SECTION_ *Self__153G,*Self__253G,*result__E5IH,*Self__RFWG;
+  __SECTION_ *Self__TD4G,*Self__UD4G;
+  void *__tmp__E3C,*s__4XOB,*result__HDZB,*__tmp__N1OB,*__tmp__4K3B;
+  void *s__LHZB,*__tmp__1HZB;
+  void *__tmp__G3C,*result__0TEC,*result__EXOB,*sec__0IBD;
+  void *t__YXOB;
+  void *arg__GDZB,*__tmp__KHHC,*__tmp__2HHC,*__tmp__JIHC;
+  __ITM_ARG *result__DAJH,*Self__LAJH,*result__KBJH,*Self__SBJH;
+  __ITM_SLOT_OPERATOR *Self__BHHC,*Self__RBGC,*Self__MJHC;
+  void *tm__TBGC,*__tmp__2BGC;
+  void *expr__RK3B;
+  void *__tmp__5K3B;
+  __ITM_SLOT *result__ACJH,*Self__ICJH;
+  __ITM_PROTOTYPE *result__WCJH;
+  __ITM_READ_ARG1 *result__JDJH;
+  __PROTOTYPE *Self__KHZB;
+  __HASHED_SEToSTRING_CONSTANTo *result__4GG,*Self__MIT,*Self__QL3B;
+  void *t__FYC,*k__PTEC,*k__I3FC,*lt__ZXOB;
+  __BOOLEAN result__WCLH,result__YCLH,result__0CE,result__WGEB;
+  __BOOLEAN __tmp__DHEB,result__BG5,result__OZFH,result__A05;
+  __BOOLEAN __tmp__1IEB,result__VVAB,__tmp__2IEB,__tmp__5IEB,__tmp__X3C;
+  __BOOLEAN __tmp__M3C,result__XXOB,result__AAJH,result__ZAJH;
+  __BOOLEAN __tmp__XEZB,result__2AJH,__tmp__AYHC,__tmp__PHHC;
+  __BOOLEAN result__BBJH,__tmp__JZOB,result__EBJH,result__HBJH;
+  __BOOLEAN result__2DJH,__tmp__25OB,__tmp__35OB;
+  __CHARACTER result__K43G,result__P43G,result__U43G,result__Z43G;
+  __CHARACTER result__443G,result__H53G,result__M53G,result__R53G;
+  __CHARACTER result__W53G,affect__1XOB,style__0XOB,result__BAJH;
+  __CHARACTER result__0AJH,result__3AJH,result__CBJH,result__FBJH;
+  __CHARACTER result__IBJH,result__3DJH,result__4D4G,result__HE4G;
+  __CHARACTER result__ME4G,result__RE4G,result__CF4G;
+  __HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *Self__OTEC;
+  __HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *Self__G3FC;
+  void *node__ZTEC,*node__R3FC,*node1__NIID,*node2__OIID,*__tmp__54FC;
+  void **old_buckets__MIID;
+  __HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *result__SKID;
+  __HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *Self__DGTD;
+  void *result__3V1B,*result__5V4B,*larg__1IBD;
+  __FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *Self__NHZC,*Self__DIZC;
+  __FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *Self__QXHC;
+  __FAST_ARRAYoITM_ARGUMENTo *Self__EPHC,*Self__S0FH,*Self__10FH;
+  void **__tmp__0PHC,**__tmp__2PHC,**Self__GJSD;
+  void **__tmp__VYHC,**new__QKTD;
+  void *__tmp__EBPB,*__tmp__MHZB;
+  void **__tmp__SL3B,**Self__MKHC;
   object__ZBC=obj__UBC;
   source__5BC=((__PROTOTYPE *)obj__UBC)->source__3BC;
   position__CCC= 1;
@@ -14471,12636 +14500,12654 @@ static void go_on__SBC(void *obj__UBC)
   if (is_shorter__LZ) {
     is_active_short__OCC=TRUE__;
     short_derive__PCC= 0;
-    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)));
+    copy__JDS(output_code__SI,source__5BC);
+    result__4GG=NULL;
+    ptr__5GG=((__POINTER )(NULL));
+    typ_id__EHG= 0;
+    sz__BHG=((__UINTEGER_32 )sizeof(__HASHED_SEToSTRING_CONSTANTo));
+    if ((sz__BHG ==  0)) {
+      result__4GG=HASHED_SEToSTRING_CONSTANTo__;
+    } else {
+      typ_id__EHG=__HASHED_SEToSTRING_CONSTANTo__;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__BHG);
+      if ((typ_id__EHG == (__INTEGER)(-  1))) {
+        a__IZFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__JZFH=(__UINTEGER_32)((__UINTEGER_32)(sz__BHG + a__IZFH) & (__UINTEGER_32)(~ a__IZFH));
+        ptr_table__14IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__JZFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__04IH=((__POINTER )(NULL));
+        result__24IH=((__POINTER *)ptr_table__14IH)[ 0];
+        if ((result__24IH == (void *)NULL)) {
+          result__24IH=new_lab__FTJ(new_size__JZFH);
+          next__04IH=(void *)((unsigned long)result__24IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JZFH)));
+          ((__POINTER *)next__04IH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__14IH)[ 0]=next__04IH;
+        } else {
+          next__04IH=((__POINTER *)result__24IH)[ 0];
+          if ((next__04IH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__24IH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__JZFH <<  1)) <=  4096)) {
+              next__04IH=(void *)((unsigned long)result__24IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JZFH)));
             } else {
-              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)));
+              next__04IH=new_lab__FTJ(new_size__JZFH);
+            };
+            ((__POINTER *)next__04IH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__14IH)[ 0]=next__04IH;
+          } else {
+            ((__POINTER *)result__24IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__04IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__24IH=next__04IH;
+          };
+        };
+        ptr__5GG=result__24IH;
+      } else {
+        t__NZFH=((__UINTEGER_32 )typ_id__EHG);
+        a__MZFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__D5IH=(__UINTEGER_32)((__UINTEGER_32)(sz__BHG + a__MZFH) & (__UINTEGER_32)(~ a__MZFH));
+        ptr_table__A5IH=((__POINTER )(&(table_type[(t__NZFH)])));
+        lab_type__C5IH=(__UINTEGER_32)(t__NZFH |  1);
+        next__54IH=((__POINTER )(NULL));
+        result__B5IH=((__POINTER *)ptr_table__A5IH)[ 0];
+        if ((result__B5IH == (void *)NULL)) {
+          result__B5IH=new_lab__FTJ(lab_type__C5IH);
+          next__54IH=(void *)((unsigned long)result__B5IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__D5IH)));
+          ((__POINTER *)next__54IH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__A5IH)[ 0]=next__54IH;
+        } else {
+          next__54IH=((__POINTER *)result__B5IH)[ 0];
+          if ((next__54IH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__B5IH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__D5IH <<  1)) <=  4096)) {
+              next__54IH=(void *)((unsigned long)result__B5IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__D5IH)));
             } else {
-              next__AXIH=new_lab__ZPJ(lab_type__DXIH);
+              next__54IH=new_lab__FTJ(lab_type__C5IH);
             };
-            ((__POINTER *)next__AXIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__BXIH)[ 0]=next__AXIH;
+            ((__POINTER *)next__54IH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__A5IH)[ 0]=next__54IH;
           } else {
-            ((__POINTER *)result__CXIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__AXIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__CXIH=next__AXIH;
+            ((__POINTER *)result__B5IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__54IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__B5IH=next__54IH;
           };
         };
-        ptr__1DG=result__CXIH;
+        ptr__5GG=result__B5IH;
       };
-      result__0DG=((__HASHED_SEToSTRING_CONSTANTo *)ptr__1DG);
-      *(result__0DG) = *(HASHED_SEToSTRING_CONSTANTo__);
+      result__4GG=((__HASHED_SEToSTRING_CONSTANTo *)ptr__5GG);
+      *(result__4GG) = *(HASHED_SEToSTRING_CONSTANTo__);
     };
-    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);
+    Self__MIT=((__HASHED_SEToSTRING_CONSTANTo *)result__4GG);
+    new_capacity__1HY=prime_number_ceiling__541( 53);
+    Self__MIT->buckets__XEV=create__123(new_capacity__1HY);
+    Self__MIT->capacity__0IT=new_capacity__1HY;
+    Self__MIT->count__AIY= 0;
+    short_local__XCC=result__4GG;
+    short__token__to__YCD((&__string_117), 1, 1);
   };
   t__FYC=NULL;
-  read_space__KSD();
+  old_derive__3XC=short_derive__PCC;
+  read_space__MTD();
+  if (is_shorter__LZ) {
+    Self__X3HH=((__STRING *)output_code__SI);
+    start__U3HH=(__INTEGER)( 1 + old_derive__3XC);
+    end__T3HH=(__INTEGER)((__INTEGER)(position__CCC -  1) + short_derive__PCC);
+    len__V3HH=(__INTEGER)((__INTEGER)(end__T3HH - start__U3HH) +  1);
+    if ((len__V3HH >  0)) {
+      __tmp__W3HH=(__INTEGER)(end__T3HH +  1);
+      __tmp__Y3HH=Self__X3HH->count__EGC;
+      Self__Z3HH=__tmp__W3HH;
+      while ((Self__Z3HH <= __tmp__Y3HH)) {
+        ((__CHARACTER *)Self__X3HH->storage__RCS)[(__INTEGER)((__INTEGER)(Self__Z3HH - len__V3HH) -  1)]=((__CHARACTER *)Self__X3HH->storage__RCS)[(__INTEGER)(Self__Z3HH -  1)];
+        Self__Z3HH=(__INTEGER)(Self__Z3HH +  1);
+      };
+      Self__X3HH->count__EGC=(__INTEGER)(Self__X3HH->count__EGC - len__V3HH);
+    };
+    short_derive__PCC=(__INTEGER)(short_derive__PCC - (__INTEGER)((__INTEGER)(position__CCC + short_derive__PCC) - (__INTEGER)( 1 + old_derive__3XC)));
+  };
   pos_sec__2XC=position__CCC;
   old_derive__3XC=short_derive__PCC;
-  last_comment_extern__JYC=NULL;
-  result__X0KH=read_word__HOF((&__string_4));
+  last_comment_extern__JZC=NULL;
+  result__WCLH=read_word__LRF((&__string_4));
   if (is_shorter__LZ) {
-    if (result__X0KH) {
-      short__token__to__YBD((&__string_120),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD),position__CCC);
+    if (result__WCLH) {
+      short__token__to__YCD((&__string_120),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V1C)->count__DD),position__CCC);
     };
   };
-  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)) {
+  if ((! result__WCLH)) {
+    pos__KEWG=current_position__EZF();
+    put_error__text__NPG( 0,(&__string_228));
+    put_position__XQG(pos__KEWG);
+    put_string__P3F(msg_err__SPG);
+    if ((type_error__RPG !=  2)) {
       exit(( 1));
     };
   };
-  result__Z0KH=read_word__HOF((&__string_22));
+  result__YCLH=read_word__LRF((&__string_22));
   if (is_shorter__LZ) {
-    if (result__Z0KH) {
+    if (result__YCLH) {
       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);
+        short__token__to__YCD((&__string_120),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V1C)->count__DD),position__CCC);
       } else {
-        short__token__to__YBD((&__string_119),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD),position__CCC);
+        short__token__to__YCD((&__string_119),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V1C)->count__DD),position__CCC);
       };
     };
   };
-  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)) {
+  if ((! result__YCLH)) {
+    pos__MEWG=current_position__EZF();
+    put_error__text__NPG( 0,(&__string_229));
+    put_position__XQG(pos__MEWG);
+    put_string__P3F(msg_err__SPG);
+    if ((type_error__RPG !=  2)) {
       exit(( 1));
     };
   };
-  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)) {
+  if ((! read_slot_header__NEE(TRUE__))) {
+    pos__OEWG=current_position__EZF();
+    put_error__text__NPG( 0,(&__string_230));
+    put_position__XQG(pos__OEWG);
+    put_string__P3F(msg_err__SPG);
+    if ((type_error__RPG !=  2)) {
       exit(( 1));
     };
   };
-  while (read_slot_header__JBE(FALSE__)) {
+  while (read_slot_header__NEE(FALSE__)) {
   };
   if (is_shorter2__VI) {
-    ((__PROTOTYPE *)object__ZBC)->comment_header__I4QC=last_comment_extern__JYC;
+    ((__PROTOTYPE *)object__ZBC)->comment_header__WBRC=last_comment_extern__JZC;
   };
-  while_do__E3E:
+  while_do__IAF:
   {
-    result__W5D=read_word__HOF((&__string_4));
+    result__0CE=read_word__LRF((&__string_4));
     if (is_shorter__LZ) {
-      if (result__W5D) {
-        short__token__to__YBD((&__string_120),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD),position__CCC);
+      if (result__0CE) {
+        short__token__to__YCD((&__string_120),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V1C)->count__DD),position__CCC);
       };
     };
-    if (result__W5D) {
-      last_comment_extern__JYC=NULL;
-      result__KDEB=FALSE__;
-      if ((! read_space__KSD())) {
-        __tmp__XDEB=TRUE__;
+    if (result__0CE) {
+      last_comment_extern__JZC=NULL;
+      result__WGEB=FALSE__;
+      if ((! read_space__MTD())) {
+        __tmp__DHEB=TRUE__;
       } else {
-        result__KX3G='\0';
+        result__K43G='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__KX3G=((__CHARACTER )(( 0)));
+          result__K43G=((__CHARACTER )(( 0)));
         } else {
-          result__KX3G=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+          result__K43G=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
         };
-        result__TA5=FALSE__;
-        if ((((__INTEGER_8 )result__KX3G) >= ((__INTEGER_8 )'A'))) {
-          result__TA5=(((__INTEGER_8 )result__KX3G) <= ((__INTEGER_8 )'Z'));
+        result__BG5=FALSE__;
+        if ((((__INTEGER_8 )result__K43G) >= ((__INTEGER_8 )'A'))) {
+          result__BG5=(((__INTEGER_8 )result__K43G) <= ((__INTEGER_8 )'Z'));
         };
-        __tmp__XDEB=(! result__TA5);
+        __tmp__DHEB=(! result__BG5);
       };
-      if (__tmp__XDEB) {
-        result__KDEB=FALSE__;
+      if (__tmp__DHEB) {
+        result__WGEB=FALSE__;
       } else {
         ((__STRING *)string_tmp__VH)->count__EGC= 0;
-        result__PX3G='\0';
+        result__P43G='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__PX3G=((__CHARACTER )(( 0)));
+          result__P43G=((__CHARACTER )(( 0)));
         } else {
-          result__PX3G=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+          result__P43G=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
         };
-        add_last__3IT(string_tmp__VH,result__PX3G);
+        add_last__GOT(string_tmp__VH,result__P43G);
         position__CCC=(__INTEGER)(position__CCC +  1);
-        result__UX3G='\0';
+        result__U43G='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__UX3G=((__CHARACTER )(( 0)));
+          result__U43G=((__CHARACTER )(( 0)));
         } else {
-          result__UX3G=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+          result__U43G=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
         };
-        result__YSFH=FALSE__;
-        if ((((__INTEGER_8 )result__UX3G) >= ((__INTEGER_8 )'a'))) {
-          result__YSFH=(((__INTEGER_8 )result__UX3G) <= ((__INTEGER_8 )'z'));
+        result__OZFH=FALSE__;
+        if ((((__INTEGER_8 )result__U43G) >= ((__INTEGER_8 )'a'))) {
+          result__OZFH=(((__INTEGER_8 )result__U43G) <= ((__INTEGER_8 )'z'));
         };
-        if (result__YSFH) {
-          result__ZX3G='\0';
+        if (result__OZFH) {
+          result__Z43G='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__ZX3G=((__CHARACTER )(( 0)));
+            result__Z43G=((__CHARACTER )(( 0)));
           } else {
-            result__ZX3G=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+            result__Z43G=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
           };
-          add_last__3IT(string_tmp__VH,result__ZX3G);
+          add_last__GOT(string_tmp__VH,result__Z43G);
           position__CCC=(__INTEGER)(position__CCC +  1);
-          while_do__AVGF:
+          while_do__G0GF:
           {
-            result__4X3G='\0';
+            result__443G='\0';
             if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-              result__4X3G=((__CHARACTER )(( 0)));
+              result__443G=((__CHARACTER )(( 0)));
             } else {
-              result__4X3G=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+              result__443G=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
             };
-            if ((result__4X3G != ((__CHARACTER )(( 0))))) {
-              result__HY3G='\0';
+            if ((result__443G != ((__CHARACTER )(( 0))))) {
+              result__H53G='\0';
               if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                result__HY3G=((__CHARACTER )(( 0)));
+                result__H53G=((__CHARACTER )(( 0)));
               } else {
-                result__HY3G=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+                result__H53G=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
               };
-              result__SU5=FALSE__;
-              if ((((__INTEGER_8 )result__HY3G) >= ((__INTEGER_8 )'a'))) {
-                result__SU5=(((__INTEGER_8 )result__HY3G) <= ((__INTEGER_8 )'z'));
+              result__A05=FALSE__;
+              if ((((__INTEGER_8 )result__H53G) >= ((__INTEGER_8 )'a'))) {
+                result__A05=(((__INTEGER_8 )result__H53G) <= ((__INTEGER_8 )'z'));
               };
-              if (result__SU5) {
-                __tmp__PFEB=TRUE__;
+              if (result__A05) {
+                __tmp__1IEB=TRUE__;
               } else {
-                result__MY3G='\0';
+                result__M53G='\0';
                 if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                  result__MY3G=((__CHARACTER )(( 0)));
+                  result__M53G=((__CHARACTER )(( 0)));
                 } else {
-                  result__MY3G=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+                  result__M53G=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
                 };
-                result__JSAB=FALSE__;
-                if ((((__INTEGER_8 )result__MY3G) >= ((__INTEGER_8 )'0'))) {
-                  result__JSAB=(((__INTEGER_8 )result__MY3G) <= ((__INTEGER_8 )'9'));
+                result__VVAB=FALSE__;
+                if ((((__INTEGER_8 )result__M53G) >= ((__INTEGER_8 )'0'))) {
+                  result__VVAB=(((__INTEGER_8 )result__M53G) <= ((__INTEGER_8 )'9'));
                 };
-                __tmp__PFEB=result__JSAB;
+                __tmp__1IEB=result__VVAB;
               };
-              if (__tmp__PFEB) {
-                __tmp__QFEB=TRUE__;
+              if (__tmp__1IEB) {
+                __tmp__2IEB=TRUE__;
               } else {
-                result__RY3G='\0';
+                result__R53G='\0';
                 if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                  result__RY3G=((__CHARACTER )(( 0)));
+                  result__R53G=((__CHARACTER )(( 0)));
                 } else {
-                  result__RY3G=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+                  result__R53G=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
                 };
-                __tmp__QFEB=(result__RY3G == '_');
+                __tmp__2IEB=(result__R53G == '_');
               };
-              __tmp__TFEB=__tmp__QFEB;
+              __tmp__5IEB=__tmp__2IEB;
             } else {
-              __tmp__TFEB=FALSE__;
+              __tmp__5IEB=FALSE__;
             };
-            if (__tmp__TFEB) {
-              result__WY3G='\0';
+            if (__tmp__5IEB) {
+              result__W53G='\0';
               if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                result__WY3G=((__CHARACTER )(( 0)));
+                result__W53G=((__CHARACTER )(( 0)));
               } else {
-                result__WY3G=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+                result__W53G=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
               };
-              add_last__3IT(string_tmp__VH,result__WY3G);
+              add_last__GOT(string_tmp__VH,result__W53G);
               position__CCC=(__INTEGER)(position__CCC +  1);
-              goto while_do__AVGF;
+              goto while_do__G0GF;
             };
           };
-          last_string__V0C=get__YWB(string_tmp__VH);
-          result__KDEB=TRUE__;
-          short__token__to__YBD((&__string_119),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD),position__CCC);
+          last_string__V1C=get__YWB(string_tmp__VH);
+          result__WGEB=TRUE__;
+          short__token__to__YCD((&__string_119),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V1C)->count__DD),position__CCC);
         } else {
           position__CCC=(__INTEGER)(position__CCC -  1);
-          result__KDEB=FALSE__;
+          result__WGEB=FALSE__;
         };
       };
-      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)) {
+      if (result__WGEB) {
+        n__ITOB=last_string__V1C;
+        if ((! (((((((((void *)n__ITOB == (void *)(&__string_23)) || ((void *)n__ITOB == (void *)(&__string_24))) || ((void *)n__ITOB == (void *)(&__string_25))) || ((void *)n__ITOB == (void *)(&__string_26))) || ((void *)n__ITOB == (void *)(&__string_27))) || ((void *)n__ITOB == (void *)(&__string_28))) || ((void *)n__ITOB == (void *)(&__string_29))) || ((void *)n__ITOB == (void *)(&__string_30))))) {
+          pos__ZEWG=current_position__EZF();
+          put_error__text__NPG( 0,(&__string_231));
+          put_position__XQG(pos__ZEWG);
+          put_string__P3F(msg_err__SPG);
+          if ((type_error__RPG !=  2)) {
             exit(( 1));
           };
         };
-        last_section__E1C=get_name__YROB(last_string__V0C);
-        if (((void *)((__SECTION_ *)last_section__E1C)->name__NYDC == (void *)(&__string_28))) {
-          __tmp__X2C=TRUE__;
+        last_section__E2C=get_name__EVOB(last_string__V1C);
+        if (((void *)((__SECTION_ *)last_section__E2C)->name__11DC == (void *)(&__string_28))) {
+          __tmp__X3C=TRUE__;
         } else {
-          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;
+          Self__153G=((__SECTION_ *)last_section__E2C);
+          if (((((void *)Self__153G->name__11DC == (void *)(&__string_23)) || ((void *)Self__153G->name__11DC == (void *)(&__string_24))) && ((void *)((__PROTOTYPE *)object__ZBC)->last_slot__12C != (void *)NULL))) {
+            __tmp__E3C=((__PROTOTYPE *)object__ZBC)->last_slot__12C;
+            if (((struct ___OBJ *)__tmp__E3C)->__id==__ITM_SLOT__) {
+              __tmp__G3C=((__ITM_SLOT *)__tmp__E3C)->id_section__F3C;
             } else {
-              __tmp__G2C=((__ITM_SLOT_OPERATOR *)__tmp__E2C)->parent_itm_slot__BT5B.id_section__F2C;
+              __tmp__G3C=((__ITM_SLOT_OPERATOR *)__tmp__E3C)->parent_itm_slot__NW5B.id_section__F3C;
             };
-            Self__2Y3G=((__SECTION_ *)__tmp__G2C);
-            __tmp__M2C=(! (((void *)Self__2Y3G->name__NYDC == (void *)(&__string_23)) || ((void *)Self__2Y3G->name__NYDC == (void *)(&__string_24))));
+            Self__253G=((__SECTION_ *)__tmp__G3C);
+            __tmp__M3C=(! (((void *)Self__253G->name__11DC == (void *)(&__string_23)) || ((void *)Self__253G->name__11DC == (void *)(&__string_24))));
           } else {
-            __tmp__M2C=FALSE__;
+            __tmp__M3C=FALSE__;
           };
-          if (__tmp__M2C) {
-            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)) {
+          if (__tmp__M3C) {
+            pos__1EWG=current_position__EZF();
+            put_error__text__NPG( 0,(&__string_232));
+            put_position__XQG(pos__1EWG);
+            put_string__P3F(msg_err__SPG);
+            if ((type_error__RPG !=  2)) {
               exit(( 1));
             };
           };
-          __tmp__X2C=__tmp__M2C;
+          __tmp__X3C=__tmp__M3C;
         };
-        if ((! __tmp__X2C)) {
-          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)) {
+        if ((! __tmp__X3C)) {
+          if ((((((void *)((__SECTION_ *)last_section__E2C)->name__11DC == (void *)(&__string_23)) && ((void *)((__PROTOTYPE *)object__ZBC)->type_style__E4C == (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__4EWG=current_position__EZF();
+            put_error__text__NPG( 2,(&__string_233));
+            put_position__XQG(pos__4EWG);
+            put_string__P3F(msg_err__SPG);
+            if ((type_error__RPG !=  2)) {
               exit(( 1));
             };
           };
         };
       } else {
-        t__FYC=read_type_list__MJO(PARSER__,TRUE__);
+        t__FYC=read_type_list__YMO(PARSER__,TRUE__);
         if (((void *)t__FYC == (void *)NULL)) {
-          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)) {
+          pos__AFWG=current_position__EZF();
+          put_error__text__NPG( 0,(&__string_231));
+          put_position__XQG(pos__AFWG);
+          put_string__P3F(msg_err__SPG);
+          if ((type_error__RPG !=  2)) {
             exit(( 1));
           };
         };
-        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;
+        Self__OTEC=((__HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)bucket_list__IXOB);
+        k__PTEC=t__FYC;
+        result__0TEC=NULL;
+        node__ZTEC=((void **)Self__OTEC->buckets__BUEC)[(__INTEGER)(hash_code__X50(t__FYC) % Self__OTEC->capacity__2TEC)];
+        while ((! (((void *)node__ZTEC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node__ZTEC)->key__NUEC == (void *)k__PTEC)))) {
+          node__ZTEC=((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node__ZTEC)->next__YUEC;
+        };
+        if (((void *)node__ZTEC != (void *)NULL)) {
+          result__0TEC=((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node__ZTEC)->item__AVEC;
+        };
+        result__EXOB=result__0TEC;
+        if (((void *)result__0TEC == (void *)NULL)) {
+          result__E5IH=NULL;
+          ptr__F5IH=((__POINTER )(NULL));
+          typ_id__G5IH= 0;
+          sz__H5IH=((__UINTEGER_32 )sizeof(__SECTION_));
+          if ((sz__H5IH ==  0)) {
+            result__E5IH=SECTION___;
+          } else {
+            typ_id__G5IH=__SECTION___;
+            clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__H5IH);
+            if ((typ_id__G5IH == (__INTEGER)(-  1))) {
+              a__I5IH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__J5IH=(__UINTEGER_32)((__UINTEGER_32)(sz__H5IH + a__I5IH) & (__UINTEGER_32)(~ a__I5IH));
+              ptr_table__N5IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__J5IH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__M5IH=((__POINTER )(NULL));
+              result__O5IH=((__POINTER *)ptr_table__N5IH)[ 0];
+              if ((result__O5IH == (void *)NULL)) {
+                result__O5IH=new_lab__FTJ(new_size__J5IH);
+                next__M5IH=(void *)((unsigned long)result__O5IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__J5IH)));
+                ((__POINTER *)next__M5IH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__N5IH)[ 0]=next__M5IH;
               } else {
-                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)));
+                next__M5IH=((__POINTER *)result__O5IH)[ 0];
+                if ((next__M5IH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__O5IH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__J5IH <<  1)) <=  4096)) {
+                    next__M5IH=(void *)((unsigned long)result__O5IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__J5IH)));
                   } else {
-                    next__NXIH=new_lab__ZPJ(new_size__KXIH);
+                    next__M5IH=new_lab__FTJ(new_size__J5IH);
                   };
-                  ((__POINTER *)next__NXIH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__OXIH)[ 0]=next__NXIH;
+                  ((__POINTER *)next__M5IH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__N5IH)[ 0]=next__M5IH;
                 } else {
-                  ((__POINTER *)result__PXIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NXIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__PXIH=next__NXIH;
+                  ((__POINTER *)result__O5IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__M5IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__O5IH=next__M5IH;
                 };
               };
-              ptr__GXIH=result__PXIH;
+              ptr__F5IH=result__O5IH;
             } else {
-              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;
+              t__K5IH=((__UINTEGER_32 )typ_id__G5IH);
+              a__L5IH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__V5IH=(__UINTEGER_32)((__UINTEGER_32)(sz__H5IH + a__L5IH) & (__UINTEGER_32)(~ a__L5IH));
+              ptr_table__S5IH=((__POINTER )(&(table_type[(t__K5IH)])));
+              lab_type__U5IH=(__UINTEGER_32)(t__K5IH |  1);
+              next__R5IH=((__POINTER )(NULL));
+              result__T5IH=((__POINTER *)ptr_table__S5IH)[ 0];
+              if ((result__T5IH == (void *)NULL)) {
+                result__T5IH=new_lab__FTJ(lab_type__U5IH);
+                next__R5IH=(void *)((unsigned long)result__T5IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__V5IH)));
+                ((__POINTER *)next__R5IH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__S5IH)[ 0]=next__R5IH;
               } else {
-                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)));
+                next__R5IH=((__POINTER *)result__T5IH)[ 0];
+                if ((next__R5IH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__T5IH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__V5IH <<  1)) <=  4096)) {
+                    next__R5IH=(void *)((unsigned long)result__T5IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__V5IH)));
                   } else {
-                    next__SXIH=new_lab__ZPJ(lab_type__VXIH);
+                    next__R5IH=new_lab__FTJ(lab_type__U5IH);
                   };
-                  ((__POINTER *)next__SXIH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__TXIH)[ 0]=next__SXIH;
+                  ((__POINTER *)next__R5IH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__S5IH)[ 0]=next__R5IH;
                 } else {
-                  ((__POINTER *)result__UXIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__SXIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__UXIH=next__SXIH;
+                  ((__POINTER *)result__T5IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__R5IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__T5IH=next__R5IH;
                 };
               };
-              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;
+              ptr__F5IH=result__T5IH;
+            };
+            result__E5IH=((__SECTION_ *)ptr__F5IH);
+            *(result__E5IH) = *(SECTION___);
+          };
+          result__EXOB=result__E5IH;
+          Self__RFWG=((__SECTION_ *)result__E5IH);
+          Self__RFWG->name__11DC=NULL;
+          Self__RFWG->type_list__K0FC=t__FYC;
+          Self__G3FC=((__HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)bucket_list__IXOB);
+          k__I3FC=t__FYC;
+          h__P3FC=hash_code__X50(t__FYC);
+          idx__Q3FC=(__INTEGER)(h__P3FC % Self__G3FC->capacity__2TEC);
+          node__R3FC=((void **)Self__G3FC->buckets__BUEC)[idx__Q3FC];
+          while ((! (((void *)node__R3FC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node__R3FC)->key__NUEC == (void *)k__I3FC)))) {
+            node__R3FC=((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node__R3FC)->next__YUEC;
+          };
+          if (((void *)node__R3FC == (void *)NULL)) {
+            if ((Self__G3FC->capacity__2TEC == Self__G3FC->count__S4FC)) {
+              idx__JIID= 0;
+              node1__NIID=NULL;
+              node2__OIID=NULL;
+              old_buckets__MIID=Self__G3FC->buckets__BUEC;
+              new_capacity__KIID=prime_number_ceiling__541((__INTEGER)(Self__G3FC->capacity__2TEC +  1));
+              Self__G3FC->buckets__BUEC=create__LFYC(new_capacity__KIID);
+              i__LIID=(__INTEGER)(Self__G3FC->capacity__2TEC -  1);
+              Self__G3FC->capacity__2TEC=new_capacity__KIID;
+              while ((i__LIID >=  0)) {
+                node1__NIID=((void **)old_buckets__MIID)[i__LIID];
+                while (((void *)node1__NIID != (void *)NULL)) {
+                  node2__OIID=((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node1__NIID)->next__YUEC;
+                  idx__JIID=(__INTEGER)(hash_code__X50(((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node1__NIID)->key__NUEC) % Self__G3FC->capacity__2TEC);
+                  ((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node1__NIID)->next__YUEC=((void **)Self__G3FC->buckets__BUEC)[idx__JIID];
+                  ((void **)Self__G3FC->buckets__BUEC)[idx__JIID]=node1__NIID;
+                  node1__NIID=node2__OIID;
                 };
-                i__3EID=(__INTEGER)(i__3EID -  1);
+                i__LIID=(__INTEGER)(i__LIID -  1);
               };
-              idx__C0FC=(__INTEGER)(h__B0FC % Self__YZFC->capacity__OQEC);
+              idx__Q3FC=(__INTEGER)(h__P3FC % Self__G3FC->capacity__2TEC);
             };
-            __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__;
+            __tmp__54FC=((void **)Self__G3FC->buckets__BUEC)[idx__Q3FC];
+            result__SKID=NULL;
+            ptr__TKID=((__POINTER )(NULL));
+            typ_id__YKID= 0;
+            sz__VKID=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo));
+            if ((sz__VKID ==  0)) {
+              result__SKID=HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__;
             } else {
-              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;
+              typ_id__YKID=__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__;
+              clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__VKID);
+              if ((typ_id__YKID == (__INTEGER)(-  1))) {
+                a__5ZFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                new_size__A0FH=(__UINTEGER_32)((__UINTEGER_32)(sz__VKID + a__5ZFH) & (__UINTEGER_32)(~ a__5ZFH));
+                ptr_table__X5IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__A0FH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                next__W5IH=((__POINTER )(NULL));
+                result__Y5IH=((__POINTER *)ptr_table__X5IH)[ 0];
+                if ((result__Y5IH == (void *)NULL)) {
+                  result__Y5IH=new_lab__FTJ(new_size__A0FH);
+                  next__W5IH=(void *)((unsigned long)result__Y5IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__A0FH)));
+                  ((__POINTER *)next__W5IH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__X5IH)[ 0]=next__W5IH;
                 } else {
-                  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)));
+                  next__W5IH=((__POINTER *)result__Y5IH)[ 0];
+                  if ((next__W5IH == (void *)NULL)) {
+                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__Y5IH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__A0FH <<  1)) <=  4096)) {
+                      next__W5IH=(void *)((unsigned long)result__Y5IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__A0FH)));
                     } else {
-                      next__XXIH=new_lab__ZPJ(new_size__KTFH);
+                      next__W5IH=new_lab__FTJ(new_size__A0FH);
                     };
-                    ((__POINTER *)next__XXIH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__YXIH)[ 0]=next__XXIH;
+                    ((__POINTER *)next__W5IH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__X5IH)[ 0]=next__W5IH;
                   } else {
-                    ((__POINTER *)result__ZXIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XXIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__ZXIH=next__XXIH;
+                    ((__POINTER *)result__Y5IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__W5IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__Y5IH=next__W5IH;
                   };
                 };
-                ptr__FHID=result__ZXIH;
+                ptr__TKID=result__Y5IH;
               } else {
-                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;
+                t__E0FH=((__UINTEGER_32 )typ_id__YKID);
+                a__D0FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                new_size__55IH=(__UINTEGER_32)((__UINTEGER_32)(sz__VKID + a__D0FH) & (__UINTEGER_32)(~ a__D0FH));
+                ptr_table__25IH=((__POINTER )(&(table_type[(t__E0FH)])));
+                lab_type__45IH=(__UINTEGER_32)(t__E0FH |  1);
+                next__15IH=((__POINTER )(NULL));
+                result__35IH=((__POINTER *)ptr_table__25IH)[ 0];
+                if ((result__35IH == (void *)NULL)) {
+                  result__35IH=new_lab__FTJ(lab_type__45IH);
+                  next__15IH=(void *)((unsigned long)result__35IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__55IH)));
+                  ((__POINTER *)next__15IH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__25IH)[ 0]=next__15IH;
                 } else {
-                  next__2XIH=((__POINTER *)result__4XIH)[ 0];
-                  if ((next__2XIH == (void *)NULL)) {
-                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4XIH - (unsigned long)begin_memory__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)));
+                  next__15IH=((__POINTER *)result__35IH)[ 0];
+                  if ((next__15IH == (void *)NULL)) {
+                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__35IH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__55IH <<  1)) <=  4096)) {
+                      next__15IH=(void *)((unsigned long)result__35IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__55IH)));
                     } else {
-                      next__2XIH=new_lab__ZPJ(lab_type__5XIH);
+                      next__15IH=new_lab__FTJ(lab_type__45IH);
                     };
-                    ((__POINTER *)next__2XIH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__3XIH)[ 0]=next__2XIH;
+                    ((__POINTER *)next__15IH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__25IH)[ 0]=next__15IH;
                   } else {
-                    ((__POINTER *)result__4XIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2XIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__4XIH=next__2XIH;
+                    ((__POINTER *)result__35IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__15IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__35IH=next__15IH;
                   };
                 };
-                ptr__FHID=result__4XIH;
+                ptr__TKID=result__35IH;
               };
-              result__EHID=((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)ptr__FHID);
-              *(result__EHID) = *(HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__);
+              result__SKID=((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)ptr__TKID);
+              *(result__SKID) = *(HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__);
             };
-            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);
+            Self__DGTD=((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)result__SKID);
+            Self__DGTD->item__AVEC=result__E5IH;
+            Self__DGTD->key__NUEC=t__FYC;
+            Self__DGTD->next__YUEC=__tmp__54FC;
+            node__R3FC=result__SKID;
+            ((void **)Self__G3FC->buckets__BUEC)[idx__Q3FC]=result__SKID;
+            Self__G3FC->count__S4FC=(__INTEGER)(Self__G3FC->count__S4FC +  1);
           } else {
-            ((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node__D0FC)->item__SREC=result__FXIH;
+            ((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node__R3FC)->item__AVEC=result__E5IH;
           };
         };
-        last_section__E1C=result__YTOB;
+        last_section__E2C=result__EXOB;
       };
       do {
-        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__BYIH=FALSE__;
+        result__XXOB=FALSE__;
+        t__YXOB=NULL;
+        lt__ZXOB=NULL;
+        affect__1XOB='\0';
+        old_pos__2XOB= 0;
+        old_derive__3XOB= 0;
+        s__4XOB=NULL;
+        style__0XOB=read_style__STF();
+        if ((style__0XOB != ' ')) {
+          result__XXOB=TRUE__;
+          result__HDZB=NULL;
+          result__3V1B=NULL;
+          if ((((__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *)free_list__DW1B)->parent_arrayed_collection__CW1B.upper__JWGC <  0)) {
+            result__3V1B=create_with_capacity__4M5B( 16);
+          } else {
+            Self__NHZC=((__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *)free_list__DW1B);
+            result__3V1B=((void **)Self__NHZC->parent_arrayed_collection__CW1B.storage__2NHC)[Self__NHZC->parent_arrayed_collection__CW1B.upper__JWGC];
+            Self__DIZC=((__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *)free_list__DW1B);
+            Self__DIZC->parent_arrayed_collection__CW1B.upper__JWGC=(__INTEGER)(Self__DIZC->parent_arrayed_collection__CW1B.upper__JWGC -  1);
+          };
+          arg__GDZB=read_loc_arg__with_self__SEHB(PARSER__,FALSE__,TRUE__);
+          if (((void *)arg__GDZB == (void *)NULL)) {
+            result__AAJH=FALSE__;
+            if ((! read_space__MTD())) {
+              result__AAJH=FALSE__;
             } else {
-              result__CYIH='\0';
+              result__BAJH='\0';
               if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                result__CYIH=((__CHARACTER )(( 0)));
+                result__BAJH=((__CHARACTER )(( 0)));
               } else {
-                result__CYIH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+                result__BAJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
               };
-              if ((result__CYIH == '\'')) {
+              if ((result__BAJH == '\'')) {
                 position__CCC=(__INTEGER)(position__CCC +  1);
-                result__BYIH=TRUE__;
+                result__AAJH=TRUE__;
               };
             };
-            if (result__BYIH) {
-              result__15YB=read_slot_operator__YS5B(result__RS1B);
+            if (result__AAJH) {
+              result__HDZB=read_slot_operator__EW5B(result__3V1B);
             } else {
-              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__;
+              p__MAJH=current_position__EZF();
+              result__DAJH=NULL;
+              ptr__EAJH=((__POINTER )(NULL));
+              typ_id__FAJH= 0;
+              sz__GAJH=((__UINTEGER_32 )sizeof(__ITM_ARG));
+              if ((sz__GAJH ==  0)) {
+                result__DAJH=ITM_ARG__;
               } else {
-                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;
+                typ_id__FAJH=-1;
+                clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__GAJH);
+                if ((typ_id__FAJH == (__INTEGER)(-  1))) {
+                  a__HAJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                  new_size__IAJH=(__UINTEGER_32)((__UINTEGER_32)(sz__GAJH + a__HAJH) & (__UINTEGER_32)(~ a__HAJH));
+                  ptr_table__QAJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__IAJH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                  next__PAJH=((__POINTER )(NULL));
+                  result__RAJH=((__POINTER *)ptr_table__QAJH)[ 0];
+                  if ((result__RAJH == (void *)NULL)) {
+                    result__RAJH=new_lab__FTJ(new_size__IAJH);
+                    next__PAJH=(void *)((unsigned long)result__RAJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IAJH)));
+                    ((__POINTER *)next__PAJH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__QAJH)[ 0]=next__PAJH;
                   } else {
-                    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)));
+                    next__PAJH=((__POINTER *)result__RAJH)[ 0];
+                    if ((next__PAJH == (void *)NULL)) {
+                      if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__RAJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__IAJH <<  1)) <=  4096)) {
+                        next__PAJH=(void *)((unsigned long)result__RAJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IAJH)));
                       } else {
-                        next__QYIH=new_lab__ZPJ(new_size__JYIH);
+                        next__PAJH=new_lab__FTJ(new_size__IAJH);
                       };
-                      ((__POINTER *)next__QYIH)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__RYIH)[ 0]=next__QYIH;
+                      ((__POINTER *)next__PAJH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__QAJH)[ 0]=next__PAJH;
                     } else {
-                      ((__POINTER *)result__SYIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QYIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                      result__SYIH=next__QYIH;
+                      ((__POINTER *)result__RAJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PAJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                      result__RAJH=next__PAJH;
                     };
                   };
-                  ptr__FYIH=result__SYIH;
+                  ptr__EAJH=result__RAJH;
                 } else {
-                  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;
+                  t__JAJH=((__UINTEGER_32 )typ_id__FAJH);
+                  a__KAJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                  new_size__YAJH=(__UINTEGER_32)((__UINTEGER_32)(sz__GAJH + a__KAJH) & (__UINTEGER_32)(~ a__KAJH));
+                  ptr_table__VAJH=((__POINTER )(&(table_type[(t__JAJH)])));
+                  lab_type__XAJH=(__UINTEGER_32)(t__JAJH |  1);
+                  next__UAJH=((__POINTER )(NULL));
+                  result__WAJH=((__POINTER *)ptr_table__VAJH)[ 0];
+                  if ((result__WAJH == (void *)NULL)) {
+                    result__WAJH=new_lab__FTJ(lab_type__XAJH);
+                    next__UAJH=(void *)((unsigned long)result__WAJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YAJH)));
+                    ((__POINTER *)next__UAJH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__VAJH)[ 0]=next__UAJH;
                   } else {
-                    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)));
+                    next__UAJH=((__POINTER *)result__WAJH)[ 0];
+                    if ((next__UAJH == (void *)NULL)) {
+                      if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__WAJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__YAJH <<  1)) <=  4096)) {
+                        next__UAJH=(void *)((unsigned long)result__WAJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YAJH)));
                       } else {
-                        next__VYIH=new_lab__ZPJ(lab_type__YYIH);
+                        next__UAJH=new_lab__FTJ(lab_type__XAJH);
                       };
-                      ((__POINTER *)next__VYIH)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__WYIH)[ 0]=next__VYIH;
+                      ((__POINTER *)next__UAJH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__VAJH)[ 0]=next__UAJH;
                     } else {
-                      ((__POINTER *)result__XYIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VYIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                      result__XYIH=next__VYIH;
+                      ((__POINTER *)result__WAJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UAJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                      result__WAJH=next__UAJH;
                     };
                   };
-                  ptr__FYIH=result__XYIH;
+                  ptr__EAJH=result__WAJH;
                 };
-                result__EYIH=((__ITM_ARG *)ptr__FYIH);
-                *(result__EYIH) = *(ITM_ARG__);
-              };
-              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__F5GC(result__RS1B,arg__05YB);
-            result__0YIH=FALSE__;
-            if ((! read_space__KSD())) {
-              result__0YIH=FALSE__;
+                result__DAJH=((__ITM_ARG *)ptr__EAJH);
+                *(result__DAJH) = *(ITM_ARG__);
+              };
+              Self__LAJH=((__ITM_ARG *)result__DAJH);
+              Self__LAJH->parent_itm_argument__DIHB.parent_itm_code__C5M.position__GFJ=p__MAJH;
+              Self__LAJH->name__U3HC=(&__string_58);
+              Self__LAJH->type__V3HC=type_self__XUN;
+              arg__GDZB=result__DAJH;
+              add_last__TCHC(result__3V1B,result__DAJH);
+              result__HDZB=read_slot_keyword__R15B(result__3V1B);
+            };
+          } else {
+            add_last__TCHC(result__3V1B,arg__GDZB);
+            result__ZAJH=FALSE__;
+            if ((! read_space__MTD())) {
+              result__ZAJH=FALSE__;
             } else {
-              result__1YIH='\0';
+              result__0AJH='\0';
               if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                result__1YIH=((__CHARACTER )(( 0)));
+                result__0AJH=((__CHARACTER )(( 0)));
               } else {
-                result__1YIH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+                result__0AJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
               };
-              if ((result__1YIH == '.')) {
+              if ((result__0AJH == '.')) {
                 position__CCC=(__INTEGER)(position__CCC +  1);
-                result__0YIH=TRUE__;
+                result__ZAJH=TRUE__;
               };
             };
-            if (result__0YIH) {
-              result__15YB=read_slot_keyword__FY5B(result__RS1B);
-              __tmp__LBZB=TRUE__;
+            if (result__ZAJH) {
+              result__HDZB=read_slot_keyword__R15B(result__3V1B);
+              __tmp__XEZB=TRUE__;
             } else {
-              __tmp__LBZB=FALSE__;
+              __tmp__XEZB=FALSE__;
             };
-            if ((! __tmp__LBZB)) {
-              result__3YIH=FALSE__;
-              if ((! read_space__KSD())) {
-                result__3YIH=FALSE__;
+            if ((! __tmp__XEZB)) {
+              result__2AJH=FALSE__;
+              if ((! read_space__MTD())) {
+                result__2AJH=FALSE__;
               } else {
-                result__4YIH='\0';
+                result__3AJH='\0';
                 if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                  result__4YIH=((__CHARACTER )(( 0)));
+                  result__3AJH=((__CHARACTER )(( 0)));
                 } else {
-                  result__4YIH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+                  result__3AJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
                 };
-                if ((result__4YIH == '\'')) {
+                if ((result__3AJH == '\'')) {
                   position__CCC=(__INTEGER)(position__CCC +  1);
-                  result__3YIH=TRUE__;
+                  result__2AJH=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__;
+              if (result__2AJH) {
+                result__HDZB=read_slot_operator__EW5B(result__3V1B);
+              };
+            };
+          };
+          if (((void *)result__HDZB != (void *)NULL)) {
+            result__5V4B=create_with_capacity__4M5B((__INTEGER)(((__FAST_ARRAYoITM_ARGUMENTo *)result__3V1B)->parent_arrayed_collection__MDZB.upper__XCHC +  1));
+            Self__EPHC=((__FAST_ARRAYoITM_ARGUMENTo *)result__5V4B);
+            new_capacity__HPHC= 0;
+            other_upper__GPHC=((__FAST_ARRAYoITM_ARGUMENTo *)result__3V1B)->parent_arrayed_collection__MDZB.upper__XCHC;
+            if ((other_upper__GPHC >=  0)) {
+              new_capacity__HPHC=(__INTEGER)(other_upper__GPHC +  1);
+              if ((Self__EPHC->parent_arrayed_collection__MDZB.capacity__ZCHC < new_capacity__HPHC)) {
+                Self__EPHC->parent_arrayed_collection__MDZB.storage__VDHC=create__VUBD(new_capacity__HPHC);
+                Self__EPHC->parent_arrayed_collection__MDZB.capacity__ZCHC=new_capacity__HPHC;
+              };
+              __tmp__0PHC=Self__EPHC->parent_arrayed_collection__MDZB.storage__VDHC;
+              __tmp__2PHC=((__FAST_ARRAYoITM_ARGUMENTo *)result__3V1B)->parent_arrayed_collection__MDZB.storage__VDHC;
+              Self__GJSD=((void **)__tmp__0PHC);
+              Self__BAXD=other_upper__GPHC;
+              while ((Self__BAXD >=  0)) {
+                Self__GJSD[Self__BAXD]=((void **)__tmp__2PHC)[Self__BAXD];
+                Self__BAXD=(__INTEGER)(Self__BAXD -  1);
+              };
+            };
+            Self__EPHC->parent_arrayed_collection__MDZB.upper__XCHC=other_upper__GPHC;
+            ((__FAST_ARRAYoITM_ARGUMENTo *)result__3V1B)->parent_arrayed_collection__MDZB.upper__XCHC=(__INTEGER)(-  1);
+            Self__QXHC=((__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *)free_list__DW1B);
+            new_capacity__SXHC= 0;
+            if (((__INTEGER)(Self__QXHC->parent_arrayed_collection__CW1B.upper__JWGC +  1) <= (__INTEGER)(Self__QXHC->parent_arrayed_collection__CW1B.capacity__RNHC -  1))) {
+              Self__QXHC->parent_arrayed_collection__CW1B.upper__JWGC=(__INTEGER)(Self__QXHC->parent_arrayed_collection__CW1B.upper__JWGC +  1);
+              __tmp__AYHC=TRUE__;
             } else {
-              __tmp__SUHC=FALSE__;
+              __tmp__AYHC=FALSE__;
             };
-            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;
+            if ((! __tmp__AYHC)) {
+              if ((Self__QXHC->parent_arrayed_collection__CW1B.capacity__RNHC ==  0)) {
+                Self__QXHC->parent_arrayed_collection__CW1B.storage__2NHC=create__DQBD( 2);
+                Self__QXHC->parent_arrayed_collection__CW1B.capacity__RNHC= 2;
+                Self__QXHC->parent_arrayed_collection__CW1B.upper__JWGC= 0;
               } else {
-                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);
+                new_capacity__SXHC=(__INTEGER)(Self__QXHC->parent_arrayed_collection__CW1B.capacity__RNHC <<  1);
+                __tmp__VYHC=Self__QXHC->parent_arrayed_collection__CW1B.storage__2NHC;
+                __tmp__WYHC=Self__QXHC->parent_arrayed_collection__CW1B.capacity__RNHC;
+                new__QKTD=((void **)realloc_dynamic__old_size__new_size__ZHLC(((__POINTER )((void **)__tmp__VYHC)),((__UINTEGER_32 )(__INTEGER)(__tmp__WYHC * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__SXHC * ((__INTEGER )(sizeof(void *)))))));
+                __tmp__ELTD=(__INTEGER)(new_capacity__SXHC -  1);
+                Self__EGYE=__tmp__WYHC;
+                while ((Self__EGYE <= __tmp__ELTD)) {
+                  new__QKTD[Self__EGYE]=NULL;
+                  Self__EGYE=(__INTEGER)(Self__EGYE +  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);
+                Self__QXHC->parent_arrayed_collection__CW1B.storage__2NHC=new__QKTD;
+                Self__QXHC->parent_arrayed_collection__CW1B.capacity__RNHC=new_capacity__SXHC;
+                Self__QXHC->parent_arrayed_collection__CW1B.upper__JWGC=(__INTEGER)(Self__QXHC->parent_arrayed_collection__CW1B.upper__JWGC +  1);
               };
             };
-            ((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);
+            ((void **)Self__QXHC->parent_arrayed_collection__CW1B.storage__2NHC)[Self__QXHC->parent_arrayed_collection__CW1B.upper__JWGC]=result__3V1B;
+            if (((struct ___OBJ *)result__HDZB)->__id==__ITM_SLOT__) {
+              set_argument_list__OFHC(result__HDZB,result__5V4B);
             } else {
-              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__;
+              Self__BHHC=((__ITM_SLOT_OPERATOR *)result__HDZB);
+              if (((__INTEGER)(((__FAST_ARRAYoITM_ARGUMENTo *)result__5V4B)->parent_arrayed_collection__MDZB.upper__XCHC +  1) >  1)) {
+                __tmp__PHHC=TRUE__;
               } else {
-                __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;
+                __tmp__KHHC=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)result__5V4B)->parent_arrayed_collection__MDZB.storage__VDHC)[ 0];
+                if (((struct ___OBJ *)__tmp__KHHC)->__id==__ITM_ARG__) {
+                  __tmp__LHHC= 1;
                 } else {
-                  __tmp__3DHC=(__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)((__ITM_ARGS *)__tmp__2DHC)->name__W2PF)->parent_arrayed_collection__U3I.upper__H4OD +  1);
+                  __tmp__LHHC=(__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)((__ITM_ARGS *)__tmp__KHHC)->name__3BQF)->parent_arrayed_collection__ABJ.upper__VBPD +  1);
                 };
-                __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;
+                __tmp__PHHC=(__tmp__LHHC >  1);
+              };
+              if (__tmp__PHHC) {
+                if (((void *)((__SECTION_ *)Self__BHHC->parent_itm_slot__NW5B.id_section__F3C)->name__11DC == (void *)(&__string_25))) {
+                  Self__S0FH=((__FAST_ARRAYoITM_ARGUMENTo *)result__5V4B);
+                  __tmp__2HHC=((void **)Self__S0FH->parent_arrayed_collection__MDZB.storage__VDHC)[Self__S0FH->parent_arrayed_collection__MDZB.upper__XCHC];
+                  if (((struct ___OBJ *)__tmp__2HHC)->__id==__ITM_ARG__) {
+                    __tmp__3HHC=((__ITM_ARG *)__tmp__2HHC)->parent_itm_argument__DIHB.parent_itm_code__C5M.position__GFJ;
                   } else {
-                    __tmp__PEHC=((__ITM_ARGS *)__tmp__OEHC)->parent_itm_argument__FAFE.parent_itm_code__W1M.position__0BJ;
+                    __tmp__3HHC=((__ITM_ARGS *)__tmp__2HHC)->parent_itm_argument__TDFE.parent_itm_code__C5M.position__GFJ;
                   };
-                  put_error__text__BMG( 1,(&__string_234));
-                  put_position__LNG(__tmp__PEHC);
-                  put_string__L0F(msg_err__GMG);
-                  if ((type_error__FMG !=  2)) {
+                  put_error__text__NPG( 1,(&__string_234));
+                  put_position__XQG(__tmp__3HHC);
+                  put_string__P3F(msg_err__SPG);
+                  if ((type_error__RPG !=  2)) {
                     exit(( 1));
                   };
                 };
-                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;
+                Self__TD4G=((__SECTION_ *)Self__BHHC->parent_itm_slot__NW5B.id_section__F3C);
+                if ((((void *)Self__TD4G->name__11DC == (void *)(&__string_23)) || ((void *)Self__TD4G->name__11DC == (void *)(&__string_24)))) {
+                  Self__10FH=((__FAST_ARRAYoITM_ARGUMENTo *)result__5V4B);
+                  __tmp__JIHC=((void **)Self__10FH->parent_arrayed_collection__MDZB.storage__VDHC)[Self__10FH->parent_arrayed_collection__MDZB.upper__XCHC];
+                  if (((struct ___OBJ *)__tmp__JIHC)->__id==__ITM_ARG__) {
+                    __tmp__KIHC=((__ITM_ARG *)__tmp__JIHC)->parent_itm_argument__DIHB.parent_itm_code__C5M.position__GFJ;
                   } else {
-                    __tmp__2EHC=((__ITM_ARGS *)__tmp__1EHC)->parent_itm_argument__FAFE.parent_itm_code__W1M.position__0BJ;
+                    __tmp__KIHC=((__ITM_ARGS *)__tmp__JIHC)->parent_itm_argument__TDFE.parent_itm_code__C5M.position__GFJ;
                   };
-                  put_error__text__BMG( 1,(&__string_235));
-                  put_position__LNG(__tmp__2EHC);
-                  put_string__L0F(msg_err__GMG);
-                  if ((type_error__FMG !=  2)) {
+                  put_error__text__NPG( 1,(&__string_235));
+                  put_position__XQG(__tmp__KIHC);
+                  put_string__P3F(msg_err__SPG);
+                  if ((type_error__RPG !=  2)) {
                     exit(( 1));
                   };
                 };
               };
-              Self__TDHC->parent_itm_slot__BT5B.argument_list__RDHC=result__TS4B;
+              Self__BHHC->parent_itm_slot__NW5B.argument_list__5GHC=result__5V4B;
             };
           };
-          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)) {
+          last_slot__GYOB=result__HDZB;
+          if (((void *)result__HDZB == (void *)NULL)) {
+            pos__PJWG=current_position__EZF();
+            put_error__text__NPG( 0,(&__string_236));
+            put_position__XQG(pos__PJWG);
+            put_string__P3F(msg_err__SPG);
+            if ((type_error__RPG !=  2)) {
               exit(( 1));
             };
           };
-          if (((struct ___OBJ *)last_slot__0UOB)->__id==__ITM_SLOT__) {
-            ((__ITM_SLOT *)last_slot__0UOB)->parent_named__15.style__FBU=style__OUOB;
+          if (((struct ___OBJ *)last_slot__GYOB)->__id==__ITM_SLOT__) {
+            ((__ITM_SLOT *)last_slot__GYOB)->parent_named__15.style__OGU=style__0XOB;
           } else {
-            ((__ITM_SLOT_OPERATOR *)last_slot__0UOB)->parent_itm_slot__BT5B.parent_named__15.style__FBU=style__OUOB;
+            ((__ITM_SLOT_OPERATOR *)last_slot__GYOB)->parent_itm_slot__NW5B.parent_named__15.style__OGU=style__0XOB;
           };
-          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];
+          if (((read_symbol__SYJ((&__string_12)) || read_symbol__SYJ((&__string_13))) || read_symbol__SYJ((&__string_14)))) {
+            affect__1XOB=((__CHARACTER *)((__STRING_CONSTANT *)last_string__V1C)->storage__FRO)[ 0];
           } else {
-            affect__PUOB=' ';
+            affect__1XOB=' ';
           };
-          if ((affect__PUOB == ' ')) {
-            result__CZIH=FALSE__;
-            if ((! read_space__KSD())) {
-              result__CZIH=FALSE__;
+          if ((affect__1XOB == ' ')) {
+            result__BBJH=FALSE__;
+            if ((! read_space__MTD())) {
+              result__BBJH=FALSE__;
             } else {
-              result__DZIH='\0';
+              result__CBJH='\0';
               if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                result__DZIH=((__CHARACTER )(( 0)));
+                result__CBJH=((__CHARACTER )(( 0)));
               } else {
-                result__DZIH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+                result__CBJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
               };
-              if ((result__DZIH == ':')) {
+              if ((result__CBJH == ':')) {
                 position__CCC=(__INTEGER)(position__CCC +  1);
-                result__CZIH=TRUE__;
+                result__BBJH=TRUE__;
               };
             };
-            __tmp__3VOB=result__CZIH;
+            __tmp__JZOB=result__BBJH;
           } else {
-            __tmp__3VOB=FALSE__;
+            __tmp__JZOB=FALSE__;
           };
-          if (__tmp__3VOB) {
-            result__FZIH=FALSE__;
-            if ((! read_space__KSD())) {
-              result__FZIH=FALSE__;
+          if (__tmp__JZOB) {
+            result__EBJH=FALSE__;
+            if ((! read_space__MTD())) {
+              result__EBJH=FALSE__;
             } else {
-              result__GZIH='\0';
+              result__FBJH='\0';
               if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                result__GZIH=((__CHARACTER )(( 0)));
+                result__FBJH=((__CHARACTER )(( 0)));
               } else {
-                result__GZIH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+                result__FBJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
               };
-              if ((result__GZIH == '(')) {
+              if ((result__FBJH == '(')) {
                 position__CCC=(__INTEGER)(position__CCC +  1);
-                result__FZIH=TRUE__;
+                result__EBJH=TRUE__;
               };
             };
-            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)) {
+            if (result__EBJH) {
+              lt__ZXOB=read_type_list__YMO(PARSER__,FALSE__);
+              if (((void *)lt__ZXOB == (void *)NULL)) {
+                pos__RJWG=current_position__EZF();
+                put_error__text__NPG( 0,(&__string_237));
+                put_position__XQG(pos__RJWG);
+                put_string__P3F(msg_err__SPG);
+                if ((type_error__RPG !=  2)) {
                   exit(( 1));
                 };
               };
-              result__IZIH=FALSE__;
-              if ((! read_space__KSD())) {
-                result__IZIH=FALSE__;
+              result__HBJH=FALSE__;
+              if ((! read_space__MTD())) {
+                result__HBJH=FALSE__;
               } else {
-                result__JZIH='\0';
+                result__IBJH='\0';
                 if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                  result__JZIH=((__CHARACTER )(( 0)));
+                  result__IBJH=((__CHARACTER )(( 0)));
                 } else {
-                  result__JZIH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+                  result__IBJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
                 };
-                if ((result__JZIH == ')')) {
+                if ((result__IBJH == ')')) {
                   position__CCC=(__INTEGER)(position__CCC +  1);
-                  result__IZIH=TRUE__;
+                  result__HBJH=TRUE__;
                 };
               };
-              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)) {
+              if ((! result__HBJH)) {
+                pos__TJWG=current_position__EZF();
+                put_error__text__NPG( 2,(&__string_238));
+                put_position__XQG(pos__TJWG);
+                put_string__P3F(msg_err__SPG);
+                if ((type_error__RPG !=  2)) {
                   exit(( 1));
                 };
               };
-              t__MUOB=get__GGP(lt__NUOB);
+              t__YXOB=get__SJP(lt__ZXOB);
             } else {
-              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)) {
+              t__YXOB=read_type__WCM(PARSER__,FALSE__);
+              if (((void *)t__YXOB == (void *)NULL)) {
+                pos__VJWG=current_position__EZF();
+                put_error__text__NPG( 0,(&__string_237));
+                put_position__XQG(pos__VJWG);
+                put_string__P3F(msg_err__SPG);
+                if ((type_error__RPG !=  2)) {
                   exit(( 1));
                 };
               };
             };
-            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];
+            if (((read_symbol__SYJ((&__string_12)) || read_symbol__SYJ((&__string_13))) || read_symbol__SYJ((&__string_14)))) {
+              affect__1XOB=((__CHARACTER *)((__STRING_CONSTANT *)last_string__V1C)->storage__FRO)[ 0];
             };
           } else {
-            t__MUOB=type_void__VUF;
+            t__YXOB=type_void__ZXF;
           };
-          __tmp__BYOB=last_slot__0UOB;
-          if (((struct ___OBJ *)last_slot__0UOB)->__id==__ITM_SLOT__) {
-            set_result_type__X2FC(last_slot__0UOB,t__MUOB);
+          __tmp__N1OB=last_slot__GYOB;
+          if (((struct ___OBJ *)last_slot__GYOB)->__id==__ITM_SLOT__) {
+            set_result_type__FAGC(last_slot__GYOB,t__YXOB);
           } else {
-            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;
+            Self__RBGC=((__ITM_SLOT_OPERATOR *)__tmp__N1OB);
+            tm__TBGC=NULL;
+            Self__UD4G=((__SECTION_ *)Self__RBGC->parent_itm_slot__NW5B.id_section__F3C);
+            if ((((void *)Self__UD4G->name__11DC == (void *)(&__string_23)) || ((void *)Self__UD4G->name__11DC == (void *)(&__string_24)))) {
+              if (t__YXOB==NULL) {
+                __tmp__2BGC=NULL;
               } else {
-                switch (((struct ___OBJ *)t__MUOB)->__id) {
+                switch (((struct ___OBJ *)t__YXOB)->__id) {
                 case __ITM_TYPE_PARAMETER__: {
-                  __tmp__O4FC=((void *)t__MUOB);
+                  __tmp__2BGC=((void *)t__YXOB);
                 } break;
                 case __ITM_TYPE_SIMPLE__: {
-                  __tmp__O4FC=((void *)t__MUOB);
+                  __tmp__2BGC=((void *)t__YXOB);
                 } break;
                 case __ITM_TYPE_MULTI__: {
-                  __tmp__O4FC=NULL;
+                  __tmp__2BGC=NULL;
                 } break;
                 case __ITM_TYPE_BLOCK__: {
-                  __tmp__O4FC=((void *)t__MUOB);
+                  __tmp__2BGC=((void *)t__YXOB);
                 } break;
                 case __ITM_TYPE_GENERIC__: {
-                  __tmp__O4FC=((void *)t__MUOB);
+                  __tmp__2BGC=((void *)t__YXOB);
                 } break;
                 case __ITM_TYPE_STYLE__: {
-                  __tmp__O4FC=((void *)t__MUOB);
+                  __tmp__2BGC=((void *)t__YXOB);
                 } break;
                 }
               };
-              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)) {
+              tm__TBGC=__tmp__2BGC;
+              if (((((void *)__tmp__2BGC == (void *)NULL) || ((void *)__tmp__2BGC == (void *)type_self__XUN)) || ((void *)__tmp__2BGC == (void *)type_void__ZXF))) {
+                pos__M4ID=Self__RBGC->parent_itm_slot__NW5B.parent_named__15.parent_itm_object__4.position__GFJ;
+                put_error__text__NPG( 1,(&__string_239));
+                put_position__XQG(pos__M4ID);
+                put_string__P3F(msg_err__SPG);
+                if ((type_error__RPG !=  2)) {
                   exit(( 1));
                 };
               };
             };
-            Self__D4FC->parent_itm_slot__BT5B.result_type__B4FC=t__MUOB;
+            Self__RBGC->parent_itm_slot__NW5B.result_type__PBGC=t__YXOB;
           };
-          if (((struct ___OBJ *)last_slot__0UOB)->__id==__ITM_SLOT__) {
-            ((__ITM_SLOT *)last_slot__0UOB)->affect__Q5FC=affect__PUOB;
+          if (((struct ___OBJ *)last_slot__GYOB)->__id==__ITM_SLOT__) {
+            ((__ITM_SLOT *)last_slot__GYOB)->affect__4CGC=affect__1XOB;
           } else {
-            ((__ITM_SLOT_OPERATOR *)last_slot__0UOB)->parent_itm_slot__BT5B.affect__Q5FC=affect__PUOB;
+            ((__ITM_SLOT_OPERATOR *)last_slot__GYOB)->parent_itm_slot__NW5B.affect__4CGC=affect__1XOB;
           };
-          if ((affect__PUOB != ' ')) {
-            read_space__KSD();
+          if ((affect__1XOB != ' ')) {
+            read_space__MTD();
             if (is_shorter2__VI) {
-              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;
+              if (((void *)last_comment_slot__OBE != (void *)NULL)) {
+                __tmp__C2OB=last_comment_slot__OBE;
+                if (((struct ___OBJ *)last_slot__GYOB)->__id==__ITM_SLOT__) {
+                  ((__ITM_SLOT *)last_slot__GYOB)->comment__H3OB=__tmp__C2OB;
                 } else {
-                  ((__ITM_SLOT_OPERATOR *)last_slot__0UOB)->parent_itm_slot__BT5B.comment__1ZOB=__tmp__WYOB;
+                  ((__ITM_SLOT_OPERATOR *)last_slot__GYOB)->parent_itm_slot__NW5B.comment__H3OB=__tmp__C2OB;
                 };
               };
-              if (((void *)last_comment_extern__JYC != (void *)NULL)) {
-                if (((struct ___OBJ *)last_slot__0UOB)->__id==__ITM_SLOT__) {
-                  ((__ITM_SLOT *)last_slot__0UOB)->comment_chapter__T0HC=last_comment_extern__JYC;
+              if (((void *)last_comment_extern__JZC != (void *)NULL)) {
+                if (((struct ___OBJ *)last_slot__GYOB)->__id==__ITM_SLOT__) {
+                  ((__ITM_SLOT *)last_slot__GYOB)->comment_chapter__B4HC=last_comment_extern__JZC;
                 } else {
-                  ((__ITM_SLOT_OPERATOR *)last_slot__0UOB)->parent_itm_slot__BT5B.comment_chapter__T0HC=last_comment_extern__JYC;
+                  ((__ITM_SLOT_OPERATOR *)last_slot__GYOB)->parent_itm_slot__NW5B.comment_chapter__B4HC=last_comment_extern__JZC;
                 };
               };
-              skip_comment__A4D=TRUE__;
+              skip_comment__2AE=TRUE__;
             };
-            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__) {
+            old_pos__2XOB=position__CCC;
+            old_derive__3XOB=short_derive__PCC;
+            if (((void *)read_contract__CVF(PARSER__) != (void *)NULL)) {
+              if (((struct ___OBJ *)last_slot__GYOB)->__id==__ITM_SLOT__) {
               };
             };
-            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)) {
+            expr__RK3B=read_expr__XAJ(PARSER__);
+            if (((void *)expr__RK3B == (void *)NULL)) {
+              pos__3JWG=current_position__EZF();
+              put_error__text__NPG( 0,(&__string_240));
+              put_position__XQG(pos__3JWG);
+              put_string__P3F(msg_err__SPG);
+              if ((type_error__RPG !=  2)) {
                 exit(( 1));
               };
             };
-            __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);
+            __tmp__4K3B=last_slot__GYOB;
+            __tmp__5K3B=object__ZBC;
+            if (((struct ___OBJ *)last_slot__GYOB)->__id==__ITM_SLOT__) {
+              set_value__type__SIHC(last_slot__GYOB,expr__RK3B,object__ZBC);
             } else {
-              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) {
+              Self__MJHC=((__ITM_SLOT_OPERATOR *)__tmp__4K3B);
+              if ((Self__MJHC->parent_itm_slot__NW5B.affect__4CGC != '<')) {
+                copy__JDS(string_tmp__VH,(&__string_241));
+                append__ROS(string_tmp__VH,Self__MJHC->parent_itm_slot__NW5B.parent_named__15.name__LI);
+                n__ZIBD=get__YWB(string_tmp__VH);
+                sec__0IBD=get_name__EVOB((&__string_27));
+                larg__1IBD=create_with_capacity__4M5B( 1);
+                switch (((struct ___OBJ *)expr__RK3B)->__id) {
                 case __ITM_LIST__: {
-                  __tmp__YFBD=((__ITM_LIST *)expr__FH3B)->parent_itm_code__R3E.parent_itm_object__OBE.position__0BJ;
+                  __tmp__GJBD=((__ITM_LIST *)expr__RK3B)->parent_itm_code__VAF.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_LDOTS__: {
-                  __tmp__YFBD=((__ITM_LDOTS *)expr__FH3B)->parent_itm_constant__HTF.parent_itm_object__OBE.position__0BJ;
+                  __tmp__GJBD=((__ITM_LDOTS *)expr__RK3B)->parent_itm_constant__LWF.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_PROTOTYPE__: {
-                  __tmp__YFBD=((__ITM_PROTOTYPE *)expr__FH3B)->parent_itm_constant__TUF.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
+                  __tmp__GJBD=((__ITM_PROTOTYPE *)expr__RK3B)->parent_itm_constant__XXF.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_LIST_IDF__: {
-                  __tmp__YFBD=((__ITM_LIST_IDF *)expr__FH3B)->parent_itm_code__DBJ.parent_itm_object__OBE.position__0BJ;
+                  __tmp__GJBD=((__ITM_LIST_IDF *)expr__RK3B)->parent_itm_code__PEJ.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_WRITE_VALUE__: {
-                  __tmp__YFBD=((__ITM_WRITE_VALUE *)expr__FH3B)->parent_itm_write__ZBJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
+                  __tmp__GJBD=((__ITM_WRITE_VALUE *)expr__RK3B)->parent_itm_write__FFJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_WRITE_CAST__: {
-                  __tmp__YFBD=((__ITM_WRITE_CAST *)expr__FH3B)->parent_itm_write__QCJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
+                  __tmp__GJBD=((__ITM_WRITE_CAST *)expr__RK3B)->parent_itm_write__2FJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_READ__: {
-                  __tmp__YFBD=((__ITM_READ *)expr__FH3B)->parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
+                  __tmp__GJBD=((__ITM_READ *)expr__RK3B)->parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_WRITE_CODE__: {
-                  __tmp__YFBD=((__ITM_WRITE_CODE *)expr__FH3B)->parent_itm_write__1FJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
+                  __tmp__GJBD=((__ITM_WRITE_CODE *)expr__RK3B)->parent_itm_write__HJJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_OPERATOR__: {
-                  __tmp__YFBD=((__ITM_OPERATOR *)expr__FH3B)->parent_itm_code__3CL.parent_itm_object__OBE.position__0BJ;
+                  __tmp__GJBD=((__ITM_OPERATOR *)expr__RK3B)->parent_itm_code__JGL.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_READ_ARG1__: {
-                  __tmp__YFBD=((__ITM_READ_ARG1 *)expr__FH3B)->parent_itm_read__DGL.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
+                  __tmp__GJBD=((__ITM_READ_ARG1 *)expr__RK3B)->parent_itm_read__PJL.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_READ_ARG2__: {
-                  __tmp__YFBD=((__ITM_READ_ARG2 *)expr__FH3B)->parent_itm_read__QIL.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
+                  __tmp__GJBD=((__ITM_READ_ARG2 *)expr__RK3B)->parent_itm_read__2LL.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_EXPRESSION__: {
-                  __tmp__YFBD=position__GB5B(expr__FH3B);
+                  __tmp__GJBD=position__SE5B(expr__RK3B);
                 } break;
                 case __ITM_OLD__: {
-                  __tmp__YFBD=((__ITM_OLD *)expr__FH3B)->parent_itm_code__4ZL.parent_itm_object__OBE.position__0BJ;
+                  __tmp__GJBD=((__ITM_OLD *)expr__RK3B)->parent_itm_code__K3L.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_EXTERNAL_TYPE__: {
-                  __tmp__YFBD=((__ITM_EXTERNAL_TYPE *)expr__FH3B)->parent_itm_extern__T1M.parent_itm_code__S1M.parent_itm_object__OBE.position__0BJ;
+                  __tmp__GJBD=((__ITM_EXTERNAL_TYPE *)expr__RK3B)->parent_itm_extern__54M.parent_itm_code__44M.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_BLOCK__: {
-                  __tmp__YFBD=((__ITM_LIST *)((__ITM_BLOCK *)expr__FH3B)->list__LMDC)->parent_itm_code__R3E.parent_itm_object__OBE.position__0BJ;
+                  __tmp__GJBD=((__ITM_LIST *)((__ITM_BLOCK *)expr__RK3B)->list__ZPDC)->parent_itm_code__VAF.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_EXTERNAL__: {
-                  __tmp__YFBD=((__ITM_EXTERNAL *)expr__FH3B)->parent_itm_extern__YCN.parent_itm_code__S1M.parent_itm_object__OBE.position__0BJ;
+                  __tmp__GJBD=((__ITM_EXTERNAL *)expr__RK3B)->parent_itm_extern__EGN.parent_itm_code__44M.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_READ_ARGS__: {
-                  __tmp__YFBD=((__ITM_READ_ARGS *)expr__FH3B)->parent_itm_read__OAO.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
+                  __tmp__GJBD=((__ITM_READ_ARGS *)expr__RK3B)->parent_itm_read__0DO.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_REAL__: {
-                  __tmp__YFBD=((__ITM_REAL *)expr__FH3B)->parent_itm_constant__JOO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
+                  __tmp__GJBD=((__ITM_REAL *)expr__RK3B)->parent_itm_constant__VRO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_NUMBER__: {
-                  __tmp__YFBD=((__ITM_NUMBER *)expr__FH3B)->parent_itm_constant__1OO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
+                  __tmp__GJBD=((__ITM_NUMBER *)expr__RK3B)->parent_itm_constant__HSO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_CHARACTER__: {
-                  __tmp__YFBD=((__ITM_CHARACTER *)expr__FH3B)->parent_itm_constant__NPO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
+                  __tmp__GJBD=((__ITM_CHARACTER *)expr__RK3B)->parent_itm_constant__ZSO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_STRING__: {
-                  __tmp__YFBD=((__ITM_STRING *)expr__FH3B)->parent_itm_constant__4PO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
+                  __tmp__GJBD=((__ITM_STRING *)expr__RK3B)->parent_itm_constant__KTO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_RESULT__: {
-                  __tmp__YFBD=position__QIHC(expr__FH3B);
+                  __tmp__GJBD=position__4LHC(expr__RK3B);
                 } break;
                 };
-                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__;
+                result__KBJH=NULL;
+                ptr__LBJH=((__POINTER )(NULL));
+                typ_id__MBJH= 0;
+                sz__NBJH=((__UINTEGER_32 )sizeof(__ITM_ARG));
+                if ((sz__NBJH ==  0)) {
+                  result__KBJH=ITM_ARG__;
                 } else {
-                  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;
+                  typ_id__MBJH=-1;
+                  clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__NBJH);
+                  if ((typ_id__MBJH == (__INTEGER)(-  1))) {
+                    a__OBJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__PBJH=(__UINTEGER_32)((__UINTEGER_32)(sz__NBJH + a__OBJH) & (__UINTEGER_32)(~ a__OBJH));
+                    ptr_table__XBJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__PBJH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                    next__WBJH=((__POINTER )(NULL));
+                    result__YBJH=((__POINTER *)ptr_table__XBJH)[ 0];
+                    if ((result__YBJH == (void *)NULL)) {
+                      result__YBJH=new_lab__FTJ(new_size__PBJH);
+                      next__WBJH=(void *)((unsigned long)result__YBJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PBJH)));
+                      ((__POINTER *)next__WBJH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__XBJH)[ 0]=next__WBJH;
                     } else {
-                      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)));
+                      next__WBJH=((__POINTER *)result__YBJH)[ 0];
+                      if ((next__WBJH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YBJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__PBJH <<  1)) <=  4096)) {
+                          next__WBJH=(void *)((unsigned long)result__YBJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PBJH)));
                         } else {
-                          next__XZIH=new_lab__ZPJ(new_size__QZIH);
+                          next__WBJH=new_lab__FTJ(new_size__PBJH);
                         };
-                        ((__POINTER *)next__XZIH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__YZIH)[ 0]=next__XZIH;
+                        ((__POINTER *)next__WBJH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__XBJH)[ 0]=next__WBJH;
                       } else {
-                        ((__POINTER *)result__ZZIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XZIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__ZZIH=next__XZIH;
+                        ((__POINTER *)result__YBJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WBJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__YBJH=next__WBJH;
                       };
                     };
-                    ptr__MZIH=result__ZZIH;
+                    ptr__LBJH=result__YBJH;
                   } else {
-                    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;
+                    t__QBJH=((__UINTEGER_32 )typ_id__MBJH);
+                    a__RBJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__5BJH=(__UINTEGER_32)((__UINTEGER_32)(sz__NBJH + a__RBJH) & (__UINTEGER_32)(~ a__RBJH));
+                    ptr_table__2BJH=((__POINTER )(&(table_type[(t__QBJH)])));
+                    lab_type__4BJH=(__UINTEGER_32)(t__QBJH |  1);
+                    next__1BJH=((__POINTER )(NULL));
+                    result__3BJH=((__POINTER *)ptr_table__2BJH)[ 0];
+                    if ((result__3BJH == (void *)NULL)) {
+                      result__3BJH=new_lab__FTJ(lab_type__4BJH);
+                      next__1BJH=(void *)((unsigned long)result__3BJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5BJH)));
+                      ((__POINTER *)next__1BJH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__2BJH)[ 0]=next__1BJH;
                     } else {
-                      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)));
+                      next__1BJH=((__POINTER *)result__3BJH)[ 0];
+                      if ((next__1BJH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__3BJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__5BJH <<  1)) <=  4096)) {
+                          next__1BJH=(void *)((unsigned long)result__3BJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5BJH)));
                         } else {
-                          next__2ZIH=new_lab__ZPJ(lab_type__5ZIH);
+                          next__1BJH=new_lab__FTJ(lab_type__4BJH);
                         };
-                        ((__POINTER *)next__2ZIH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__3ZIH)[ 0]=next__2ZIH;
+                        ((__POINTER *)next__1BJH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__2BJH)[ 0]=next__1BJH;
                       } else {
-                        ((__POINTER *)result__4ZIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2ZIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__4ZIH=next__2ZIH;
+                        ((__POINTER *)result__3BJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1BJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__3BJH=next__1BJH;
                       };
                     };
-                    ptr__MZIH=result__4ZIH;
+                    ptr__LBJH=result__3BJH;
                   };
-                  result__LZIH=((__ITM_ARG *)ptr__MZIH);
-                  *(result__LZIH) = *(ITM_ARG__);
+                  result__KBJH=((__ITM_ARG *)ptr__LBJH);
+                  *(result__KBJH) = *(ITM_ARG__);
                 };
-                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) {
+                Self__SBJH=((__ITM_ARG *)result__KBJH);
+                Self__SBJH->parent_itm_argument__DIHB.parent_itm_code__C5M.position__GFJ=__tmp__GJBD;
+                Self__SBJH->name__U3HC=(&__string_58);
+                Self__SBJH->type__V3HC=type_self__XUN;
+                add_last__TCHC(larg__1IBD,result__KBJH);
+                switch (((struct ___OBJ *)expr__RK3B)->__id) {
                 case __ITM_LIST__: {
-                  __tmp__AGBD=((__ITM_LIST *)expr__FH3B)->parent_itm_code__R3E.parent_itm_object__OBE.position__0BJ;
+                  __tmp__OJBD=((__ITM_LIST *)expr__RK3B)->parent_itm_code__VAF.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_LDOTS__: {
-                  __tmp__AGBD=((__ITM_LDOTS *)expr__FH3B)->parent_itm_constant__HTF.parent_itm_object__OBE.position__0BJ;
+                  __tmp__OJBD=((__ITM_LDOTS *)expr__RK3B)->parent_itm_constant__LWF.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_PROTOTYPE__: {
-                  __tmp__AGBD=((__ITM_PROTOTYPE *)expr__FH3B)->parent_itm_constant__TUF.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
+                  __tmp__OJBD=((__ITM_PROTOTYPE *)expr__RK3B)->parent_itm_constant__XXF.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_LIST_IDF__: {
-                  __tmp__AGBD=((__ITM_LIST_IDF *)expr__FH3B)->parent_itm_code__DBJ.parent_itm_object__OBE.position__0BJ;
+                  __tmp__OJBD=((__ITM_LIST_IDF *)expr__RK3B)->parent_itm_code__PEJ.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_WRITE_VALUE__: {
-                  __tmp__AGBD=((__ITM_WRITE_VALUE *)expr__FH3B)->parent_itm_write__ZBJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
+                  __tmp__OJBD=((__ITM_WRITE_VALUE *)expr__RK3B)->parent_itm_write__FFJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_WRITE_CAST__: {
-                  __tmp__AGBD=((__ITM_WRITE_CAST *)expr__FH3B)->parent_itm_write__QCJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
+                  __tmp__OJBD=((__ITM_WRITE_CAST *)expr__RK3B)->parent_itm_write__2FJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_READ__: {
-                  __tmp__AGBD=((__ITM_READ *)expr__FH3B)->parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
+                  __tmp__OJBD=((__ITM_READ *)expr__RK3B)->parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_WRITE_CODE__: {
-                  __tmp__AGBD=((__ITM_WRITE_CODE *)expr__FH3B)->parent_itm_write__1FJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
+                  __tmp__OJBD=((__ITM_WRITE_CODE *)expr__RK3B)->parent_itm_write__HJJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_OPERATOR__: {
-                  __tmp__AGBD=((__ITM_OPERATOR *)expr__FH3B)->parent_itm_code__3CL.parent_itm_object__OBE.position__0BJ;
+                  __tmp__OJBD=((__ITM_OPERATOR *)expr__RK3B)->parent_itm_code__JGL.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_READ_ARG1__: {
-                  __tmp__AGBD=((__ITM_READ_ARG1 *)expr__FH3B)->parent_itm_read__DGL.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
+                  __tmp__OJBD=((__ITM_READ_ARG1 *)expr__RK3B)->parent_itm_read__PJL.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_READ_ARG2__: {
-                  __tmp__AGBD=((__ITM_READ_ARG2 *)expr__FH3B)->parent_itm_read__QIL.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
+                  __tmp__OJBD=((__ITM_READ_ARG2 *)expr__RK3B)->parent_itm_read__2LL.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_EXPRESSION__: {
-                  __tmp__AGBD=position__GB5B(expr__FH3B);
+                  __tmp__OJBD=position__SE5B(expr__RK3B);
                 } break;
                 case __ITM_OLD__: {
-                  __tmp__AGBD=((__ITM_OLD *)expr__FH3B)->parent_itm_code__4ZL.parent_itm_object__OBE.position__0BJ;
+                  __tmp__OJBD=((__ITM_OLD *)expr__RK3B)->parent_itm_code__K3L.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_EXTERNAL_TYPE__: {
-                  __tmp__AGBD=((__ITM_EXTERNAL_TYPE *)expr__FH3B)->parent_itm_extern__T1M.parent_itm_code__S1M.parent_itm_object__OBE.position__0BJ;
+                  __tmp__OJBD=((__ITM_EXTERNAL_TYPE *)expr__RK3B)->parent_itm_extern__54M.parent_itm_code__44M.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_BLOCK__: {
-                  __tmp__AGBD=((__ITM_LIST *)((__ITM_BLOCK *)expr__FH3B)->list__LMDC)->parent_itm_code__R3E.parent_itm_object__OBE.position__0BJ;
+                  __tmp__OJBD=((__ITM_LIST *)((__ITM_BLOCK *)expr__RK3B)->list__ZPDC)->parent_itm_code__VAF.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_EXTERNAL__: {
-                  __tmp__AGBD=((__ITM_EXTERNAL *)expr__FH3B)->parent_itm_extern__YCN.parent_itm_code__S1M.parent_itm_object__OBE.position__0BJ;
+                  __tmp__OJBD=((__ITM_EXTERNAL *)expr__RK3B)->parent_itm_extern__EGN.parent_itm_code__44M.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_READ_ARGS__: {
-                  __tmp__AGBD=((__ITM_READ_ARGS *)expr__FH3B)->parent_itm_read__OAO.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
+                  __tmp__OJBD=((__ITM_READ_ARGS *)expr__RK3B)->parent_itm_read__0DO.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_REAL__: {
-                  __tmp__AGBD=((__ITM_REAL *)expr__FH3B)->parent_itm_constant__JOO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
+                  __tmp__OJBD=((__ITM_REAL *)expr__RK3B)->parent_itm_constant__VRO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_NUMBER__: {
-                  __tmp__AGBD=((__ITM_NUMBER *)expr__FH3B)->parent_itm_constant__1OO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
+                  __tmp__OJBD=((__ITM_NUMBER *)expr__RK3B)->parent_itm_constant__HSO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_CHARACTER__: {
-                  __tmp__AGBD=((__ITM_CHARACTER *)expr__FH3B)->parent_itm_constant__NPO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
+                  __tmp__OJBD=((__ITM_CHARACTER *)expr__RK3B)->parent_itm_constant__ZSO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_STRING__: {
-                  __tmp__AGBD=((__ITM_STRING *)expr__FH3B)->parent_itm_constant__4PO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
+                  __tmp__OJBD=((__ITM_STRING *)expr__RK3B)->parent_itm_constant__KTO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_RESULT__: {
-                  __tmp__AGBD=position__QIHC(expr__FH3B);
+                  __tmp__OJBD=position__4LHC(expr__RK3B);
                 } break;
                 };
-                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__;
+                result__ACJH=NULL;
+                ptr__BCJH=((__POINTER )(NULL));
+                typ_id__CCJH= 0;
+                sz__DCJH=((__UINTEGER_32 )sizeof(__ITM_SLOT));
+                if ((sz__DCJH ==  0)) {
+                  result__ACJH=ITM_SLOT__;
                 } else {
-                  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;
+                  typ_id__CCJH=-1;
+                  clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__DCJH);
+                  if ((typ_id__CCJH == (__INTEGER)(-  1))) {
+                    a__ECJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__FCJH=(__UINTEGER_32)((__UINTEGER_32)(sz__DCJH + a__ECJH) & (__UINTEGER_32)(~ a__ECJH));
+                    ptr_table__NCJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__FCJH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                    next__MCJH=((__POINTER )(NULL));
+                    result__OCJH=((__POINTER *)ptr_table__NCJH)[ 0];
+                    if ((result__OCJH == (void *)NULL)) {
+                      result__OCJH=new_lab__FTJ(new_size__FCJH);
+                      next__MCJH=(void *)((unsigned long)result__OCJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FCJH)));
+                      ((__POINTER *)next__MCJH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__NCJH)[ 0]=next__MCJH;
                     } else {
-                      next__N0IH=((__POINTER *)result__P0IH)[ 0];
-                      if ((next__N0IH == (void *)NULL)) {
-                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__P0IH - (unsigned long)begin_memory__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)));
+                      next__MCJH=((__POINTER *)result__OCJH)[ 0];
+                      if ((next__MCJH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__OCJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__FCJH <<  1)) <=  4096)) {
+                          next__MCJH=(void *)((unsigned long)result__OCJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FCJH)));
                         } else {
-                          next__N0IH=new_lab__ZPJ(new_size__G0IH);
+                          next__MCJH=new_lab__FTJ(new_size__FCJH);
                         };
-                        ((__POINTER *)next__N0IH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__O0IH)[ 0]=next__N0IH;
+                        ((__POINTER *)next__MCJH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__NCJH)[ 0]=next__MCJH;
                       } else {
-                        ((__POINTER *)result__P0IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__N0IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__P0IH=next__N0IH;
+                        ((__POINTER *)result__OCJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MCJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__OCJH=next__MCJH;
                       };
                     };
-                    ptr__C0IH=result__P0IH;
+                    ptr__BCJH=result__OCJH;
                   } else {
-                    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;
+                    t__GCJH=((__UINTEGER_32 )typ_id__CCJH);
+                    a__HCJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__VCJH=(__UINTEGER_32)((__UINTEGER_32)(sz__DCJH + a__HCJH) & (__UINTEGER_32)(~ a__HCJH));
+                    ptr_table__SCJH=((__POINTER )(&(table_type[(t__GCJH)])));
+                    lab_type__UCJH=(__UINTEGER_32)(t__GCJH |  1);
+                    next__RCJH=((__POINTER )(NULL));
+                    result__TCJH=((__POINTER *)ptr_table__SCJH)[ 0];
+                    if ((result__TCJH == (void *)NULL)) {
+                      result__TCJH=new_lab__FTJ(lab_type__UCJH);
+                      next__RCJH=(void *)((unsigned long)result__TCJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VCJH)));
+                      ((__POINTER *)next__RCJH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__SCJH)[ 0]=next__RCJH;
                     } else {
-                      next__S0IH=((__POINTER *)result__U0IH)[ 0];
-                      if ((next__S0IH == (void *)NULL)) {
-                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__U0IH - (unsigned long)begin_memory__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)));
+                      next__RCJH=((__POINTER *)result__TCJH)[ 0];
+                      if ((next__RCJH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TCJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__VCJH <<  1)) <=  4096)) {
+                          next__RCJH=(void *)((unsigned long)result__TCJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VCJH)));
                         } else {
-                          next__S0IH=new_lab__ZPJ(lab_type__V0IH);
+                          next__RCJH=new_lab__FTJ(lab_type__UCJH);
                         };
-                        ((__POINTER *)next__S0IH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__T0IH)[ 0]=next__S0IH;
+                        ((__POINTER *)next__RCJH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__SCJH)[ 0]=next__RCJH;
                       } else {
-                        ((__POINTER *)result__U0IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__S0IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__U0IH=next__S0IH;
+                        ((__POINTER *)result__TCJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RCJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__TCJH=next__RCJH;
                       };
                     };
-                    ptr__C0IH=result__U0IH;
+                    ptr__BCJH=result__TCJH;
                   };
-                  result__B0IH=((__ITM_SLOT *)ptr__C0IH);
-                  *(result__B0IH) = *(ITM_SLOT__);
+                  result__ACJH=((__ITM_SLOT *)ptr__BCJH);
+                  *(result__ACJH) = *(ITM_SLOT__);
                 };
-                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) {
+                Self__ICJH=((__ITM_SLOT *)result__ACJH);
+                Self__ICJH->parent_named__15.name__LI=n__ZIBD;
+                Self__ICJH->parent_named__15.parent_itm_object__4.position__GFJ=__tmp__OJBD;
+                Self__ICJH->id_section__F3C=sec__0IBD;
+                ((__ITM_SLOT *)result__ACJH)->affect__4CGC='<';
+                set_value__type__SIHC(result__ACJH,expr__RK3B,__tmp__5K3B);
+                set_argument_list__OFHC(result__ACJH,larg__1IBD);
+                set_result_type__FAGC(result__ACJH,Self__MJHC->parent_itm_slot__NW5B.result_type__PBGC);
+                fast_put__to__0QGC(((__PROTOTYPE *)__tmp__5K3B)->slot_list__MVS,result__ACJH,result__ACJH->parent_named__15.name__LI);
+                switch (((struct ___OBJ *)expr__RK3B)->__id) {
                 case __ITM_LIST__: {
-                  __tmp__UGBD=((__ITM_LIST *)expr__FH3B)->parent_itm_code__R3E.parent_itm_object__OBE.position__0BJ;
+                  __tmp__CKBD=((__ITM_LIST *)expr__RK3B)->parent_itm_code__VAF.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_LDOTS__: {
-                  __tmp__UGBD=((__ITM_LDOTS *)expr__FH3B)->parent_itm_constant__HTF.parent_itm_object__OBE.position__0BJ;
+                  __tmp__CKBD=((__ITM_LDOTS *)expr__RK3B)->parent_itm_constant__LWF.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_PROTOTYPE__: {
-                  __tmp__UGBD=((__ITM_PROTOTYPE *)expr__FH3B)->parent_itm_constant__TUF.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
+                  __tmp__CKBD=((__ITM_PROTOTYPE *)expr__RK3B)->parent_itm_constant__XXF.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_LIST_IDF__: {
-                  __tmp__UGBD=((__ITM_LIST_IDF *)expr__FH3B)->parent_itm_code__DBJ.parent_itm_object__OBE.position__0BJ;
+                  __tmp__CKBD=((__ITM_LIST_IDF *)expr__RK3B)->parent_itm_code__PEJ.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_WRITE_VALUE__: {
-                  __tmp__UGBD=((__ITM_WRITE_VALUE *)expr__FH3B)->parent_itm_write__ZBJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
+                  __tmp__CKBD=((__ITM_WRITE_VALUE *)expr__RK3B)->parent_itm_write__FFJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_WRITE_CAST__: {
-                  __tmp__UGBD=((__ITM_WRITE_CAST *)expr__FH3B)->parent_itm_write__QCJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
+                  __tmp__CKBD=((__ITM_WRITE_CAST *)expr__RK3B)->parent_itm_write__2FJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_READ__: {
-                  __tmp__UGBD=((__ITM_READ *)expr__FH3B)->parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
+                  __tmp__CKBD=((__ITM_READ *)expr__RK3B)->parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_WRITE_CODE__: {
-                  __tmp__UGBD=((__ITM_WRITE_CODE *)expr__FH3B)->parent_itm_write__1FJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
+                  __tmp__CKBD=((__ITM_WRITE_CODE *)expr__RK3B)->parent_itm_write__HJJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_OPERATOR__: {
-                  __tmp__UGBD=((__ITM_OPERATOR *)expr__FH3B)->parent_itm_code__3CL.parent_itm_object__OBE.position__0BJ;
+                  __tmp__CKBD=((__ITM_OPERATOR *)expr__RK3B)->parent_itm_code__JGL.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_READ_ARG1__: {
-                  __tmp__UGBD=((__ITM_READ_ARG1 *)expr__FH3B)->parent_itm_read__DGL.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
+                  __tmp__CKBD=((__ITM_READ_ARG1 *)expr__RK3B)->parent_itm_read__PJL.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_READ_ARG2__: {
-                  __tmp__UGBD=((__ITM_READ_ARG2 *)expr__FH3B)->parent_itm_read__QIL.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
+                  __tmp__CKBD=((__ITM_READ_ARG2 *)expr__RK3B)->parent_itm_read__2LL.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_EXPRESSION__: {
-                  __tmp__UGBD=position__GB5B(expr__FH3B);
+                  __tmp__CKBD=position__SE5B(expr__RK3B);
                 } break;
                 case __ITM_OLD__: {
-                  __tmp__UGBD=((__ITM_OLD *)expr__FH3B)->parent_itm_code__4ZL.parent_itm_object__OBE.position__0BJ;
+                  __tmp__CKBD=((__ITM_OLD *)expr__RK3B)->parent_itm_code__K3L.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_EXTERNAL_TYPE__: {
-                  __tmp__UGBD=((__ITM_EXTERNAL_TYPE *)expr__FH3B)->parent_itm_extern__T1M.parent_itm_code__S1M.parent_itm_object__OBE.position__0BJ;
+                  __tmp__CKBD=((__ITM_EXTERNAL_TYPE *)expr__RK3B)->parent_itm_extern__54M.parent_itm_code__44M.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_BLOCK__: {
-                  __tmp__UGBD=((__ITM_LIST *)((__ITM_BLOCK *)expr__FH3B)->list__LMDC)->parent_itm_code__R3E.parent_itm_object__OBE.position__0BJ;
+                  __tmp__CKBD=((__ITM_LIST *)((__ITM_BLOCK *)expr__RK3B)->list__ZPDC)->parent_itm_code__VAF.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_EXTERNAL__: {
-                  __tmp__UGBD=((__ITM_EXTERNAL *)expr__FH3B)->parent_itm_extern__YCN.parent_itm_code__S1M.parent_itm_object__OBE.position__0BJ;
+                  __tmp__CKBD=((__ITM_EXTERNAL *)expr__RK3B)->parent_itm_extern__EGN.parent_itm_code__44M.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_READ_ARGS__: {
-                  __tmp__UGBD=((__ITM_READ_ARGS *)expr__FH3B)->parent_itm_read__OAO.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
+                  __tmp__CKBD=((__ITM_READ_ARGS *)expr__RK3B)->parent_itm_read__0DO.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_REAL__: {
-                  __tmp__UGBD=((__ITM_REAL *)expr__FH3B)->parent_itm_constant__JOO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
+                  __tmp__CKBD=((__ITM_REAL *)expr__RK3B)->parent_itm_constant__VRO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_NUMBER__: {
-                  __tmp__UGBD=((__ITM_NUMBER *)expr__FH3B)->parent_itm_constant__1OO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
+                  __tmp__CKBD=((__ITM_NUMBER *)expr__RK3B)->parent_itm_constant__HSO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_CHARACTER__: {
-                  __tmp__UGBD=((__ITM_CHARACTER *)expr__FH3B)->parent_itm_constant__NPO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
+                  __tmp__CKBD=((__ITM_CHARACTER *)expr__RK3B)->parent_itm_constant__ZSO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_STRING__: {
-                  __tmp__UGBD=((__ITM_STRING *)expr__FH3B)->parent_itm_constant__4PO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
+                  __tmp__CKBD=((__ITM_STRING *)expr__RK3B)->parent_itm_constant__KTO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_RESULT__: {
-                  __tmp__UGBD=position__QIHC(expr__FH3B);
+                  __tmp__CKBD=position__4LHC(expr__RK3B);
                 } break;
                 };
-                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__;
+                get__2UI(((__PROTOTYPE *)__tmp__5K3B)->parent_named__5.name__LI);
+                result__WCJH=NULL;
+                ptr__XCJH=((__POINTER )(NULL));
+                typ_id__YCJH= 0;
+                sz__ZCJH=((__UINTEGER_32 )sizeof(__ITM_PROTOTYPE));
+                if ((sz__ZCJH ==  0)) {
+                  result__WCJH=ITM_PROTOTYPE__;
                 } else {
-                  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;
+                  typ_id__YCJH=-1;
+                  clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__ZCJH);
+                  if ((typ_id__YCJH == (__INTEGER)(-  1))) {
+                    a__0CJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__1CJH=(__UINTEGER_32)((__UINTEGER_32)(sz__ZCJH + a__0CJH) & (__UINTEGER_32)(~ a__0CJH));
+                    ptr_table__ADJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__1CJH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                    next__5CJH=((__POINTER )(NULL));
+                    result__BDJH=((__POINTER *)ptr_table__ADJH)[ 0];
+                    if ((result__BDJH == (void *)NULL)) {
+                      result__BDJH=new_lab__FTJ(new_size__1CJH);
+                      next__5CJH=(void *)((unsigned long)result__BDJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1CJH)));
+                      ((__POINTER *)next__5CJH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__ADJH)[ 0]=next__5CJH;
                     } else {
-                      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)));
+                      next__5CJH=((__POINTER *)result__BDJH)[ 0];
+                      if ((next__5CJH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BDJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__1CJH <<  1)) <=  4096)) {
+                          next__5CJH=(void *)((unsigned long)result__BDJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1CJH)));
                         } else {
-                          next__A1IH=new_lab__ZPJ(new_size__20IH);
+                          next__5CJH=new_lab__FTJ(new_size__1CJH);
                         };
-                        ((__POINTER *)next__A1IH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__B1IH)[ 0]=next__A1IH;
+                        ((__POINTER *)next__5CJH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__ADJH)[ 0]=next__5CJH;
                       } else {
-                        ((__POINTER *)result__C1IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__A1IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__C1IH=next__A1IH;
+                        ((__POINTER *)result__BDJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5CJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__BDJH=next__5CJH;
                       };
                     };
-                    ptr__Y0IH=result__C1IH;
+                    ptr__XCJH=result__BDJH;
                   } else {
-                    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;
+                    t__2CJH=((__UINTEGER_32 )typ_id__YCJH);
+                    a__3CJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__IDJH=(__UINTEGER_32)((__UINTEGER_32)(sz__ZCJH + a__3CJH) & (__UINTEGER_32)(~ a__3CJH));
+                    ptr_table__FDJH=((__POINTER )(&(table_type[(t__2CJH)])));
+                    lab_type__HDJH=(__UINTEGER_32)(t__2CJH |  1);
+                    next__EDJH=((__POINTER )(NULL));
+                    result__GDJH=((__POINTER *)ptr_table__FDJH)[ 0];
+                    if ((result__GDJH == (void *)NULL)) {
+                      result__GDJH=new_lab__FTJ(lab_type__HDJH);
+                      next__EDJH=(void *)((unsigned long)result__GDJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IDJH)));
+                      ((__POINTER *)next__EDJH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__FDJH)[ 0]=next__EDJH;
                     } else {
-                      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)));
+                      next__EDJH=((__POINTER *)result__GDJH)[ 0];
+                      if ((next__EDJH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GDJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__IDJH <<  1)) <=  4096)) {
+                          next__EDJH=(void *)((unsigned long)result__GDJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IDJH)));
                         } else {
-                          next__F1IH=new_lab__ZPJ(lab_type__I1IH);
+                          next__EDJH=new_lab__FTJ(lab_type__HDJH);
                         };
-                        ((__POINTER *)next__F1IH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__G1IH)[ 0]=next__F1IH;
+                        ((__POINTER *)next__EDJH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__FDJH)[ 0]=next__EDJH;
                       } else {
-                        ((__POINTER *)result__H1IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__F1IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__H1IH=next__F1IH;
+                        ((__POINTER *)result__GDJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EDJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__GDJH=next__EDJH;
                       };
                     };
-                    ptr__Y0IH=result__H1IH;
+                    ptr__XCJH=result__GDJH;
                   };
-                  result__X0IH=((__ITM_PROTOTYPE *)ptr__Y0IH);
-                  *(result__X0IH) = *(ITM_PROTOTYPE__);
+                  result__WCJH=((__ITM_PROTOTYPE *)ptr__XCJH);
+                  *(result__WCJH) = *(ITM_PROTOTYPE__);
                 };
-                ((__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) {
+                ((__ITM_PROTOTYPE *)result__WCJH)->parent_itm_constant__XXF.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ=__tmp__CKBD;
+                switch (((struct ___OBJ *)expr__RK3B)->__id) {
                 case __ITM_LIST__: {
-                  __tmp__3GBD=((__ITM_LIST *)expr__FH3B)->parent_itm_code__R3E.parent_itm_object__OBE.position__0BJ;
+                  __tmp__LKBD=((__ITM_LIST *)expr__RK3B)->parent_itm_code__VAF.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_LDOTS__: {
-                  __tmp__3GBD=((__ITM_LDOTS *)expr__FH3B)->parent_itm_constant__HTF.parent_itm_object__OBE.position__0BJ;
+                  __tmp__LKBD=((__ITM_LDOTS *)expr__RK3B)->parent_itm_constant__LWF.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_PROTOTYPE__: {
-                  __tmp__3GBD=((__ITM_PROTOTYPE *)expr__FH3B)->parent_itm_constant__TUF.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
+                  __tmp__LKBD=((__ITM_PROTOTYPE *)expr__RK3B)->parent_itm_constant__XXF.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_LIST_IDF__: {
-                  __tmp__3GBD=((__ITM_LIST_IDF *)expr__FH3B)->parent_itm_code__DBJ.parent_itm_object__OBE.position__0BJ;
+                  __tmp__LKBD=((__ITM_LIST_IDF *)expr__RK3B)->parent_itm_code__PEJ.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_WRITE_VALUE__: {
-                  __tmp__3GBD=((__ITM_WRITE_VALUE *)expr__FH3B)->parent_itm_write__ZBJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
+                  __tmp__LKBD=((__ITM_WRITE_VALUE *)expr__RK3B)->parent_itm_write__FFJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_WRITE_CAST__: {
-                  __tmp__3GBD=((__ITM_WRITE_CAST *)expr__FH3B)->parent_itm_write__QCJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
+                  __tmp__LKBD=((__ITM_WRITE_CAST *)expr__RK3B)->parent_itm_write__2FJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_READ__: {
-                  __tmp__3GBD=((__ITM_READ *)expr__FH3B)->parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
+                  __tmp__LKBD=((__ITM_READ *)expr__RK3B)->parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_WRITE_CODE__: {
-                  __tmp__3GBD=((__ITM_WRITE_CODE *)expr__FH3B)->parent_itm_write__1FJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
+                  __tmp__LKBD=((__ITM_WRITE_CODE *)expr__RK3B)->parent_itm_write__HJJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_OPERATOR__: {
-                  __tmp__3GBD=((__ITM_OPERATOR *)expr__FH3B)->parent_itm_code__3CL.parent_itm_object__OBE.position__0BJ;
+                  __tmp__LKBD=((__ITM_OPERATOR *)expr__RK3B)->parent_itm_code__JGL.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_READ_ARG1__: {
-                  __tmp__3GBD=((__ITM_READ_ARG1 *)expr__FH3B)->parent_itm_read__DGL.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
+                  __tmp__LKBD=((__ITM_READ_ARG1 *)expr__RK3B)->parent_itm_read__PJL.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_READ_ARG2__: {
-                  __tmp__3GBD=((__ITM_READ_ARG2 *)expr__FH3B)->parent_itm_read__QIL.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
+                  __tmp__LKBD=((__ITM_READ_ARG2 *)expr__RK3B)->parent_itm_read__2LL.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_EXPRESSION__: {
-                  __tmp__3GBD=position__GB5B(expr__FH3B);
+                  __tmp__LKBD=position__SE5B(expr__RK3B);
                 } break;
                 case __ITM_OLD__: {
-                  __tmp__3GBD=((__ITM_OLD *)expr__FH3B)->parent_itm_code__4ZL.parent_itm_object__OBE.position__0BJ;
+                  __tmp__LKBD=((__ITM_OLD *)expr__RK3B)->parent_itm_code__K3L.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_EXTERNAL_TYPE__: {
-                  __tmp__3GBD=((__ITM_EXTERNAL_TYPE *)expr__FH3B)->parent_itm_extern__T1M.parent_itm_code__S1M.parent_itm_object__OBE.position__0BJ;
+                  __tmp__LKBD=((__ITM_EXTERNAL_TYPE *)expr__RK3B)->parent_itm_extern__54M.parent_itm_code__44M.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_BLOCK__: {
-                  __tmp__3GBD=((__ITM_LIST *)((__ITM_BLOCK *)expr__FH3B)->list__LMDC)->parent_itm_code__R3E.parent_itm_object__OBE.position__0BJ;
+                  __tmp__LKBD=((__ITM_LIST *)((__ITM_BLOCK *)expr__RK3B)->list__ZPDC)->parent_itm_code__VAF.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_EXTERNAL__: {
-                  __tmp__3GBD=((__ITM_EXTERNAL *)expr__FH3B)->parent_itm_extern__YCN.parent_itm_code__S1M.parent_itm_object__OBE.position__0BJ;
+                  __tmp__LKBD=((__ITM_EXTERNAL *)expr__RK3B)->parent_itm_extern__EGN.parent_itm_code__44M.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_READ_ARGS__: {
-                  __tmp__3GBD=((__ITM_READ_ARGS *)expr__FH3B)->parent_itm_read__OAO.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
+                  __tmp__LKBD=((__ITM_READ_ARGS *)expr__RK3B)->parent_itm_read__0DO.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_REAL__: {
-                  __tmp__3GBD=((__ITM_REAL *)expr__FH3B)->parent_itm_constant__JOO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
+                  __tmp__LKBD=((__ITM_REAL *)expr__RK3B)->parent_itm_constant__VRO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_NUMBER__: {
-                  __tmp__3GBD=((__ITM_NUMBER *)expr__FH3B)->parent_itm_constant__1OO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
+                  __tmp__LKBD=((__ITM_NUMBER *)expr__RK3B)->parent_itm_constant__HSO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_CHARACTER__: {
-                  __tmp__3GBD=((__ITM_CHARACTER *)expr__FH3B)->parent_itm_constant__NPO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
+                  __tmp__LKBD=((__ITM_CHARACTER *)expr__RK3B)->parent_itm_constant__ZSO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_STRING__: {
-                  __tmp__3GBD=((__ITM_STRING *)expr__FH3B)->parent_itm_constant__4PO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
+                  __tmp__LKBD=((__ITM_STRING *)expr__RK3B)->parent_itm_constant__KTO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
                 } break;
                 case __ITM_RESULT__: {
-                  __tmp__3GBD=position__QIHC(expr__FH3B);
+                  __tmp__LKBD=position__4LHC(expr__RK3B);
                 } break;
                 };
-                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__;
+                result__JDJH=NULL;
+                ptr__KDJH=((__POINTER )(NULL));
+                typ_id__LDJH= 0;
+                sz__MDJH=((__UINTEGER_32 )sizeof(__ITM_READ_ARG1));
+                if ((sz__MDJH ==  0)) {
+                  result__JDJH=ITM_READ_ARG1__;
                 } else {
-                  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;
+                  typ_id__LDJH=-1;
+                  clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__MDJH);
+                  if ((typ_id__LDJH == (__INTEGER)(-  1))) {
+                    a__NDJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__ODJH=(__UINTEGER_32)((__UINTEGER_32)(sz__MDJH + a__NDJH) & (__UINTEGER_32)(~ a__NDJH));
+                    ptr_table__TDJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ODJH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                    next__SDJH=((__POINTER )(NULL));
+                    result__UDJH=((__POINTER *)ptr_table__TDJH)[ 0];
+                    if ((result__UDJH == (void *)NULL)) {
+                      result__UDJH=new_lab__FTJ(new_size__ODJH);
+                      next__SDJH=(void *)((unsigned long)result__UDJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ODJH)));
+                      ((__POINTER *)next__SDJH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__TDJH)[ 0]=next__SDJH;
                     } else {
-                      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)));
+                      next__SDJH=((__POINTER *)result__UDJH)[ 0];
+                      if ((next__SDJH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__UDJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__ODJH <<  1)) <=  4096)) {
+                          next__SDJH=(void *)((unsigned long)result__UDJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ODJH)));
                         } else {
-                          next__T1IH=new_lab__ZPJ(new_size__P1IH);
+                          next__SDJH=new_lab__FTJ(new_size__ODJH);
                         };
-                        ((__POINTER *)next__T1IH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__U1IH)[ 0]=next__T1IH;
+                        ((__POINTER *)next__SDJH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__TDJH)[ 0]=next__SDJH;
                       } else {
-                        ((__POINTER *)result__V1IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__T1IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__V1IH=next__T1IH;
+                        ((__POINTER *)result__UDJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__SDJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__UDJH=next__SDJH;
                       };
                     };
-                    ptr__L1IH=result__V1IH;
+                    ptr__KDJH=result__UDJH;
                   } else {
-                    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;
+                    t__PDJH=((__UINTEGER_32 )typ_id__LDJH);
+                    a__QDJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__1DJH=(__UINTEGER_32)((__UINTEGER_32)(sz__MDJH + a__QDJH) & (__UINTEGER_32)(~ a__QDJH));
+                    ptr_table__YDJH=((__POINTER )(&(table_type[(t__PDJH)])));
+                    lab_type__0DJH=(__UINTEGER_32)(t__PDJH |  1);
+                    next__XDJH=((__POINTER )(NULL));
+                    result__ZDJH=((__POINTER *)ptr_table__YDJH)[ 0];
+                    if ((result__ZDJH == (void *)NULL)) {
+                      result__ZDJH=new_lab__FTJ(lab_type__0DJH);
+                      next__XDJH=(void *)((unsigned long)result__ZDJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1DJH)));
+                      ((__POINTER *)next__XDJH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__YDJH)[ 0]=next__XDJH;
                     } else {
-                      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)));
+                      next__XDJH=((__POINTER *)result__ZDJH)[ 0];
+                      if ((next__XDJH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ZDJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__1DJH <<  1)) <=  4096)) {
+                          next__XDJH=(void *)((unsigned long)result__ZDJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1DJH)));
                         } else {
-                          next__Y1IH=new_lab__ZPJ(lab_type__11IH);
+                          next__XDJH=new_lab__FTJ(lab_type__0DJH);
                         };
-                        ((__POINTER *)next__Y1IH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__Z1IH)[ 0]=next__Y1IH;
+                        ((__POINTER *)next__XDJH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__YDJH)[ 0]=next__XDJH;
                       } else {
-                        ((__POINTER *)result__01IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__Y1IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__01IH=next__Y1IH;
+                        ((__POINTER *)result__ZDJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XDJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__ZDJH=next__XDJH;
                       };
                     };
-                    ptr__L1IH=result__01IH;
+                    ptr__KDJH=result__ZDJH;
                   };
-                  result__K1IH=((__ITM_READ_ARG1 *)ptr__L1IH);
-                  *(result__K1IH) = *(ITM_READ_ARG1__);
+                  result__JDJH=((__ITM_READ_ARG1 *)ptr__KDJH);
+                  *(result__JDJH) = *(ITM_READ_ARG1__);
                 };
-                ((__ITM_READ_ARG1 *)result__K1IH)->parent_itm_read__DGL.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ=__tmp__3GBD;
+                ((__ITM_READ_ARG1 *)result__JDJH)->parent_itm_read__PJL.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ=__tmp__LKBD;
               };
             };
-            if (((void *)read_contract__4RF(PARSER__) != (void *)NULL)) {
-              if (((struct ___OBJ *)last_slot__0UOB)->__id==__ITM_SLOT__) {
+            if (((void *)read_contract__CVF(PARSER__) != (void *)NULL)) {
+              if (((struct ___OBJ *)last_slot__GYOB)->__id==__ITM_SLOT__) {
               };
             };
           };
-          result__31IH=FALSE__;
-          if ((! read_space__KSD())) {
-            result__31IH=FALSE__;
+          result__2DJH=FALSE__;
+          if ((! read_space__MTD())) {
+            result__2DJH=FALSE__;
           } else {
-            result__41IH='\0';
+            result__3DJH='\0';
             if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-              result__41IH=((__CHARACTER )(( 0)));
+              result__3DJH=((__CHARACTER )(( 0)));
             } else {
-              result__41IH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+              result__3DJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
             };
-            if ((result__41IH == ';')) {
+            if ((result__3DJH == ';')) {
               position__CCC=(__INTEGER)(position__CCC +  1);
-              result__31IH=TRUE__;
+              result__2DJH=TRUE__;
             };
           };
-          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)) {
+          if ((! result__2DJH)) {
+            pos__HKWG=current_position__EZF();
+            put_error__text__NPG( 2,(&__string_242));
+            put_position__XQG(pos__HKWG);
+            put_string__P3F(msg_err__SPG);
+            if ((type_error__RPG !=  2)) {
               exit(( 1));
             };
           };
           if (is_shorter2__VI) {
-            skip_comment__A4D=FALSE__;
-            read_space__KSD();
-            if (((struct ___OBJ *)last_slot__0UOB)->__id==__ITM_SLOT__) {
-              __tmp__2ZOB=((__ITM_SLOT *)last_slot__0UOB)->comment__1ZOB;
+            skip_comment__2AE=FALSE__;
+            read_space__MTD();
+            if (((struct ___OBJ *)last_slot__GYOB)->__id==__ITM_SLOT__) {
+              __tmp__I3OB=((__ITM_SLOT *)last_slot__GYOB)->comment__H3OB;
             } else {
-              __tmp__2ZOB=((__ITM_SLOT_OPERATOR *)last_slot__0UOB)->parent_itm_slot__BT5B.comment__1ZOB;
+              __tmp__I3OB=((__ITM_SLOT_OPERATOR *)last_slot__GYOB)->parent_itm_slot__NW5B.comment__H3OB;
             };
-            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;
+            if ((((void *)__tmp__I3OB == (void *)NULL) && ((void *)last_comment_slot__OBE != (void *)NULL))) {
+              __tmp__Y3OB=last_comment_slot__OBE;
+              if (((struct ___OBJ *)last_slot__GYOB)->__id==__ITM_SLOT__) {
+                ((__ITM_SLOT *)last_slot__GYOB)->comment__H3OB=__tmp__Y3OB;
               } else {
-                ((__ITM_SLOT_OPERATOR *)last_slot__0UOB)->parent_itm_slot__BT5B.comment__1ZOB=__tmp__M0OB;
+                ((__ITM_SLOT_OPERATOR *)last_slot__GYOB)->parent_itm_slot__NW5B.comment__H3OB=__tmp__Y3OB;
               };
             };
           };
           if (is_shorter__LZ) {
-            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:
+            if ((((! is_short_code__11) && (old_pos__2XOB !=  0)) && ((void *)((__SECTION_ *)last_section__E2C)->name__11DC != (void *)(&__string_22)))) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )current_position__EZF()) >>  9) &  255) <  5)) {
+                while_do__4PLE:
                 {
-                  result__423G='\0';
+                  result__4D4G='\0';
                   if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                    result__423G=((__CHARACTER )(( 0)));
+                    result__4D4G=((__CHARACTER )(( 0)));
                   } else {
-                    result__423G=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+                    result__4D4G=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
                   };
-                  if ((result__423G != ((__CHARACTER )(( 0))))) {
-                    result__H33G='\0';
+                  if ((result__4D4G != ((__CHARACTER )(( 0))))) {
+                    result__HE4G='\0';
                     if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                      result__H33G=((__CHARACTER )(( 0)));
+                      result__HE4G=((__CHARACTER )(( 0)));
                     } else {
-                      result__H33G=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+                      result__HE4G=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
                     };
-                    __tmp__Q2OB=(((((((result__H33G == ' ') || (result__H33G == '\t')) || (result__H33G == '\n')) || (result__H33G == '\r')) || (result__H33G == '\0')) || (result__H33G == '\f')) || (result__H33G == '\v'));
+                    __tmp__25OB=(((((((result__HE4G == ' ') || (result__HE4G == '\t')) || (result__HE4G == '\n')) || (result__HE4G == '\r')) || (result__HE4G == '\0')) || (result__HE4G == '\f')) || (result__HE4G == '\v'));
                   } else {
-                    __tmp__Q2OB=FALSE__;
+                    __tmp__25OB=FALSE__;
                   };
-                  if (__tmp__Q2OB) {
-                    result__M33G='\0';
+                  if (__tmp__25OB) {
+                    result__ME4G='\0';
                     if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                      result__M33G=((__CHARACTER )(( 0)));
+                      result__ME4G=((__CHARACTER )(( 0)));
                     } else {
-                      result__M33G=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+                      result__ME4G=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
                     };
-                    __tmp__R2OB=(result__M33G != '\n');
+                    __tmp__35OB=(result__ME4G != '\n');
                   } else {
-                    __tmp__R2OB=FALSE__;
+                    __tmp__35OB=FALSE__;
                   };
-                  if (__tmp__R2OB) {
+                  if (__tmp__35OB) {
                     position__CCC=(__INTEGER)(position__CCC +  1);
-                    goto while_do__QMLE;
+                    goto while_do__4PLE;
                   };
                 };
-                result__R33G='\0';
+                result__RE4G='\0';
                 if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                  result__R33G=((__CHARACTER )(( 0)));
+                  result__RE4G=((__CHARACTER )(( 0)));
                 } else {
-                  result__R33G=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+                  result__RE4G=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
                 };
-                if ((result__R33G == '\n')) {
+                if ((result__RE4G == '\n')) {
                   position__CCC=(__INTEGER)(position__CCC +  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__A4HH=((__STRING *)output_code__SI);
+              start__33HH=(__INTEGER)(old_pos__2XOB + old_derive__3XOB);
+              end__23HH=(__INTEGER)((__INTEGER)(position__CCC + short_derive__PCC) -  1);
+              len__43HH=(__INTEGER)((__INTEGER)(end__23HH - start__33HH) +  1);
+              if ((len__43HH >  0)) {
+                __tmp__53HH=(__INTEGER)(end__23HH +  1);
+                __tmp__B4HH=Self__A4HH->count__EGC;
+                Self__C4HH=__tmp__53HH;
+                while ((Self__C4HH <= __tmp__B4HH)) {
+                  ((__CHARACTER *)Self__A4HH->storage__RCS)[(__INTEGER)((__INTEGER)(Self__C4HH - len__43HH) -  1)]=((__CHARACTER *)Self__A4HH->storage__RCS)[(__INTEGER)(Self__C4HH -  1)];
+                  Self__C4HH=(__INTEGER)(Self__C4HH +  1);
                 };
-                Self__2WHH->count__EGC=(__INTEGER)(Self__2WHH->count__EGC - len__0WHH);
+                Self__A4HH->count__EGC=(__INTEGER)(Self__A4HH->count__EGC - len__43HH);
               };
-              short_derive__PCC=(__INTEGER)(old_derive__RUOB - (__INTEGER)(position__CCC - old_pos__QUOB));
+              short_derive__PCC=(__INTEGER)(old_derive__3XOB - (__INTEGER)(position__CCC - old_pos__2XOB));
             };
           };
-          __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;
+          __tmp__EBPB=((__PROTOTYPE *)object__ZBC)->slot_list__MVS;
+          if (((struct ___OBJ *)last_slot__GYOB)->__id==__ITM_SLOT__) {
+            __tmp__GBPB=((__ITM_SLOT *)last_slot__GYOB)->parent_named__15.name__LI;
           } else {
-            __tmp__03OB=((__ITM_SLOT_OPERATOR *)last_slot__0UOB)->parent_itm_slot__BT5B.parent_named__15.name__LI;
+            __tmp__GBPB=((__ITM_SLOT_OPERATOR *)last_slot__GYOB)->parent_itm_slot__NW5B.parent_named__15.name__LI;
           };
-          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;
+          s__4XOB=fast_reference_at__JDGC(__tmp__EBPB,__tmp__GBPB);
+          if (((void *)s__4XOB != (void *)NULL)) {
+            put_error__text__NPG( 1,(&__string_243));
+            if (((struct ___OBJ *)s__4XOB)->__id==__ITM_SLOT__) {
+              __tmp__RBPB=((__ITM_SLOT *)s__4XOB)->parent_named__15.parent_itm_object__4.position__GFJ;
             } else {
-              __tmp__F4OB=((__ITM_SLOT_OPERATOR *)s__SUOB)->parent_itm_slot__BT5B.parent_named__15.parent_itm_object__4.position__0BJ;
+              __tmp__RBPB=((__ITM_SLOT_OPERATOR *)s__4XOB)->parent_itm_slot__NW5B.parent_named__15.parent_itm_object__4.position__GFJ;
             };
-            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;
+            put_position__XQG(__tmp__RBPB);
+            if (((struct ___OBJ *)last_slot__GYOB)->__id==__ITM_SLOT__) {
+              __tmp__TBPB=((__ITM_SLOT *)last_slot__GYOB)->parent_named__15.parent_itm_object__4.position__GFJ;
             } else {
-              __tmp__H4OB=((__ITM_SLOT_OPERATOR *)last_slot__0UOB)->parent_itm_slot__BT5B.parent_named__15.parent_itm_object__4.position__0BJ;
+              __tmp__TBPB=((__ITM_SLOT_OPERATOR *)last_slot__GYOB)->parent_itm_slot__NW5B.parent_named__15.parent_itm_object__4.position__GFJ;
             };
-            put_position__LNG(__tmp__H4OB);
-            put_string__L0F(msg_err__GMG);
-            if ((type_error__FMG !=  2)) {
+            put_position__XQG(__tmp__TBPB);
+            put_string__P3F(msg_err__SPG);
+            if ((type_error__RPG !=  2)) {
               exit(( 1));
             };
           };
-          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;
+          Self__KHZB=((__PROTOTYPE *)object__ZBC);
+          s__LHZB=last_slot__GYOB;
+          __tmp__MHZB=Self__KHZB->slot_list__MVS;
+          if (((struct ___OBJ *)last_slot__GYOB)->__id==__ITM_SLOT__) {
+            __tmp__NHZB=((__ITM_SLOT *)last_slot__GYOB)->parent_named__15.name__LI;
           } else {
-            __tmp__BEZB=((__ITM_SLOT_OPERATOR *)last_slot__0UOB)->parent_itm_slot__BT5B.parent_named__15.name__LI;
+            __tmp__NHZB=((__ITM_SLOT_OPERATOR *)last_slot__GYOB)->parent_itm_slot__NW5B.parent_named__15.name__LI;
           };
-          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;
+          fast_put__to__0QGC(__tmp__MHZB,last_slot__GYOB,__tmp__NHZB);
+          if (((void *)Self__KHZB->first_slot__PHZB == (void *)NULL)) {
+            Self__KHZB->first_slot__PHZB=s__LHZB;
           } else {
-            __tmp__PEZB=Self__4DZB->last_slot__11C;
-            if (((struct ___OBJ *)__tmp__PEZB)->__id==__ITM_SLOT__) {
-              ((__ITM_SLOT *)__tmp__PEZB)->next__ZGHC=s__5DZB;
+            __tmp__1HZB=Self__KHZB->last_slot__12C;
+            if (((struct ___OBJ *)__tmp__1HZB)->__id==__ITM_SLOT__) {
+              ((__ITM_SLOT *)__tmp__1HZB)->next__HKHC=s__LHZB;
             } else {
-              ((__ITM_SLOT_OPERATOR *)__tmp__PEZB)->parent_itm_slot__BT5B.next__ZGHC=s__5DZB;
+              ((__ITM_SLOT_OPERATOR *)__tmp__1HZB)->parent_itm_slot__NW5B.next__HKHC=s__LHZB;
             };
           };
-          Self__4DZB->last_slot__11C=s__5DZB;
+          Self__KHZB->last_slot__12C=s__LHZB;
           if (is_shorter__LZ) {
-            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);
+            Self__QL3B=((__HASHED_SEToSTRING_CONSTANTo *)short_local__XCC);
+            Self__QL3B->count__AIY= 0;
+            __tmp__SL3B=Self__QL3B->buckets__XEV;
+            __tmp__VL3B=(__INTEGER)(Self__QL3B->capacity__0IT -  1);
+            Self__MKHC=((void **)__tmp__SL3B);
+            Self__32PC=__tmp__VL3B;
+            while ((Self__32PC >=  0)) {
+              Self__MKHC[Self__32PC]=NULL;
+              Self__32PC=(__INTEGER)(Self__32PC -  1);
             };
           };
         };
-      } while (result__LUOB);
+      } while (result__XXOB);
       if (is_shorter__LZ) {
-        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);
+        if (((! is_short_private__J2) && ((void *)((__SECTION_ *)last_section__E2C)->name__11DC == (void *)(&__string_26)))) {
+          Self__J4HH=((__STRING *)output_code__SI);
+          start__G4HH=(__INTEGER)(pos_sec__2XC + old_derive__3XC);
+          end__F4HH=(__INTEGER)((__INTEGER)(position__CCC + short_derive__PCC) -  1);
+          len__H4HH=(__INTEGER)((__INTEGER)(end__F4HH - start__G4HH) +  1);
+          if ((len__H4HH >  0)) {
+            __tmp__I4HH=(__INTEGER)(end__F4HH +  1);
+            __tmp__K4HH=Self__J4HH->count__EGC;
+            Self__L4HH=__tmp__I4HH;
+            while ((Self__L4HH <= __tmp__K4HH)) {
+              ((__CHARACTER *)Self__J4HH->storage__RCS)[(__INTEGER)((__INTEGER)(Self__L4HH - len__H4HH) -  1)]=((__CHARACTER *)Self__J4HH->storage__RCS)[(__INTEGER)(Self__L4HH -  1)];
+              Self__L4HH=(__INTEGER)(Self__L4HH +  1);
+            };
+            Self__J4HH->count__EGC=(__INTEGER)(Self__J4HH->count__EGC - len__H4HH);
           };
           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__E3E;
+      goto while_do__IAF;
     };
   };
-  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)) {
+  if (((void *)read_contract__CVF(PARSER__) != (void *)NULL)) {
+    pos__CLWG=current_position__EZF();
+    put_error__text__NPG( 2,(&__string_244));
+    put_position__XQG(pos__CLWG);
+    put_string__P3F(msg_err__SPG);
+    if ((type_error__RPG !=  2)) {
       exit(( 1));
     };
   };
-  read_space__KSD();
-  result__C43G='\0';
+  read_space__MTD();
+  result__CF4G='\0';
   if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-    result__C43G=((__CHARACTER )(( 0)));
+    result__CF4G=((__CHARACTER )(( 0)));
   } else {
-    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)) {
+    result__CF4G=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+  };
+  if ((result__CF4G != ((__CHARACTER )(( 0))))) {
+    pos__ELWG=current_position__EZF();
+    put_error__text__NPG( 0,(&__string_168));
+    put_position__XQG(pos__ELWG);
+    put_string__P3F(msg_err__SPG);
+    if ((type_error__RPG !=  2)) {
       exit(( 1));
     };
   };
-  short__token__to__YBD((&__string_118),((__STRING *)source__5BC)->count__EGC,((__STRING *)source__5BC)->count__EGC);
+  short__token__to__YCD((&__string_118),((__STRING *)source__5BC)->count__EGC,((__STRING *)source__5BC)->count__EGC);
   object__ZBC=NULL;
 }
 
-static void put__to__like__C0XD(void *tok__E0XD,void *buf__F0XD,void *key__G0XD)
+static void put__to__like__Q3XD(void *tok__S3XD,void *buf__T3XD,void *key__U3XD)
 // ({NULLxSTRING_CONSTANTxSTRING},{NULLxSTRING},{NULLxSTRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER __tmp__F4XD,Self__WHQE;
+  void *lst__V3XD;
+  lst__V3XD=NULL;
+  if (((void *)key__U3XD != (void *)NULL)) {
+    lst__V3XD=fast_reference_at__TLNE(short_dico__QD,key__U3XD);
+    if (((void *)lst__V3XD != (void *)NULL)) {
+      __tmp__F4XD=((__LINKED_LISToSTRING_CONSTANTo *)lst__V3XD)->parent_linked_collection__LD.upper__MED;
+      Self__WHQE= 1;
+      while ((Self__WHQE <= __tmp__F4XD)) {
+        if (((void *)item__Q2ND(lst__V3XD,Self__WHQE) == (void *)NULL)) {
+          append__ROS(buf__T3XD,tok__S3XD);
         } else {
-          append__FLS(buf__F0XD,item__CZND(lst__H0XD,Self__DDQE));
+          append__ROS(buf__T3XD,item__Q2ND(lst__V3XD,Self__WHQE));
         };
-        Self__DDQE=(__INTEGER)(Self__DDQE +  1);
+        Self__WHQE=(__INTEGER)(Self__WHQE +  1);
       };
     };
   };
 }
 
-static void shorter_get_all_slot_in__E2XD(__PROTOTYPE *Self__F2XD,void *lst__G2XD)
+static void shorter_get_all_slot_in__S5XD(__PROTOTYPE *Self__T5XD,void *lst__U5XD)
 // ({PROTOTYPE},{NULLxFAST_ARRAYoITM_SLOTo}) VoidRecursive, No inlinable.
 {
-  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)) {
+  void *ps__W5XD,*__tmp__SCYD;
+  void *p__X5XD;
+  __INTEGER i__Y5XD,new_capacity__EIXE,__tmp__IJXE,__tmp__43PF;
+  __INTEGER Self__WEAG,i__0CLH,i__5CLH;
+  void *s__V5XD,*__tmp__ABYD,*__tmp__ZBYD,*__tmp__SFYD;
+  void *__tmp__JAYD,*__tmp__FCYD;
+  void *__tmp__BBYD,*__tmp__CBYD,*__tmp__DDYD,*__tmp__NDYD,*__tmp__VDYD;
+  void *__tmp__2EYD,*__tmp__3EYD;
+  __SECTION_ *Self__0EFC;
+  void *__tmp__QCYD;
+  __STRING_CONSTANT *Self__2CLH,*Self__BDLH;
+  __BOOLEAN __tmp__OAYD,__tmp__FBYD,__tmp__SIXE,__tmp__JCYD,__tmp__MOLF;
+  __BOOLEAN __tmp__ZDYD,result__ZCLH,__tmp__0DYD,result__4CLH;
+  __BOOLEAN __tmp__3DYD;
+  __FAST_ARRAYoITM_SLOTo *Self__CIXE;
+  void **__tmp__HJXE,**new__K3PF;
+  __CHARACTER __tmp__2CYD;
+  ps__W5XD=NULL;
+  p__X5XD=NULL;
+  i__Y5XD= 0;
+  s__V5XD=Self__T5XD->first_slot__PHZB;
+  while (((void *)s__V5XD != (void *)NULL)) {
     if (is_short_private__J2) {
-      __tmp__A3XD=TRUE__;
+      __tmp__OAYD=TRUE__;
     } else {
-      if (((struct ___OBJ *)s__H2XD)->__id==__ITM_SLOT__) {
-        __tmp__12XD=((__ITM_SLOT *)s__H2XD)->id_section__F2C;
+      if (((struct ___OBJ *)s__V5XD)->__id==__ITM_SLOT__) {
+        __tmp__JAYD=((__ITM_SLOT *)s__V5XD)->id_section__F3C;
       } else {
-        __tmp__12XD=((__ITM_SLOT_OPERATOR *)s__H2XD)->parent_itm_slot__BT5B.id_section__F2C;
+        __tmp__JAYD=((__ITM_SLOT_OPERATOR *)s__V5XD)->parent_itm_slot__NW5B.id_section__F3C;
       };
-      __tmp__A3XD=((void *)((__SECTION_ *)__tmp__12XD)->name__NYDC != (void *)(&__string_26));
+      __tmp__OAYD=((void *)((__SECTION_ *)__tmp__JAYD)->name__11DC != (void *)(&__string_26));
     };
-    if (__tmp__A3XD) {
-      i__K2XD= 0;
-      while_do__IESE:
+    if (__tmp__OAYD) {
+      i__Y5XD= 0;
+      while_do__2ISE:
       {
-        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;
+        if ((i__Y5XD <= ((__FAST_ARRAYoITM_SLOTo *)lst__U5XD)->parent_arrayed_collection__QMTD.upper__NNTD)) {
+          __tmp__ABYD=((void **)((__FAST_ARRAYoITM_SLOTo *)lst__U5XD)->parent_arrayed_collection__QMTD.storage__1OWE)[i__Y5XD];
+          if (((struct ___OBJ *)__tmp__ABYD)->__id==__ITM_SLOT__) {
+            __tmp__BBYD=((__ITM_SLOT *)__tmp__ABYD)->parent_named__15.name__LI;
           } else {
-            __tmp__T3XD=((__ITM_SLOT_OPERATOR *)__tmp__S3XD)->parent_itm_slot__BT5B.parent_named__15.name__LI;
+            __tmp__BBYD=((__ITM_SLOT_OPERATOR *)__tmp__ABYD)->parent_itm_slot__NW5B.parent_named__15.name__LI;
           };
-          if (((struct ___OBJ *)s__H2XD)->__id==__ITM_SLOT__) {
-            __tmp__U3XD=((__ITM_SLOT *)s__H2XD)->parent_named__15.name__LI;
+          if (((struct ___OBJ *)s__V5XD)->__id==__ITM_SLOT__) {
+            __tmp__CBYD=((__ITM_SLOT *)s__V5XD)->parent_named__15.name__LI;
           } else {
-            __tmp__U3XD=((__ITM_SLOT_OPERATOR *)s__H2XD)->parent_itm_slot__BT5B.parent_named__15.name__LI;
+            __tmp__CBYD=((__ITM_SLOT_OPERATOR *)s__V5XD)->parent_itm_slot__NW5B.parent_named__15.name__LI;
           };
-          __tmp__X3XD=((void *)__tmp__T3XD != (void *)__tmp__U3XD);
+          __tmp__FBYD=((void *)__tmp__BBYD != (void *)__tmp__CBYD);
         } else {
-          __tmp__X3XD=FALSE__;
+          __tmp__FBYD=FALSE__;
         };
-        if (__tmp__X3XD) {
-          i__K2XD=(__INTEGER)(i__K2XD +  1);
-          goto while_do__IESE;
+        if (__tmp__FBYD) {
+          i__Y5XD=(__INTEGER)(i__Y5XD +  1);
+          goto while_do__2ISE;
         };
       };
-      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__;
+      if ((i__Y5XD > ((__FAST_ARRAYoITM_SLOTo *)lst__U5XD)->parent_arrayed_collection__QMTD.upper__NNTD)) {
+        Self__CIXE=((__FAST_ARRAYoITM_SLOTo *)lst__U5XD);
+        new_capacity__EIXE= 0;
+        if (((__INTEGER)(Self__CIXE->parent_arrayed_collection__QMTD.upper__NNTD +  1) <= (__INTEGER)(Self__CIXE->parent_arrayed_collection__QMTD.capacity__YBWE -  1))) {
+          Self__CIXE->parent_arrayed_collection__QMTD.upper__NNTD=(__INTEGER)(Self__CIXE->parent_arrayed_collection__QMTD.upper__NNTD +  1);
+          __tmp__SIXE=TRUE__;
         } else {
-          __tmp__WDXE=FALSE__;
+          __tmp__SIXE=FALSE__;
         };
-        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;
+        if ((! __tmp__SIXE)) {
+          if ((Self__CIXE->parent_arrayed_collection__QMTD.capacity__YBWE ==  0)) {
+            Self__CIXE->parent_arrayed_collection__QMTD.storage__1OWE=create__QHFF( 2);
+            Self__CIXE->parent_arrayed_collection__QMTD.capacity__YBWE= 2;
+            Self__CIXE->parent_arrayed_collection__QMTD.upper__NNTD= 0;
           } else {
-            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);
+            new_capacity__EIXE=(__INTEGER)(Self__CIXE->parent_arrayed_collection__QMTD.capacity__YBWE <<  1);
+            __tmp__HJXE=Self__CIXE->parent_arrayed_collection__QMTD.storage__1OWE;
+            __tmp__IJXE=Self__CIXE->parent_arrayed_collection__QMTD.capacity__YBWE;
+            new__K3PF=((void **)realloc_dynamic__old_size__new_size__ZHLC(((__POINTER )((void **)__tmp__HJXE)),((__UINTEGER_32 )(__INTEGER)(__tmp__IJXE * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__EIXE * ((__INTEGER )(sizeof(void *)))))));
+            __tmp__43PF=(__INTEGER)(new_capacity__EIXE -  1);
+            Self__WEAG=__tmp__IJXE;
+            while ((Self__WEAG <= __tmp__43PF)) {
+              new__K3PF[Self__WEAG]=NULL;
+              Self__WEAG=(__INTEGER)(Self__WEAG +  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);
+            Self__CIXE->parent_arrayed_collection__QMTD.storage__1OWE=new__K3PF;
+            Self__CIXE->parent_arrayed_collection__QMTD.capacity__YBWE=new_capacity__EIXE;
+            Self__CIXE->parent_arrayed_collection__QMTD.upper__NNTD=(__INTEGER)(Self__CIXE->parent_arrayed_collection__QMTD.upper__NNTD +  1);
           };
         };
-        ((void **)Self__GDXE->parent_arrayed_collection__CJTD.storage__HKWE)[Self__GDXE->parent_arrayed_collection__CJTD.upper__5JTD]=s__H2XD;
+        ((void **)Self__CIXE->parent_arrayed_collection__QMTD.storage__1OWE)[Self__CIXE->parent_arrayed_collection__QMTD.upper__NNTD]=s__V5XD;
       };
     };
-    if (((struct ___OBJ *)s__H2XD)->__id==__ITM_SLOT__) {
-      __tmp__L4XD=((__ITM_SLOT *)s__H2XD)->next__ZGHC;
+    if (((struct ___OBJ *)s__V5XD)->__id==__ITM_SLOT__) {
+      __tmp__ZBYD=((__ITM_SLOT *)s__V5XD)->next__HKHC;
     } else {
-      __tmp__L4XD=((__ITM_SLOT_OPERATOR *)s__H2XD)->parent_itm_slot__BT5B.next__ZGHC;
+      __tmp__ZBYD=((__ITM_SLOT_OPERATOR *)s__V5XD)->parent_itm_slot__NW5B.next__HKHC;
     };
-    s__H2XD=__tmp__L4XD;
+    s__V5XD=__tmp__ZBYD;
   };
-  s__H2XD=Self__F2XD->first_slot__DEZB;
-  while_do__BC5D:
+  s__V5XD=Self__T5XD->first_slot__PHZB;
+  while_do__PF5D:
   {
-    if (((void *)s__H2XD != (void *)NULL)) {
-      if (((struct ___OBJ *)s__H2XD)->__id==__ITM_SLOT__) {
-        __tmp__X4XD=((__ITM_SLOT *)s__H2XD)->id_section__F2C;
+    if (((void *)s__V5XD != (void *)NULL)) {
+      if (((struct ___OBJ *)s__V5XD)->__id==__ITM_SLOT__) {
+        __tmp__FCYD=((__ITM_SLOT *)s__V5XD)->id_section__F3C;
       } else {
-        __tmp__X4XD=((__ITM_SLOT_OPERATOR *)s__H2XD)->parent_itm_slot__BT5B.id_section__F2C;
+        __tmp__FCYD=((__ITM_SLOT_OPERATOR *)s__V5XD)->parent_itm_slot__NW5B.id_section__F3C;
       };
-      Self__MBFC=((__SECTION_ *)__tmp__X4XD);
-      __tmp__14XD=(((void *)Self__MBFC->name__NYDC == (void *)(&__string_23)) || ((void *)Self__MBFC->name__NYDC == (void *)(&__string_24)));
+      Self__0EFC=((__SECTION_ *)__tmp__FCYD);
+      __tmp__JCYD=(((void *)Self__0EFC->name__11DC == (void *)(&__string_23)) || ((void *)Self__0EFC->name__11DC == (void *)(&__string_24)));
     } else {
-      __tmp__14XD=FALSE__;
+      __tmp__JCYD=FALSE__;
     };
-    if (__tmp__14XD) {
-      if (((struct ___OBJ *)s__H2XD)->__id==__ITM_SLOT__) {
-        __tmp__C5XD=((__ITM_SLOT *)s__H2XD)->result_type__B4FC;
+    if (__tmp__JCYD) {
+      if (((struct ___OBJ *)s__V5XD)->__id==__ITM_SLOT__) {
+        __tmp__QCYD=((__ITM_SLOT *)s__V5XD)->result_type__PBGC;
       } else {
-        __tmp__C5XD=((__ITM_SLOT_OPERATOR *)s__H2XD)->parent_itm_slot__BT5B.result_type__B4FC;
+        __tmp__QCYD=((__ITM_SLOT_OPERATOR *)s__V5XD)->parent_itm_slot__NW5B.result_type__PBGC;
       };
-      if (__tmp__C5XD==NULL) {
-        __tmp__E5XD=NULL;
+      if (__tmp__QCYD==NULL) {
+        __tmp__SCYD=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__C5XD)->__id) {
+        switch (((struct ___OBJ *)__tmp__QCYD)->__id) {
         case __ITM_TYPE_PARAMETER__: {
-          __tmp__E5XD=((void *)__tmp__C5XD);
+          __tmp__SCYD=((void *)__tmp__QCYD);
         } break;
         case __ITM_TYPE_SIMPLE__: {
-          __tmp__E5XD=((void *)__tmp__C5XD);
+          __tmp__SCYD=((void *)__tmp__QCYD);
         } break;
         case __ITM_TYPE_MULTI__: {
-          __tmp__E5XD=NULL;
+          __tmp__SCYD=NULL;
         } break;
         case __ITM_TYPE_BLOCK__: {
-          __tmp__E5XD=NULL;
+          __tmp__SCYD=NULL;
         } break;
         case __ITM_TYPE_GENERIC__: {
-          __tmp__E5XD=((void *)__tmp__C5XD);
+          __tmp__SCYD=((void *)__tmp__QCYD);
         } break;
         case __ITM_TYPE_STYLE__: {
-          __tmp__E5XD=((void *)__tmp__C5XD);
+          __tmp__SCYD=((void *)__tmp__QCYD);
         } break;
         }
       };
-      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;
+      ps__W5XD=__tmp__SCYD;
+      if (((void *)__tmp__SCYD != (void *)NULL)) {
+        if (((struct ___OBJ *)s__V5XD)->__id==__ITM_SLOT__) {
+          __tmp__2CYD=((__ITM_SLOT *)s__V5XD)->parent_named__15.style__OGU;
         } else {
-          __tmp__O5XD=((__ITM_SLOT_OPERATOR *)s__H2XD)->parent_itm_slot__BT5B.parent_named__15.style__FBU;
+          __tmp__2CYD=((__ITM_SLOT_OPERATOR *)s__V5XD)->parent_itm_slot__NW5B.parent_named__15.style__OGU;
         };
-        if ((__tmp__O5XD == '+')) {
-          switch (((struct ___OBJ *)__tmp__E5XD)->__id) {
+        if ((__tmp__2CYD == '+')) {
+          switch (((struct ___OBJ *)__tmp__SCYD)->__id) {
           case __ITM_TYPE_PARAMETER__: {
-            __tmp__V5XD=NULL;
+            __tmp__DDYD=NULL;
           } break;
           case __ITM_TYPE_SIMPLE__: {
-            __tmp__V5XD=NULL;
+            __tmp__DDYD=NULL;
           } break;
           case __ITM_TYPE_GENERIC__: {
-            __tmp__V5XD=((__ITM_TYPE_GENERIC *)__tmp__E5XD)->parent_itm_type_style__GPN.style__XVP;
+            __tmp__DDYD=((__ITM_TYPE_GENERIC *)__tmp__SCYD)->parent_itm_type_style__SSN.style__DZP;
           } break;
           case __ITM_TYPE_STYLE__: {
-            __tmp__V5XD=((__ITM_TYPE_STYLE *)__tmp__E5XD)->style__XVP;
+            __tmp__DDYD=((__ITM_TYPE_STYLE *)__tmp__SCYD)->style__DZP;
           } break;
           };
-          __tmp__GJLF=((void *)__tmp__V5XD == (void *)(&__string_9));
+          __tmp__MOLF=((void *)__tmp__DDYD == (void *)(&__string_9));
         } else {
-          __tmp__GJLF=FALSE__;
+          __tmp__MOLF=FALSE__;
         };
-        if (__tmp__GJLF) {
-          __tmp__LAYD=TRUE__;
+        if (__tmp__MOLF) {
+          __tmp__ZDYD=TRUE__;
         } else {
-          if (((struct ___OBJ *)s__H2XD)->__id==__ITM_SLOT__) {
-            __tmp__55XD=((__ITM_SLOT *)s__H2XD)->parent_named__15.name__LI;
+          if (((struct ___OBJ *)s__V5XD)->__id==__ITM_SLOT__) {
+            __tmp__NDYD=((__ITM_SLOT *)s__V5XD)->parent_named__15.name__LI;
           } else {
-            __tmp__55XD=((__ITM_SLOT_OPERATOR *)s__H2XD)->parent_itm_slot__BT5B.parent_named__15.name__LI;
+            __tmp__NDYD=((__ITM_SLOT_OPERATOR *)s__V5XD)->parent_itm_slot__NW5B.parent_named__15.name__LI;
           };
-          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);
+          Self__2CLH=((__STRING_CONSTANT *)__tmp__NDYD);
+          result__ZCLH=FALSE__;
+          i__0CLH= 0;
+          if ((((__STRING_CONSTANT *)(&__string_176))->count__DD <= Self__2CLH->count__DD)) {
+            i__0CLH=((__STRING_CONSTANT *)(&__string_176))->count__DD;
+            while ((! ((i__0CLH ==  0) || (((__CHARACTER *)Self__2CLH->storage__FRO)[(__INTEGER)(i__0CLH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_176))->storage__FRO)[(__INTEGER)(i__0CLH -  1)])))) {
+              i__0CLH=(__INTEGER)(i__0CLH -  1);
             };
-            result__00KH=(i__10KH ==  0);
+            result__ZCLH=(i__0CLH ==  0);
           };
-          __tmp__LAYD=result__00KH;
+          __tmp__ZDYD=result__ZCLH;
         };
-        if (__tmp__LAYD) {
-          __tmp__MAYD=TRUE__;
+        if (__tmp__ZDYD) {
+          __tmp__0DYD=TRUE__;
         } else {
-          if (((struct ___OBJ *)s__H2XD)->__id==__ITM_SLOT__) {
-            __tmp__HAYD=((__ITM_SLOT *)s__H2XD)->parent_named__15.name__LI;
+          if (((struct ___OBJ *)s__V5XD)->__id==__ITM_SLOT__) {
+            __tmp__VDYD=((__ITM_SLOT *)s__V5XD)->parent_named__15.name__LI;
           } else {
-            __tmp__HAYD=((__ITM_SLOT_OPERATOR *)s__H2XD)->parent_itm_slot__BT5B.parent_named__15.name__LI;
+            __tmp__VDYD=((__ITM_SLOT_OPERATOR *)s__V5XD)->parent_itm_slot__NW5B.parent_named__15.name__LI;
           };
-          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);
+          Self__BDLH=((__STRING_CONSTANT *)__tmp__VDYD);
+          result__4CLH=FALSE__;
+          i__5CLH= 0;
+          if ((((__STRING_CONSTANT *)(&__string_177))->count__DD <= Self__BDLH->count__DD)) {
+            i__5CLH=((__STRING_CONSTANT *)(&__string_177))->count__DD;
+            while ((! ((i__5CLH ==  0) || (((__CHARACTER *)Self__BDLH->storage__FRO)[(__INTEGER)(i__5CLH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_177))->storage__FRO)[(__INTEGER)(i__5CLH -  1)])))) {
+              i__5CLH=(__INTEGER)(i__5CLH -  1);
             };
-            result__50KH=(i__A1KH ==  0);
+            result__4CLH=(i__5CLH ==  0);
           };
-          __tmp__MAYD=result__50KH;
+          __tmp__0DYD=result__4CLH;
         };
-        __tmp__PAYD=__tmp__MAYD;
+        __tmp__3DYD=__tmp__0DYD;
       } else {
-        __tmp__PAYD=FALSE__;
+        __tmp__3DYD=FALSE__;
       };
-      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) {
+      if (__tmp__3DYD) {
+        p__X5XD=NULL;
+        i__Y5XD= 0;
+        while (((i__Y5XD <= ((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.upper__HJ) && ((void *)p__X5XD == (void *)NULL))) {
+          __tmp__2EYD=((__PROTOTYPE *)((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__XVT)[i__Y5XD])->parent_named__5.name__LI;
+          switch (((struct ___OBJ *)ps__W5XD)->__id) {
           case __ITM_TYPE_PARAMETER__: {
-            __tmp__PBYD=((__ITM_TYPE_PARAMETER *)ps__I2XD)->parent_itm_type__UBE.name__OVP;
+            __tmp__3EYD=((__ITM_TYPE_PARAMETER *)ps__W5XD)->parent_itm_type__YEE.name__0YP;
           } break;
           case __ITM_TYPE_SIMPLE__: {
-            __tmp__PBYD=((__ITM_TYPE_SIMPLE *)ps__I2XD)->name__OVP;
+            __tmp__3EYD=((__ITM_TYPE_SIMPLE *)ps__W5XD)->name__0YP;
           } break;
           case __ITM_TYPE_GENERIC__: {
-            __tmp__PBYD=((__ITM_TYPE_GENERIC *)ps__I2XD)->parent_itm_type_style__GPN.parent_itm_type_simple__FPN.name__OVP;
+            __tmp__3EYD=((__ITM_TYPE_GENERIC *)ps__W5XD)->parent_itm_type_style__SSN.parent_itm_type_simple__RSN.name__0YP;
           } break;
           case __ITM_TYPE_STYLE__: {
-            __tmp__PBYD=((__ITM_TYPE_STYLE *)ps__I2XD)->parent_itm_type_simple__FPN.name__OVP;
+            __tmp__3EYD=((__ITM_TYPE_STYLE *)ps__W5XD)->parent_itm_type_simple__RSN.name__0YP;
           } break;
           };
-          if (((void *)__tmp__OBYD == (void *)__tmp__PBYD)) {
-            p__J2XD=((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__OQT)[i__K2XD];
+          if (((void *)__tmp__2EYD == (void *)__tmp__3EYD)) {
+            p__X5XD=((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__XVT)[i__Y5XD];
           };
-          i__K2XD=(__INTEGER)(i__K2XD +  1);
+          i__Y5XD=(__INTEGER)(i__Y5XD +  1);
         };
-        if (((void *)p__J2XD != (void *)NULL)) {
-          shorter_get_all_slot_in__E2XD(p__J2XD,lst__G2XD);
+        if (((void *)p__X5XD != (void *)NULL)) {
+          shorter_get_all_slot_in__S5XD(p__X5XD,lst__U5XD);
         };
       };
-      if (((struct ___OBJ *)s__H2XD)->__id==__ITM_SLOT__) {
-        __tmp__ECYD=((__ITM_SLOT *)s__H2XD)->next__ZGHC;
+      if (((struct ___OBJ *)s__V5XD)->__id==__ITM_SLOT__) {
+        __tmp__SFYD=((__ITM_SLOT *)s__V5XD)->next__HKHC;
       } else {
-        __tmp__ECYD=((__ITM_SLOT_OPERATOR *)s__H2XD)->parent_itm_slot__BT5B.next__ZGHC;
+        __tmp__SFYD=((__ITM_SLOT_OPERATOR *)s__V5XD)->parent_itm_slot__NW5B.next__HKHC;
       };
-      s__H2XD=__tmp__ECYD;
-      goto while_do__BC5D;
+      s__V5XD=__tmp__SFYD;
+      goto while_do__PF5D;
     };
   };
 }
 
-static void pretty_name_in__ER4F(__ITM_SLOT *Self__FR4F,void *buffer__GR4F)
+static void pretty_name_in__LW4F(__ITM_SLOT *Self__MW4F,void *buffer__NW4F)
 // ({ITM_SLOT},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER j__OW4F;
+  __STRING_CONSTANT *Self__Y1FH;
+  j__OW4F= 1;
+  while ((j__OW4F < ((__STRING_CONSTANT *)Self__MW4F->parent_named__15.name__LI)->count__DD)) {
+    if (((((__CHARACTER *)((__STRING_CONSTANT *)Self__MW4F->parent_named__15.name__LI)->storage__FRO)[(__INTEGER)(j__OW4F -  1)] == '_') && (((__CHARACTER *)((__STRING_CONSTANT *)Self__MW4F->parent_named__15.name__LI)->storage__FRO)[(__INTEGER)((__INTEGER)(j__OW4F +  1) -  1)] == '_'))) {
+      add_last__GOT(buffer__NW4F,' ');
+      j__OW4F=(__INTEGER)(j__OW4F +  2);
     } else {
-      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);
+      add_last__GOT(buffer__NW4F,((__CHARACTER *)((__STRING_CONSTANT *)Self__MW4F->parent_named__15.name__LI)->storage__FRO)[(__INTEGER)(j__OW4F -  1)]);
+      j__OW4F=(__INTEGER)(j__OW4F +  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)]);
+  Self__Y1FH=((__STRING_CONSTANT *)Self__MW4F->parent_named__15.name__LI);
+  add_last__GOT(buffer__NW4F,((__CHARACTER *)Self__Y1FH->storage__FRO)[(__INTEGER)(Self__Y1FH->count__DD -  1)]);
 }
 
-static void pretty_name_in__ZS4F(__ITM_SLOT_OPERATOR *Self__0S4F,void *buffer__1S4F)
+static void pretty_name_in__AY4F(__ITM_SLOT_OPERATOR *Self__BY4F,void *buffer__CY4F)
 // ({ITM_SLOT_OPERATOR},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __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__;
+  __STRING_CONSTANT *Self__GDLH,*Self__VRTF;
+  __INTEGER i__EDLH,i__ZRTF;
+  __BOOLEAN result__DDLH,__tmp__NY4F,result__YRTF;
+  Self__GDLH=((__STRING_CONSTANT *)Self__BY4F->parent_itm_slot__NW5B.parent_named__15.name__LI);
+  result__DDLH=FALSE__;
+  i__EDLH= 0;
+  if ((((__STRING_CONSTANT *)(&__string_82))->count__DD <= Self__GDLH->count__DD)) {
+    i__EDLH=((__STRING_CONSTANT *)(&__string_82))->count__DD;
+    while ((! ((i__EDLH ==  0) || (((__CHARACTER *)Self__GDLH->storage__FRO)[(__INTEGER)(i__EDLH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_82))->storage__FRO)[(__INTEGER)(i__EDLH -  1)])))) {
+      i__EDLH=(__INTEGER)(i__EDLH -  1);
+    };
+    result__DDLH=(i__EDLH ==  0);
+  };
+  if (result__DDLH) {
+    append__ROS(buffer__CY4F,(&__string_245));
+    __tmp__NY4F=TRUE__;
   } else {
-    __tmp__GT4F=FALSE__;
+    __tmp__NY4F=FALSE__;
   };
-  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);
+  if ((! __tmp__NY4F)) {
+    Self__VRTF=((__STRING_CONSTANT *)Self__BY4F->parent_itm_slot__NW5B.parent_named__15.name__LI);
+    result__YRTF=FALSE__;
+    i__ZRTF= 0;
+    if ((((__STRING_CONSTANT *)(&__string_81))->count__DD <= Self__VRTF->count__DD)) {
+      i__ZRTF=((__STRING_CONSTANT *)(&__string_81))->count__DD;
+      while ((! ((i__ZRTF ==  0) || (((__CHARACTER *)Self__VRTF->storage__FRO)[(__INTEGER)(i__ZRTF -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_81))->storage__FRO)[(__INTEGER)(i__ZRTF -  1)])))) {
+        i__ZRTF=(__INTEGER)(i__ZRTF -  1);
       };
-      result__RMTF=(i__SMTF ==  0);
+      result__YRTF=(i__ZRTF ==  0);
     };
-    if (result__RMTF) {
-      append__FLS(buffer__1S4F,(&__string_246));
+    if (result__YRTF) {
+      append__ROS(buffer__CY4F,(&__string_246));
     } else {
-      append__FLS(buffer__1S4F,(&__string_247));
+      append__ROS(buffer__CY4F,(&__string_247));
     };
   };
-  append__FLS(buffer__1S4F,Self__0S4F->pretty_name__A0HC);
-  add_last__3IT(buffer__1S4F,'\'');
+  append__ROS(buffer__CY4F,Self__BY4F->pretty_name__O3HC);
+  add_last__GOT(buffer__CY4F,'\'');
 }
 
-static void get_all_comment_slot__in__UF4E(__PROTOTYPE *Self__VF4E,void *n__WF4E,void *buf__XF4E)
+static void get_all_comment_slot__in__QK4E(__PROTOTYPE *Self__RK4E,void *n__SK4E,void *buf__TK4E)
 // ({PROTOTYPE},{NULLxSTRING_CONSTANT},{NULLxSTRING}) VoidRecursive, No inlinable.
 {
-  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);
+  void *ps__VK4E,*__tmp__DM4E;
+  void *p__WK4E;
+  __INTEGER i__XK4E;
+  void *s__UK4E,*__tmp__YN4E;
+  void *__tmp__5K4E,*__tmp__IL4E,*__tmp__CN4E,*__tmp__DN4E;
+  void *__tmp__WL4E;
+  __SECTION_ *Self__U21G;
+  void *__tmp__BM4E;
+  __BOOLEAN __tmp__CL4E,__tmp__0L4E;
+  ps__VK4E=NULL;
+  p__WK4E=NULL;
+  i__XK4E= 0;
+  s__UK4E=fast_reference_at__JDGC(Self__RK4E->slot_list__MVS,n__SK4E);
+  if (((void *)s__UK4E != (void *)NULL)) {
+    if (((struct ___OBJ *)s__UK4E)->__id==__ITM_SLOT__) {
+      __tmp__5K4E=((__ITM_SLOT *)s__UK4E)->comment__H3OB;
+    } else {
+      __tmp__5K4E=((__ITM_SLOT_OPERATOR *)s__UK4E)->parent_itm_slot__NW5B.comment__H3OB;
+    };
+    __tmp__CL4E=((void *)__tmp__5K4E != (void *)NULL);
   } else {
-    __tmp__GG4E=FALSE__;
+    __tmp__CL4E=FALSE__;
   };
-  if (__tmp__GG4E) {
-    if (((struct ___OBJ *)s__YF4E)->__id==__ITM_SLOT__) {
-      __tmp__MG4E=((__ITM_SLOT *)s__YF4E)->comment__1ZOB;
+  if (__tmp__CL4E) {
+    if (((struct ___OBJ *)s__UK4E)->__id==__ITM_SLOT__) {
+      __tmp__IL4E=((__ITM_SLOT *)s__UK4E)->comment__H3OB;
     } else {
-      __tmp__MG4E=((__ITM_SLOT_OPERATOR *)s__YF4E)->parent_itm_slot__BT5B.comment__1ZOB;
+      __tmp__IL4E=((__ITM_SLOT_OPERATOR *)s__UK4E)->parent_itm_slot__NW5B.comment__H3OB;
     };
-    append__FLS(buf__XF4E,__tmp__MG4E);
+    append__ROS(buf__TK4E,__tmp__IL4E);
   };
-  s__YF4E=Self__VF4E->first_slot__DEZB;
-  while_do__ZJGF:
+  s__UK4E=Self__RK4E->first_slot__PHZB;
+  while_do__5OGF:
   {
-    if (((void *)s__YF4E != (void *)NULL)) {
-      if (((struct ___OBJ *)s__YF4E)->__id==__ITM_SLOT__) {
-        __tmp__0G4E=((__ITM_SLOT *)s__YF4E)->id_section__F2C;
+    if (((void *)s__UK4E != (void *)NULL)) {
+      if (((struct ___OBJ *)s__UK4E)->__id==__ITM_SLOT__) {
+        __tmp__WL4E=((__ITM_SLOT *)s__UK4E)->id_section__F3C;
       } else {
-        __tmp__0G4E=((__ITM_SLOT_OPERATOR *)s__YF4E)->parent_itm_slot__BT5B.id_section__F2C;
+        __tmp__WL4E=((__ITM_SLOT_OPERATOR *)s__UK4E)->parent_itm_slot__NW5B.id_section__F3C;
       };
-      Self__GW1G=((__SECTION_ *)__tmp__0G4E);
-      __tmp__4G4E=(((void *)Self__GW1G->name__NYDC == (void *)(&__string_23)) || ((void *)Self__GW1G->name__NYDC == (void *)(&__string_24)));
+      Self__U21G=((__SECTION_ *)__tmp__WL4E);
+      __tmp__0L4E=(((void *)Self__U21G->name__11DC == (void *)(&__string_23)) || ((void *)Self__U21G->name__11DC == (void *)(&__string_24)));
     } else {
-      __tmp__4G4E=FALSE__;
+      __tmp__0L4E=FALSE__;
     };
-    if (__tmp__4G4E) {
-      if (((struct ___OBJ *)s__YF4E)->__id==__ITM_SLOT__) {
-        __tmp__FH4E=((__ITM_SLOT *)s__YF4E)->result_type__B4FC;
+    if (__tmp__0L4E) {
+      if (((struct ___OBJ *)s__UK4E)->__id==__ITM_SLOT__) {
+        __tmp__BM4E=((__ITM_SLOT *)s__UK4E)->result_type__PBGC;
       } else {
-        __tmp__FH4E=((__ITM_SLOT_OPERATOR *)s__YF4E)->parent_itm_slot__BT5B.result_type__B4FC;
+        __tmp__BM4E=((__ITM_SLOT_OPERATOR *)s__UK4E)->parent_itm_slot__NW5B.result_type__PBGC;
       };
-      if (__tmp__FH4E==NULL) {
-        __tmp__HH4E=NULL;
+      if (__tmp__BM4E==NULL) {
+        __tmp__DM4E=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__FH4E)->__id) {
+        switch (((struct ___OBJ *)__tmp__BM4E)->__id) {
         case __ITM_TYPE_PARAMETER__: {
-          __tmp__HH4E=((void *)__tmp__FH4E);
+          __tmp__DM4E=((void *)__tmp__BM4E);
         } break;
         case __ITM_TYPE_SIMPLE__: {
-          __tmp__HH4E=((void *)__tmp__FH4E);
+          __tmp__DM4E=((void *)__tmp__BM4E);
         } break;
         case __ITM_TYPE_MULTI__: {
-          __tmp__HH4E=NULL;
+          __tmp__DM4E=NULL;
         } break;
         case __ITM_TYPE_BLOCK__: {
-          __tmp__HH4E=NULL;
+          __tmp__DM4E=NULL;
         } break;
         case __ITM_TYPE_GENERIC__: {
-          __tmp__HH4E=((void *)__tmp__FH4E);
+          __tmp__DM4E=((void *)__tmp__BM4E);
         } break;
         case __ITM_TYPE_STYLE__: {
-          __tmp__HH4E=((void *)__tmp__FH4E);
+          __tmp__DM4E=((void *)__tmp__BM4E);
         } break;
         }
       };
-      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) {
+      ps__VK4E=__tmp__DM4E;
+      if (((void *)__tmp__DM4E != (void *)NULL)) {
+        p__WK4E=NULL;
+        i__XK4E= 0;
+        while (((i__XK4E <= ((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.upper__HJ) && ((void *)p__WK4E == (void *)NULL))) {
+          __tmp__CN4E=((__PROTOTYPE *)((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__XVT)[i__XK4E])->parent_named__5.name__LI;
+          switch (((struct ___OBJ *)ps__VK4E)->__id) {
           case __ITM_TYPE_PARAMETER__: {
-            __tmp__HI4E=((__ITM_TYPE_PARAMETER *)ps__ZF4E)->parent_itm_type__UBE.name__OVP;
+            __tmp__DN4E=((__ITM_TYPE_PARAMETER *)ps__VK4E)->parent_itm_type__YEE.name__0YP;
           } break;
           case __ITM_TYPE_SIMPLE__: {
-            __tmp__HI4E=((__ITM_TYPE_SIMPLE *)ps__ZF4E)->name__OVP;
+            __tmp__DN4E=((__ITM_TYPE_SIMPLE *)ps__VK4E)->name__0YP;
           } break;
           case __ITM_TYPE_GENERIC__: {
-            __tmp__HI4E=((__ITM_TYPE_GENERIC *)ps__ZF4E)->parent_itm_type_style__GPN.parent_itm_type_simple__FPN.name__OVP;
+            __tmp__DN4E=((__ITM_TYPE_GENERIC *)ps__VK4E)->parent_itm_type_style__SSN.parent_itm_type_simple__RSN.name__0YP;
           } break;
           case __ITM_TYPE_STYLE__: {
-            __tmp__HI4E=((__ITM_TYPE_STYLE *)ps__ZF4E)->parent_itm_type_simple__FPN.name__OVP;
+            __tmp__DN4E=((__ITM_TYPE_STYLE *)ps__VK4E)->parent_itm_type_simple__RSN.name__0YP;
           } break;
           };
-          if (((void *)__tmp__GI4E == (void *)__tmp__HI4E)) {
-            p__0F4E=((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__OQT)[i__1F4E];
+          if (((void *)__tmp__CN4E == (void *)__tmp__DN4E)) {
+            p__WK4E=((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__XVT)[i__XK4E];
           };
-          i__1F4E=(__INTEGER)(i__1F4E +  1);
+          i__XK4E=(__INTEGER)(i__XK4E +  1);
         };
-        if (((void *)p__0F4E != (void *)NULL)) {
-          get_all_comment_slot__in__UF4E(p__0F4E,n__WF4E,buf__XF4E);
+        if (((void *)p__WK4E != (void *)NULL)) {
+          get_all_comment_slot__in__QK4E(p__WK4E,n__SK4E,buf__TK4E);
         };
       };
-      if (((struct ___OBJ *)s__YF4E)->__id==__ITM_SLOT__) {
-        __tmp__2I4E=((__ITM_SLOT *)s__YF4E)->next__ZGHC;
+      if (((struct ___OBJ *)s__UK4E)->__id==__ITM_SLOT__) {
+        __tmp__YN4E=((__ITM_SLOT *)s__UK4E)->next__HKHC;
       } else {
-        __tmp__2I4E=((__ITM_SLOT_OPERATOR *)s__YF4E)->parent_itm_slot__BT5B.next__ZGHC;
+        __tmp__YN4E=((__ITM_SLOT_OPERATOR *)s__UK4E)->parent_itm_slot__NW5B.next__HKHC;
       };
-      s__YF4E=__tmp__2I4E;
-      goto while_do__ZJGF;
+      s__UK4E=__tmp__YN4E;
+      goto while_do__5OGF;
     };
   };
 }
 
-static void shorter_comment__in__light__HJ4E(void *str__JJ4E,void *buf__KJ4E,__BOOLEAN is_light__LJ4E)
+static void shorter_comment__in__light__DO4E(void *str__FO4E,void *buf__GO4E,__BOOLEAN is_light__HO4E)
 // ({NULLxSTRING},{NULLxSTRING},{TRUExFALSE}) VoidNo recursive, No inlinable.
 {
-  __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;
+  __INTEGER stat__JO4E,old_stat__KO4E,i__MO4E,cur__IO4E,__tmp__AP4E;
+  __INTEGER __tmp__Q4HH,Self__S4HH,i__N2YB;
+  void *code_balise__OO4E;
+  __STRING *Self__O4HH,*Self__I2FH,*Self__YBSE;
+  void *__tmp__VU4E;
+  __CHARACTER car__LO4E,result__E2FH,result__DV2F,Self__AKOB;
+  __CHARACTER result__CKOB;
+  __BOOLEAN __tmp__HQ4E,__tmp__MR4E,__tmp__ES4E,__tmp__1R4E;
+  __BOOLEAN result__1BSE,__tmp__4U4E,__tmp__4W4E;
+  __CHARACTER *__tmp__P4HH,*Self__R4HH,*Self__TCEH,*Self__Z1YB;
+  __CHARACTER *other__01YB;
+  stat__JO4E= 0;
+  old_stat__KO4E= 0;
+  car__LO4E='\0';
+  i__MO4E= 0;
+  cur__IO4E= 1;
+  ((__STRING *)str_tmp__QO4E)->count__EGC= 0;
+  code_balise__OO4E=(&__string_128);
+  while ((cur__IO4E <= ((__STRING *)str__FO4E)->count__EGC)) {
+    car__LO4E=((__CHARACTER *)((__STRING *)str__FO4E)->storage__RCS)[(__INTEGER)(cur__IO4E -  1)];
+    __tmp__AP4E=stat__JO4E;
+    if ((stat__JO4E ==  0)) {
+      if ((car__LO4E == '*')) {
+        if ((((__STRING *)str_tmp__QO4E)->count__EGC >  1)) {
+          if (is_light__HO4E) {
+            append__ROS(buf__GO4E,str_tmp__QO4E);
+            cur__IO4E=(__INTEGER)(((__STRING *)str__FO4E)->count__EGC +  1);
+          } else {
+            put__to__like__Q3XD((&__string_248),buf__GO4E,(&__string_148));
+            put__to__like__Q3XD(str_tmp__QO4E,buf__GO4E,code_balise__OO4E);
+          };
+        };
+        ((__STRING *)str_tmp__QO4E)->count__EGC= 0;
+        stat__JO4E= 1;
+        __tmp__HQ4E=TRUE__;
+      } else {
+        __tmp__HQ4E=FALSE__;
+      };
+      if ((! __tmp__HQ4E)) {
+        if ((car__LO4E == '`')) {
+          old_stat__KO4E=stat__JO4E;
+          stat__JO4E= 2;
+          ((__STRING *)str_tmp2__SQ4E)->count__EGC= 0;
+        } else {
+          add_last__GOT(str_tmp__QO4E,car__LO4E);
+        };
+      };
+    };
+    if ((__tmp__AP4E ==  1)) {
+      result__E2FH='\0';
+      if (((((__INTEGER_8 )car__LO4E) <  65) || (((__INTEGER_8 )car__LO4E) >  90))) {
+        result__E2FH=car__LO4E;
+      } else {
+        result__E2FH=((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )car__LO4E) +  32))));
+      };
+      if (((((__INTEGER_8 )result__E2FH) >= ((__INTEGER_8 )'a')) && (((__INTEGER_8 )result__E2FH) <= ((__INTEGER_8 )'z')))) {
+        result__DV2F='\0';
+        if (((((__INTEGER_8 )car__LO4E) <  65) || (((__INTEGER_8 )car__LO4E) >  90))) {
+          result__DV2F=car__LO4E;
+        } else {
+          result__DV2F=((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )car__LO4E) +  32))));
+        };
+        add_last__GOT(str_tmp__QO4E,result__DV2F);
+        __tmp__MR4E=TRUE__;
+      } else {
+        __tmp__MR4E=FALSE__;
+      };
+      if (__tmp__MR4E) {
+        __tmp__ES4E=TRUE__;
+      } else {
+        __tmp__1R4E=((car__LO4E == ' ') && (((__STRING *)str_tmp__QO4E)->count__EGC !=  0));
+        if (__tmp__1R4E) {
+          add_last__GOT(str_tmp__QO4E,'_');
+        };
+        __tmp__ES4E=__tmp__1R4E;
+      };
+      if ((! __tmp__ES4E)) {
+        if ((car__LO4E == ':')) {
+          if ((((__STRING *)str_tmp__QO4E)->count__EGC !=  0)) {
+            code_balise__OO4E=get__YWB(str_tmp__QO4E);
+            if (((void *)fast_reference_at__TLNE(short_dico__QD,code_balise__OO4E) == (void *)NULL)) {
+              code_balise__OO4E=NULL;
             } else {
-              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__O4HH=((__STRING *)str_tmp__QO4E);
+              __tmp__P4HH=Self__O4HH->storage__RCS;
+              __tmp__Q4HH=(__INTEGER)(Self__O4HH->count__EGC -  1);
+              Self__R4HH=((__CHARACTER *)__tmp__P4HH);
+              Self__S4HH=__tmp__Q4HH;
+              while ((Self__S4HH >=  0)) {
+                if (('_' == Self__R4HH[Self__S4HH])) {
+                  Self__R4HH[Self__S4HH]=' ';
                 };
-                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;
+                Self__S4HH=(__INTEGER)(Self__S4HH -  1);
+              };
+              add_last__GOT(str_tmp__QO4E,':');
+              Self__TCEH=((__CHARACTER *)((__STRING *)str_tmp__QO4E)->storage__RCS);
+              Self__I2FH=((__STRING *)str_tmp__QO4E);
+              Self__AKOB=Self__TCEH[ 0];
+              result__CKOB='\0';
+              if (((((__INTEGER_8 )Self__AKOB) <  97) || (((__INTEGER_8 )Self__AKOB) >  122))) {
+                result__CKOB=Self__AKOB;
               } else {
-                result__WGOB=((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )Self__UGOB) -  32))));
+                result__CKOB=((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )Self__AKOB) -  32))));
               };
-              ((__CHARACTER *)Self__AHLB->storage__F5R)[ 0]=result__WGOB;
-              put__to__like__C0XD(str_tmp__UJ4E,buf__KJ4E,(&__string_148));
+              ((__CHARACTER *)Self__I2FH->storage__RCS)[ 0]=result__CKOB;
+              put__to__like__Q3XD(str_tmp__QO4E,buf__GO4E,(&__string_148));
             };
           };
-          ((__STRING *)str_tmp__UJ4E)->count__EGC= 0;
-          stat__NJ4E= 3;
+          ((__STRING *)str_tmp__QO4E)->count__EGC= 0;
+          stat__JO4E= 3;
         };
       };
     };
-    if ((__tmp__EK4E ==  2)) {
-      if ((car__PJ4E == '\'')) {
-        if (((void *)code_balise__SJ4E != (void *)NULL)) {
-          i__QJ4E= 0;
-          while_do__GV3F:
+    if ((__tmp__AP4E ==  2)) {
+      if ((car__LO4E == '\'')) {
+        if (((void *)code_balise__OO4E != (void *)NULL)) {
+          i__MO4E= 0;
+          while_do__N03F:
           {
-            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);
+            if ((i__MO4E <= ((__FAST_ARRAYoITM_SLOTo *)list_tmp__RMTD)->parent_arrayed_collection__QMTD.upper__NNTD)) {
+              ((__STRING *)str_tmp3__SU4E)->count__EGC= 0;
+              __tmp__VU4E=((void **)((__FAST_ARRAYoITM_SLOTo *)list_tmp__RMTD)->parent_arrayed_collection__QMTD.storage__1OWE)[i__MO4E];
+              if (((struct ___OBJ *)__tmp__VU4E)->__id==__ITM_SLOT__) {
+                pretty_name_in__LW4F(__tmp__VU4E,str_tmp3__SU4E);
               } else {
-                pretty_name_in__ZS4F(__tmp__ZP4E,str_tmp3__WP4E);
+                pretty_name_in__AY4F(__tmp__VU4E,str_tmp3__SU4E);
               };
-              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__;
+              Self__YBSE=((__STRING *)str_tmp3__SU4E);
+              result__1BSE=FALSE__;
+              if ((Self__YBSE->count__EGC == ((__STRING *)str_tmp2__SQ4E)->count__EGC)) {
+                if ((Self__YBSE->count__EGC ==  0)) {
+                  result__1BSE=TRUE__;
                 } else {
-                  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);
+                  Self__Z1YB=((__CHARACTER *)Self__YBSE->storage__RCS);
+                  other__01YB=((__STRING *)str_tmp2__SQ4E)->storage__RCS;
+                  i__N2YB=(__INTEGER)(Self__YBSE->count__EGC -  1);
+                  while (((i__N2YB >=  0) && (Self__Z1YB[i__N2YB] == ((__CHARACTER *)other__01YB)[i__N2YB]))) {
+                    i__N2YB=(__INTEGER)(i__N2YB -  1);
                   };
-                  result__I3RE=(i__BZYB <  0);
+                  result__1BSE=(i__N2YB <  0);
                 };
               };
-              __tmp__CQ4E=(! result__I3RE);
+              __tmp__4U4E=(! result__1BSE);
             } else {
-              __tmp__CQ4E=FALSE__;
+              __tmp__4U4E=FALSE__;
             };
-            if (__tmp__CQ4E) {
-              i__QJ4E=(__INTEGER)(i__QJ4E +  1);
-              goto while_do__GV3F;
+            if (__tmp__4U4E) {
+              i__MO4E=(__INTEGER)(i__MO4E +  1);
+              goto while_do__N03F;
             };
           };
-          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));
+          if ((i__MO4E <= ((__FAST_ARRAYoITM_SLOTo *)list_tmp__RMTD)->parent_arrayed_collection__QMTD.upper__NNTD)) {
+            put__to__like__Q3XD(str_tmp2__SQ4E,str_tmp__QO4E,(&__string_137));
           } else {
-            put__to__like__C0XD(str_tmp2__WL4E,str_tmp__UJ4E,(&__string_136));
+            put__to__like__Q3XD(str_tmp2__SQ4E,str_tmp__QO4E,(&__string_136));
           };
         };
-        stat__NJ4E=old_stat__OJ4E;
+        stat__JO4E=old_stat__KO4E;
       } else {
-        add_last__3IT(str_tmp2__WL4E,car__PJ4E);
+        add_last__GOT(str_tmp2__SQ4E,car__LO4E);
       };
     };
-    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);
+    if ((__tmp__AP4E ==  3)) {
+      if ((car__LO4E == '*')) {
+        if ((((__STRING *)str_tmp__QO4E)->count__EGC >  1)) {
+          put__to__like__Q3XD(str_tmp__QO4E,buf__GO4E,code_balise__OO4E);
         };
-        ((__STRING *)str_tmp__UJ4E)->count__EGC= 0;
-        stat__NJ4E= 1;
-        __tmp__CS4E=TRUE__;
+        ((__STRING *)str_tmp__QO4E)->count__EGC= 0;
+        stat__JO4E= 1;
+        __tmp__4W4E=TRUE__;
       } else {
-        __tmp__CS4E=FALSE__;
+        __tmp__4W4E=FALSE__;
       };
-      if ((! __tmp__CS4E)) {
-        if ((car__PJ4E == '`')) {
-          old_stat__OJ4E=stat__NJ4E;
-          stat__NJ4E= 2;
-          ((__STRING *)str_tmp2__WL4E)->count__EGC= 0;
+      if ((! __tmp__4W4E)) {
+        if ((car__LO4E == '`')) {
+          old_stat__KO4E=stat__JO4E;
+          stat__JO4E= 2;
+          ((__STRING *)str_tmp2__SQ4E)->count__EGC= 0;
         } else {
-          add_last__3IT(str_tmp__UJ4E,car__PJ4E);
+          add_last__GOT(str_tmp__QO4E,car__LO4E);
         };
       };
     };
-    cur__MJ4E=(__INTEGER)(cur__MJ4E +  1);
+    cur__IO4E=(__INTEGER)(cur__IO4E +  1);
   };
-  if ((((__STRING *)str_tmp__UJ4E)->count__EGC >  1)) {
-    if (is_light__LJ4E) {
-      append__FLS(buf__KJ4E,str_tmp__UJ4E);
+  if ((((__STRING *)str_tmp__QO4E)->count__EGC >  1)) {
+    if (is_light__HO4E) {
+      append__ROS(buf__GO4E,str_tmp__QO4E);
     } else {
-      if ((stat__NJ4E ==  0)) {
-        put__to__like__C0XD((&__string_248),buf__KJ4E,(&__string_148));
+      if ((stat__JO4E ==  0)) {
+        put__to__like__Q3XD((&__string_248),buf__GO4E,(&__string_148));
       };
-      put__to__like__C0XD(str_tmp__UJ4E,buf__KJ4E,code_balise__SJ4E);
+      put__to__like__Q3XD(str_tmp__QO4E,buf__GO4E,code_balise__OO4E);
     };
   };
 }
 
-static void append_in__FHH(__UINTEGER_32 Self__GHH,void *buffer__HHH)
+static void append_in__RKH(__UINTEGER_32 Self__SKH,void *buffer__TKH)
 // ({UINTEGER_32},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __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');
+  __UINTEGER_32 val__UKH;
+  __INTEGER i__XKH,j__YKH;
+  __STRING *Self__KWHH;
+  __CHARACTER tmp__MWHH;
+  val__UKH= 0;
+  i__XKH= 0;
+  j__YKH= 0;
+  if ((Self__SKH ==  0)) {
+    add_last__GOT(((__STRING *)buffer__TKH),'0');
   } else {
-    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);
+    i__XKH=(__INTEGER)(((__STRING *)buffer__TKH)->count__EGC +  1);
+    val__UKH=Self__SKH;
+    while ((val__UKH !=  0)) {
+      add_last__GOT(((__STRING *)buffer__TKH),((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )(__UINTEGER_32)(val__UKH %  10)) + ((__INTEGER_8 )'0'))))));
+      val__UKH=(__UINTEGER_32)(val__UKH /  10);
+    };
+    j__YKH=((__STRING *)buffer__TKH)->count__EGC;
+    while ((i__XKH < j__YKH)) {
+      Self__KWHH=((__STRING *)buffer__TKH);
+      tmp__MWHH=((__CHARACTER *)Self__KWHH->storage__RCS)[(__INTEGER)(i__XKH -  1)];
+      ((__CHARACTER *)Self__KWHH->storage__RCS)[(__INTEGER)(i__XKH -  1)]=((__CHARACTER *)Self__KWHH->storage__RCS)[(__INTEGER)(j__YKH -  1)];
+      ((__CHARACTER *)Self__KWHH->storage__RCS)[(__INTEGER)(j__YKH -  1)]=tmp__MWHH;
+      j__YKH=(__INTEGER)(j__YKH -  1);
+      i__XKH=(__INTEGER)(i__XKH +  1);
     };
   };
 }
 
-static void append_in__RU4F(__SECTION_ *Self__SU4F,void *buf__TU4F)
+static void append_in__YZ4F(__SECTION_ *Self__ZZ4F,void *buf__0Z4F)
 // ({SECTION_},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER __tmp__N04F,Self__3QDG;
+  void *__tmp__U04F,*__tmp__X04F;
+  __ITM_TYPE_STYLE *Self__Q2FH,*Self__S2FH;
+  __FAST_ARRAYoITM_TYPE_MONOo *Self__TWHH;
+  if (((void *)Self__ZZ4F->name__11DC != (void *)NULL)) {
+    append__ROS(buf__0Z4F,Self__ZZ4F->name__11DC);
   } else {
-    __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) {
+    __tmp__N04F=(__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)Self__ZZ4F->type_list__K0FC)->parent_arrayed_collection__EYC.upper__SIV -  1);
+    Self__3QDG= 0;
+    while ((Self__3QDG <= __tmp__N04F)) {
+      __tmp__U04F=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)Self__ZZ4F->type_list__K0FC)->parent_arrayed_collection__EYC.storage__ZMV)[Self__3QDG];
+      switch (((struct ___OBJ *)__tmp__U04F)->__id) {
       case __ITM_TYPE_PARAMETER__: {
-        append__FLS(buf__TU4F,((__ITM_TYPE_PARAMETER *)__tmp__NV4F)->parent_itm_type__UBE.name__OVP);
+        append__ROS(buf__0Z4F,((__ITM_TYPE_PARAMETER *)__tmp__U04F)->parent_itm_type__YEE.name__0YP);
       } break;
       case __ITM_TYPE_SIMPLE__: {
-        append__FLS(buf__TU4F,((__ITM_TYPE_SIMPLE *)__tmp__NV4F)->name__OVP);
+        append__ROS(buf__0Z4F,((__ITM_TYPE_SIMPLE *)__tmp__U04F)->name__0YP);
       } break;
       case __ITM_TYPE_BLOCK__: {
-        append_in__0EPD(__tmp__NV4F,buf__TU4F);
+        append_in__IIPD(__tmp__U04F,buf__0Z4F);
       } break;
       case __ITM_TYPE_GENERIC__: {
-        append_in__4FPD(__tmp__NV4F,buf__TU4F);
+        append_in__MJPD(__tmp__U04F,buf__0Z4F);
       } break;
       case __ITM_TYPE_STYLE__: {
-        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,' ');
+        Self__Q2FH=((__ITM_TYPE_STYLE *)__tmp__U04F);
+        if (((void *)Self__Q2FH->style__DZP != (void *)NULL)) {
+          append__ROS(buf__0Z4F,Self__Q2FH->style__DZP);
+          add_last__GOT(buf__0Z4F,' ');
         };
-        append__FLS(buf__TU4F,Self__VVFH->parent_itm_type_simple__FPN.name__OVP);
+        append__ROS(buf__0Z4F,Self__Q2FH->parent_itm_type_simple__RSN.name__0YP);
       } break;
       };
-      add_last__3IT(buf__TU4F,',');
-      add_last__3IT(buf__TU4F,' ');
-      Self__WLDG=(__INTEGER)(Self__WLDG +  1);
+      add_last__GOT(buf__0Z4F,',');
+      add_last__GOT(buf__0Z4F,' ');
+      Self__3QDG=(__INTEGER)(Self__3QDG +  1);
     };
-    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) {
+    Self__TWHH=((__FAST_ARRAYoITM_TYPE_MONOo *)Self__ZZ4F->type_list__K0FC);
+    __tmp__X04F=((void **)Self__TWHH->parent_arrayed_collection__EYC.storage__ZMV)[Self__TWHH->parent_arrayed_collection__EYC.upper__SIV];
+    switch (((struct ___OBJ *)__tmp__X04F)->__id) {
     case __ITM_TYPE_PARAMETER__: {
-      append__FLS(buf__TU4F,((__ITM_TYPE_PARAMETER *)__tmp__QV4F)->parent_itm_type__UBE.name__OVP);
+      append__ROS(buf__0Z4F,((__ITM_TYPE_PARAMETER *)__tmp__X04F)->parent_itm_type__YEE.name__0YP);
     } break;
     case __ITM_TYPE_SIMPLE__: {
-      append__FLS(buf__TU4F,((__ITM_TYPE_SIMPLE *)__tmp__QV4F)->name__OVP);
+      append__ROS(buf__0Z4F,((__ITM_TYPE_SIMPLE *)__tmp__X04F)->name__0YP);
     } break;
     case __ITM_TYPE_BLOCK__: {
-      append_in__0EPD(__tmp__QV4F,buf__TU4F);
+      append_in__IIPD(__tmp__X04F,buf__0Z4F);
     } break;
     case __ITM_TYPE_GENERIC__: {
-      append_in__4FPD(__tmp__QV4F,buf__TU4F);
+      append_in__MJPD(__tmp__X04F,buf__0Z4F);
     } break;
     case __ITM_TYPE_STYLE__: {
-      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,' ');
+      Self__S2FH=((__ITM_TYPE_STYLE *)__tmp__X04F);
+      if (((void *)Self__S2FH->style__DZP != (void *)NULL)) {
+        append__ROS(buf__0Z4F,Self__S2FH->style__DZP);
+        add_last__GOT(buf__0Z4F,' ');
       };
-      append__FLS(buf__TU4F,Self__XVFH->parent_itm_type_simple__FPN.name__OVP);
+      append__ROS(buf__0Z4F,Self__S2FH->parent_itm_type_simple__RSN.name__0YP);
     } break;
     };
   };
 }
 
-static void shorter_profile_in__TV4F(__ITM_SLOT *Self__UV4F,void *buf__VV4F)
+static void shorter_profile_in__004F(__ITM_SLOT *Self__104F,void *buf__204F)
 // ({ITM_SLOT},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __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));
+  __INTEGER j__U35F,i__V35F;
+  void *__tmp__035F,*__tmp__C55F,*__tmp__CAAG;
+  __STRING_CONSTANT *Self__E3FH;
+  void *__tmp__U14F;
+  __ITM_TYPE_MULTI *Self__K31G;
+  __ITM_TYPE_STYLE *Self__O3FH;
+  __FAST_ARRAYoITM_ARGUMENTo *Self__G3FH;
+  if ((Self__104F->parent_named__15.style__OGU == '+')) {
+    put__to__like__PLBG((&__string_249),buf__204F,(&__string_132));
   } else {
-    put__to__like__IGBG((&__string_250),buf__VV4F,(&__string_132));
+    put__to__like__PLBG((&__string_250),buf__204F,(&__string_132));
   };
   ((__STRING *)string_tmp__VH)->count__EGC= 0;
-  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);
+  j__U35F= 1;
+  __tmp__035F=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)Self__104F->argument_list__5GHC)->parent_arrayed_collection__MDZB.storage__VDHC)[ 0];
+  if (((struct ___OBJ *)__tmp__035F)->__id==__ITM_ARG__) {
+    shorter_in__QIBG(__tmp__035F,buf__204F);
   } else {
-    shorter_in__AEBG(__tmp__TY5F,buf__VV4F);
+    shorter_in__HJBG(__tmp__035F,buf__204F);
   };
-  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);
+  add_last__GOT(buf__204F,'.');
+  i__V35F= 1;
+  while ((j__U35F < ((__STRING_CONSTANT *)Self__104F->parent_named__15.name__LI)->count__DD)) {
+    if (((((__CHARACTER *)((__STRING_CONSTANT *)Self__104F->parent_named__15.name__LI)->storage__FRO)[(__INTEGER)(j__U35F -  1)] == '_') && (((__CHARACTER *)((__STRING_CONSTANT *)Self__104F->parent_named__15.name__LI)->storage__FRO)[(__INTEGER)((__INTEGER)(j__U35F +  1) -  1)] == '_'))) {
+      put__to__like__PLBG(string_tmp__VH,buf__204F,(&__string_130));
+      add_last__GOT(buf__204F,' ');
+      __tmp__C55F=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)Self__104F->argument_list__5GHC)->parent_arrayed_collection__MDZB.storage__VDHC)[i__V35F];
+      if (((struct ___OBJ *)__tmp__C55F)->__id==__ITM_ARG__) {
+        shorter_in__QIBG(__tmp__C55F,buf__204F);
       } else {
-        shorter_in__AEBG(__tmp__1Z5F,buf__VV4F);
+        shorter_in__HJBG(__tmp__C55F,buf__204F);
       };
-      add_last__3IT(buf__VV4F,' ');
+      add_last__GOT(buf__204F,' ');
       ((__STRING *)string_tmp__VH)->count__EGC= 0;
-      j__NY5F=(__INTEGER)(j__NY5F +  2);
-      i__OY5F=(__INTEGER)(i__OY5F +  1);
+      j__U35F=(__INTEGER)(j__U35F +  2);
+      i__V35F=(__INTEGER)(i__V35F +  1);
     } else {
-      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);
+      add_last__GOT(string_tmp__VH,((__CHARACTER *)((__STRING_CONSTANT *)Self__104F->parent_named__15.name__LI)->storage__FRO)[(__INTEGER)(j__U35F -  1)]);
+      j__U35F=(__INTEGER)(j__U35F +  1);
     };
   };
-  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);
+  Self__E3FH=((__STRING_CONSTANT *)Self__104F->parent_named__15.name__LI);
+  add_last__GOT(string_tmp__VH,((__CHARACTER *)Self__E3FH->storage__FRO)[(__INTEGER)(Self__E3FH->count__DD -  1)]);
+  put__to__like__PLBG(string_tmp__VH,buf__204F,(&__string_130));
+  if ((i__V35F <= ((__FAST_ARRAYoITM_ARGUMENTo *)Self__104F->argument_list__5GHC)->parent_arrayed_collection__MDZB.upper__XCHC)) {
+    add_last__GOT(buf__204F,' ');
+    Self__G3FH=((__FAST_ARRAYoITM_ARGUMENTo *)Self__104F->argument_list__5GHC);
+    __tmp__CAAG=((void **)Self__G3FH->parent_arrayed_collection__MDZB.storage__VDHC)[Self__G3FH->parent_arrayed_collection__MDZB.upper__XCHC];
+    if (((struct ___OBJ *)__tmp__CAAG)->__id==__ITM_ARG__) {
+      shorter_in__QIBG(__tmp__CAAG,buf__204F);
     } else {
-      shorter_in__AEBG(__tmp__105F,buf__VV4F);
+      shorter_in__HJBG(__tmp__CAAG,buf__204F);
     };
-    add_last__3IT(buf__VV4F,' ');
+    add_last__GOT(buf__204F,' ');
   };
-  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) {
+  if (((void *)Self__104F->result_type__PBGC != (void *)type_void__ZXF)) {
+    add_last__GOT(buf__204F,':');
+    __tmp__U14F=Self__104F->result_type__PBGC;
+    switch (((struct ___OBJ *)__tmp__U14F)->__id) {
     case __ITM_TYPE_PARAMETER__: {
-      shorter_in__ZMDG(__tmp__NW4F,buf__VV4F);
+      shorter_in__ASDG(__tmp__U14F,buf__204F);
     } break;
     case __ITM_TYPE_SIMPLE__: {
-      shorter_in__KNDG(__tmp__NW4F,buf__VV4F);
+      shorter_in__RSDG(__tmp__U14F,buf__204F);
     } break;
     case __ITM_TYPE_MULTI__: {
-      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,')');
+      Self__K31G=((__ITM_TYPE_MULTI *)__tmp__U14F);
+      add_last__GOT(buf__204F,'(');
+      shorter_raw_in__S0FG(Self__K31G,buf__204F);
+      add_last__GOT(buf__204F,')');
     } break;
     case __ITM_TYPE_BLOCK__: {
-      shorter_in__1NDG(__tmp__NW4F,buf__VV4F);
+      shorter_in__CTDG(__tmp__U14F,buf__204F);
     } break;
     case __ITM_TYPE_GENERIC__: {
-      shorter_in__DPDG(__tmp__NW4F,buf__VV4F);
+      shorter_in__KUDG(__tmp__U14F,buf__204F);
     } break;
     case __ITM_TYPE_STYLE__: {
-      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,' ');
+      Self__O3FH=((__ITM_TYPE_STYLE *)__tmp__U14F);
+      if (((void *)Self__O3FH->style__DZP != (void *)NULL)) {
+        put__to__like__OYFG(Self__O3FH->style__DZP,buf__204F,(&__string_119));
+        add_last__GOT(buf__204F,' ');
       };
-      put__to__like__HTFG(Self__TWFH->parent_itm_type_simple__FPN.name__OVP,buf__VV4F,(&__string_125));
+      put__to__like__OYFG(Self__O3FH->parent_itm_type_simple__RSN.name__0YP,buf__204F,(&__string_125));
     } break;
     };
   };
 }
 
-static void shorter_profile_in__QW4F(__ITM_SLOT_OPERATOR *Self__RW4F,void *buf__SW4F)
+static void shorter_profile_in__X14F(__ITM_SLOT_OPERATOR *Self__Y14F,void *buf__Z14F)
 // ({ITM_SLOT_OPERATOR},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __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));
+  __STRING_CONSTANT *Self__CEJH,*Self__HEJH;
+  __INTEGER i__AEJH,i__FEJH,Self__5KMG,result__BLMG,i__RMMG,j__SMMG;
+  void *__tmp__EBAG,*__tmp__ZBAG,*__tmp__PCAG,*__tmp__ZCAG;
+  void *result__3EMG;
+  __INTEGER_32 Self__GMMG,val__OMMG;
+  __STRING *Self__2YFB;
+  void *__tmp__R24F;
+  __ITM_TYPE_MULTI *Self__RYDG;
+  __ITM_TYPE_STYLE *Self__Q3FH;
+  __BOOLEAN result__5DJH,__tmp__JBAG,result__EEJH;
+  __CHARACTER tmp__5YFB;
+  if ((Self__Y14F->parent_itm_slot__NW5B.parent_named__15.style__OGU == '+')) {
+    put__to__like__YYDG((&__string_249),buf__Z14F,(&__string_132));
   } else {
-    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__;
+    put__to__like__YYDG((&__string_250),buf__Z14F,(&__string_132));
+  };
+  Self__CEJH=((__STRING_CONSTANT *)Self__Y14F->parent_itm_slot__NW5B.parent_named__15.name__LI);
+  result__5DJH=FALSE__;
+  i__AEJH= 0;
+  if ((((__STRING_CONSTANT *)(&__string_82))->count__DD <= Self__CEJH->count__DD)) {
+    i__AEJH=((__STRING_CONSTANT *)(&__string_82))->count__DD;
+    while ((! ((i__AEJH ==  0) || (((__CHARACTER *)Self__CEJH->storage__FRO)[(__INTEGER)(i__AEJH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_82))->storage__FRO)[(__INTEGER)(i__AEJH -  1)])))) {
+      i__AEJH=(__INTEGER)(i__AEJH -  1);
+    };
+    result__5DJH=(i__AEJH ==  0);
+  };
+  if (result__5DJH) {
+    __tmp__EBAG=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)Self__Y14F->parent_itm_slot__NW5B.argument_list__5GHC)->parent_arrayed_collection__MDZB.storage__VDHC)[ 0];
+    if (((struct ___OBJ *)__tmp__EBAG)->__id==__ITM_ARG__) {
+      shorter_in__QIBG(__tmp__EBAG,buf__Z14F);
+    } else {
+      shorter_in__HJBG(__tmp__EBAG,buf__Z14F);
+    };
+    add_last__GOT(buf__Z14F,' ');
+    add_last__GOT(buf__Z14F,'\'');
+    put__to__like__YYDG(Self__Y14F->pretty_name__O3HC,buf__Z14F,(&__string_130));
+    add_last__GOT(buf__Z14F,'\'');
+    add_last__GOT(buf__Z14F,' ');
+    __tmp__JBAG=TRUE__;
   } else {
-    __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,' ');
+    __tmp__JBAG=FALSE__;
+  };
+  if ((! __tmp__JBAG)) {
+    Self__HEJH=((__STRING_CONSTANT *)Self__Y14F->parent_itm_slot__NW5B.parent_named__15.name__LI);
+    result__EEJH=FALSE__;
+    i__FEJH= 0;
+    if ((((__STRING_CONSTANT *)(&__string_81))->count__DD <= Self__HEJH->count__DD)) {
+      i__FEJH=((__STRING_CONSTANT *)(&__string_81))->count__DD;
+      while ((! ((i__FEJH ==  0) || (((__CHARACTER *)Self__HEJH->storage__FRO)[(__INTEGER)(i__FEJH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_81))->storage__FRO)[(__INTEGER)(i__FEJH -  1)])))) {
+        i__FEJH=(__INTEGER)(i__FEJH -  1);
+      };
+      result__EEJH=(i__FEJH ==  0);
+    };
+    if (result__EEJH) {
+      __tmp__ZBAG=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)Self__Y14F->parent_itm_slot__NW5B.argument_list__5GHC)->parent_arrayed_collection__MDZB.storage__VDHC)[ 0];
+      if (((struct ___OBJ *)__tmp__ZBAG)->__id==__ITM_ARG__) {
+        shorter_in__QIBG(__tmp__ZBAG,buf__Z14F);
+      } else {
+        shorter_in__HJBG(__tmp__ZBAG,buf__Z14F);
+      };
+      add_last__GOT(buf__Z14F,' ');
+      add_last__GOT(buf__Z14F,'\'');
+      put__to__like__YYDG(Self__Y14F->pretty_name__O3HC,buf__Z14F,(&__string_130));
+      add_last__GOT(buf__Z14F,'\'');
+      if ((Self__Y14F->priority_and_level__D3HC !=  0)) {
+        add_last__GOT(buf__Z14F,' ');
+        result__3EMG=NULL;
+        if ((Self__Y14F->priority_and_level__D3HC >=  0)) {
+          result__3EMG=(&__string_6);
+        } else {
+          result__3EMG=(&__string_5);
+        };
+        put__to__like__YYDG(result__3EMG,buf__Z14F,(&__string_119));
+        add_last__GOT(buf__Z14F,' ');
         ((__STRING *)string_tmp__VH)->count__EGC= 0;
-        Self__YFMG=Self__RW4F->priority_and_level__VZHC;
-        result__0FMG= 0;
-        if ((Self__YFMG <  0)) {
-          result__0FMG=(__INTEGER)(- Self__YFMG);
+        Self__5KMG=Self__Y14F->priority_and_level__D3HC;
+        result__BLMG= 0;
+        if ((Self__5KMG <  0)) {
+          result__BLMG=(__INTEGER)(- Self__5KMG);
         } else {
-          result__0FMG=Self__YFMG;
+          result__BLMG=Self__5KMG;
         };
-        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');
+        Self__GMMG=((__INTEGER_32 )result__BLMG);
+        val__OMMG= 0;
+        i__RMMG= 0;
+        j__SMMG= 0;
+        if ((Self__GMMG ==  0)) {
+          add_last__GOT(((__STRING *)string_tmp__VH),'0');
         } else {
-          if ((Self__5GMG >  0)) {
-            val__HHMG=Self__5GMG;
+          if ((Self__GMMG >  0)) {
+            val__OMMG=Self__GMMG;
           } else {
-            val__HHMG=(__INTEGER_32)(- Self__5GMG);
-            add_last__3IT(((__STRING *)string_tmp__VH),'-');
+            val__OMMG=(__INTEGER_32)(- Self__GMMG);
+            add_last__GOT(((__STRING *)string_tmp__VH),'-');
           };
-          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);
+          i__RMMG=(__INTEGER)(((__STRING *)string_tmp__VH)->count__EGC +  1);
+          while ((val__OMMG !=  0)) {
+            add_last__GOT(((__STRING *)string_tmp__VH),((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )(__INTEGER_32)(val__OMMG %  10)) + ((__INTEGER_8 )'0'))))));
+            val__OMMG=(__INTEGER_32)(val__OMMG /  10);
           };
-          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);
+          j__SMMG=((__STRING *)string_tmp__VH)->count__EGC;
+          while ((i__RMMG < j__SMMG)) {
+            Self__2YFB=((__STRING *)string_tmp__VH);
+            tmp__5YFB=((__CHARACTER *)Self__2YFB->storage__RCS)[(__INTEGER)(i__RMMG -  1)];
+            ((__CHARACTER *)Self__2YFB->storage__RCS)[(__INTEGER)(i__RMMG -  1)]=((__CHARACTER *)Self__2YFB->storage__RCS)[(__INTEGER)(j__SMMG -  1)];
+            ((__CHARACTER *)Self__2YFB->storage__RCS)[(__INTEGER)(j__SMMG -  1)]=tmp__5YFB;
+            j__SMMG=(__INTEGER)(j__SMMG -  1);
+            i__RMMG=(__INTEGER)(i__RMMG +  1);
           };
         };
-        put__to__like__RTDG(string_tmp__VH,buf__SW4F,(&__string_119));
+        put__to__like__YYDG(string_tmp__VH,buf__Z14F,(&__string_119));
       };
-      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);
+      add_last__GOT(buf__Z14F,' ');
+      __tmp__PCAG=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)Self__Y14F->parent_itm_slot__NW5B.argument_list__5GHC)->parent_arrayed_collection__MDZB.storage__VDHC)[ 1];
+      if (((struct ___OBJ *)__tmp__PCAG)->__id==__ITM_ARG__) {
+        shorter_in__QIBG(__tmp__PCAG,buf__Z14F);
       } else {
-        shorter_in__AEBG(__tmp__I35F,buf__SW4F);
+        shorter_in__HJBG(__tmp__PCAG,buf__Z14F);
       };
-      add_last__3IT(buf__SW4F,' ');
+      add_last__GOT(buf__Z14F,' ');
     } else {
-      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);
+      add_last__GOT(buf__Z14F,'\'');
+      put__to__like__YYDG(Self__Y14F->pretty_name__O3HC,buf__Z14F,(&__string_130));
+      add_last__GOT(buf__Z14F,'\'');
+      add_last__GOT(buf__Z14F,' ');
+      __tmp__ZCAG=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)Self__Y14F->parent_itm_slot__NW5B.argument_list__5GHC)->parent_arrayed_collection__MDZB.storage__VDHC)[ 0];
+      if (((struct ___OBJ *)__tmp__ZCAG)->__id==__ITM_ARG__) {
+        shorter_in__QIBG(__tmp__ZCAG,buf__Z14F);
       } else {
-        shorter_in__AEBG(__tmp__S35F,buf__SW4F);
+        shorter_in__HJBG(__tmp__ZCAG,buf__Z14F);
       };
-      add_last__3IT(buf__SW4F,' ');
+      add_last__GOT(buf__Z14F,' ');
     };
   };
-  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) {
+  if (((void *)Self__Y14F->parent_itm_slot__NW5B.result_type__PBGC != (void *)type_void__ZXF)) {
+    add_last__GOT(buf__Z14F,':');
+    __tmp__R24F=Self__Y14F->parent_itm_slot__NW5B.result_type__PBGC;
+    switch (((struct ___OBJ *)__tmp__R24F)->__id) {
     case __ITM_TYPE_PARAMETER__: {
-      shorter_in__ZMDG(__tmp__KX4F,buf__SW4F);
+      shorter_in__ASDG(__tmp__R24F,buf__Z14F);
     } break;
     case __ITM_TYPE_SIMPLE__: {
-      shorter_in__KNDG(__tmp__KX4F,buf__SW4F);
+      shorter_in__RSDG(__tmp__R24F,buf__Z14F);
     } break;
     case __ITM_TYPE_MULTI__: {
-      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,')');
+      Self__RYDG=((__ITM_TYPE_MULTI *)__tmp__R24F);
+      add_last__GOT(buf__Z14F,'(');
+      shorter_raw_in__S0FG(Self__RYDG,buf__Z14F);
+      add_last__GOT(buf__Z14F,')');
     } break;
     case __ITM_TYPE_BLOCK__: {
-      shorter_in__1NDG(__tmp__KX4F,buf__SW4F);
+      shorter_in__CTDG(__tmp__R24F,buf__Z14F);
     } break;
     case __ITM_TYPE_GENERIC__: {
-      shorter_in__DPDG(__tmp__KX4F,buf__SW4F);
+      shorter_in__KUDG(__tmp__R24F,buf__Z14F);
     } break;
     case __ITM_TYPE_STYLE__: {
-      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,' ');
+      Self__Q3FH=((__ITM_TYPE_STYLE *)__tmp__R24F);
+      if (((void *)Self__Q3FH->style__DZP != (void *)NULL)) {
+        put__to__like__OYFG(Self__Q3FH->style__DZP,buf__Z14F,(&__string_119));
+        add_last__GOT(buf__Z14F,' ');
       };
-      put__to__like__HTFG(Self__VWFH->parent_itm_type_simple__FPN.name__OVP,buf__SW4F,(&__string_125));
+      put__to__like__OYFG(Self__Q3FH->parent_itm_type_simple__RSN.name__0YP,buf__Z14F,(&__string_125));
     } break;
     };
   };
 }
 
-static __CHARACTER* create__3IEB(__INTEGER nb_elements__5IEB)
+static __CHARACTER* create__JMEB(__INTEGER nb_elements__LMEB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__JDEH,a__U3FH,new_size__KDEH,new_size2__LDEH,a__Y3FH;
+  __UINTEGER_32 new_size__Z3FH;
+  __POINTER result__IDEH,ptr_table__KEJH,next__JEJH,result__LEJH;
+  void *result__OEJH;
+  __INTEGER Self__ZXKC;
+  __CHARACTER *Result__MBKB;
+  sz__JDEH=((__UINTEGER_32 )nb_elements__LMEB);
+  result__IDEH=((__POINTER )(NULL));
+  a__U3FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__KDEH=(__UINTEGER_32)((__UINTEGER_32)(sz__JDEH + a__U3FH) & (__UINTEGER_32)(~ a__U3FH));
+  new_size2__LDEH=(__UINTEGER_32)(new_size__KDEH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__LDEH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__Y3FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__Z3FH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__LDEH + a__Y3FH) & (__UINTEGER_32)(~ a__Y3FH));
+    ptr_table__KEJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__Z3FH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__JEJH=((__POINTER )(NULL));
+    result__LEJH=((__POINTER *)ptr_table__KEJH)[ 0];
+    if ((result__LEJH == (void *)NULL)) {
+      result__LEJH=new_lab__FTJ(new_size__Z3FH);
+      next__JEJH=(void *)((unsigned long)result__LEJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Z3FH)));
+      ((__POINTER *)next__JEJH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__KEJH)[ 0]=next__JEJH;
+    } else {
+      next__JEJH=((__POINTER *)result__LEJH)[ 0];
+      if ((next__JEJH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LEJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__Z3FH <<  1)) <=  4096)) {
+          next__JEJH=(void *)((unsigned long)result__LEJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Z3FH)));
+        } else {
+          next__JEJH=new_lab__FTJ(new_size__Z3FH);
+        };
+        ((__POINTER *)next__JEJH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__KEJH)[ 0]=next__JEJH;
+      } else {
+        ((__POINTER *)result__LEJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JEJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__LEJH=next__JEJH;
+      };
+    };
+    ((__POINTER *)result__LEJH)[ 0]=((__POINTER ) 3);
+    result__IDEH=(void *)((unsigned long)result__LEJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__OEJH=first_free__NFVB;
+    while ((((void *)result__OEJH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__OEJH)->map_size_and_id__YTB &  4294967292LU) < new_size__KDEH))) {
+      result__OEJH=((__MEMORY *)result__OEJH)->map_next_free__ZTB;
     };
-    if (((void *)result__P2IH == (void *)NULL)) {
-      result__P2IH=new_page__K34();
+    if (((void *)result__OEJH == (void *)NULL)) {
+      result__OEJH=new_page__YC5();
     };
-    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)));
+    to_busy__index__MWFC(result__OEJH,new_size__KDEH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__OEJH)) - (unsigned long)begin_memory__SXH)))) >>  26));
+    result__IDEH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__OEJH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__MBKB=((__CHARACTER *)result__IDEH);
+  Self__ZXKC=(__INTEGER)(nb_elements__LMEB -  1);
+  while ((Self__ZXKC >=  0)) {
+    Result__MBKB[Self__ZXKC]='\0';
+    Self__ZXKC=(__INTEGER)(Self__ZXKC -  1);
   };
-  return(Result__A4JB);
+  return(Result__MBKB);
 }
 
-static __POINTER realloc_dynamic__old_size__new_size__LELC(__POINTER p__NELC,__UINTEGER_32 old_sz__OELC,__UINTEGER_32 new_sz__PELC)
+static __POINTER realloc_dynamic__old_size__new_size__ZHLC(__POINTER p__1HLC,__UINTEGER_32 old_sz__2HLC,__UINTEGER_32 new_sz__3HLC)
 // ({POINTER},{UINTEGER_32},{UINTEGER_32}) With resultNo recursive, No inlinable.
 {
-  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;
+  void *mem__IILC,*result__4EJH,*nxt__MHED,*result__NHED,*result__BFJH;
+  void *next__PEND,*new_free__OEND,*prev__L5FH,*next__M5FH;
+  __POINTER result__JILC,result__UDEH,ptr_table__0EJH,next__ZEJH;
+  __POINTER result__1EJH,__tmp__NJLC,last__HTHD,src__YEED,dst__ZEED;
+  __UINTEGER_32 a__K4FH,old_size__5HLC,old_size2__CILC,a__O4FH;
+  __UINTEGER_32 new_size__FILC,a__S4FH,new_size__WDEH,new_size2__XDEH;
+  __UINTEGER_32 a__W4FH,new_size__X4FH,a__VTH,__tmp__0JLC,sz__RHED;
+  __UINTEGER_32 old_size__OHED,prev__QEND,new_size__TEND;
+  __INTEGER siz__X4HH,Self__24HH,siz__3EED,Self__0QHD;
+  __MEMORY *Self__IHED;
+  __POINTER *na_src__Z4HH,*na_dst__14HH,*na_src__1EED,*na_dst__2EED;
+  mem__IILC=NULL;
+  result__JILC=((__POINTER )(NULL));
+  a__K4FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  old_size__5HLC=(__UINTEGER_32)((__UINTEGER_32)(old_sz__2HLC + a__K4FH) & (__UINTEGER_32)(~ a__K4FH));
+  old_size2__CILC=(__UINTEGER_32)(old_size__5HLC + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  a__O4FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__FILC=(__UINTEGER_32)((__UINTEGER_32)(new_sz__3HLC + a__O4FH) & (__UINTEGER_32)(~ a__O4FH));
+  if ((old_size2__CILC <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    result__UDEH=((__POINTER )(NULL));
+    a__S4FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__WDEH=(__UINTEGER_32)((__UINTEGER_32)(new_size__FILC + a__S4FH) & (__UINTEGER_32)(~ a__S4FH));
+    new_size2__XDEH=(__UINTEGER_32)(new_size__WDEH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+    if ((new_size2__XDEH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+      a__W4FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__X4FH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__XDEH + a__W4FH) & (__UINTEGER_32)(~ a__W4FH));
+      ptr_table__0EJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__X4FH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__ZEJH=((__POINTER )(NULL));
+      result__1EJH=((__POINTER *)ptr_table__0EJH)[ 0];
+      if ((result__1EJH == (void *)NULL)) {
+        result__1EJH=new_lab__FTJ(new_size__X4FH);
+        next__ZEJH=(void *)((unsigned long)result__1EJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__X4FH)));
+        ((__POINTER *)next__ZEJH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__0EJH)[ 0]=next__ZEJH;
+      } else {
+        next__ZEJH=((__POINTER *)result__1EJH)[ 0];
+        if ((next__ZEJH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1EJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__X4FH <<  1)) <=  4096)) {
+            next__ZEJH=(void *)((unsigned long)result__1EJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__X4FH)));
+          } else {
+            next__ZEJH=new_lab__FTJ(new_size__X4FH);
+          };
+          ((__POINTER *)next__ZEJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__0EJH)[ 0]=next__ZEJH;
+        } else {
+          ((__POINTER *)result__1EJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZEJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__1EJH=next__ZEJH;
+        };
+      };
+      ((__POINTER *)result__1EJH)[ 0]=((__POINTER ) 3);
+      result__UDEH=(void *)((unsigned long)result__1EJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+    } else {
+      result__4EJH=first_free__NFVB;
+      while ((((void *)result__4EJH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__4EJH)->map_size_and_id__YTB &  4294967292LU) < new_size__WDEH))) {
+        result__4EJH=((__MEMORY *)result__4EJH)->map_next_free__ZTB;
+      };
+      if (((void *)result__4EJH == (void *)NULL)) {
+        result__4EJH=new_page__YC5();
+      };
+      to_busy__index__MWFC(result__4EJH,new_size__WDEH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__4EJH)) - (unsigned long)begin_memory__SXH)))) >>  26));
+      result__UDEH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__4EJH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    };
+    result__JILC=result__UDEH;
+    siz__X4HH=((__INTEGER )old_size__5HLC);
+    siz__X4HH=(__INTEGER)(siz__X4HH / ((__INTEGER )(sizeof(void *))));
+    na_src__Z4HH=((__POINTER *)p__1HLC);
+    na_dst__14HH=((__POINTER *)result__UDEH);
+    Self__24HH=(__INTEGER)(siz__X4HH -  1);
+    while ((Self__24HH >=  0)) {
+      na_dst__14HH[Self__24HH]=na_src__Z4HH[Self__24HH];
+      Self__24HH=(__INTEGER)(Self__24HH -  1);
+    };
+    __tmp__NJLC=(void *)((unsigned long)p__1HLC - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *)))));
+    a__VTH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    last__HTHD=((__POINTER *)((__POINTER )(&(table_size[((__UINTEGER_32)((__UINTEGER_32)((__UINTEGER_32)(old_size2__CILC + a__VTH) & (__UINTEGER_32)(~ a__VTH)) / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))))[ 0];
+    ((__POINTER *)__tmp__NJLC)[ 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__HTHD)[ 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__HTHD)[ 0]=__tmp__NJLC;
   } else {
-    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);
+    mem__IILC=((void *)(void *)((unsigned long)p__1HLC - (unsigned long)((__POINTER ) 8)));
+    __tmp__0JLC=(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)p__1HLC - (unsigned long)begin_memory__SXH)))) >>  26);
+    Self__IHED=((__MEMORY *)mem__IILC);
+    nxt__MHED=NULL;
+    result__NHED=NULL;
+    sz__RHED= 0;
+    old_size__OHED=(__UINTEGER_32)(Self__IHED->map_size_and_id__YTB &  4294967292LU);
+    if ((new_size__FILC > old_size__OHED)) {
+      if ((! ((__UINTEGER_32)(Self__IHED->map_size_and_id__YTB &  2) !=  0))) {
+        nxt__MHED=((void *)(void *)((unsigned long)(void *)((unsigned long)((__POINTER )Self__IHED) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )(__UINTEGER_32)(Self__IHED->map_size_and_id__YTB &  4294967292LU)))));
+        sz__RHED=(__UINTEGER_32)((__UINTEGER_32)(new_size__FILC - old_size__OHED) -  8);
+        if ((((__UINTEGER_32)(((__MEMORY *)nxt__MHED)->map_size_and_id__YTB &  1) ==  0) && ((__UINTEGER_32)(((__MEMORY *)nxt__MHED)->map_size_and_id__YTB &  4294967292LU) >= sz__RHED))) {
+          to_busy__index__MWFC(nxt__MHED,sz__RHED,__tmp__0JLC);
+          Self__IHED->map_size_and_id__YTB=(__UINTEGER_32)((__UINTEGER_32)(Self__IHED->map_size_and_id__YTB + (__UINTEGER_32)(((__MEMORY *)nxt__MHED)->map_size_and_id__YTB &  4294967294LU)) +  8);
+          if (((__UINTEGER_32)(Self__IHED->map_size_and_id__YTB &  2) !=  0)) {
+            last_block[(__tmp__0JLC)] = (Self__IHED);
+          } else {
+            nxt__MHED=((void *)(void *)((unsigned long)(void *)((unsigned long)((__POINTER )Self__IHED) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )(__UINTEGER_32)(Self__IHED->map_size_and_id__YTB &  4294967292LU)))));
+            ((__MEMORY *)nxt__MHED)->map_previous_linear__XTB=((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )Self__IHED) - (unsigned long)begin_memory__SXH))));
+          };
+          result__NHED=Self__IHED;
+        };
+      };
+      if (((void *)result__NHED == (void *)NULL)) {
+        result__BFJH=first_free__NFVB;
+        while ((((void *)result__BFJH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__BFJH)->map_size_and_id__YTB &  4294967292LU) < new_size__FILC))) {
+          result__BFJH=((__MEMORY *)result__BFJH)->map_next_free__ZTB;
+        };
+        if (((void *)result__BFJH == (void *)NULL)) {
+          result__BFJH=new_page__YC5();
+        };
+        to_busy__index__MWFC(result__BFJH,new_size__FILC,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__BFJH)) - (unsigned long)begin_memory__SXH)))) >>  26));
+        result__NHED=result__BFJH;
+        src__YEED=(void *)((unsigned long)((__POINTER )Self__IHED) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+        dst__ZEED=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__BFJH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+        siz__3EED=((__INTEGER )old_size__OHED);
+        siz__3EED=(__INTEGER)(siz__3EED / ((__INTEGER )(sizeof(void *))));
+        na_src__1EED=((__POINTER *)src__YEED);
+        na_dst__2EED=((__POINTER *)dst__ZEED);
+        Self__0QHD=(__INTEGER)(siz__3EED -  1);
+        while ((Self__0QHD >=  0)) {
+          na_dst__2EED[Self__0QHD]=na_src__1EED[Self__0QHD];
+          Self__0QHD=(__INTEGER)(Self__0QHD -  1);
+        };
+        prev__QEND=Self__IHED->map_previous_linear__XTB;
+        next__PEND=((void *)(void *)((unsigned long)(void *)((unsigned long)((__POINTER )Self__IHED) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )(__UINTEGER_32)(Self__IHED->map_size_and_id__YTB &  4294967292LU)))));
+        new_free__OEND=((void *)(void *)((unsigned long)begin_memory__SXH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )prev__QEND))));
+        new_size__TEND=(__UINTEGER_32)(Self__IHED->map_size_and_id__YTB &  4294967294LU);
+        if (((prev__QEND ==  4294967295LU) || ((__UINTEGER_32)(((__MEMORY *)new_free__OEND)->map_size_and_id__YTB &  1) !=  0))) {
+          new_free__OEND=Self__IHED;
+          Self__IHED->map_next_free__ZTB=first_free__NFVB;
+          Self__IHED->map_previous_free__0TB=NULL;
+          if (((void *)first_free__NFVB != (void *)NULL)) {
+            ((__MEMORY *)first_free__NFVB)->map_previous_free__0TB=Self__IHED;
+          };
+          first_free__NFVB=Self__IHED;
+        } else {
+          new_size__TEND=(__UINTEGER_32)((__UINTEGER_32)(new_size__TEND + ((__MEMORY *)new_free__OEND)->map_size_and_id__YTB) +  8);
+        };
+        if (((! ((__UINTEGER_32)(Self__IHED->map_size_and_id__YTB &  2) !=  0)) && ((__UINTEGER_32)(((__MEMORY *)next__PEND)->map_size_and_id__YTB &  1) ==  0))) {
+          new_size__TEND=(__UINTEGER_32)((__UINTEGER_32)(new_size__TEND + ((__MEMORY *)next__PEND)->map_size_and_id__YTB) +  8);
+          prev__L5FH=((__MEMORY *)next__PEND)->map_previous_free__0TB;
+          next__M5FH=((__MEMORY *)next__PEND)->map_next_free__ZTB;
+          if (((void *)prev__L5FH == (void *)NULL)) {
+            first_free__NFVB=next__M5FH;
+          } else {
+            ((__MEMORY *)prev__L5FH)->map_next_free__ZTB=next__M5FH;
+          };
+          if (((void *)next__M5FH != (void *)NULL)) {
+            ((__MEMORY *)next__M5FH)->map_previous_free__0TB=prev__L5FH;
+          };
+        };
+        ((__MEMORY *)new_free__OEND)->map_size_and_id__YTB=new_size__TEND;
+        if (((__UINTEGER_32)(((__MEMORY *)new_free__OEND)->map_size_and_id__YTB &  2) !=  0)) {
+          last_block[(__tmp__0JLC)] = (new_free__OEND);
+        } else {
+          next__PEND=((void *)(void *)((unsigned long)(void *)((unsigned long)((__POINTER )Self__IHED) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )(__UINTEGER_32)(Self__IHED->map_size_and_id__YTB &  4294967292LU)))));
+          ((__MEMORY *)next__PEND)->map_previous_linear__XTB=((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )new_free__OEND) - (unsigned long)begin_memory__SXH))));
+        };
+      };
+    } else {
+      result__NHED=Self__IHED;
+    };
+    result__JILC=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__NHED)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+  };
+  return(result__JILC);
 }
 
-static void** create__35QB(__INTEGER nb_elements__55QB)
+static void** create__JDRB(__INTEGER nb_elements__LDRB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__AEEH,a__FEEH,new_size__BEEH,new_size2__CEEH,a__KAGH;
+  __UINTEGER_32 new_size__LAGH;
+  __POINTER result__5DEH,ptr_table__FFJH,next__EFJH,result__GFJH;
+  void *result__JFJH;
+  __INTEGER Self__MCNC;
+  void **Result__RAUB;
+  sz__AEEH=((__UINTEGER_32 )(__INTEGER)(nb_elements__LDRB * ((__INTEGER )(sizeof(void *)))));
+  result__5DEH=((__POINTER )(NULL));
+  a__FEEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__BEEH=(__UINTEGER_32)((__UINTEGER_32)(sz__AEEH + a__FEEH) & (__UINTEGER_32)(~ a__FEEH));
+  new_size2__CEEH=(__UINTEGER_32)(new_size__BEEH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__CEEH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__KAGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__LAGH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__CEEH + a__KAGH) & (__UINTEGER_32)(~ a__KAGH));
+    ptr_table__FFJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__LAGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__EFJH=((__POINTER )(NULL));
+    result__GFJH=((__POINTER *)ptr_table__FFJH)[ 0];
+    if ((result__GFJH == (void *)NULL)) {
+      result__GFJH=new_lab__FTJ(new_size__LAGH);
+      next__EFJH=(void *)((unsigned long)result__GFJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LAGH)));
+      ((__POINTER *)next__EFJH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__FFJH)[ 0]=next__EFJH;
+    } else {
+      next__EFJH=((__POINTER *)result__GFJH)[ 0];
+      if ((next__EFJH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GFJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__LAGH <<  1)) <=  4096)) {
+          next__EFJH=(void *)((unsigned long)result__GFJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LAGH)));
+        } else {
+          next__EFJH=new_lab__FTJ(new_size__LAGH);
+        };
+        ((__POINTER *)next__EFJH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__FFJH)[ 0]=next__EFJH;
+      } else {
+        ((__POINTER *)result__GFJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EFJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__GFJH=next__EFJH;
+      };
+    };
+    ((__POINTER *)result__GFJH)[ 0]=((__POINTER ) 3);
+    result__5DEH=(void *)((unsigned long)result__GFJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__JFJH=first_free__NFVB;
+    while ((((void *)result__JFJH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__JFJH)->map_size_and_id__YTB &  4294967292LU) < new_size__BEEH))) {
+      result__JFJH=((__MEMORY *)result__JFJH)->map_next_free__ZTB;
     };
-    if (((void *)result__K3IH == (void *)NULL)) {
-      result__K3IH=new_page__K34();
+    if (((void *)result__JFJH == (void *)NULL)) {
+      result__JFJH=new_page__YC5();
     };
-    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)));
+    to_busy__index__MWFC(result__JFJH,new_size__BEEH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__JFJH)) - (unsigned long)begin_memory__SXH)))) >>  26));
+    result__5DEH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__JFJH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__RAUB=((void **)result__5DEH);
+  Self__MCNC=(__INTEGER)(nb_elements__LDRB -  1);
+  while ((Self__MCNC >=  0)) {
+    Result__RAUB[Self__MCNC]=NULL;
+    Self__MCNC=(__INTEGER)(Self__MCNC -  1);
   };
-  return(Result__F3TB);
+  return(Result__RAUB);
 }
 
-static void* fast_reference_at__2YT(__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *Self__3YT,void *k__4YT)
+static void* fast_reference_at__F4T(__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *Self__G4T,void *k__H4T)
 // ({HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  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);
+  void *result__S4T;
+  __STRING_CONSTANT *Self__J5HH;
+  __INTEGER result__I5HH,__tmp__K5HH,Self__L5HH;
+  void *node__R4T;
+  result__S4T=NULL;
+  Self__J5HH=((__STRING_CONSTANT *)k__H4T);
+  result__I5HH= 0;
+  __tmp__K5HH=Self__J5HH->count__DD;
+  Self__L5HH= 1;
+  while ((Self__L5HH <= __tmp__K5HH)) {
+    result__I5HH=(__INTEGER)((__INTEGER)( 5 * result__I5HH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__J5HH->storage__FRO)[(__INTEGER)(Self__L5HH -  1)])));
+    Self__L5HH=(__INTEGER)(Self__L5HH +  1);
+  };
+  if ((result__I5HH <  0)) {
+    result__I5HH=(__INTEGER)(~ result__I5HH);
+  };
+  node__R4T=((void **)Self__G4T->buckets__Z4T)[(__INTEGER)(result__I5HH % Self__G4T->capacity__U4T)];
+  while ((! (((void *)node__R4T == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node__R4T)->key__F5T == (void *)k__H4T)))) {
+    node__R4T=((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node__R4T)->next__Q5T;
+  };
+  if (((void *)node__R4T != (void *)NULL)) {
+    result__S4T=((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node__R4T)->item__Y5T;
+  };
+  return(result__S4T);
 }
 
-static void** create__TIHE(__INTEGER nb_elements__VIHE)
+static void** create__BMHE(__INTEGER nb_elements__DMHE)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__IEEH,a__NEEH,new_size__JEEH,new_size2__KEEH,a__LBGH;
+  __UINTEGER_32 new_size__MBGH;
+  __POINTER result__HEEH,ptr_table__NFJH,next__MFJH,result__OFJH;
+  void *result__RFJH;
+  __INTEGER Self__HUYE;
+  void **Result__03ME;
+  sz__IEEH=((__UINTEGER_32 )(__INTEGER)(nb_elements__DMHE * ((__INTEGER )(sizeof(void *)))));
+  result__HEEH=((__POINTER )(NULL));
+  a__NEEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__JEEH=(__UINTEGER_32)((__UINTEGER_32)(sz__IEEH + a__NEEH) & (__UINTEGER_32)(~ a__NEEH));
+  new_size2__KEEH=(__UINTEGER_32)(new_size__JEEH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__KEEH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__LBGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__MBGH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__KEEH + a__LBGH) & (__UINTEGER_32)(~ a__LBGH));
+    ptr_table__NFJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__MBGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__MFJH=((__POINTER )(NULL));
+    result__OFJH=((__POINTER *)ptr_table__NFJH)[ 0];
+    if ((result__OFJH == (void *)NULL)) {
+      result__OFJH=new_lab__FTJ(new_size__MBGH);
+      next__MFJH=(void *)((unsigned long)result__OFJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MBGH)));
+      ((__POINTER *)next__MFJH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__NFJH)[ 0]=next__MFJH;
+    } else {
+      next__MFJH=((__POINTER *)result__OFJH)[ 0];
+      if ((next__MFJH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__OFJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__MBGH <<  1)) <=  4096)) {
+          next__MFJH=(void *)((unsigned long)result__OFJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MBGH)));
+        } else {
+          next__MFJH=new_lab__FTJ(new_size__MBGH);
+        };
+        ((__POINTER *)next__MFJH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__NFJH)[ 0]=next__MFJH;
+      } else {
+        ((__POINTER *)result__OFJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MFJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__OFJH=next__MFJH;
+      };
+    };
+    ((__POINTER *)result__OFJH)[ 0]=((__POINTER ) 3);
+    result__HEEH=(void *)((unsigned long)result__OFJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__RFJH=first_free__NFVB;
+    while ((((void *)result__RFJH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__RFJH)->map_size_and_id__YTB &  4294967292LU) < new_size__JEEH))) {
+      result__RFJH=((__MEMORY *)result__RFJH)->map_next_free__ZTB;
     };
-    if (((void *)result__S3IH == (void *)NULL)) {
-      result__S3IH=new_page__K34();
+    if (((void *)result__RFJH == (void *)NULL)) {
+      result__RFJH=new_page__YC5();
     };
-    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)));
+    to_busy__index__MWFC(result__RFJH,new_size__JEEH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__RFJH)) - (unsigned long)begin_memory__SXH)))) >>  26));
+    result__HEEH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__RFJH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__03ME=((void **)result__HEEH);
+  Self__HUYE=(__INTEGER)(nb_elements__DMHE -  1);
+  while ((Self__HUYE >=  0)) {
+    Result__03ME[Self__HUYE]=NULL;
+    Self__HUYE=(__INTEGER)(Self__HUYE -  1);
   };
-  return(Result__SZME);
+  return(Result__03ME);
 }
 
-static __BOOLEAN has__XMW(__HASHED_SEToABSTRACT_STRINGo *Self__YMW,void *e__ZMW)
+static __BOOLEAN has__DQW(__HASHED_SEToABSTRACT_STRINGo *Self__EQW,void *e__FQW)
 // ({HASHED_SEToABSTRACT_STRINGo},{STRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __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));
+  __INTEGER result__N5HH,__tmp__P5HH,Self__Q5HH;
+  void *node__OQW;
+  result__N5HH= 0;
+  __tmp__P5HH=((__STRING_CONSTANT *)e__FQW)->count__DD;
+  Self__Q5HH= 1;
+  while ((Self__Q5HH <= __tmp__P5HH)) {
+    result__N5HH=(__INTEGER)((__INTEGER)( 5 * result__N5HH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)e__FQW)->storage__FRO)[(__INTEGER)(Self__Q5HH -  1)])));
+    Self__Q5HH=(__INTEGER)(Self__Q5HH +  1);
+  };
+  if ((result__N5HH <  0)) {
+    result__N5HH=(__INTEGER)(~ result__N5HH);
+  };
+  node__OQW=((void **)Self__EQW->buckets__OZR)[(__INTEGER)(result__N5HH % Self__EQW->capacity__JZR)];
+  while ((! (((void *)node__OQW == (void *)NULL) || __infix_equal_equal__GAEB(((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__OQW)->item__0ZR,e__FQW)))) {
+    node__OQW=((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__OQW)->next__G0R;
+  };
+  return(((void *)node__OQW != (void *)NULL));
 }
 
-static void increase_capacity__2ONB(__HASHED_SEToABSTRACT_STRINGo *Self__3ONB)
+static void increase_capacity__ISNB(__HASHED_SEToABSTRACT_STRINGo *Self__JSNB)
 // ({HASHED_SEToABSTRACT_STRINGo}) VoidNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER idx__LSNB,new_capacity__MSNB,i__KSNB,result__S5HH;
+  __INTEGER __tmp__U5HH,Self__V5HH;
+  __STRING_CONSTANT *Self__T5HH;
+  void *node1__OSNB,*node2__PSNB;
+  void **old_buckets__NSNB;
+  idx__LSNB= 0;
+  node1__OSNB=NULL;
+  node2__PSNB=NULL;
+  new_capacity__MSNB=prime_number_ceiling__541((__INTEGER)(Self__JSNB->capacity__JZR +  1));
+  old_buckets__NSNB=Self__JSNB->buckets__OZR;
+  Self__JSNB->buckets__OZR=create__JK2(new_capacity__MSNB);
+  i__KSNB=(__INTEGER)(Self__JSNB->capacity__JZR -  1);
+  Self__JSNB->capacity__JZR=new_capacity__MSNB;
+  while ((i__KSNB >=  0)) {
+    node1__OSNB=((void **)old_buckets__NSNB)[i__KSNB];
+    while (((void *)node1__OSNB != (void *)NULL)) {
+      node2__PSNB=((__HASHED_SET_NODEoABSTRACT_STRINGo *)node1__OSNB)->next__G0R;
+      Self__T5HH=((__STRING_CONSTANT *)((__HASHED_SET_NODEoABSTRACT_STRINGo *)node1__OSNB)->item__0ZR);
+      result__S5HH= 0;
+      __tmp__U5HH=Self__T5HH->count__DD;
+      Self__V5HH= 1;
+      while ((Self__V5HH <= __tmp__U5HH)) {
+        result__S5HH=(__INTEGER)((__INTEGER)( 5 * result__S5HH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__T5HH->storage__FRO)[(__INTEGER)(Self__V5HH -  1)])));
+        Self__V5HH=(__INTEGER)(Self__V5HH +  1);
+      };
+      if ((result__S5HH <  0)) {
+        result__S5HH=(__INTEGER)(~ result__S5HH);
+      };
+      idx__LSNB=(__INTEGER)(result__S5HH % Self__JSNB->capacity__JZR);
+      ((__HASHED_SET_NODEoABSTRACT_STRINGo *)node1__OSNB)->next__G0R=((void **)Self__JSNB->buckets__OZR)[idx__LSNB];
+      ((void **)Self__JSNB->buckets__OZR)[idx__LSNB]=node1__OSNB;
+      node1__OSNB=node2__PSNB;
+    };
+    i__KSNB=(__INTEGER)(i__KSNB -  1);
   };
 }
 
-static void put_string__5FF(void *s__BGF)
+static void put_string__DJF(void *s__FJF)
 // ({STRING_CONSTANTxSTRING}) VoidNo recursive, No inlinable.
 {
-  __INTEGER __tmp__SGF,Self__W5F,limit_up__X5F;
-  __CHARACTER __tmp__ZGF;
-  if (((struct ___OBJ *)s__BGF)->__id==__STRING_CONSTANT__) {
+  __INTEGER __tmp__WJF,Self__0CG,limit_up__1CG;
+  __CHARACTER __tmp__3JF;
+  if (((struct ___OBJ *)s__FJF)->__id==__STRING_CONSTANT__) {
   };
-  if (((struct ___OBJ *)s__BGF)->__id==__STRING_CONSTANT__) {
-    __tmp__SGF=((__STRING_CONSTANT *)s__BGF)->count__DD;
+  if (((struct ___OBJ *)s__FJF)->__id==__STRING_CONSTANT__) {
+    __tmp__WJF=((__STRING_CONSTANT *)s__FJF)->count__DD;
   } else {
-    __tmp__SGF=((__STRING *)s__BGF)->count__EGC;
+    __tmp__WJF=((__STRING *)s__FJF)->count__EGC;
   };
-  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)];
+  Self__0CG= 1;
+  limit_up__1CG=__tmp__WJF;
+  while ((Self__0CG <= limit_up__1CG)) {
+    if (((struct ___OBJ *)s__FJF)->__id==__STRING_CONSTANT__) {
+      __tmp__3JF=((__CHARACTER *)((__STRING_CONSTANT *)s__FJF)->storage__FRO)[(__INTEGER)(Self__0CG -  1)];
     } else {
-      __tmp__ZGF=((__CHARACTER *)((__STRING *)s__BGF)->storage__F5R)[(__INTEGER)(Self__W5F -  1)];
+      __tmp__3JF=((__CHARACTER *)((__STRING *)s__FJF)->storage__RCS)[(__INTEGER)(Self__0CG -  1)];
     };
-    fputc((int)(__tmp__ZGF),stdout);
-    Self__W5F=(__INTEGER)(Self__W5F +  1);
+    fputc((int)(__tmp__3JF),stdout);
+    Self__0CG=(__INTEGER)(Self__0CG +  1);
   };
 }
 
-static __BOOLEAN fast_has__K3X(__HASHED_SEToABSTRACT_STRINGo *Self__L3X,void *e__M3X)
+static __BOOLEAN fast_has__WAY(__HASHED_SEToABSTRACT_STRINGo *Self__XAY,void *e__YAY)
 // ({HASHED_SEToABSTRACT_STRINGo},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __STRING_CONSTANT *Self__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));
+  __STRING_CONSTANT *Self__Y5HH;
+  __INTEGER result__X5HH,__tmp__Z5HH,Self__05HH;
+  void *node__BBY;
+  Self__Y5HH=((__STRING_CONSTANT *)e__YAY);
+  result__X5HH= 0;
+  __tmp__Z5HH=Self__Y5HH->count__DD;
+  Self__05HH= 1;
+  while ((Self__05HH <= __tmp__Z5HH)) {
+    result__X5HH=(__INTEGER)((__INTEGER)( 5 * result__X5HH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__Y5HH->storage__FRO)[(__INTEGER)(Self__05HH -  1)])));
+    Self__05HH=(__INTEGER)(Self__05HH +  1);
+  };
+  if ((result__X5HH <  0)) {
+    result__X5HH=(__INTEGER)(~ result__X5HH);
+  };
+  node__BBY=((void **)Self__XAY->buckets__OZR)[(__INTEGER)(result__X5HH % Self__XAY->capacity__JZR)];
+  while ((! (((void *)node__BBY == (void *)NULL) || ((void *)((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__BBY)->item__0ZR == (void *)e__YAY)))) {
+    node__BBY=((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__BBY)->next__G0R;
+  };
+  return(((void *)node__BBY != (void *)NULL));
 }
 
-static void* physical_get_entry__QAF(void *new_path__SAF)
+static void* physical_get_entry__UDF(void *new_path__WDF)
 // ({NULLxSTRING}) With resultNo recursive, No inlinable.
 {
-  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';
+  void *result__ZDF;
+  __STRING *Self__BCGH;
+  __FILE_UNIX *result__UFJH;
+  __POINTER ptr__VFJH,ptr_table__3FJH,next__2FJH,result__4FJH;
+  __POINTER ptr_table__CGJH,next__BGJH,result__DGJH,ptr__HGJH;
+  __POINTER ptr_table__PGJH,next__OGJH,result__QGJH,ptr_table__UGJH;
+  __POINTER next__TGJH,result__VGJH;
+  __INTEGER typ_id__WFJH,typ_id__IGJH;
+  __UINTEGER_32 sz__XFJH,a__YFJH,new_size__ZFJH,t__0FJH,a__1FJH;
+  __UINTEGER_32 new_size__FGJH,lab_type__EGJH,sz__JGJH,a__KGJH;
+  __UINTEGER_32 new_size__LGJH,t__MGJH,a__NGJH,new_size__XGJH;
+  __UINTEGER_32 lab_type__WGJH;
+  __DIRECTORY_UNIX *result__GGJH;
+  void *__tmp__SEF;
+  __CHARACTER *pe__YDF;
+  result__ZDF=NULL;
+  Self__BCGH=((__STRING *)new_path__WDF);
+  if ((Self__BCGH->capacity__ICS > Self__BCGH->count__EGC)) {
+    ((__CHARACTER *)Self__BCGH->storage__RCS)[Self__BCGH->count__EGC]='\0';
   } else {
-    add_last__3IT(Self__G1FH,'\0');
-    Self__G1FH->count__EGC=(__INTEGER)(Self__G1FH->count__EGC -  1);
+    add_last__GOT(Self__BCGH,'\0');
+    Self__BCGH->count__EGC=(__INTEGER)(Self__BCGH->count__EGC -  1);
   };
-  pe__UAF=Self__G1FH->storage__F5R;
+  pe__YDF=Self__BCGH->storage__RCS;
   { struct stat t;
-  if ((((__INTEGER )(stat((pe__UAF),&t))) ==  0)) {
+  if ((((__INTEGER )(stat((pe__YDF),&t))) ==  0)) {
     if ((((__INTEGER )(S_ISDIR(t.st_mode))) ==  0)) {
-      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)));
+      result__UFJH=NULL;
+      ptr__VFJH=((__POINTER )(NULL));
+      typ_id__WFJH= 0;
+      sz__XFJH=((__UINTEGER_32 )sizeof(__FILE_UNIX));
+      if ((sz__XFJH ==  0)) {
+        result__UFJH=FILE_UNIX__;
+      } else {
+        typ_id__WFJH=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__XFJH);
+        if ((typ_id__WFJH == (__INTEGER)(-  1))) {
+          a__YFJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__ZFJH=(__UINTEGER_32)((__UINTEGER_32)(sz__XFJH + a__YFJH) & (__UINTEGER_32)(~ a__YFJH));
+          ptr_table__3FJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ZFJH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__2FJH=((__POINTER )(NULL));
+          result__4FJH=((__POINTER *)ptr_table__3FJH)[ 0];
+          if ((result__4FJH == (void *)NULL)) {
+            result__4FJH=new_lab__FTJ(new_size__ZFJH);
+            next__2FJH=(void *)((unsigned long)result__4FJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZFJH)));
+            ((__POINTER *)next__2FJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__3FJH)[ 0]=next__2FJH;
+          } else {
+            next__2FJH=((__POINTER *)result__4FJH)[ 0];
+            if ((next__2FJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4FJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__ZFJH <<  1)) <=  4096)) {
+                next__2FJH=(void *)((unsigned long)result__4FJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZFJH)));
               } else {
-                next__33IH=new_lab__ZPJ(new_size__03IH);
+                next__2FJH=new_lab__FTJ(new_size__ZFJH);
               };
-              ((__POINTER *)next__33IH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__43IH)[ 0]=next__33IH;
+              ((__POINTER *)next__2FJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__3FJH)[ 0]=next__2FJH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__4FJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2FJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__4FJH=next__2FJH;
+            };
+          };
+          ptr__VFJH=result__4FJH;
+        } else {
+          t__0FJH=((__UINTEGER_32 )typ_id__WFJH);
+          a__1FJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__FGJH=(__UINTEGER_32)((__UINTEGER_32)(sz__XFJH + a__1FJH) & (__UINTEGER_32)(~ a__1FJH));
+          ptr_table__CGJH=((__POINTER )(&(table_type[(t__0FJH)])));
+          lab_type__EGJH=(__UINTEGER_32)(t__0FJH |  1);
+          next__BGJH=((__POINTER )(NULL));
+          result__DGJH=((__POINTER *)ptr_table__CGJH)[ 0];
+          if ((result__DGJH == (void *)NULL)) {
+            result__DGJH=new_lab__FTJ(lab_type__EGJH);
+            next__BGJH=(void *)((unsigned long)result__DGJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FGJH)));
+            ((__POINTER *)next__BGJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__CGJH)[ 0]=next__BGJH;
+          } else {
+            next__BGJH=((__POINTER *)result__DGJH)[ 0];
+            if ((next__BGJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DGJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__FGJH <<  1)) <=  4096)) {
+                next__BGJH=(void *)((unsigned long)result__DGJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FGJH)));
               } else {
-                next__C4IH=new_lab__ZPJ(lab_type__F4IH);
+                next__BGJH=new_lab__FTJ(lab_type__EGJH);
               };
-              ((__POINTER *)next__C4IH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__D4IH)[ 0]=next__C4IH;
+              ((__POINTER *)next__BGJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__CGJH)[ 0]=next__BGJH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__DGJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BGJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__DGJH=next__BGJH;
+            };
+          };
+          ptr__VFJH=result__DGJH;
+        };
+        result__UFJH=((__FILE_UNIX *)ptr__VFJH);
+        *(result__UFJH) = *(FILE_UNIX__);
+      };
+      result__ZDF=result__UFJH;
+    } else {
+      result__GGJH=NULL;
+      ptr__HGJH=((__POINTER )(NULL));
+      typ_id__IGJH= 0;
+      sz__JGJH=((__UINTEGER_32 )sizeof(__DIRECTORY_UNIX));
+      if ((sz__JGJH ==  0)) {
+        result__GGJH=DIRECTORY_UNIX__;
+      } else {
+        typ_id__IGJH=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__JGJH);
+        if ((typ_id__IGJH == (__INTEGER)(-  1))) {
+          a__KGJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__LGJH=(__UINTEGER_32)((__UINTEGER_32)(sz__JGJH + a__KGJH) & (__UINTEGER_32)(~ a__KGJH));
+          ptr_table__PGJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__LGJH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__OGJH=((__POINTER )(NULL));
+          result__QGJH=((__POINTER *)ptr_table__PGJH)[ 0];
+          if ((result__QGJH == (void *)NULL)) {
+            result__QGJH=new_lab__FTJ(new_size__LGJH);
+            next__OGJH=(void *)((unsigned long)result__QGJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LGJH)));
+            ((__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__SXH)))) &  4095) + (__UINTEGER_32)(new_size__LGJH <<  1)) <=  4096)) {
+                next__OGJH=(void *)((unsigned long)result__QGJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LGJH)));
               } else {
-                next__P4IH=new_lab__ZPJ(new_size__M4IH);
+                next__OGJH=new_lab__FTJ(new_size__LGJH);
               };
-              ((__POINTER *)next__P4IH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__Q4IH)[ 0]=next__P4IH;
+              ((__POINTER *)next__OGJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__PGJH)[ 0]=next__OGJH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__QGJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OGJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__QGJH=next__OGJH;
+            };
+          };
+          ptr__HGJH=result__QGJH;
+        } else {
+          t__MGJH=((__UINTEGER_32 )typ_id__IGJH);
+          a__NGJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__XGJH=(__UINTEGER_32)((__UINTEGER_32)(sz__JGJH + a__NGJH) & (__UINTEGER_32)(~ a__NGJH));
+          ptr_table__UGJH=((__POINTER )(&(table_type[(t__MGJH)])));
+          lab_type__WGJH=(__UINTEGER_32)(t__MGJH |  1);
+          next__TGJH=((__POINTER )(NULL));
+          result__VGJH=((__POINTER *)ptr_table__UGJH)[ 0];
+          if ((result__VGJH == (void *)NULL)) {
+            result__VGJH=new_lab__FTJ(lab_type__WGJH);
+            next__TGJH=(void *)((unsigned long)result__VGJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XGJH)));
+            ((__POINTER *)next__TGJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__UGJH)[ 0]=next__TGJH;
+          } else {
+            next__TGJH=((__POINTER *)result__VGJH)[ 0];
+            if ((next__TGJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__VGJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__XGJH <<  1)) <=  4096)) {
+                next__TGJH=(void *)((unsigned long)result__VGJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XGJH)));
               } else {
-                next__U4IH=new_lab__ZPJ(lab_type__X4IH);
+                next__TGJH=new_lab__FTJ(lab_type__WGJH);
               };
-              ((__POINTER *)next__U4IH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__V4IH)[ 0]=next__U4IH;
+              ((__POINTER *)next__TGJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__UGJH)[ 0]=next__TGJH;
             } else {
-              ((__POINTER *)result__W4IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__U4IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__W4IH=next__U4IH;
+              ((__POINTER *)result__VGJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TGJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__VGJH=next__TGJH;
             };
           };
-          ptr__I4IH=result__W4IH;
+          ptr__HGJH=result__VGJH;
         };
-        result__H4IH=((__DIRECTORY_UNIX *)ptr__I4IH);
-        *(result__H4IH) = *(DIRECTORY_UNIX__);
+        result__GGJH=((__DIRECTORY_UNIX *)ptr__HGJH);
+        *(result__GGJH) = *(DIRECTORY_UNIX__);
       };
-      result__VAF=result__H4IH;
+      result__ZDF=result__GGJH;
     };
-    if (((struct ___OBJ *)result__VAF)->__id==__DIRECTORY_UNIX__) {
-      set_path__SKT(result__VAF,new_path__SAF);
+    if (((struct ___OBJ *)result__ZDF)->__id==__DIRECTORY_UNIX__) {
+      set_path__1PT(result__ZDF,new_path__WDF);
     } else {
-      set_path__NLT(result__VAF,new_path__SAF);
+      set_path__WQT(result__ZDF,new_path__WDF);
     };
-    if (((struct ___OBJ *)result__VAF)->__id==__DIRECTORY_UNIX__) {
-      __tmp__OBF=((__DIRECTORY_UNIX *)result__VAF)->parent_entry_unix__GFD.parent_entry__FFD.path__BD;
+    if (((struct ___OBJ *)result__ZDF)->__id==__DIRECTORY_UNIX__) {
+      __tmp__SEF=((__DIRECTORY_UNIX *)result__ZDF)->parent_entry_unix__GGD.parent_entry__FGD.path__BD;
     } else {
-      __tmp__OBF=((__FILE_UNIX *)result__VAF)->parent_entry_unix__DBF.parent_entry__FFD.path__BD;
+      __tmp__SEF=((__FILE_UNIX *)result__ZDF)->parent_entry_unix__HEF.parent_entry__FGD.path__BD;
     };
-    put__to__VXS(alias__RFD,result__VAF,__tmp__OBF);
+    put__to__B1S(alias__RGD,result__ZDF,__tmp__SEF);
   };
   };
-  return(result__VAF);
+  return(result__ZDF);
 }
 
-static void put__to__VXS(__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *Self__WXS,void *v__XXS,void *k__YXS)
+static void put__to__B1S(__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *Self__C1S,void *v__D1S,void *k__E1S)
 // ({HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo},{NULLxDIRECTORY_UNIXxFILE_UNIX},{NULLxSTRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __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)));
+  __STRING_CONSTANT *Self__35HH,*Self__CAIH;
+  __INTEGER result__25HH,__tmp__45HH,Self__55HH,idx__M1S,idx__QOOB;
+  __INTEGER new_capacity__ROOB,i__SOOB,result__BAIH,__tmp__DAIH;
+  __INTEGER Self__EAIH,typ_id__AROB;
+  __POINTER ptr__1QOB,ptr_table__ZGJH,next__YGJH,result__0GJH;
+  __POINTER ptr_table__4GJH,next__3GJH,result__5GJH;
+  __UINTEGER_32 sz__3QOB,a__VCGH,new_size__WCGH,t__0CGH,a__ZCGH;
+  __UINTEGER_32 new_size__BHJH,lab_type__AHJH;
+  void *node__O1S,*node1__UOOB,*node2__VOOB,*__tmp__D3S;
+  void **old_buckets__TOOB;
+  __HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *result__0QOB;
+  __HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *Self__50DC;
+  Self__35HH=((__STRING_CONSTANT *)k__E1S);
+  result__25HH= 0;
+  __tmp__45HH=Self__35HH->count__DD;
+  Self__55HH= 1;
+  while ((Self__55HH <= __tmp__45HH)) {
+    result__25HH=(__INTEGER)((__INTEGER)( 5 * result__25HH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__35HH->storage__FRO)[(__INTEGER)(Self__55HH -  1)])));
+    Self__55HH=(__INTEGER)(Self__55HH +  1);
+  };
+  if ((result__25HH <  0)) {
+    result__25HH=(__INTEGER)(~ result__25HH);
+  };
+  idx__M1S=(__INTEGER)(result__25HH % Self__C1S->capacity__Q1S);
+  node__O1S=((void **)Self__C1S->buckets__V1S)[idx__M1S];
+  while ((! (((void *)node__O1S == (void *)NULL) || __infix_equal_equal__GAEB(((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node__O1S)->key__B2S,k__E1S)))) {
+    node__O1S=((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node__O1S)->next__N2S;
+  };
+  if (((void *)node__O1S == (void *)NULL)) {
+    if ((Self__C1S->capacity__Q1S == Self__C1S->count__W2S)) {
+      idx__QOOB= 0;
+      node1__UOOB=NULL;
+      node2__VOOB=NULL;
+      old_buckets__TOOB=Self__C1S->buckets__V1S;
+      new_capacity__ROOB=prime_number_ceiling__541((__INTEGER)(Self__C1S->capacity__Q1S +  1));
+      Self__C1S->buckets__V1S=create__BE4(new_capacity__ROOB);
+      i__SOOB=(__INTEGER)(Self__C1S->capacity__Q1S -  1);
+      Self__C1S->capacity__Q1S=new_capacity__ROOB;
+      while ((i__SOOB >=  0)) {
+        node1__UOOB=((void **)old_buckets__TOOB)[i__SOOB];
+        while (((void *)node1__UOOB != (void *)NULL)) {
+          node2__VOOB=((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node1__UOOB)->next__N2S;
+          Self__CAIH=((__STRING_CONSTANT *)((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node1__UOOB)->key__B2S);
+          result__BAIH= 0;
+          __tmp__DAIH=Self__CAIH->count__DD;
+          Self__EAIH= 1;
+          while ((Self__EAIH <= __tmp__DAIH)) {
+            result__BAIH=(__INTEGER)((__INTEGER)( 5 * result__BAIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__CAIH->storage__FRO)[(__INTEGER)(Self__EAIH -  1)])));
+            Self__EAIH=(__INTEGER)(Self__EAIH +  1);
+          };
+          if ((result__BAIH <  0)) {
+            result__BAIH=(__INTEGER)(~ result__BAIH);
+          };
+          idx__QOOB=(__INTEGER)(result__BAIH % Self__C1S->capacity__Q1S);
+          ((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node1__UOOB)->next__N2S=((void **)Self__C1S->buckets__V1S)[idx__QOOB];
+          ((void **)Self__C1S->buckets__V1S)[idx__QOOB]=node1__UOOB;
+          node1__UOOB=node2__VOOB;
+        };
+        i__SOOB=(__INTEGER)(i__SOOB -  1);
+      };
+      idx__M1S=(__INTEGER)(result__25HH % new_capacity__ROOB);
+    };
+    __tmp__D3S=((void **)Self__C1S->buckets__V1S)[idx__M1S];
+    result__0QOB=NULL;
+    ptr__1QOB=((__POINTER )(NULL));
+    typ_id__AROB= 0;
+    sz__3QOB=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo));
+    if ((sz__3QOB ==  0)) {
+      result__0QOB=HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo__;
+    } else {
+      typ_id__AROB=__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo__;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__3QOB);
+      if ((typ_id__AROB == (__INTEGER)(-  1))) {
+        a__VCGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__WCGH=(__UINTEGER_32)((__UINTEGER_32)(sz__3QOB + a__VCGH) & (__UINTEGER_32)(~ a__VCGH));
+        ptr_table__ZGJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__WCGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__YGJH=((__POINTER )(NULL));
+        result__0GJH=((__POINTER *)ptr_table__ZGJH)[ 0];
+        if ((result__0GJH == (void *)NULL)) {
+          result__0GJH=new_lab__FTJ(new_size__WCGH);
+          next__YGJH=(void *)((unsigned long)result__0GJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WCGH)));
+          ((__POINTER *)next__YGJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__ZGJH)[ 0]=next__YGJH;
+        } else {
+          next__YGJH=((__POINTER *)result__0GJH)[ 0];
+          if ((next__YGJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__0GJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__WCGH <<  1)) <=  4096)) {
+              next__YGJH=(void *)((unsigned long)result__0GJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WCGH)));
             } else {
-              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)));
+              next__YGJH=new_lab__FTJ(new_size__WCGH);
+            };
+            ((__POINTER *)next__YGJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__ZGJH)[ 0]=next__YGJH;
+          } else {
+            ((__POINTER *)result__0GJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YGJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__0GJH=next__YGJH;
+          };
+        };
+        ptr__1QOB=result__0GJH;
+      } else {
+        t__0CGH=((__UINTEGER_32 )typ_id__AROB);
+        a__ZCGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__BHJH=(__UINTEGER_32)((__UINTEGER_32)(sz__3QOB + a__ZCGH) & (__UINTEGER_32)(~ a__ZCGH));
+        ptr_table__4GJH=((__POINTER )(&(table_type[(t__0CGH)])));
+        lab_type__AHJH=(__UINTEGER_32)(t__0CGH |  1);
+        next__3GJH=((__POINTER )(NULL));
+        result__5GJH=((__POINTER *)ptr_table__4GJH)[ 0];
+        if ((result__5GJH == (void *)NULL)) {
+          result__5GJH=new_lab__FTJ(lab_type__AHJH);
+          next__3GJH=(void *)((unsigned long)result__5GJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BHJH)));
+          ((__POINTER *)next__3GJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__4GJH)[ 0]=next__3GJH;
+        } else {
+          next__3GJH=((__POINTER *)result__5GJH)[ 0];
+          if ((next__3GJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__5GJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__BHJH <<  1)) <=  4096)) {
+              next__3GJH=(void *)((unsigned long)result__5GJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BHJH)));
             } else {
-              next__44IH=new_lab__ZPJ(lab_type__B5IH);
+              next__3GJH=new_lab__FTJ(lab_type__AHJH);
             };
-            ((__POINTER *)next__44IH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__54IH)[ 0]=next__44IH;
+            ((__POINTER *)next__3GJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__4GJH)[ 0]=next__3GJH;
           } else {
-            ((__POINTER *)result__A5IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__44IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__A5IH=next__44IH;
+            ((__POINTER *)result__5GJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3GJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__5GJH=next__3GJH;
           };
         };
-        ptr__PNOB=result__A5IH;
+        ptr__1QOB=result__5GJH;
       };
-      result__ONOB=((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)ptr__PNOB);
-      *(result__ONOB) = *(HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo__);
+      result__0QOB=((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)ptr__1QOB);
+      *(result__0QOB) = *(HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo__);
     };
-    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);
+    Self__50DC=((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)result__0QOB);
+    Self__50DC->item__ETOB=v__D1S;
+    Self__50DC->key__B2S=k__E1S;
+    Self__50DC->next__N2S=__tmp__D3S;
+    node__O1S=result__0QOB;
+    ((void **)Self__C1S->buckets__V1S)[idx__M1S]=result__0QOB;
+    Self__C1S->count__W2S=(__INTEGER)(Self__C1S->count__W2S +  1);
   } else {
-    ((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node__CYS)->item__YPOB=v__XXS;
+    ((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node__O1S)->item__ETOB=v__D1S;
   };
 }
 
-static void reduce_path__K3HC(void *st__M3HC)
+static void reduce_path__YAIC(void *st__0AIC)
 // ({NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER stat__2AIC,__tmp__IAIH,Self__KAIH,i__1AIC,Self__RSOE;
+  __INTEGER n__5CGH,len__QAIH,__tmp__RAIH,__tmp__TAIH,Self__UAIH;
+  __INTEGER len__ZAIH,__tmp__0AIH,__tmp__2AIH,Self__3AIH,result__BBIH;
+  __INTEGER n__BDGH,len__GBIH,__tmp__HBIH,__tmp__JBIH,Self__KBIH;
+  __INTEGER end__NBIH,len__PBIH,__tmp__QBIH,__tmp__SBIH,Self__TBIH;
+  __INTEGER Self__LLFF,n__DDGH,len__YBIH,__tmp__ZBIH,__tmp__1BIH;
+  __INTEGER Self__2BIH,result__ACIH,end__DCIH,len__FCIH,__tmp__GCIH;
+  __INTEGER __tmp__ICIH,Self__JCIH;
+  __STRING *Self__GAIH,*Self__4CGH,*Self__1AIH,*Self__CBIH,*Self__ADGH;
+  __STRING *Self__RBIH,*Self__CDGH,*Self__EDGH,*Self__GDGH,*Self__BCIH;
+  __STRING *Self__HCIH;
+  __CHARACTER car__3AIC,Self__DHJH;
+  __CHARACTER *__tmp__HAIH,*Self__JAIH;
+  __BOOLEAN __tmp__EDIC,__tmp__JEIC,result__1KHE,result__CHJH;
+  __BOOLEAN __tmp__EHJH,__tmp__KFIC;
+  stat__2AIC= 0;
+  car__3AIC='\0';
+  Self__GAIH=((__STRING *)st__0AIC);
+  __tmp__HAIH=Self__GAIH->storage__RCS;
+  __tmp__IAIH=(__INTEGER)(Self__GAIH->count__EGC -  1);
+  Self__JAIH=((__CHARACTER *)__tmp__HAIH);
+  Self__KAIH=__tmp__IAIH;
+  while ((Self__KAIH >=  0)) {
+    if (('\\' == Self__JAIH[Self__KAIH])) {
+      Self__JAIH[Self__KAIH]='/';
+    };
+    Self__KAIH=(__INTEGER)(Self__KAIH -  1);
+  };
+  i__1AIC= 1;
+  while ((i__1AIC <= ((__STRING *)st__0AIC)->count__EGC)) {
+    car__3AIC=((__CHARACTER *)((__STRING *)st__0AIC)->storage__RCS)[(__INTEGER)(i__1AIC -  1)];
+    if ((car__3AIC == '/')) {
+      Self__RSOE=stat__2AIC;
+      if ((stat__2AIC ==  0)) {
+        stat__2AIC= 1;
+      };
+      if ((Self__RSOE ==  1)) {
+        Self__4CGH=((__STRING *)st__0AIC);
+        n__5CGH=(__INTEGER)(i__1AIC -  1);
+        if ((n__5CGH > Self__4CGH->count__EGC)) {
+          Self__4CGH->count__EGC= 0;
+        } else {
+          if ((n__5CGH >  0)) {
+            len__QAIH=(__INTEGER)((__INTEGER)(n__5CGH -  1) +  1);
+            if ((len__QAIH >  0)) {
+              __tmp__RAIH=(__INTEGER)(n__5CGH +  1);
+              __tmp__TAIH=Self__4CGH->count__EGC;
+              Self__UAIH=__tmp__RAIH;
+              while ((Self__UAIH <= __tmp__TAIH)) {
+                ((__CHARACTER *)Self__4CGH->storage__RCS)[(__INTEGER)((__INTEGER)(Self__UAIH - len__QAIH) -  1)]=((__CHARACTER *)Self__4CGH->storage__RCS)[(__INTEGER)(Self__UAIH -  1)];
+                Self__UAIH=(__INTEGER)(Self__UAIH +  1);
+              };
+              Self__4CGH->count__EGC=(__INTEGER)(Self__4CGH->count__EGC - len__QAIH);
+            };
+          };
+        };
+        i__1AIC= 1;
+      };
+      if ((Self__RSOE ==  2)) {
+        Self__1AIH=((__STRING *)st__0AIC);
+        len__ZAIH=(__INTEGER)((__INTEGER)(i__1AIC - (__INTEGER)(i__1AIC -  1)) +  1);
+        if ((len__ZAIH >  0)) {
+          __tmp__0AIH=(__INTEGER)(i__1AIC +  1);
+          __tmp__2AIH=Self__1AIH->count__EGC;
+          Self__3AIH=__tmp__0AIH;
+          while ((Self__3AIH <= __tmp__2AIH)) {
+            ((__CHARACTER *)Self__1AIH->storage__RCS)[(__INTEGER)((__INTEGER)(Self__3AIH - len__ZAIH) -  1)]=((__CHARACTER *)Self__1AIH->storage__RCS)[(__INTEGER)(Self__3AIH -  1)];
+            Self__3AIH=(__INTEGER)(Self__3AIH +  1);
+          };
+          Self__1AIH->count__EGC=(__INTEGER)(Self__1AIH->count__EGC - len__ZAIH);
+        };
+        i__1AIC=(__INTEGER)(i__1AIC -  2);
+        stat__2AIC= 1;
+      };
+      if ((Self__RSOE ==  3)) {
+        Self__CBIH=((__STRING *)st__0AIC);
+        result__BBIH=(__INTEGER)(i__1AIC -  4);
+        while ((! ((result__BBIH <  1) || ('/' == ((__CHARACTER *)Self__CBIH->storage__RCS)[(__INTEGER)(result__BBIH -  1)])))) {
+          result__BBIH=(__INTEGER)(result__BBIH -  1);
+        };
+        if ((result__BBIH ==  0)) {
+          Self__ADGH=((__STRING *)st__0AIC);
+          n__BDGH=(__INTEGER)(i__1AIC -  1);
+          if ((n__BDGH > Self__ADGH->count__EGC)) {
+            Self__ADGH->count__EGC= 0;
+          } else {
+            if ((n__BDGH >  0)) {
+              len__GBIH=(__INTEGER)((__INTEGER)(n__BDGH -  1) +  1);
+              if ((len__GBIH >  0)) {
+                __tmp__HBIH=(__INTEGER)(n__BDGH +  1);
+                __tmp__JBIH=Self__ADGH->count__EGC;
+                Self__KBIH=__tmp__HBIH;
+                while ((Self__KBIH <= __tmp__JBIH)) {
+                  ((__CHARACTER *)Self__ADGH->storage__RCS)[(__INTEGER)((__INTEGER)(Self__KBIH - len__GBIH) -  1)]=((__CHARACTER *)Self__ADGH->storage__RCS)[(__INTEGER)(Self__KBIH -  1)];
+                  Self__KBIH=(__INTEGER)(Self__KBIH +  1);
                 };
-                Self__F2FH->count__EGC=(__INTEGER)(Self__F2FH->count__EGC - len__4ZHH);
+                Self__ADGH->count__EGC=(__INTEGER)(Self__ADGH->count__EGC - len__GBIH);
               };
             };
           };
-          i__N3HC= 1;
+          i__1AIC= 1;
         } else {
-          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__RBIH=((__STRING *)st__0AIC);
+          end__NBIH=(__INTEGER)(i__1AIC -  1);
+          len__PBIH=(__INTEGER)((__INTEGER)(end__NBIH - result__BBIH) +  1);
+          if ((len__PBIH >  0)) {
+            __tmp__QBIH=(__INTEGER)(end__NBIH +  1);
+            __tmp__SBIH=Self__RBIH->count__EGC;
+            Self__TBIH=__tmp__QBIH;
+            while ((Self__TBIH <= __tmp__SBIH)) {
+              ((__CHARACTER *)Self__RBIH->storage__RCS)[(__INTEGER)((__INTEGER)(Self__TBIH - len__PBIH) -  1)]=((__CHARACTER *)Self__RBIH->storage__RCS)[(__INTEGER)(Self__TBIH -  1)];
+              Self__TBIH=(__INTEGER)(Self__TBIH +  1);
             };
-            Self__I0HH->count__EGC=(__INTEGER)(Self__I0HH->count__EGC - len__G0HH);
+            Self__RBIH->count__EGC=(__INTEGER)(Self__RBIH->count__EGC - len__PBIH);
           };
-          i__N3HC=result__ZZHH;
+          i__1AIC=result__BBIH;
         };
-        stat__O3HC= 1;
+        stat__2AIC= 1;
       };
-      __tmp__W5HC=TRUE__;
+      __tmp__EDIC=TRUE__;
     } else {
-      __tmp__W5HC=FALSE__;
+      __tmp__EDIC=FALSE__;
     };
-    if (__tmp__W5HC) {
-      __tmp__1AIC=TRUE__;
+    if (__tmp__EDIC) {
+      __tmp__JEIC=TRUE__;
     } else {
-      result__NHHE=(car__P3HC == '.');
-      if (result__NHHE) {
-        Self__PGFF=stat__O3HC;
-        if ((stat__O3HC ==  1)) {
-          stat__O3HC= 2;
+      result__1KHE=(car__3AIC == '.');
+      if (result__1KHE) {
+        Self__LLFF=stat__2AIC;
+        if ((stat__2AIC ==  1)) {
+          stat__2AIC= 2;
         };
-        if ((Self__PGFF ==  2)) {
-          stat__O3HC= 3;
+        if ((Self__LLFF ==  2)) {
+          stat__2AIC= 3;
         };
-        if ((Self__PGFF ==  3)) {
-          stat__O3HC= 0;
+        if ((Self__LLFF ==  3)) {
+          stat__2AIC= 0;
         };
       };
-      __tmp__1AIC=result__NHHE;
+      __tmp__JEIC=result__1KHE;
     };
-    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__;
+    if ((! __tmp__JEIC)) {
+      if (((car__3AIC == ':') && (i__1AIC >  2))) {
+        Self__DHJH=((__CHARACTER *)((__STRING *)st__0AIC)->storage__RCS)[(__INTEGER)((__INTEGER)(i__1AIC -  1) -  1)];
+        result__CHJH=FALSE__;
+        if ((((__INTEGER_8 )Self__DHJH) >= ((__INTEGER_8 )'a'))) {
+          result__CHJH=(((__INTEGER_8 )Self__DHJH) <= ((__INTEGER_8 )'z'));
+          __tmp__EHJH=TRUE__;
         } else {
-          __tmp__F5IH=FALSE__;
+          __tmp__EHJH=FALSE__;
         };
-        if ((! __tmp__F5IH)) {
-          if ((((__INTEGER_8 )Self__E5IH) >= ((__INTEGER_8 )'A'))) {
-            result__D5IH=(((__INTEGER_8 )Self__E5IH) <= ((__INTEGER_8 )'Z'));
+        if ((! __tmp__EHJH)) {
+          if ((((__INTEGER_8 )Self__DHJH) >= ((__INTEGER_8 )'A'))) {
+            result__CHJH=(((__INTEGER_8 )Self__DHJH) <= ((__INTEGER_8 )'Z'));
           };
         };
-        __tmp__2BIC=result__D5IH;
+        __tmp__KFIC=result__CHJH;
       } else {
-        __tmp__2BIC=FALSE__;
+        __tmp__KFIC=FALSE__;
       };
-      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;
+      if ((__tmp__KFIC && (((__CHARACTER *)((__STRING *)st__0AIC)->storage__RCS)[(__INTEGER)((__INTEGER)(i__1AIC -  2) -  1)] == '/'))) {
+        Self__CDGH=((__STRING *)st__0AIC);
+        n__DDGH=(__INTEGER)(i__1AIC -  2);
+        if ((n__DDGH > Self__CDGH->count__EGC)) {
+          Self__CDGH->count__EGC= 0;
         } else {
-          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);
+          if ((n__DDGH >  0)) {
+            len__YBIH=(__INTEGER)((__INTEGER)(n__DDGH -  1) +  1);
+            if ((len__YBIH >  0)) {
+              __tmp__ZBIH=(__INTEGER)(n__DDGH +  1);
+              __tmp__1BIH=Self__CDGH->count__EGC;
+              Self__2BIH=__tmp__ZBIH;
+              while ((Self__2BIH <= __tmp__1BIH)) {
+                ((__CHARACTER *)Self__CDGH->storage__RCS)[(__INTEGER)((__INTEGER)(Self__2BIH - len__YBIH) -  1)]=((__CHARACTER *)Self__CDGH->storage__RCS)[(__INTEGER)(Self__2BIH -  1)];
+                Self__2BIH=(__INTEGER)(Self__2BIH +  1);
               };
-              Self__H2FH->count__EGC=(__INTEGER)(Self__H2FH->count__EGC - len__O0HH);
+              Self__CDGH->count__EGC=(__INTEGER)(Self__CDGH->count__EGC - len__YBIH);
             };
           };
         };
-        i__N3HC= 1;
+        i__1AIC= 1;
       } else {
-        stat__O3HC= 0;
+        stat__2AIC= 0;
       };
     };
-    i__N3HC=(__INTEGER)(i__N3HC +  1);
+    i__1AIC=(__INTEGER)(i__1AIC +  1);
   };
-  if ((stat__O3HC ==  1)) {
-    Self__J2FH=((__STRING *)st__M3HC);
-    if (( 1 > Self__J2FH->count__EGC)) {
-      Self__J2FH->count__EGC= 0;
+  if ((stat__2AIC ==  1)) {
+    Self__EDGH=((__STRING *)st__0AIC);
+    if (( 1 > Self__EDGH->count__EGC)) {
+      Self__EDGH->count__EGC= 0;
     } else {
-      Self__J2FH->count__EGC=(__INTEGER)(Self__J2FH->count__EGC -  1);
+      Self__EDGH->count__EGC=(__INTEGER)(Self__EDGH->count__EGC -  1);
     };
   };
-  if ((stat__O3HC ==  2)) {
-    Self__L2FH=((__STRING *)st__M3HC);
-    if (( 2 > Self__L2FH->count__EGC)) {
-      Self__L2FH->count__EGC= 0;
+  if ((stat__2AIC ==  2)) {
+    Self__GDGH=((__STRING *)st__0AIC);
+    if (( 2 > Self__GDGH->count__EGC)) {
+      Self__GDGH->count__EGC= 0;
     } else {
-      Self__L2FH->count__EGC=(__INTEGER)(Self__L2FH->count__EGC -  2);
+      Self__GDGH->count__EGC=(__INTEGER)(Self__GDGH->count__EGC -  2);
     };
   };
-  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 ((stat__2AIC ==  3)) {
+    Self__BCIH=((__STRING *)st__0AIC);
+    result__ACIH=(__INTEGER)(i__1AIC -  4);
+    while ((! ((result__ACIH <  1) || ('/' == ((__CHARACTER *)Self__BCIH->storage__RCS)[(__INTEGER)(result__ACIH -  1)])))) {
+      result__ACIH=(__INTEGER)(result__ACIH -  1);
     };
-    if ((result__V0HH ==  0)) {
-      ((__STRING *)st__M3HC)->count__EGC= 0;
+    if ((result__ACIH ==  0)) {
+      ((__STRING *)st__0AIC)->count__EGC= 0;
     } else {
-      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__HCIH=((__STRING *)st__0AIC);
+      end__DCIH=(__INTEGER)(i__1AIC -  1);
+      len__FCIH=(__INTEGER)((__INTEGER)(end__DCIH - result__ACIH) +  1);
+      if ((len__FCIH >  0)) {
+        __tmp__GCIH=(__INTEGER)(end__DCIH +  1);
+        __tmp__ICIH=Self__HCIH->count__EGC;
+        Self__JCIH=__tmp__GCIH;
+        while ((Self__JCIH <= __tmp__ICIH)) {
+          ((__CHARACTER *)Self__HCIH->storage__RCS)[(__INTEGER)((__INTEGER)(Self__JCIH - len__FCIH) -  1)]=((__CHARACTER *)Self__HCIH->storage__RCS)[(__INTEGER)(Self__JCIH -  1)];
+          Self__JCIH=(__INTEGER)(Self__JCIH +  1);
         };
-        Self__20HH->count__EGC=(__INTEGER)(Self__20HH->count__EGC - len__00HH);
+        Self__HCIH->count__EGC=(__INTEGER)(Self__HCIH->count__EGC - len__FCIH);
       };
     };
   };
-  if ((((__STRING *)st__M3HC)->count__EGC ==  0)) {
-    add_last__3IT(st__M3HC,'/');
+  if ((((__STRING *)st__0AIC)->count__EGC ==  0)) {
+    add_last__GOT(st__0AIC,'/');
   };
 }
 
-static void* reference_at__NV0C(__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *Self__OV0C,void *k__PV0C)
+static void* reference_at__1Y0C(__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *Self__2Y0C,void *k__3Y0C)
 // ({HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo},{NULLxSTRING}) With resultNo recursive, No inlinable.
 {
-  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);
+  void *result__HZ0C;
+  __STRING *Self__NCIH;
+  __INTEGER result__MCIH,__tmp__OCIH,Self__PCIH;
+  void *node__GZ0C;
+  result__HZ0C=NULL;
+  Self__NCIH=((__STRING *)k__3Y0C);
+  result__MCIH= 0;
+  __tmp__OCIH=Self__NCIH->count__EGC;
+  Self__PCIH= 1;
+  while ((Self__PCIH <= __tmp__OCIH)) {
+    result__MCIH=(__INTEGER)((__INTEGER)( 5 * result__MCIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__NCIH->storage__RCS)[(__INTEGER)(Self__PCIH -  1)])));
+    Self__PCIH=(__INTEGER)(Self__PCIH +  1);
+  };
+  if ((result__MCIH <  0)) {
+    result__MCIH=(__INTEGER)(~ result__MCIH);
+  };
+  node__GZ0C=((void **)Self__2Y0C->buckets__V1S)[(__INTEGER)(result__MCIH % Self__2Y0C->capacity__Q1S)];
+  while ((! (((void *)node__GZ0C == (void *)NULL) || __infix_equal_equal__GAEB(((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node__GZ0C)->key__B2S,k__3Y0C)))) {
+    node__GZ0C=((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node__GZ0C)->next__N2S;
+  };
+  if (((void *)node__GZ0C != (void *)NULL)) {
+    result__HZ0C=((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node__GZ0C)->item__ETOB;
+  };
+  return(result__HZ0C);
 }
 
-static void* physical_get_entry__BY0C(void *new_path__DY0C)
+static void* physical_get_entry__P10C(void *new_path__R10C)
 // ({NULLxSTRING}) With resultNo recursive, No inlinable.
 {
-  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';
+  void *result__U10C;
+  __STRING *Self__KDGH;
+  __FILE_UNIX *result__XZI;
+  __POINTER ptr__YZI,ptr_table__GHJH,next__FHJH,result__HHJH;
+  __POINTER ptr_table__LHJH,next__KHJH,result__MHJH,ptr__J1I;
+  __POINTER ptr_table__QHJH,next__PHJH,result__RHJH,ptr_table__VHJH;
+  __POINTER next__UHJH,result__WHJH;
+  __INTEGER typ_id__3ZI,typ_id__O1I;
+  __UINTEGER_32 sz__0ZI,a__YSGH,new_size__ZSGH,t__3SGH,a__2SGH;
+  __UINTEGER_32 new_size__OHJH,lab_type__NHJH,sz__L1I,a__ATGH;
+  __UINTEGER_32 new_size__BTGH,t__FTGH,a__ETGH,new_size__YHJH;
+  __UINTEGER_32 lab_type__XHJH;
+  __DIRECTORY_UNIX *result__I1I;
+  void *__tmp__L20C;
+  __CHARACTER *pe__T10C;
+  result__U10C=NULL;
+  Self__KDGH=((__STRING *)new_path__R10C);
+  if ((Self__KDGH->capacity__ICS > Self__KDGH->count__EGC)) {
+    ((__CHARACTER *)Self__KDGH->storage__RCS)[Self__KDGH->count__EGC]='\0';
   } else {
-    add_last__3IT(Self__P2FH,'\0');
-    Self__P2FH->count__EGC=(__INTEGER)(Self__P2FH->count__EGC -  1);
+    add_last__GOT(Self__KDGH,'\0');
+    Self__KDGH->count__EGC=(__INTEGER)(Self__KDGH->count__EGC -  1);
   };
-  pe__FY0C=Self__P2FH->storage__F5R;
+  pe__T10C=Self__KDGH->storage__RCS;
   { struct stat t;
-  if ((((__INTEGER )(stat((pe__FY0C),&t))) ==  0)) {
+  if ((((__INTEGER )(stat((pe__T10C),&t))) ==  0)) {
     if ((((__INTEGER )(S_ISDIR(t.st_mode))) ==  0)) {
-      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)));
+      result__XZI=NULL;
+      ptr__YZI=((__POINTER )(NULL));
+      typ_id__3ZI= 0;
+      sz__0ZI=((__UINTEGER_32 )sizeof(__FILE_UNIX));
+      if ((sz__0ZI ==  0)) {
+        result__XZI=FILE_UNIX__;
+      } else {
+        typ_id__3ZI=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__0ZI);
+        if ((typ_id__3ZI == (__INTEGER)(-  1))) {
+          a__YSGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__ZSGH=(__UINTEGER_32)((__UINTEGER_32)(sz__0ZI + a__YSGH) & (__UINTEGER_32)(~ a__YSGH));
+          ptr_table__GHJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ZSGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__FHJH=((__POINTER )(NULL));
+          result__HHJH=((__POINTER *)ptr_table__GHJH)[ 0];
+          if ((result__HHJH == (void *)NULL)) {
+            result__HHJH=new_lab__FTJ(new_size__ZSGH);
+            next__FHJH=(void *)((unsigned long)result__HHJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZSGH)));
+            ((__POINTER *)next__FHJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__GHJH)[ 0]=next__FHJH;
+          } else {
+            next__FHJH=((__POINTER *)result__HHJH)[ 0];
+            if ((next__FHJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HHJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__ZSGH <<  1)) <=  4096)) {
+                next__FHJH=(void *)((unsigned long)result__HHJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZSGH)));
               } else {
-                next__G5IH=new_lab__ZPJ(new_size__4LGH);
+                next__FHJH=new_lab__FTJ(new_size__ZSGH);
               };
-              ((__POINTER *)next__G5IH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__H5IH)[ 0]=next__G5IH;
+              ((__POINTER *)next__FHJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__GHJH)[ 0]=next__FHJH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__HHJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FHJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__HHJH=next__FHJH;
+            };
+          };
+          ptr__YZI=result__HHJH;
+        } else {
+          t__3SGH=((__UINTEGER_32 )typ_id__3ZI);
+          a__2SGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__OHJH=(__UINTEGER_32)((__UINTEGER_32)(sz__0ZI + a__2SGH) & (__UINTEGER_32)(~ a__2SGH));
+          ptr_table__LHJH=((__POINTER )(&(table_type[(t__3SGH)])));
+          lab_type__NHJH=(__UINTEGER_32)(t__3SGH |  1);
+          next__KHJH=((__POINTER )(NULL));
+          result__MHJH=((__POINTER *)ptr_table__LHJH)[ 0];
+          if ((result__MHJH == (void *)NULL)) {
+            result__MHJH=new_lab__FTJ(lab_type__NHJH);
+            next__KHJH=(void *)((unsigned long)result__MHJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OHJH)));
+            ((__POINTER *)next__KHJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__LHJH)[ 0]=next__KHJH;
+          } else {
+            next__KHJH=((__POINTER *)result__MHJH)[ 0];
+            if ((next__KHJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MHJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__OHJH <<  1)) <=  4096)) {
+                next__KHJH=(void *)((unsigned long)result__MHJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OHJH)));
               } else {
-                next__L5IH=new_lab__ZPJ(lab_type__O5IH);
+                next__KHJH=new_lab__FTJ(lab_type__NHJH);
               };
-              ((__POINTER *)next__L5IH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__M5IH)[ 0]=next__L5IH;
+              ((__POINTER *)next__KHJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__LHJH)[ 0]=next__KHJH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__MHJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KHJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__MHJH=next__KHJH;
+            };
+          };
+          ptr__YZI=result__MHJH;
+        };
+        result__XZI=((__FILE_UNIX *)ptr__YZI);
+        *(result__XZI) = *(FILE_UNIX__);
+      };
+      result__U10C=result__XZI;
+    } else {
+      result__I1I=NULL;
+      ptr__J1I=((__POINTER )(NULL));
+      typ_id__O1I= 0;
+      sz__L1I=((__UINTEGER_32 )sizeof(__DIRECTORY_UNIX));
+      if ((sz__L1I ==  0)) {
+        result__I1I=DIRECTORY_UNIX__;
+      } else {
+        typ_id__O1I=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__L1I);
+        if ((typ_id__O1I == (__INTEGER)(-  1))) {
+          a__ATGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__BTGH=(__UINTEGER_32)((__UINTEGER_32)(sz__L1I + a__ATGH) & (__UINTEGER_32)(~ a__ATGH));
+          ptr_table__QHJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__BTGH / ((__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__FTJ(new_size__BTGH);
+            next__PHJH=(void *)((unsigned long)result__RHJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BTGH)));
+            ((__POINTER *)next__PHJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__QHJH)[ 0]=next__PHJH;
+          } 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__SXH)))) &  4095) + (__UINTEGER_32)(new_size__BTGH <<  1)) <=  4096)) {
+                next__PHJH=(void *)((unsigned long)result__RHJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BTGH)));
               } else {
-                next__Q5IH=new_lab__ZPJ(new_size__GMGH);
+                next__PHJH=new_lab__FTJ(new_size__BTGH);
               };
-              ((__POINTER *)next__Q5IH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__R5IH)[ 0]=next__Q5IH;
+              ((__POINTER *)next__PHJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__QHJH)[ 0]=next__PHJH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__RHJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PHJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__RHJH=next__PHJH;
+            };
+          };
+          ptr__J1I=result__RHJH;
+        } else {
+          t__FTGH=((__UINTEGER_32 )typ_id__O1I);
+          a__ETGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__YHJH=(__UINTEGER_32)((__UINTEGER_32)(sz__L1I + a__ETGH) & (__UINTEGER_32)(~ a__ETGH));
+          ptr_table__VHJH=((__POINTER )(&(table_type[(t__FTGH)])));
+          lab_type__XHJH=(__UINTEGER_32)(t__FTGH |  1);
+          next__UHJH=((__POINTER )(NULL));
+          result__WHJH=((__POINTER *)ptr_table__VHJH)[ 0];
+          if ((result__WHJH == (void *)NULL)) {
+            result__WHJH=new_lab__FTJ(lab_type__XHJH);
+            next__UHJH=(void *)((unsigned long)result__WHJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YHJH)));
+            ((__POINTER *)next__UHJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__VHJH)[ 0]=next__UHJH;
+          } else {
+            next__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__SXH)))) &  4095) + (__UINTEGER_32)(new_size__YHJH <<  1)) <=  4096)) {
+                next__UHJH=(void *)((unsigned long)result__WHJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YHJH)));
               } else {
-                next__V5IH=new_lab__ZPJ(lab_type__Y5IH);
+                next__UHJH=new_lab__FTJ(lab_type__XHJH);
               };
-              ((__POINTER *)next__V5IH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__W5IH)[ 0]=next__V5IH;
+              ((__POINTER *)next__UHJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__VHJH)[ 0]=next__UHJH;
             } else {
-              ((__POINTER *)result__X5IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__V5IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__X5IH=next__V5IH;
+              ((__POINTER *)result__WHJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UHJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__WHJH=next__UHJH;
             };
           };
-          ptr__3XI=result__X5IH;
+          ptr__J1I=result__WHJH;
         };
-        result__2XI=((__DIRECTORY_UNIX *)ptr__3XI);
-        *(result__2XI) = *(DIRECTORY_UNIX__);
+        result__I1I=((__DIRECTORY_UNIX *)ptr__J1I);
+        *(result__I1I) = *(DIRECTORY_UNIX__);
       };
-      result__GY0C=result__2XI;
+      result__U10C=result__I1I;
     };
-    if (((struct ___OBJ *)result__GY0C)->__id==__DIRECTORY_UNIX__) {
-      set_path__SKT(result__GY0C,new_path__DY0C);
+    if (((struct ___OBJ *)result__U10C)->__id==__DIRECTORY_UNIX__) {
+      set_path__1PT(result__U10C,new_path__R10C);
     } else {
-      set_path__NLT(result__GY0C,new_path__DY0C);
+      set_path__WQT(result__U10C,new_path__R10C);
     };
-    if (FILE_SYSTEM__->parent_directory__2FD==0) {
+    if (FILE_SYSTEM__->parent_directory__2GD==0) {
     } else {
-      parent_directory__1ED();
+      parent_directory__1FD();
     };
-    if (((struct ___OBJ *)result__GY0C)->__id==__DIRECTORY_UNIX__) {
-      __tmp__3Y0C=((__DIRECTORY_UNIX *)result__GY0C)->parent_entry_unix__GFD.parent_entry__FFD.path__BD;
+    if (((struct ___OBJ *)result__U10C)->__id==__DIRECTORY_UNIX__) {
+      __tmp__L20C=((__DIRECTORY_UNIX *)result__U10C)->parent_entry_unix__GGD.parent_entry__FGD.path__BD;
     } else {
-      __tmp__3Y0C=((__FILE_UNIX *)result__GY0C)->parent_entry_unix__DBF.parent_entry__FFD.path__BD;
+      __tmp__L20C=((__FILE_UNIX *)result__U10C)->parent_entry_unix__HEF.parent_entry__FGD.path__BD;
     };
-    put__to__VXS(alias__RFD,result__GY0C,__tmp__3Y0C);
+    put__to__B1S(alias__RGD,result__U10C,__tmp__L20C);
   };
   };
-  return(result__GY0C);
+  return(result__U10C);
 }
 
-static void** create__4Z1C(__INTEGER nb_elements__A01C)
+static void** create__M31C(__INTEGER nb_elements__O31C)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__VFEH,a__0FEH,new_size__WFEH,new_size2__XFEH,a__PDGH;
+  __UINTEGER_32 new_size__QDGH;
+  __POINTER result__UFEH,ptr_table__0HJH,next__ZHJH,result__1HJH;
+  void *result__4HJH;
+  __INTEGER Self__OBXD;
+  void **Result__0YCD;
+  sz__VFEH=((__UINTEGER_32 )(__INTEGER)(nb_elements__O31C * ((__INTEGER )(sizeof(void *)))));
+  result__UFEH=((__POINTER )(NULL));
+  a__0FEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__WFEH=(__UINTEGER_32)((__UINTEGER_32)(sz__VFEH + a__0FEH) & (__UINTEGER_32)(~ a__0FEH));
+  new_size2__XFEH=(__UINTEGER_32)(new_size__WFEH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__XFEH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__PDGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__QDGH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__XFEH + a__PDGH) & (__UINTEGER_32)(~ a__PDGH));
+    ptr_table__0HJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__QDGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__ZHJH=((__POINTER )(NULL));
+    result__1HJH=((__POINTER *)ptr_table__0HJH)[ 0];
+    if ((result__1HJH == (void *)NULL)) {
+      result__1HJH=new_lab__FTJ(new_size__QDGH);
+      next__ZHJH=(void *)((unsigned long)result__1HJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QDGH)));
+      ((__POINTER *)next__ZHJH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__0HJH)[ 0]=next__ZHJH;
+    } else {
+      next__ZHJH=((__POINTER *)result__1HJH)[ 0];
+      if ((next__ZHJH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1HJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__QDGH <<  1)) <=  4096)) {
+          next__ZHJH=(void *)((unsigned long)result__1HJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QDGH)));
+        } else {
+          next__ZHJH=new_lab__FTJ(new_size__QDGH);
+        };
+        ((__POINTER *)next__ZHJH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__0HJH)[ 0]=next__ZHJH;
+      } else {
+        ((__POINTER *)result__1HJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZHJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__1HJH=next__ZHJH;
+      };
+    };
+    ((__POINTER *)result__1HJH)[ 0]=((__POINTER ) 3);
+    result__UFEH=(void *)((unsigned long)result__1HJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__4HJH=first_free__NFVB;
+    while ((((void *)result__4HJH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__4HJH)->map_size_and_id__YTB &  4294967292LU) < new_size__WFEH))) {
+      result__4HJH=((__MEMORY *)result__4HJH)->map_next_free__ZTB;
     };
-    if (((void *)result__55IH == (void *)NULL)) {
-      result__55IH=new_page__K34();
+    if (((void *)result__4HJH == (void *)NULL)) {
+      result__4HJH=new_page__YC5();
     };
-    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)));
+    to_busy__index__MWFC(result__4HJH,new_size__WFEH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__4HJH)) - (unsigned long)begin_memory__SXH)))) >>  26));
+    result__UFEH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__4HJH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__0YCD=((void **)result__UFEH);
+  Self__OBXD=(__INTEGER)(nb_elements__O31C -  1);
+  while ((Self__OBXD >=  0)) {
+    Result__0YCD[Self__OBXD]=NULL;
+    Self__OBXD=(__INTEGER)(Self__OBXD -  1);
   };
-  return(Result__MVCD);
+  return(Result__0YCD);
 }
 
-static void** create__HRSC(__INTEGER nb_elements__JRSC)
+static void** create__VUSC(__INTEGER nb_elements__XUSC)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__3FEH,a__CGEH,new_size__4FEH,new_size2__5FEH,a__WDGH;
+  __UINTEGER_32 new_size__XDGH;
+  __POINTER result__2FEH,ptr_table__CIJH,next__BIJH,result__DIJH;
+  void *result__GIJH;
+  __INTEGER Self__USWD;
+  void **Result__NA2C;
+  sz__3FEH=((__UINTEGER_32 )(__INTEGER)(nb_elements__XUSC * ((__INTEGER )(sizeof(void *)))));
+  result__2FEH=((__POINTER )(NULL));
+  a__CGEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__4FEH=(__UINTEGER_32)((__UINTEGER_32)(sz__3FEH + a__CGEH) & (__UINTEGER_32)(~ a__CGEH));
+  new_size2__5FEH=(__UINTEGER_32)(new_size__4FEH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__5FEH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__WDGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__XDGH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__5FEH + a__WDGH) & (__UINTEGER_32)(~ a__WDGH));
+    ptr_table__CIJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__XDGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__BIJH=((__POINTER )(NULL));
+    result__DIJH=((__POINTER *)ptr_table__CIJH)[ 0];
+    if ((result__DIJH == (void *)NULL)) {
+      result__DIJH=new_lab__FTJ(new_size__XDGH);
+      next__BIJH=(void *)((unsigned long)result__DIJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XDGH)));
+      ((__POINTER *)next__BIJH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__CIJH)[ 0]=next__BIJH;
+    } else {
+      next__BIJH=((__POINTER *)result__DIJH)[ 0];
+      if ((next__BIJH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DIJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__XDGH <<  1)) <=  4096)) {
+          next__BIJH=(void *)((unsigned long)result__DIJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XDGH)));
+        } else {
+          next__BIJH=new_lab__FTJ(new_size__XDGH);
+        };
+        ((__POINTER *)next__BIJH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__CIJH)[ 0]=next__BIJH;
+      } else {
+        ((__POINTER *)result__DIJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BIJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__DIJH=next__BIJH;
+      };
+    };
+    ((__POINTER *)result__DIJH)[ 0]=((__POINTER ) 3);
+    result__2FEH=(void *)((unsigned long)result__DIJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__GIJH=first_free__NFVB;
+    while ((((void *)result__GIJH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__GIJH)->map_size_and_id__YTB &  4294967292LU) < new_size__4FEH))) {
+      result__GIJH=((__MEMORY *)result__GIJH)->map_next_free__ZTB;
     };
-    if (((void *)result__HAJH == (void *)NULL)) {
-      result__HAJH=new_page__K34();
+    if (((void *)result__GIJH == (void *)NULL)) {
+      result__GIJH=new_page__YC5();
     };
-    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)));
+    to_busy__index__MWFC(result__GIJH,new_size__4FEH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__GIJH)) - (unsigned long)begin_memory__SXH)))) >>  26));
+    result__2FEH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__GIJH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__NA2C=((void **)result__2FEH);
+  Self__USWD=(__INTEGER)(nb_elements__XUSC -  1);
+  while ((Self__USWD >=  0)) {
+    Result__NA2C[Self__USWD]=NULL;
+    Self__USWD=(__INTEGER)(Self__USWD -  1);
   };
-  return(Result__521C);
+  return(Result__NA2C);
 }
 
-static void short__token__to__YBD(void *key__0BD,__INTEGER beg__1BD,__INTEGER end__2BD)
+static void short__token__to__YCD(void *key__0CD,__INTEGER beg__1CD,__INTEGER end__2CD)
 // ({STRING_CONSTANT},{INTEGER},{INTEGER}) VoidNo recursive, No inlinable.
 {
-  __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__S1HH;
-  void *fmt__5BD;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__F1HH;
-  void *node__H1HH;
-  pos__3BD= 0;
-  add_text__4BD=NULL;
-  fmt__5BD=NULL;
+  __INTEGER pos__3CD,result__VCIH,__tmp__XCIH,Self__YCIH,__tmp__YDD;
+  __INTEGER Self__MN4,__tmp__3CIH,__tmp__5CIH,Self__ADIH,__tmp__OED;
+  __INTEGER Self__3O4,__tmp__EFD,__tmp__HFD;
+  void *add_text__4CD;
+  __STRING *Self__4CIH;
+  void *fmt__5CD;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__RCIH;
+  void *node__TCIH;
+  pos__3CD= 0;
+  add_text__4CD=NULL;
+  fmt__5CD=NULL;
   if (is_shorter__LZ) {
     if (is_active_short__OCC) {
-      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);
+      Self__RCIH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
+      result__VCIH= 0;
+      __tmp__XCIH=((__STRING_CONSTANT *)key__0CD)->count__DD;
+      Self__YCIH= 1;
+      while ((Self__YCIH <= __tmp__XCIH)) {
+        result__VCIH=(__INTEGER)((__INTEGER)( 5 * result__VCIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)key__0CD)->storage__FRO)[(__INTEGER)(Self__YCIH -  1)])));
+        Self__YCIH=(__INTEGER)(Self__YCIH +  1);
       };
-      if ((result__J1HH <  0)) {
-        result__J1HH=(__INTEGER)(~ result__J1HH);
+      if ((result__VCIH <  0)) {
+        result__VCIH=(__INTEGER)(~ result__VCIH);
       };
-      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;
+      node__TCIH=((void **)Self__RCIH->buckets__PDT)[(__INTEGER)(result__VCIH % Self__RCIH->capacity__KDT)];
+      while ((! (((void *)node__TCIH == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__TCIH)->key__1DT == (void *)key__0CD)))) {
+        node__TCIH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__TCIH)->next__GET;
       };
-      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__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);
+      if (((void *)node__TCIH != (void *)NULL)) {
+        ((__STRING *)token__TDD)->count__EGC= 0;
+        pos__3CD=(__INTEGER)(beg__1CD + short_derive__PCC);
+        __tmp__YDD=(__INTEGER)(end__2CD -  1);
+        Self__MN4=beg__1CD;
+        while ((Self__MN4 <= __tmp__YDD)) {
+          add_last__GOT(token__TDD,((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(Self__MN4 -  1)]);
+          Self__4CIH=((__STRING *)output_code__SI);
+          __tmp__3CIH=(__INTEGER)(pos__3CD +  1);
+          __tmp__5CIH=Self__4CIH->count__EGC;
+          Self__ADIH=__tmp__3CIH;
+          while ((Self__ADIH <= __tmp__5CIH)) {
+            ((__CHARACTER *)Self__4CIH->storage__RCS)[(__INTEGER)((__INTEGER)(Self__ADIH -  1) -  1)]=((__CHARACTER *)Self__4CIH->storage__RCS)[(__INTEGER)(Self__ADIH -  1)];
+            Self__ADIH=(__INTEGER)(Self__ADIH +  1);
           };
-          Self__S1HH->count__EGC=(__INTEGER)(Self__S1HH->count__EGC -  1);
-          Self__4H4=(__INTEGER)(Self__4H4 +  1);
+          Self__4CIH->count__EGC=(__INTEGER)(Self__4CIH->count__EGC -  1);
+          Self__MN4=(__INTEGER)(Self__MN4 +  1);
         };
-        short_derive__PCC=(__INTEGER)(short_derive__PCC - ((__STRING *)token__TCD)->count__EGC);
-        fmt__5BD=at__MI4(short_dico__QD,key__0BD);
-        __tmp__ODD=((__LINKED_LISToSTRING_CONSTANTo *)fmt__5BD)->parent_linked_collection__LD.upper__MDD;
-        Self__PJ4= 1;
-        while ((Self__PJ4 <= __tmp__ODD)) {
-          if (((void *)item__CZND(fmt__5BD,Self__PJ4) == (void *)NULL)) {
-            add_text__4BD=token__TCD;
+        short_derive__PCC=(__INTEGER)(short_derive__PCC - ((__STRING *)token__TDD)->count__EGC);
+        fmt__5CD=at__0N4(short_dico__QD,key__0CD);
+        __tmp__OED=((__LINKED_LISToSTRING_CONSTANTo *)fmt__5CD)->parent_linked_collection__LD.upper__MED;
+        Self__3O4= 1;
+        while ((Self__3O4 <= __tmp__OED)) {
+          if (((void *)item__Q2ND(fmt__5CD,Self__3O4) == (void *)NULL)) {
+            add_text__4CD=token__TDD;
           } else {
-            add_text__4BD=item__CZND(fmt__5BD,Self__PJ4);
+            add_text__4CD=item__Q2ND(fmt__5CD,Self__3O4);
           };
-          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;
+          insert_string__to__CYU(output_code__SI,add_text__4CD,pos__3CD);
+          if (((struct ___OBJ *)add_text__4CD)->__id==__STRING_CONSTANT__) {
+            __tmp__EFD=((__STRING_CONSTANT *)add_text__4CD)->count__DD;
           } else {
-            __tmp__EED=((__STRING *)add_text__4BD)->count__EGC;
+            __tmp__EFD=((__STRING *)add_text__4CD)->count__EGC;
           };
-          pos__3BD=(__INTEGER)(pos__3BD + __tmp__EED);
-          if (((struct ___OBJ *)add_text__4BD)->__id==__STRING_CONSTANT__) {
-            __tmp__HED=((__STRING_CONSTANT *)add_text__4BD)->count__DD;
+          pos__3CD=(__INTEGER)(pos__3CD + __tmp__EFD);
+          if (((struct ___OBJ *)add_text__4CD)->__id==__STRING_CONSTANT__) {
+            __tmp__HFD=((__STRING_CONSTANT *)add_text__4CD)->count__DD;
           } else {
-            __tmp__HED=((__STRING *)add_text__4BD)->count__EGC;
+            __tmp__HFD=((__STRING *)add_text__4CD)->count__EGC;
           };
-          short_derive__PCC=(__INTEGER)(short_derive__PCC + __tmp__HED);
-          Self__PJ4=(__INTEGER)(Self__PJ4 +  1);
+          short_derive__PCC=(__INTEGER)(short_derive__PCC + __tmp__HFD);
+          Self__3O4=(__INTEGER)(Self__3O4 +  1);
         };
       };
     };
   };
 }
 
-static __INTEGER first_substring_index__BVZE(__STRING *Self__CVZE)
+static __INTEGER first_substring_index__3ZZE(__STRING *Self__4ZZE)
 // ({STRING}) With resultNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER i__P54E,result__R54E,s__Q54E;
+  i__P54E= 0;
+  result__R54E= 0;
+  s__Q54E= 1;
+  while ((! ((result__R54E !=  0) || ((__INTEGER)((__INTEGER)(s__Q54E + ((__STRING_CONSTANT *)(&__string_112))->count__DD) -  1) > Self__4ZZE->count__EGC)))) {
+    i__P54E= 1;
+    while ((! ((i__P54E > ((__STRING_CONSTANT *)(&__string_112))->count__DD) || (((__CHARACTER *)Self__4ZZE->storage__RCS)[(__INTEGER)((__INTEGER)((__INTEGER)(s__Q54E + i__P54E) -  1) -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_112))->storage__FRO)[(__INTEGER)(i__P54E -  1)])))) {
+      i__P54E=(__INTEGER)(i__P54E +  1);
     };
-    if ((i__T04E > ((__STRING_CONSTANT *)(&__string_112))->count__DD)) {
-      result__V04E=s__U04E;
+    if ((i__P54E > ((__STRING_CONSTANT *)(&__string_112))->count__DD)) {
+      result__R54E=s__Q54E;
     } else {
-      s__U04E=(__INTEGER)(s__U04E +  1);
+      s__Q54E=(__INTEGER)(s__Q54E +  1);
     };
   };
-  return(result__V04E);
+  return(result__R54E);
 }
 
-static __BOOLEAN read_string__PCQ()
+static __BOOLEAN read_string__1FQ()
 // () With resultNo recursive, No inlinable.
 {
-  __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__1H5G='\0';
+  __INTEGER old_pos__5FQ;
+  __POSITION pos__CQXG;
+  __BOOLEAN result__4FQ,__tmp__JGQ,__tmp__IHQ,__tmp__JHQ;
+  __CHARACTER result__YO5G,result__CP5G,result__LP5G,result__QP5G;
+  __CHARACTER result__VP5G,result__0P5G,result__5P5G;
+  result__4FQ=FALSE__;
+  old_pos__5FQ= 0;
+  if (read_space__MTD()) {
+    result__YO5G='\0';
     if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-      result__1H5G=((__CHARACTER )(( 0)));
+      result__YO5G=((__CHARACTER )(( 0)));
     } else {
-      result__1H5G=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+      result__YO5G=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
     };
-    __tmp__3CQ=(result__1H5G == '\"');
+    __tmp__JGQ=(result__YO5G == '\"');
   } else {
-    __tmp__3CQ=FALSE__;
+    __tmp__JGQ=FALSE__;
   };
-  if (__tmp__3CQ) {
-    old_pos__TCQ=position__CCC;
+  if (__tmp__JGQ) {
+    old_pos__5FQ=position__CCC;
     position__CCC=(__INTEGER)(position__CCC +  1);
     ((__STRING *)string_tmp__VH)->count__EGC= 0;
-    until_do__IKRC:
+    until_do__WNRC:
     {
-      result__FI5G='\0';
+      result__CP5G='\0';
       if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__FI5G=((__CHARACTER )(( 0)));
+        result__CP5G=((__CHARACTER )(( 0)));
       } else {
-        result__FI5G=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+        result__CP5G=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__FI5G == ((__CHARACTER )(( 0))))) {
-        __tmp__2DQ=TRUE__;
+      if ((result__CP5G == ((__CHARACTER )(( 0))))) {
+        __tmp__IHQ=TRUE__;
       } else {
-        result__OI5G='\0';
+        result__LP5G='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__OI5G=((__CHARACTER )(( 0)));
+          result__LP5G=((__CHARACTER )(( 0)));
         } else {
-          result__OI5G=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+          result__LP5G=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
         };
-        __tmp__2DQ=(result__OI5G == '\n');
+        __tmp__IHQ=(result__LP5G == '\n');
       };
-      if (__tmp__2DQ) {
-        __tmp__3DQ=TRUE__;
+      if (__tmp__IHQ) {
+        __tmp__JHQ=TRUE__;
       } else {
-        result__TI5G='\0';
+        result__QP5G='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__TI5G=((__CHARACTER )(( 0)));
+          result__QP5G=((__CHARACTER )(( 0)));
         } else {
-          result__TI5G=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+          result__QP5G=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
         };
-        __tmp__3DQ=(result__TI5G == '\"');
+        __tmp__JHQ=(result__QP5G == '\"');
       };
-      if ((! __tmp__3DQ)) {
-        result__YI5G='\0';
+      if ((! __tmp__JHQ)) {
+        result__VP5G='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__YI5G=((__CHARACTER )(( 0)));
+          result__VP5G=((__CHARACTER )(( 0)));
         } else {
-          result__YI5G=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+          result__VP5G=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
         };
-        add_last__3IT(string_tmp__VH,result__YI5G);
-        result__3I5G='\0';
+        add_last__GOT(string_tmp__VH,result__VP5G);
+        result__0P5G='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__3I5G=((__CHARACTER )(( 0)));
+          result__0P5G=((__CHARACTER )(( 0)));
         } else {
-          result__3I5G=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+          result__0P5G=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__3I5G == '\\')) {
+        if ((result__0P5G == '\\')) {
           position__CCC=(__INTEGER)(position__CCC +  1);
-          read_escape_character__AZKF();
+          read_escape_character__G4KF();
         } else {
           position__CCC=(__INTEGER)(position__CCC +  1);
         };
-        goto until_do__IKRC;
+        goto until_do__WNRC;
       };
     };
-    result__CJ5G='\0';
+    result__5P5G='\0';
     if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-      result__CJ5G=((__CHARACTER )(( 0)));
+      result__5P5G=((__CHARACTER )(( 0)));
     } else {
-      result__CJ5G=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+      result__5P5G=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
     };
-    if ((result__CJ5G == '\"')) {
+    if ((result__5P5G == '\"')) {
       position__CCC=(__INTEGER)(position__CCC +  1);
-      last_string__V0C=get__YWB(string_tmp__VH);
-      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)) {
+      last_string__V1C=get__YWB(string_tmp__VH);
+      result__4FQ=TRUE__;
+      short__token__to__YCD((&__string_123),old_pos__5FQ,position__CCC);
+    } else {
+      position__CCC=begin_position__ECE;
+      pos__CQXG=current_position__EZF();
+      put_error__text__NPG( 0,(&__string_251));
+      put_position__XQG(pos__CQXG);
+      put_string__P3F(msg_err__SPG);
+      if ((type_error__RPG !=  2)) {
         exit(( 1));
       };
     };
   };
-  return(result__SCQ);
+  return(result__4FQ);
 }
 
-static void reduce_path__ZI3E(void *st__1I3E)
+static void reduce_path__VN3E(void *st__XN3E)
 // ({NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER stat__ZN3E,__tmp__FDIH,Self__HDIH,i__YN3E,Self__PU1F;
+  __INTEGER n__HEGH,len__NDIH,__tmp__ODIH,__tmp__QDIH,Self__RDIH;
+  __INTEGER len__WDIH,__tmp__XDIH,__tmp__ZDIH,Self__0DIH,result__4DIH;
+  __INTEGER n__JEGH,len__DEIH,__tmp__EEIH,__tmp__GEIH,Self__HEIH;
+  __INTEGER end__KEIH,len__MEIH,__tmp__NEIH,__tmp__PEIH,Self__QEIH;
+  __INTEGER Self__KREG,n__LEGH,len__VEIH,__tmp__WEIH,__tmp__YEIH;
+  __INTEGER Self__ZEIH,result__ZPGD,end__2EIH,len__4EIH,__tmp__5EIH;
+  __INTEGER __tmp__BFIH,Self__CFIH;
+  __STRING *Self__DDIH,*Self__GEGH,*Self__YDIH,*Self__5DIH,*Self__IEGH;
+  __STRING *Self__OEIH,*Self__KEGH,*Self__MEGH,*Self__OEGH,*Self__VPGD;
+  __STRING *Self__AFIH;
+  __CHARACTER car__0N3E,Self__4C3E;
+  __CHARACTER *__tmp__EDIH,*Self__GDIH;
+  __BOOLEAN __tmp__BQ3E,__tmp__GR3E,result__54XF,result__AD3E;
+  __BOOLEAN __tmp__KD3E,__tmp__HS3E;
+  stat__ZN3E= 0;
+  car__0N3E='\0';
+  Self__DDIH=((__STRING *)st__XN3E);
+  __tmp__EDIH=Self__DDIH->storage__RCS;
+  __tmp__FDIH=(__INTEGER)(Self__DDIH->count__EGC -  1);
+  Self__GDIH=((__CHARACTER *)__tmp__EDIH);
+  Self__HDIH=__tmp__FDIH;
+  while ((Self__HDIH >=  0)) {
+    if (('\\' == Self__GDIH[Self__HDIH])) {
+      Self__GDIH[Self__HDIH]='/';
+    };
+    Self__HDIH=(__INTEGER)(Self__HDIH -  1);
+  };
+  i__YN3E= 1;
+  while ((i__YN3E <= ((__STRING *)st__XN3E)->count__EGC)) {
+    car__0N3E=((__CHARACTER *)((__STRING *)st__XN3E)->storage__RCS)[(__INTEGER)(i__YN3E -  1)];
+    if ((car__0N3E == '/')) {
+      Self__PU1F=stat__ZN3E;
+      if ((stat__ZN3E ==  0)) {
+        stat__ZN3E= 1;
+      };
+      if ((Self__PU1F ==  1)) {
+        Self__GEGH=((__STRING *)st__XN3E);
+        n__HEGH=(__INTEGER)(i__YN3E -  1);
+        if ((n__HEGH > Self__GEGH->count__EGC)) {
+          Self__GEGH->count__EGC= 0;
+        } else {
+          if ((n__HEGH >  0)) {
+            len__NDIH=(__INTEGER)((__INTEGER)(n__HEGH -  1) +  1);
+            if ((len__NDIH >  0)) {
+              __tmp__ODIH=(__INTEGER)(n__HEGH +  1);
+              __tmp__QDIH=Self__GEGH->count__EGC;
+              Self__RDIH=__tmp__ODIH;
+              while ((Self__RDIH <= __tmp__QDIH)) {
+                ((__CHARACTER *)Self__GEGH->storage__RCS)[(__INTEGER)((__INTEGER)(Self__RDIH - len__NDIH) -  1)]=((__CHARACTER *)Self__GEGH->storage__RCS)[(__INTEGER)(Self__RDIH -  1)];
+                Self__RDIH=(__INTEGER)(Self__RDIH +  1);
+              };
+              Self__GEGH->count__EGC=(__INTEGER)(Self__GEGH->count__EGC - len__NDIH);
+            };
+          };
+        };
+        i__YN3E= 1;
+      };
+      if ((Self__PU1F ==  2)) {
+        Self__YDIH=((__STRING *)st__XN3E);
+        len__WDIH=(__INTEGER)((__INTEGER)(i__YN3E - (__INTEGER)(i__YN3E -  1)) +  1);
+        if ((len__WDIH >  0)) {
+          __tmp__XDIH=(__INTEGER)(i__YN3E +  1);
+          __tmp__ZDIH=Self__YDIH->count__EGC;
+          Self__0DIH=__tmp__XDIH;
+          while ((Self__0DIH <= __tmp__ZDIH)) {
+            ((__CHARACTER *)Self__YDIH->storage__RCS)[(__INTEGER)((__INTEGER)(Self__0DIH - len__WDIH) -  1)]=((__CHARACTER *)Self__YDIH->storage__RCS)[(__INTEGER)(Self__0DIH -  1)];
+            Self__0DIH=(__INTEGER)(Self__0DIH +  1);
+          };
+          Self__YDIH->count__EGC=(__INTEGER)(Self__YDIH->count__EGC - len__WDIH);
+        };
+        i__YN3E=(__INTEGER)(i__YN3E -  2);
+        stat__ZN3E= 1;
+      };
+      if ((Self__PU1F ==  3)) {
+        Self__5DIH=((__STRING *)st__XN3E);
+        result__4DIH=(__INTEGER)(i__YN3E -  4);
+        while ((! ((result__4DIH <  1) || ('/' == ((__CHARACTER *)Self__5DIH->storage__RCS)[(__INTEGER)(result__4DIH -  1)])))) {
+          result__4DIH=(__INTEGER)(result__4DIH -  1);
+        };
+        if ((result__4DIH ==  0)) {
+          Self__IEGH=((__STRING *)st__XN3E);
+          n__JEGH=(__INTEGER)(i__YN3E -  1);
+          if ((n__JEGH > Self__IEGH->count__EGC)) {
+            Self__IEGH->count__EGC= 0;
+          } else {
+            if ((n__JEGH >  0)) {
+              len__DEIH=(__INTEGER)((__INTEGER)(n__JEGH -  1) +  1);
+              if ((len__DEIH >  0)) {
+                __tmp__EEIH=(__INTEGER)(n__JEGH +  1);
+                __tmp__GEIH=Self__IEGH->count__EGC;
+                Self__HEIH=__tmp__EEIH;
+                while ((Self__HEIH <= __tmp__GEIH)) {
+                  ((__CHARACTER *)Self__IEGH->storage__RCS)[(__INTEGER)((__INTEGER)(Self__HEIH - len__DEIH) -  1)]=((__CHARACTER *)Self__IEGH->storage__RCS)[(__INTEGER)(Self__HEIH -  1)];
+                  Self__HEIH=(__INTEGER)(Self__HEIH +  1);
                 };
-                Self__K3FH->count__EGC=(__INTEGER)(Self__K3FH->count__EGC - len__U2HH);
+                Self__IEGH->count__EGC=(__INTEGER)(Self__IEGH->count__EGC - len__DEIH);
               };
             };
           };
-          i__2I3E= 1;
+          i__YN3E= 1;
         } else {
-          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__OEIH=((__STRING *)st__XN3E);
+          end__KEIH=(__INTEGER)(i__YN3E -  1);
+          len__MEIH=(__INTEGER)((__INTEGER)(end__KEIH - result__4DIH) +  1);
+          if ((len__MEIH >  0)) {
+            __tmp__NEIH=(__INTEGER)(end__KEIH +  1);
+            __tmp__PEIH=Self__OEIH->count__EGC;
+            Self__QEIH=__tmp__NEIH;
+            while ((Self__QEIH <= __tmp__PEIH)) {
+              ((__CHARACTER *)Self__OEIH->storage__RCS)[(__INTEGER)((__INTEGER)(Self__QEIH - len__MEIH) -  1)]=((__CHARACTER *)Self__OEIH->storage__RCS)[(__INTEGER)(Self__QEIH -  1)];
+              Self__QEIH=(__INTEGER)(Self__QEIH +  1);
             };
-            Self__42HH->count__EGC=(__INTEGER)(Self__42HH->count__EGC - len__22HH);
+            Self__OEIH->count__EGC=(__INTEGER)(Self__OEIH->count__EGC - len__MEIH);
           };
-          i__2I3E=result__P2HH;
+          i__YN3E=result__4DIH;
         };
-        stat__3I3E= 1;
+        stat__ZN3E= 1;
       };
-      __tmp__FL3E=TRUE__;
+      __tmp__BQ3E=TRUE__;
     } else {
-      __tmp__FL3E=FALSE__;
+      __tmp__BQ3E=FALSE__;
     };
-    if (__tmp__FL3E) {
-      __tmp__KM3E=TRUE__;
+    if (__tmp__BQ3E) {
+      __tmp__GR3E=TRUE__;
     } else {
-      result__YZXF=(car__4I3E == '.');
-      if (result__YZXF) {
-        Self__DMEG=stat__3I3E;
-        if ((stat__3I3E ==  1)) {
-          stat__3I3E= 2;
+      result__54XF=(car__0N3E == '.');
+      if (result__54XF) {
+        Self__KREG=stat__ZN3E;
+        if ((stat__ZN3E ==  1)) {
+          stat__ZN3E= 2;
         };
-        if ((Self__DMEG ==  2)) {
-          stat__3I3E= 3;
+        if ((Self__KREG ==  2)) {
+          stat__ZN3E= 3;
         };
-        if ((Self__DMEG ==  3)) {
-          stat__3I3E= 0;
+        if ((Self__KREG ==  3)) {
+          stat__ZN3E= 0;
         };
       };
-      __tmp__KM3E=result__YZXF;
+      __tmp__GR3E=result__54XF;
     };
-    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__;
+    if ((! __tmp__GR3E)) {
+      if (((car__0N3E == ':') && (i__YN3E >  2))) {
+        Self__4C3E=((__CHARACTER *)((__STRING *)st__XN3E)->storage__RCS)[(__INTEGER)((__INTEGER)(i__YN3E -  1) -  1)];
+        result__AD3E=FALSE__;
+        if ((((__INTEGER_8 )Self__4C3E) >= ((__INTEGER_8 )'a'))) {
+          result__AD3E=(((__INTEGER_8 )Self__4C3E) <= ((__INTEGER_8 )'z'));
+          __tmp__KD3E=TRUE__;
         } else {
-          __tmp__O42E=FALSE__;
+          __tmp__KD3E=FALSE__;
         };
-        if ((! __tmp__O42E)) {
-          if ((((__INTEGER_8 )Self__C42E) >= ((__INTEGER_8 )'A'))) {
-            result__E42E=(((__INTEGER_8 )Self__C42E) <= ((__INTEGER_8 )'Z'));
+        if ((! __tmp__KD3E)) {
+          if ((((__INTEGER_8 )Self__4C3E) >= ((__INTEGER_8 )'A'))) {
+            result__AD3E=(((__INTEGER_8 )Self__4C3E) <= ((__INTEGER_8 )'Z'));
           };
         };
-        __tmp__LN3E=result__E42E;
+        __tmp__HS3E=result__AD3E;
       } else {
-        __tmp__LN3E=FALSE__;
+        __tmp__HS3E=FALSE__;
       };
-      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;
+      if ((__tmp__HS3E && (((__CHARACTER *)((__STRING *)st__XN3E)->storage__RCS)[(__INTEGER)((__INTEGER)(i__YN3E -  2) -  1)] == '/'))) {
+        Self__KEGH=((__STRING *)st__XN3E);
+        n__LEGH=(__INTEGER)(i__YN3E -  2);
+        if ((n__LEGH > Self__KEGH->count__EGC)) {
+          Self__KEGH->count__EGC= 0;
         } else {
-          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);
+          if ((n__LEGH >  0)) {
+            len__VEIH=(__INTEGER)((__INTEGER)(n__LEGH -  1) +  1);
+            if ((len__VEIH >  0)) {
+              __tmp__WEIH=(__INTEGER)(n__LEGH +  1);
+              __tmp__YEIH=Self__KEGH->count__EGC;
+              Self__ZEIH=__tmp__WEIH;
+              while ((Self__ZEIH <= __tmp__YEIH)) {
+                ((__CHARACTER *)Self__KEGH->storage__RCS)[(__INTEGER)((__INTEGER)(Self__ZEIH - len__VEIH) -  1)]=((__CHARACTER *)Self__KEGH->storage__RCS)[(__INTEGER)(Self__ZEIH -  1)];
+                Self__ZEIH=(__INTEGER)(Self__ZEIH +  1);
               };
-              Self__M3FH->count__EGC=(__INTEGER)(Self__M3FH->count__EGC - len__E3HH);
+              Self__KEGH->count__EGC=(__INTEGER)(Self__KEGH->count__EGC - len__VEIH);
             };
           };
         };
-        i__2I3E= 1;
+        i__YN3E= 1;
       } else {
-        stat__3I3E= 0;
+        stat__ZN3E= 0;
       };
     };
-    i__2I3E=(__INTEGER)(i__2I3E +  1);
+    i__YN3E=(__INTEGER)(i__YN3E +  1);
   };
-  if ((stat__3I3E ==  1)) {
-    Self__O3FH=((__STRING *)st__1I3E);
-    if (( 1 > Self__O3FH->count__EGC)) {
-      Self__O3FH->count__EGC= 0;
+  if ((stat__ZN3E ==  1)) {
+    Self__MEGH=((__STRING *)st__XN3E);
+    if (( 1 > Self__MEGH->count__EGC)) {
+      Self__MEGH->count__EGC= 0;
     } else {
-      Self__O3FH->count__EGC=(__INTEGER)(Self__O3FH->count__EGC -  1);
+      Self__MEGH->count__EGC=(__INTEGER)(Self__MEGH->count__EGC -  1);
     };
   };
-  if ((stat__3I3E ==  2)) {
-    Self__Q3FH=((__STRING *)st__1I3E);
-    if (( 2 > Self__Q3FH->count__EGC)) {
-      Self__Q3FH->count__EGC= 0;
+  if ((stat__ZN3E ==  2)) {
+    Self__OEGH=((__STRING *)st__XN3E);
+    if (( 2 > Self__OEGH->count__EGC)) {
+      Self__OEGH->count__EGC= 0;
     } else {
-      Self__Q3FH->count__EGC=(__INTEGER)(Self__Q3FH->count__EGC -  2);
+      Self__OEGH->count__EGC=(__INTEGER)(Self__OEGH->count__EGC -  2);
     };
   };
-  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 ((stat__ZN3E ==  3)) {
+    Self__VPGD=((__STRING *)st__XN3E);
+    result__ZPGD=(__INTEGER)(i__YN3E -  4);
+    while ((! ((result__ZPGD <  1) || ('/' == ((__CHARACTER *)Self__VPGD->storage__RCS)[(__INTEGER)(result__ZPGD -  1)])))) {
+      result__ZPGD=(__INTEGER)(result__ZPGD -  1);
     };
-    if ((result__LMGD ==  0)) {
-      ((__STRING *)st__1I3E)->count__EGC= 0;
+    if ((result__ZPGD ==  0)) {
+      ((__STRING *)st__XN3E)->count__EGC= 0;
     } else {
-      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__AFIH=((__STRING *)st__XN3E);
+      end__2EIH=(__INTEGER)(i__YN3E -  1);
+      len__4EIH=(__INTEGER)((__INTEGER)(end__2EIH - result__ZPGD) +  1);
+      if ((len__4EIH >  0)) {
+        __tmp__5EIH=(__INTEGER)(end__2EIH +  1);
+        __tmp__BFIH=Self__AFIH->count__EGC;
+        Self__CFIH=__tmp__5EIH;
+        while ((Self__CFIH <= __tmp__BFIH)) {
+          ((__CHARACTER *)Self__AFIH->storage__RCS)[(__INTEGER)((__INTEGER)(Self__CFIH - len__4EIH) -  1)]=((__CHARACTER *)Self__AFIH->storage__RCS)[(__INTEGER)(Self__CFIH -  1)];
+          Self__CFIH=(__INTEGER)(Self__CFIH +  1);
         };
-        Self__O3HH->count__EGC=(__INTEGER)(Self__O3HH->count__EGC - len__M3HH);
+        Self__AFIH->count__EGC=(__INTEGER)(Self__AFIH->count__EGC - len__4EIH);
       };
     };
   };
-  if ((((__STRING *)st__1I3E)->count__EGC ==  0)) {
-    add_last__3IT(st__1I3E,'/');
+  if ((((__STRING *)st__XN3E)->count__EGC ==  0)) {
+    add_last__GOT(st__XN3E,'/');
   };
 }
 
-static void* item__NYPE(__DIRECTORY_UNIX *Self__OYPE,__INTEGER i__PYPE)
+static void* item__A3PE(__DIRECTORY_UNIX *Self__B3PE,__INTEGER i__C3PE)
 // ({DIRECTORY_UNIX},{INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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;
+  __LINKED_LISToENTRYo *Self__24WE;
+  Self__24WE=((__LINKED_LISToENTRYo *)Self__B3PE->parent_directory__HGD.list__CHRD);
+  if ((i__C3PE != Self__24WE->mem_idx__2LWE)) {
+    if ((Self__24WE->mem_idx__2LWE > i__C3PE)) {
+      Self__24WE->mem_idx__2LWE= 1;
+      Self__24WE->mem_lnk__3LWE=Self__24WE->first_link__VLWE;
     };
-    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);
+    while ((i__C3PE != Self__24WE->mem_idx__2LWE)) {
+      Self__24WE->mem_lnk__3LWE=((__LINKED_LIST_NODEoENTRYo *)Self__24WE->mem_lnk__3LWE)->next__V1FF;
+      Self__24WE->mem_idx__2LWE=(__INTEGER)(Self__24WE->mem_idx__2LWE +  1);
     };
   };
-  return(((__LINKED_LIST_NODEoENTRYo *)Self__A0WE->mem_lnk__JHWE)->item__T0WE);
+  return(((__LINKED_LIST_NODEoENTRYo *)Self__24WE->mem_lnk__3LWE)->item__P5WE);
 }
 
-static void* item__CZND(__LINKED_LISToSTRING_CONSTANTo *Self__DZND,__INTEGER i__EZND)
+static void* item__Q2ND(__LINKED_LISToSTRING_CONSTANTo *Self__R2ND,__INTEGER i__S2ND)
 // ({LINKED_LISToSTRING_CONSTANTo},{INTEGER}) With resultNo recursive, No inlinable.
 {
-  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;
+  if ((i__S2ND != Self__R2ND->mem_idx__HXEC)) {
+    if ((Self__R2ND->mem_idx__HXEC > i__S2ND)) {
+      Self__R2ND->mem_idx__HXEC= 1;
+      Self__R2ND->mem_lnk__JXEC=Self__R2ND->first_link__3WEC;
     };
-    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);
+    while ((i__S2ND != Self__R2ND->mem_idx__HXEC)) {
+      Self__R2ND->mem_lnk__JXEC=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)Self__R2ND->mem_lnk__JXEC)->next__CQOD;
+      Self__R2ND->mem_idx__HXEC=(__INTEGER)(Self__R2ND->mem_idx__HXEC +  1);
     };
   };
-  return(((__LINKED_LIST_NODEoSTRING_CONSTANTo *)Self__DZND->mem_lnk__1TEC)->item__HXHD);
+  return(((__LINKED_LIST_NODEoSTRING_CONSTANTo *)Self__R2ND->mem_lnk__JXEC)->item__V0HD);
 }
 
-static void** create__PZ3(__INTEGER nb_elements__RZ3)
+static void** create__123(__INTEGER nb_elements__323)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__OIEH,a__TIEH,new_size__PIEH,new_size2__QIEH,a__0EGH;
+  __UINTEGER_32 new_size__1EGH;
+  __POINTER result__NIEH,ptr_table__KIJH,next__JIJH,result__LIJH;
+  void *result__OIJH;
+  __INTEGER Self__K3JC;
+  void **Result__HVEB;
+  sz__OIEH=((__UINTEGER_32 )(__INTEGER)(nb_elements__323 * ((__INTEGER )(sizeof(void *)))));
+  result__NIEH=((__POINTER )(NULL));
+  a__TIEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__PIEH=(__UINTEGER_32)((__UINTEGER_32)(sz__OIEH + a__TIEH) & (__UINTEGER_32)(~ a__TIEH));
+  new_size2__QIEH=(__UINTEGER_32)(new_size__PIEH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__QIEH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__0EGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__1EGH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__QIEH + a__0EGH) & (__UINTEGER_32)(~ a__0EGH));
+    ptr_table__KIJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__1EGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__JIJH=((__POINTER )(NULL));
+    result__LIJH=((__POINTER *)ptr_table__KIJH)[ 0];
+    if ((result__LIJH == (void *)NULL)) {
+      result__LIJH=new_lab__FTJ(new_size__1EGH);
+      next__JIJH=(void *)((unsigned long)result__LIJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1EGH)));
+      ((__POINTER *)next__JIJH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__KIJH)[ 0]=next__JIJH;
+    } else {
+      next__JIJH=((__POINTER *)result__LIJH)[ 0];
+      if ((next__JIJH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LIJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__1EGH <<  1)) <=  4096)) {
+          next__JIJH=(void *)((unsigned long)result__LIJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1EGH)));
+        } else {
+          next__JIJH=new_lab__FTJ(new_size__1EGH);
+        };
+        ((__POINTER *)next__JIJH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__KIJH)[ 0]=next__JIJH;
+      } else {
+        ((__POINTER *)result__LIJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JIJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__LIJH=next__JIJH;
+      };
+    };
+    ((__POINTER *)result__LIJH)[ 0]=((__POINTER ) 3);
+    result__NIEH=(void *)((unsigned long)result__LIJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__OIJH=first_free__NFVB;
+    while ((((void *)result__OIJH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__OIJH)->map_size_and_id__YTB &  4294967292LU) < new_size__PIEH))) {
+      result__OIJH=((__MEMORY *)result__OIJH)->map_next_free__ZTB;
     };
-    if (((void *)result__PAJH == (void *)NULL)) {
-      result__PAJH=new_page__K34();
+    if (((void *)result__OIJH == (void *)NULL)) {
+      result__OIJH=new_page__YC5();
     };
-    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)));
+    to_busy__index__MWFC(result__OIJH,new_size__PIEH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__OIJH)) - (unsigned long)begin_memory__SXH)))) >>  26));
+    result__NIEH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__OIJH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__HVEB=((void **)result__NIEH);
+  Self__K3JC=(__INTEGER)(nb_elements__323 -  1);
+  while ((Self__K3JC >=  0)) {
+    Result__HVEB[Self__K3JC]=NULL;
+    Self__K3JC=(__INTEGER)(Self__K3JC -  1);
   };
-  return(Result__1REB);
+  return(Result__HVEB);
 }
 
-static __BOOLEAN read_word__HOF(void *st__JOF)
+static __BOOLEAN read_word__LRF(void *st__NRF)
 // ({STRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __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__NOF=FALSE__;
+  __INTEGER posold__PRF,idx__QRF;
+  __BOOLEAN result__RRF,__tmp__PSF;
+  __CHARACTER result__XVAH;
+  posold__PRF= 0;
+  idx__QRF= 0;
+  result__RRF=FALSE__;
+  if ((! read_space__MTD())) {
+    result__RRF=FALSE__;
   } else {
-    posold__LOF=position__CCC;
-    idx__MOF= 1;
-    until_do__F33:
+    posold__PRF=position__CCC;
+    idx__QRF= 1;
+    until_do__TC4:
     {
-      if ((idx__MOF > ((__STRING_CONSTANT *)st__JOF)->count__DD)) {
-        __tmp__LPF=TRUE__;
+      if ((idx__QRF > ((__STRING_CONSTANT *)st__NRF)->count__DD)) {
+        __tmp__PSF=TRUE__;
       } else {
-        result__DPAH='\0';
+        result__XVAH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__DPAH=((__CHARACTER )(( 0)));
+          result__XVAH=((__CHARACTER )(( 0)));
         } else {
-          result__DPAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+          result__XVAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
         };
-        __tmp__LPF=(result__DPAH != ((__CHARACTER *)((__STRING_CONSTANT *)st__JOF)->storage__ZNO)[(__INTEGER)(idx__MOF -  1)]);
+        __tmp__PSF=(result__XVAH != ((__CHARACTER *)((__STRING_CONSTANT *)st__NRF)->storage__FRO)[(__INTEGER)(idx__QRF -  1)]);
       };
-      if ((! __tmp__LPF)) {
+      if ((! __tmp__PSF)) {
         position__CCC=(__INTEGER)(position__CCC +  1);
-        idx__MOF=(__INTEGER)(idx__MOF +  1);
-        goto until_do__F33;
+        idx__QRF=(__INTEGER)(idx__QRF +  1);
+        goto until_do__TC4;
       };
     };
-    if ((idx__MOF > ((__STRING_CONSTANT *)st__JOF)->count__DD)) {
-      last_string__V0C=st__JOF;
-      result__NOF=TRUE__;
+    if ((idx__QRF > ((__STRING_CONSTANT *)st__NRF)->count__DD)) {
+      last_string__V1C=st__NRF;
+      result__RRF=TRUE__;
     } else {
-      position__CCC=posold__LOF;
+      position__CCC=posold__PRF;
     };
   };
-  return(result__NOF);
+  return(result__RRF);
 }
 
-static __BOOLEAN read_slot_header__JBE(__BOOLEAN first__LBE)
+static __BOOLEAN read_slot_header__NEE(__BOOLEAN first__PEE)
 // ({TRUExFALSE}) With resultNo recursive, No inlinable.
 {
-  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)) {
+  void *v__TEE;
+  void *instr__1EE;
+  __POSITION pos__TXXG,pos__VXXG,pos__XXXG,pos__ZXXG,pos__1XXG;
+  __POSITION pos__3XXG,pos__5XXG,pos__MB2G,pos__BYXG,pos__DYXG;
+  __POSITION pos__FYXG,pos__HYXG,pos__OB2G,pos__JYXG,pos__LYXG;
+  __POSITION pos__NYXG,pos__PYXG,pos__RYXG,pos__TYXG,pos__VYXG;
+  __POSITION pos__XYXG,pos__ZYXG,pos__1YXG,pos__3YXG,pos__QB2G;
+  __POSITION pos__5YXG,pos__BZXG,pos__VJM,pos__DZXG,pos__FZXG,pos__HZXG;
+  __POSITION pos__JZXG,__tmp__PEQD,__tmp__UEQD,__tmp__SB2G,pos__LZXG;
+  __POSITION pos__NZXG,pos__PZXG,pos__RZXG,pos__TZXG,pos__VZXG;
+  void *res__XJE,*__tmp__ZLE;
+  __INTEGER __tmp__QLE,__tmp__SLE,__tmp__ULE,typ_id__HFIH,typ_id__RFIH;
+  void *n__5EGH,*n__1QGB;
+  void *result__AFGH,*result__DRGB;
+  __ITM_TYPE_PARAMETER *result__FFIH,*Self__NFIH,*result__PFIH;
+  __ITM_TYPE_PARAMETER *Self__XFIH;
+  __POINTER ptr__GFIH,ptr_table__2IJH,next__1IJH,result__3IJH;
+  __POINTER ptr_table__BJJH,next__AJJH,result__CJJH,ptr__QFIH;
+  __POINTER ptr_table__MJJH,next__LJJH,result__NJJH,ptr_table__RJJH;
+  __POINTER next__QJJH,result__SJJH;
+  __UINTEGER_32 sz__IFIH,a__JFIH,new_size__KFIH,t__LFIH,a__MFIH;
+  __UINTEGER_32 new_size__EJJH,lab_type__DJJH,sz__SFIH,a__TFIH;
+  __UINTEGER_32 new_size__UFIH,t__VFIH,a__WFIH,new_size__UJJH;
+  __UINTEGER_32 lab_type__TJJH;
+  __BOOLEAN result__REE,result__SIJH,__tmp__BIE,result__UIJH;
+  __BOOLEAN result__VIJH,__tmp__ZJE,result__YIJH,__tmp__JKE,__tmp__XKE;
+  __BOOLEAN result__0TL,__tmp__FLE,result__FJJH,result__IJJH;
+  __BOOLEAN result__VJJH,__tmp__EQE,__tmp__KSE,__tmp__WQE,__tmp__AUE;
+  __BOOLEAN result__DBH,__tmp__2VE,result__VBH,__tmp__YXE,result__HCH;
+  __BOOLEAN __tmp__FZE,result__ZCH,__tmp__L1E,result__LDH,result__YJJH;
+  __BOOLEAN result__1JJH,result__4JJH,result__BKJH;
+  __CHARACTER style__VEE,result__WIJH,result__ZIJH,result__GJJH;
+  __CHARACTER result__JJJH,result__WJJH,result__ZJJH,result__2JJH;
+  __CHARACTER result__5JJH,result__CKJH;
+  result__REE=FALSE__;
+  v__TEE=NULL;
+  instr__1EE=NULL;
+  style__VEE=read_style__STF();
+  if ((style__VEE != ' ')) {
+    result__REE=TRUE__;
+    if (((! first__PEE) && (style__VEE == '+'))) {
+      pos__TXXG=current_position__EZF();
+      put_error__text__NPG( 2,(&__string_252));
+      put_position__XQG(pos__TXXG);
+      put_string__P3F(msg_err__SPG);
+      if ((type_error__RPG !=  2)) {
         exit(( 1));
       };
     };
-    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__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)) {
+    if (first__PEE) {
+      if (read_word__LRF((&__string_62))) {
+        if ((style__VEE == '-')) {
+          append__ROS(output_decl__YGE,(&__string_253));
+        };
+        short__token__to__YCD((&__string_130),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V1C)->count__DD),position__CCC);
+        ((__PROTOTYPE *)object__ZBC)->parent_named__5.parent_itm_object__4.position__GFJ=current_position__EZF();
+        ((__PROTOTYPE *)object__ZBC)->parent_named__5.style__OGU=style__VEE;
+        if ((! read_symbol__SYJ((&__string_12)))) {
+          pos__VXXG=current_position__EZF();
+          put_error__text__NPG( 2,(&__string_254));
+          put_position__XQG(pos__VXXG);
+          put_string__P3F(msg_err__SPG);
+          if ((type_error__RPG !=  2)) {
             exit(( 1));
           };
         };
-        result__TAJH=read_word__HOF((&__string_9));
+        result__SIJH=read_word__LRF((&__string_9));
         if (is_shorter__LZ) {
-          if (result__TAJH) {
+          if (result__SIJH) {
             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);
+              short__token__to__YCD((&__string_120),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V1C)->count__DD),position__CCC);
             } else {
-              short__token__to__YBD((&__string_119),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD),position__CCC);
+              short__token__to__YCD((&__string_119),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V1C)->count__DD),position__CCC);
             };
           };
         };
-        if (result__TAJH) {
-          __tmp__3EE=TRUE__;
+        if (result__SIJH) {
+          __tmp__BIE=TRUE__;
         } else {
-          result__VAJH=read_word__HOF((&__string_10));
+          result__UIJH=read_word__LRF((&__string_10));
           if (is_shorter__LZ) {
-            if (result__VAJH) {
+            if (result__UIJH) {
               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);
+                short__token__to__YCD((&__string_120),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V1C)->count__DD),position__CCC);
               } else {
-                short__token__to__YBD((&__string_119),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD),position__CCC);
+                short__token__to__YCD((&__string_119),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V1C)->count__DD),position__CCC);
               };
             };
           };
-          __tmp__3EE=result__VAJH;
+          __tmp__BIE=result__UIJH;
         };
-        if (__tmp__3EE) {
-          ((__PROTOTYPE *)object__ZBC)->type_style__E3C=last_string__V0C;
+        if (__tmp__BIE) {
+          ((__PROTOTYPE *)object__ZBC)->type_style__E4C=last_string__V1C;
         };
-        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)) {
+        if ((! read_cap_identifier__B1J())) {
+          pos__XXXG=current_position__EZF();
+          put_error__text__NPG( 0,(&__string_255));
+          put_position__XQG(pos__XXXG);
+          put_string__P3F(msg_err__SPG);
+          if ((type_error__RPG !=  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__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)) {
+        short__token__to__YCD((&__string_125),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V1C)->count__DD),position__CCC);
+        if (((void *)((__PROTOTYPE *)object__ZBC)->shortname__AJE != (void *)last_string__V1C)) {
+          pos__ZXXG=current_position__EZF();
+          put_error__text__NPG( 0,(&__string_256));
+          put_position__XQG(pos__ZXXG);
+          put_string__P3F(msg_err__SPG);
+          if ((type_error__RPG !=  2)) {
             exit(( 1));
           };
         };
-        result__WAJH=FALSE__;
-        if ((! read_space__KSD())) {
-          result__WAJH=FALSE__;
+        result__VIJH=FALSE__;
+        if ((! read_space__MTD())) {
+          result__VIJH=FALSE__;
         } else {
-          result__XAJH='\0';
+          result__WIJH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__XAJH=((__CHARACTER )(( 0)));
+            result__WIJH=((__CHARACTER )(( 0)));
           } else {
-            result__XAJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+            result__WIJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__XAJH == '(')) {
+          if ((result__WIJH == '(')) {
             position__CCC=(__INTEGER)(position__CCC +  1);
-            result__WAJH=TRUE__;
+            result__VIJH=TRUE__;
           };
         };
-        if (result__WAJH) {
+        if (result__VIJH) {
           if (((! is_shorter__LZ) && (! is_shorter2__VI))) {
-            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)) {
+            pos__1XXG=current_position__EZF();
+            put_error__text__NPG( 0,(&__string_257));
+            put_position__XQG(pos__1XXG);
+            put_string__P3F(msg_err__SPG);
+            if ((type_error__RPG !=  2)) {
               exit(( 1));
             };
           };
-          res__TGE=NULL;
-          __tmp__VGE=read_identifier__E4K();
-          if (__tmp__VGE) {
-            result__ZAJH=FALSE__;
-            if ((! read_space__KSD())) {
-              result__ZAJH=FALSE__;
+          res__XJE=NULL;
+          __tmp__ZJE=read_identifier__QBL();
+          if (__tmp__ZJE) {
+            result__YIJH=FALSE__;
+            if ((! read_space__MTD())) {
+              result__YIJH=FALSE__;
             } else {
-              result__0AJH='\0';
+              result__ZIJH='\0';
               if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                result__0AJH=((__CHARACTER )(( 0)));
+                result__ZIJH=((__CHARACTER )(( 0)));
               } else {
-                result__0AJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+                result__ZIJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
               };
-              if ((result__0AJH == ':')) {
+              if ((result__ZIJH == ':')) {
                 position__CCC=(__INTEGER)(position__CCC +  1);
-                result__ZAJH=TRUE__;
+                result__YIJH=TRUE__;
               };
             };
-            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)) {
+            if ((! result__YIJH)) {
+              pos__3XXG=current_position__EZF();
+              put_error__text__NPG( 2,(&__string_258));
+              put_position__XQG(pos__3XXG);
+              put_string__P3F(msg_err__SPG);
+              if ((type_error__RPG !=  2)) {
                 exit(( 1));
               };
             };
-            __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)) {
+            __tmp__JKE=((void *)read_type__WCM(PARSER__,TRUE__) == (void *)NULL);
+            if (__tmp__JKE) {
+              pos__5XXG=current_position__EZF();
+              put_error__text__NPG( 0,(&__string_259));
+              put_position__XQG(pos__5XXG);
+              put_string__P3F(msg_err__SPG);
+              if ((type_error__RPG !=  2)) {
                 exit(( 1));
               };
             };
-            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)) {
+            pos__MB2G=current_position__EZF();
+            put_error__text__NPG( 1,(&__string_260));
+            put_position__XQG(pos__MB2G);
+            put_string__P3F(msg_err__SPG);
+            if ((type_error__RPG !=  2)) {
               exit(( 1));
             };
-            __tmp__THE=TRUE__;
+            __tmp__XKE=TRUE__;
           } else {
-            __tmp__THE=FALSE__;
+            __tmp__XKE=FALSE__;
           };
-          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)) {
+          if ((! __tmp__XKE)) {
+            result__0TL=read_cap_identifier__B1J();
+            if (result__0TL) {
+              __tmp__FLE=is_parameter_type__DLE;
+              if ((! __tmp__FLE)) {
+                pos__BYXG=current_position__EZF();
+                put_error__text__NPG( 0,(&__string_261));
+                put_position__XQG(pos__BYXG);
+                put_string__P3F(msg_err__SPG);
+                if ((type_error__RPG !=  2)) {
                   exit(( 1));
                 };
               };
-              __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__;
+              __tmp__QLE=position__CCC;
+              __tmp__SLE=((__STRING_CONSTANT *)last_string__V1C)->count__DD;
+              __tmp__ULE=(__INTEGER)(__tmp__QLE - __tmp__SLE);
+              short__token__to__YCD((&__string_126),__tmp__ULE,position__CCC);
+              n__5EGH=last_string__V1C;
+              result__AFGH=fast_reference_at__F4T(dico__LVI,n__5EGH);
+              if (((void *)result__AFGH == (void *)NULL)) {
+                result__FFIH=NULL;
+                ptr__GFIH=((__POINTER )(NULL));
+                typ_id__HFIH= 0;
+                sz__IFIH=((__UINTEGER_32 )sizeof(__ITM_TYPE_PARAMETER));
+                if ((sz__IFIH ==  0)) {
+                  result__FFIH=ITM_TYPE_PARAMETER__;
                 } else {
-                  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;
+                  typ_id__HFIH=-1;
+                  clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__IFIH);
+                  if ((typ_id__HFIH == (__INTEGER)(-  1))) {
+                    a__JFIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__KFIH=(__UINTEGER_32)((__UINTEGER_32)(sz__IFIH + a__JFIH) & (__UINTEGER_32)(~ a__JFIH));
+                    ptr_table__2IJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__KFIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                    next__1IJH=((__POINTER )(NULL));
+                    result__3IJH=((__POINTER *)ptr_table__2IJH)[ 0];
+                    if ((result__3IJH == (void *)NULL)) {
+                      result__3IJH=new_lab__FTJ(new_size__KFIH);
+                      next__1IJH=(void *)((unsigned long)result__3IJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KFIH)));
+                      ((__POINTER *)next__1IJH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__2IJH)[ 0]=next__1IJH;
                     } 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__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)));
+                      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__SXH)))) &  4095) + (__UINTEGER_32)(new_size__KFIH <<  1)) <=  4096)) {
+                          next__1IJH=(void *)((unsigned long)result__3IJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KFIH)));
                         } else {
-                          next__2AJH=new_lab__ZPJ(new_size__X3HH);
+                          next__1IJH=new_lab__FTJ(new_size__KFIH);
                         };
-                        ((__POINTER *)next__2AJH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__3AJH)[ 0]=next__2AJH;
+                        ((__POINTER *)next__1IJH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__2IJH)[ 0]=next__1IJH;
                       } else {
-                        ((__POINTER *)result__4AJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2AJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__4AJH=next__2AJH;
+                        ((__POINTER *)result__3IJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1IJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__3IJH=next__1IJH;
                       };
                     };
-                    ptr__T3HH=result__4AJH;
+                    ptr__GFIH=result__3IJH;
                   } else {
-                    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;
+                    t__LFIH=((__UINTEGER_32 )typ_id__HFIH);
+                    a__MFIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__EJJH=(__UINTEGER_32)((__UINTEGER_32)(sz__IFIH + a__MFIH) & (__UINTEGER_32)(~ a__MFIH));
+                    ptr_table__BJJH=((__POINTER )(&(table_type[(t__LFIH)])));
+                    lab_type__DJJH=(__UINTEGER_32)(t__LFIH |  1);
+                    next__AJJH=((__POINTER )(NULL));
+                    result__CJJH=((__POINTER *)ptr_table__BJJH)[ 0];
+                    if ((result__CJJH == (void *)NULL)) {
+                      result__CJJH=new_lab__FTJ(lab_type__DJJH);
+                      next__AJJH=(void *)((unsigned long)result__CJJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EJJH)));
+                      ((__POINTER *)next__AJJH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__BJJH)[ 0]=next__AJJH;
                     } 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__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)));
+                      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__SXH)))) &  4095) + (__UINTEGER_32)(new_size__EJJH <<  1)) <=  4096)) {
+                          next__AJJH=(void *)((unsigned long)result__CJJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EJJH)));
                         } else {
-                          next__BBJH=new_lab__ZPJ(lab_type__EBJH);
+                          next__AJJH=new_lab__FTJ(lab_type__DJJH);
                         };
-                        ((__POINTER *)next__BBJH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__CBJH)[ 0]=next__BBJH;
+                        ((__POINTER *)next__AJJH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__BJJH)[ 0]=next__AJJH;
                       } else {
-                        ((__POINTER *)result__DBJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BBJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__DBJH=next__BBJH;
+                        ((__POINTER *)result__CJJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__AJJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__CJJH=next__AJJH;
                       };
                     };
-                    ptr__T3HH=result__DBJH;
+                    ptr__GFIH=result__CJJH;
                   };
-                  result__S3HH=((__ITM_TYPE_PARAMETER *)ptr__T3HH);
-                  *(result__S3HH) = *(ITM_TYPE_PARAMETER__);
+                  result__FFIH=((__ITM_TYPE_PARAMETER *)ptr__GFIH);
+                  *(result__FFIH) = *(ITM_TYPE_PARAMETER__);
                 };
-                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;
+                Self__NFIH=((__ITM_TYPE_PARAMETER *)result__FFIH);
+                Self__NFIH->parent_itm_type__YEE.name__0YP=n__5EGH;
+                fast_put__to__ORZ(dico__LVI,Self__NFIH,n__5EGH);
+                result__AFGH=result__FFIH;
               };
-              if (result__F4FH==NULL) {
-                __tmp__VIE=NULL;
+              if (result__AFGH==NULL) {
+                __tmp__ZLE=NULL;
               } else {
-                switch (((struct ___OBJ *)result__F4FH)->__id) {
+                switch (((struct ___OBJ *)result__AFGH)->__id) {
                 case __ITM_TYPE_PARAMETER__: {
-                  __tmp__VIE=((void *)result__F4FH);
+                  __tmp__ZLE=((void *)result__AFGH);
                 } break;
                 case __ITM_TYPE_SIMPLE__: {
-                  __tmp__VIE=NULL;
+                  __tmp__ZLE=NULL;
                 } break;
                 }
               };
-              res__TGE=__tmp__VIE;
+              res__XJE=__tmp__ZLE;
             };
           };
-          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)) {
+          if (((void *)res__XJE == (void *)NULL)) {
+            pos__DYXG=current_position__EZF();
+            put_error__text__NPG( 0,(&__string_261));
+            put_position__XQG(pos__DYXG);
+            put_string__P3F(msg_err__SPG);
+            if ((type_error__RPG !=  2)) {
               exit(( 1));
             };
           };
-          add_last__OABC(((__PROTOTYPE *)object__ZBC)->idf_generic_list__LKE,res__TGE);
-          while_do__TUK:
+          add_last__2DBC(((__PROTOTYPE *)object__ZBC)->idf_generic_list__PNE,res__XJE);
+          while_do__5XK:
           {
-            result__GBJH=FALSE__;
-            if ((! read_space__KSD())) {
-              result__GBJH=FALSE__;
+            result__FJJH=FALSE__;
+            if ((! read_space__MTD())) {
+              result__FJJH=FALSE__;
             } else {
-              result__HBJH='\0';
+              result__GJJH='\0';
               if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                result__HBJH=((__CHARACTER )(( 0)));
+                result__GJJH=((__CHARACTER )(( 0)));
               } else {
-                result__HBJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+                result__GJJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
               };
-              if ((result__HBJH == ',')) {
+              if ((result__GJJH == ',')) {
                 position__CCC=(__INTEGER)(position__CCC +  1);
-                result__GBJH=TRUE__;
+                result__FJJH=TRUE__;
               };
             };
-            if (result__GBJH) {
-              res__TGE=NULL;
-              __tmp__VGE=read_identifier__E4K();
-              if (__tmp__VGE) {
-                result__JBJH=FALSE__;
-                if ((! read_space__KSD())) {
-                  result__JBJH=FALSE__;
+            if (result__FJJH) {
+              res__XJE=NULL;
+              __tmp__ZJE=read_identifier__QBL();
+              if (__tmp__ZJE) {
+                result__IJJH=FALSE__;
+                if ((! read_space__MTD())) {
+                  result__IJJH=FALSE__;
                 } else {
-                  result__KBJH='\0';
+                  result__JJJH='\0';
                   if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                    result__KBJH=((__CHARACTER )(( 0)));
+                    result__JJJH=((__CHARACTER )(( 0)));
                   } else {
-                    result__KBJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+                    result__JJJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
                   };
-                  if ((result__KBJH == ':')) {
+                  if ((result__JJJH == ':')) {
                     position__CCC=(__INTEGER)(position__CCC +  1);
-                    result__JBJH=TRUE__;
+                    result__IJJH=TRUE__;
                   };
                 };
-                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)) {
+                if ((! result__IJJH)) {
+                  pos__FYXG=current_position__EZF();
+                  put_error__text__NPG( 2,(&__string_258));
+                  put_position__XQG(pos__FYXG);
+                  put_string__P3F(msg_err__SPG);
+                  if ((type_error__RPG !=  2)) {
                     exit(( 1));
                   };
                 };
-                __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)) {
+                __tmp__JKE=((void *)read_type__WCM(PARSER__,TRUE__) == (void *)NULL);
+                if (__tmp__JKE) {
+                  pos__HYXG=current_position__EZF();
+                  put_error__text__NPG( 0,(&__string_259));
+                  put_position__XQG(pos__HYXG);
+                  put_string__P3F(msg_err__SPG);
+                  if ((type_error__RPG !=  2)) {
                     exit(( 1));
                   };
                 };
-                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)) {
+                pos__OB2G=current_position__EZF();
+                put_error__text__NPG( 1,(&__string_260));
+                put_position__XQG(pos__OB2G);
+                put_string__P3F(msg_err__SPG);
+                if ((type_error__RPG !=  2)) {
                   exit(( 1));
                 };
-                __tmp__THE=TRUE__;
+                __tmp__XKE=TRUE__;
               } else {
-                __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)) {
+                __tmp__XKE=FALSE__;
+              };
+              if ((! __tmp__XKE)) {
+                result__0TL=read_cap_identifier__B1J();
+                if (result__0TL) {
+                  __tmp__FLE=is_parameter_type__DLE;
+                  if ((! __tmp__FLE)) {
+                    pos__JYXG=current_position__EZF();
+                    put_error__text__NPG( 0,(&__string_261));
+                    put_position__XQG(pos__JYXG);
+                    put_string__P3F(msg_err__SPG);
+                    if ((type_error__RPG !=  2)) {
                       exit(( 1));
                     };
                   };
-                  __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__;
+                  __tmp__QLE=position__CCC;
+                  __tmp__SLE=((__STRING_CONSTANT *)last_string__V1C)->count__DD;
+                  __tmp__ULE=(__INTEGER)(__tmp__QLE - __tmp__SLE);
+                  short__token__to__YCD((&__string_126),__tmp__ULE,position__CCC);
+                  n__1QGB=last_string__V1C;
+                  result__DRGB=fast_reference_at__F4T(dico__LVI,n__1QGB);
+                  if (((void *)result__DRGB == (void *)NULL)) {
+                    result__PFIH=NULL;
+                    ptr__QFIH=((__POINTER )(NULL));
+                    typ_id__RFIH= 0;
+                    sz__SFIH=((__UINTEGER_32 )sizeof(__ITM_TYPE_PARAMETER));
+                    if ((sz__SFIH ==  0)) {
+                      result__PFIH=ITM_TYPE_PARAMETER__;
                     } else {
-                      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;
+                      typ_id__RFIH=-1;
+                      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__SFIH);
+                      if ((typ_id__RFIH == (__INTEGER)(-  1))) {
+                        a__TFIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                        new_size__UFIH=(__UINTEGER_32)((__UINTEGER_32)(sz__SFIH + a__TFIH) & (__UINTEGER_32)(~ a__TFIH));
+                        ptr_table__MJJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__UFIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                        next__LJJH=((__POINTER )(NULL));
+                        result__NJJH=((__POINTER *)ptr_table__MJJH)[ 0];
+                        if ((result__NJJH == (void *)NULL)) {
+                          result__NJJH=new_lab__FTJ(new_size__UFIH);
+                          next__LJJH=(void *)((unsigned long)result__NJJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UFIH)));
+                          ((__POINTER *)next__LJJH)[ 0]=NULL;
+                          ((__POINTER *)ptr_table__MJJH)[ 0]=next__LJJH;
                         } else {
-                          next__MBJH=((__POINTER *)result__OBJH)[ 0];
-                          if ((next__MBJH == (void *)NULL)) {
-                            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__OBJH - (unsigned long)begin_memory__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)));
+                          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__SXH)))) &  4095) + (__UINTEGER_32)(new_size__UFIH <<  1)) <=  4096)) {
+                              next__LJJH=(void *)((unsigned long)result__NJJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UFIH)));
                             } else {
-                              next__MBJH=new_lab__ZPJ(new_size__B4HH);
+                              next__LJJH=new_lab__FTJ(new_size__UFIH);
                             };
-                            ((__POINTER *)next__MBJH)[ 0]=NULL;
-                            ((__POINTER *)ptr_table__NBJH)[ 0]=next__MBJH;
+                            ((__POINTER *)next__LJJH)[ 0]=NULL;
+                            ((__POINTER *)ptr_table__MJJH)[ 0]=next__LJJH;
                           } else {
-                            ((__POINTER *)result__OBJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MBJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                            result__OBJH=next__MBJH;
+                            ((__POINTER *)result__NJJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LJJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                            result__NJJH=next__LJJH;
                           };
                         };
-                        ptr__33HH=result__OBJH;
+                        ptr__QFIH=result__NJJH;
                       } else {
-                        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;
+                        t__VFIH=((__UINTEGER_32 )typ_id__RFIH);
+                        a__WFIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                        new_size__UJJH=(__UINTEGER_32)((__UINTEGER_32)(sz__SFIH + a__WFIH) & (__UINTEGER_32)(~ a__WFIH));
+                        ptr_table__RJJH=((__POINTER )(&(table_type[(t__VFIH)])));
+                        lab_type__TJJH=(__UINTEGER_32)(t__VFIH |  1);
+                        next__QJJH=((__POINTER )(NULL));
+                        result__SJJH=((__POINTER *)ptr_table__RJJH)[ 0];
+                        if ((result__SJJH == (void *)NULL)) {
+                          result__SJJH=new_lab__FTJ(lab_type__TJJH);
+                          next__QJJH=(void *)((unsigned long)result__SJJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UJJH)));
+                          ((__POINTER *)next__QJJH)[ 0]=NULL;
+                          ((__POINTER *)ptr_table__RJJH)[ 0]=next__QJJH;
                         } else {
-                          next__RBJH=((__POINTER *)result__TBJH)[ 0];
-                          if ((next__RBJH == (void *)NULL)) {
-                            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TBJH - (unsigned long)begin_memory__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)));
+                          next__QJJH=((__POINTER *)result__SJJH)[ 0];
+                          if ((next__QJJH == (void *)NULL)) {
+                            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__SJJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__UJJH <<  1)) <=  4096)) {
+                              next__QJJH=(void *)((unsigned long)result__SJJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UJJH)));
                             } else {
-                              next__RBJH=new_lab__ZPJ(lab_type__UBJH);
+                              next__QJJH=new_lab__FTJ(lab_type__TJJH);
                             };
-                            ((__POINTER *)next__RBJH)[ 0]=NULL;
-                            ((__POINTER *)ptr_table__SBJH)[ 0]=next__RBJH;
+                            ((__POINTER *)next__QJJH)[ 0]=NULL;
+                            ((__POINTER *)ptr_table__RJJH)[ 0]=next__QJJH;
                           } else {
-                            ((__POINTER *)result__TBJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RBJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                            result__TBJH=next__RBJH;
+                            ((__POINTER *)result__SJJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QJJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                            result__SJJH=next__QJJH;
                           };
                         };
-                        ptr__33HH=result__TBJH;
+                        ptr__QFIH=result__SJJH;
                       };
-                      result__23HH=((__ITM_TYPE_PARAMETER *)ptr__33HH);
-                      *(result__23HH) = *(ITM_TYPE_PARAMETER__);
+                      result__PFIH=((__ITM_TYPE_PARAMETER *)ptr__QFIH);
+                      *(result__PFIH) = *(ITM_TYPE_PARAMETER__);
                     };
-                    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;
+                    Self__XFIH=((__ITM_TYPE_PARAMETER *)result__PFIH);
+                    Self__XFIH->parent_itm_type__YEE.name__0YP=n__1QGB;
+                    fast_put__to__ORZ(dico__LVI,Self__XFIH,n__1QGB);
+                    result__DRGB=result__PFIH;
                   };
-                  if (result__GNGB==NULL) {
-                    __tmp__VIE=NULL;
+                  if (result__DRGB==NULL) {
+                    __tmp__ZLE=NULL;
                   } else {
-                    switch (((struct ___OBJ *)result__GNGB)->__id) {
+                    switch (((struct ___OBJ *)result__DRGB)->__id) {
                     case __ITM_TYPE_PARAMETER__: {
-                      __tmp__VIE=((void *)result__GNGB);
+                      __tmp__ZLE=((void *)result__DRGB);
                     } break;
                     case __ITM_TYPE_SIMPLE__: {
-                      __tmp__VIE=NULL;
+                      __tmp__ZLE=NULL;
                     } break;
                     }
                   };
-                  res__TGE=__tmp__VIE;
+                  res__XJE=__tmp__ZLE;
                 };
               };
-              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)) {
+              if (((void *)res__XJE == (void *)NULL)) {
+                pos__LYXG=current_position__EZF();
+                put_error__text__NPG( 0,(&__string_261));
+                put_position__XQG(pos__LYXG);
+                put_string__P3F(msg_err__SPG);
+                if ((type_error__RPG !=  2)) {
                   exit(( 1));
                 };
               };
-              add_last__OABC(((__PROTOTYPE *)object__ZBC)->idf_generic_list__LKE,res__TGE);
-              goto while_do__TUK;
+              add_last__2DBC(((__PROTOTYPE *)object__ZBC)->idf_generic_list__PNE,res__XJE);
+              goto while_do__5XK;
             };
           };
-          result__WBJH=FALSE__;
-          if ((! read_space__KSD())) {
-            result__WBJH=FALSE__;
+          result__VJJH=FALSE__;
+          if ((! read_space__MTD())) {
+            result__VJJH=FALSE__;
           } else {
-            result__XBJH='\0';
+            result__WJJH='\0';
             if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-              result__XBJH=((__CHARACTER )(( 0)));
+              result__WJJH=((__CHARACTER )(( 0)));
             } else {
-              result__XBJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+              result__WJJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
             };
-            if ((result__XBJH == ')')) {
+            if ((result__WJJH == ')')) {
               position__CCC=(__INTEGER)(position__CCC +  1);
-              result__WBJH=TRUE__;
+              result__VJJH=TRUE__;
             };
           };
-          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)) {
+          if ((! result__VJJH)) {
+            pos__NYXG=current_position__EZF();
+            put_error__text__NPG( 2,(&__string_262));
+            put_position__XQG(pos__NYXG);
+            put_string__P3F(msg_err__SPG);
+            if ((type_error__RPG !=  2)) {
               exit(( 1));
             };
           };
           if (((! is_shorter__LZ) && (! is_shorter2__VI))) {
-            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)) {
+            if (((__INTEGER)(((__FAST_ARRAYoITM_TYPE_PARAMETERo *)((__PROTOTYPE *)object__ZBC)->idf_generic_list__PNE)->parent_arrayed_collection__ONE.upper__AEBC +  1) !=  0)) {
+              pos__PYXG=current_position__EZF();
+              put_error__text__NPG( 0,(&__string_263));
+              put_position__XQG(pos__PYXG);
+              put_string__P3F(msg_err__SPG);
+              if ((type_error__RPG !=  2)) {
                 exit(( 1));
               };
             };
           };
         };
       } else {
-        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)) {
+        pos__RYXG=current_position__EZF();
+        put_error__text__NPG( 0,(&__string_264));
+        put_position__XQG(pos__RYXG);
+        put_string__P3F(msg_err__SPG);
+        if ((type_error__RPG !=  2)) {
           exit(( 1));
         };
       };
-      __tmp__ANE=TRUE__;
+      __tmp__EQE=TRUE__;
     } else {
-      __tmp__ANE=FALSE__;
+      __tmp__EQE=FALSE__;
     };
-    if (__tmp__ANE) {
-      __tmp__GPE=TRUE__;
+    if (__tmp__EQE) {
+      __tmp__KSE=TRUE__;
     } else {
-      __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__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)) {
+      __tmp__WQE=(read_word__LRF((&__string_63)) || read_word__LRF((&__string_64)));
+      if (__tmp__WQE) {
+        short__token__to__YCD((&__string_130),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V1C)->count__DD),position__CCC);
+        if ((! read_symbol__SYJ((&__string_12)))) {
+          pos__TYXG=current_position__EZF();
+          put_error__text__NPG( 2,(&__string_254));
+          put_position__XQG(pos__TYXG);
+          put_string__P3F(msg_err__SPG);
+          if ((type_error__RPG !=  2)) {
             exit(( 1));
           };
         };
-        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)) {
+        if (((void *)read_type_list__YMO(PARSER__,FALSE__) == (void *)NULL)) {
+          pos__VYXG=current_position__EZF();
+          put_error__text__NPG( 0,(&__string_265));
+          put_position__XQG(pos__VYXG);
+          put_string__P3F(msg_err__SPG);
+          if ((type_error__RPG !=  2)) {
             exit(( 1));
           };
         };
       };
-      __tmp__GPE=__tmp__SNE;
+      __tmp__KSE=__tmp__WQE;
     };
-    if (__tmp__GPE) {
-      __tmp__2QE=TRUE__;
+    if (__tmp__KSE) {
+      __tmp__AUE=TRUE__;
     } else {
-      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__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)) {
+      result__DBH=read_word__LRF((&__string_65));
+      if (result__DBH) {
+        short__token__to__YCD((&__string_130),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V1C)->count__DD),position__CCC);
+        if ((! read_symbol__SYJ((&__string_12)))) {
+          pos__XYXG=current_position__EZF();
+          put_error__text__NPG( 2,(&__string_254));
+          put_position__XQG(pos__XYXG);
+          put_string__P3F(msg_err__SPG);
+          if ((type_error__RPG !=  2)) {
             exit(( 1));
           };
         };
-        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)) {
+        if ((! read_external__QTO())) {
+          pos__ZYXG=current_position__EZF();
+          put_error__text__NPG( 0,(&__string_266));
+          put_position__XQG(pos__ZYXG);
+          put_string__P3F(msg_err__SPG);
+          if ((type_error__RPG !=  2)) {
             exit(( 1));
           };
         };
-        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');
+        append__ROS(output_decl__YGE,(&__string_267));
+        append__ROS(output_decl__YGE,((__PROTOTYPE *)object__ZBC)->parent_named__5.name__LI);
+        add_last__GOT(output_decl__YGE,'\n');
+        append__ROS(output_decl__YGE,last_string__V1C);
+        add_last__GOT(output_decl__YGE,'\n');
       };
-      __tmp__2QE=result__X3G;
+      __tmp__AUE=result__DBH;
     };
-    if (__tmp__2QE) {
-      __tmp__YSE=TRUE__;
+    if (__tmp__AUE) {
+      __tmp__2VE=TRUE__;
     } else {
-      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__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)) {
+      result__VBH=read_word__LRF((&__string_66));
+      if (result__VBH) {
+        short__token__to__YCD((&__string_130),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V1C)->count__DD),position__CCC);
+        if ((! read_symbol__SYJ((&__string_12)))) {
+          pos__1YXG=current_position__EZF();
+          put_error__text__NPG( 2,(&__string_254));
+          put_position__XQG(pos__1YXG);
+          put_string__P3F(msg_err__SPG);
+          if ((type_error__RPG !=  2)) {
             exit(( 1));
           };
         };
-        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)) {
+        v__TEE=read_expr_primary__Y4M(PARSER__);
+        if (((void *)v__TEE == (void *)NULL)) {
+          pos__3YXG=current_position__EZF();
+          put_error__text__NPG( 0,(&__string_268));
+          put_position__XQG(pos__3YXG);
+          put_string__P3F(msg_err__SPG);
+          if ((type_error__RPG !=  2)) {
             exit(( 1));
           };
         };
-        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)) {
+        if (((void *)((__PROTOTYPE *)object__ZBC)->default_value__OVE != (void *)NULL)) {
+          pos__QB2G=current_position__EZF();
+          put_error__text__NPG( 1,(&__string_269));
+          put_position__XQG(pos__QB2G);
+          put_string__P3F(msg_err__SPG);
+          if ((type_error__RPG !=  2)) {
             exit(( 1));
           };
         };
-        ((__PROTOTYPE *)object__ZBC)->default_value__KSE=v__PBE;
+        ((__PROTOTYPE *)object__ZBC)->default_value__OVE=v__TEE;
       };
-      __tmp__YSE=result__J4G;
+      __tmp__2VE=result__VBH;
     };
-    if (__tmp__YSE) {
-      __tmp__UUE=TRUE__;
+    if (__tmp__2VE) {
+      __tmp__YXE=TRUE__;
     } else {
-      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__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)) {
+      result__HCH=read_word__LRF((&__string_67));
+      if (result__HCH) {
+        short__token__to__YCD((&__string_130),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V1C)->count__DD),position__CCC);
+        if ((! read_symbol__SYJ((&__string_12)))) {
+          pos__5YXG=current_position__EZF();
+          put_error__text__NPG( 2,(&__string_254));
+          put_position__XQG(pos__5YXG);
+          put_string__P3F(msg_err__SPG);
+          if ((type_error__RPG !=  2)) {
             exit(( 1));
           };
         };
-        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)) {
+        if ((! read_external__QTO())) {
+          pos__BZXG=current_position__EZF();
+          put_error__text__NPG( 0,(&__string_266));
+          put_position__XQG(pos__BZXG);
+          put_string__P3F(msg_err__SPG);
+          if ((type_error__RPG !=  2)) {
             exit(( 1));
           };
         };
-        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)) {
+        if (((void *)((__PROTOTYPE *)object__ZBC)->type_c__JXE != (void *)NULL)) {
+          pos__VJM=current_position__EZF();
+          put_error__text__NPG( 1,(&__string_270));
+          put_position__XQG(pos__VJM);
+          put_string__P3F(msg_err__SPG);
+          if ((type_error__RPG !=  2)) {
             exit(( 1));
           };
         };
-        ((__PROTOTYPE *)object__ZBC)->type_c__FUE=last_string__V0C;
+        ((__PROTOTYPE *)object__ZBC)->type_c__JXE=last_string__V1C;
       };
-      __tmp__UUE=result__14G;
+      __tmp__YXE=result__HCH;
     };
-    if (__tmp__UUE) {
-      __tmp__BWE=TRUE__;
+    if (__tmp__YXE) {
+      __tmp__FZE=TRUE__;
     } else {
-      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__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)) {
+      result__ZCH=read_word__LRF((&__string_68));
+      if (result__ZCH) {
+        short__token__to__YCD((&__string_130),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V1C)->count__DD),position__CCC);
+        if ((! read_symbol__SYJ((&__string_12)))) {
+          pos__DZXG=current_position__EZF();
+          put_error__text__NPG( 2,(&__string_254));
+          put_position__XQG(pos__DZXG);
+          put_string__P3F(msg_err__SPG);
+          if ((type_error__RPG !=  2)) {
             exit(( 1));
           };
         };
-        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)) {
+        if ((! read_integer__Q2P())) {
+          pos__FZXG=current_position__EZF();
+          put_error__text__NPG( 0,(&__string_271));
+          put_position__XQG(pos__FZXG);
+          put_string__P3F(msg_err__SPG);
+          if ((type_error__RPG !=  2)) {
             exit(( 1));
           };
         };
       };
-      __tmp__BWE=result__N5G;
+      __tmp__FZE=result__ZCH;
     };
-    if (__tmp__BWE) {
-      __tmp__HYE=TRUE__;
+    if (__tmp__FZE) {
+      __tmp__L1E=TRUE__;
     } else {
-      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)) {
+      result__LDH=read_word__LRF((&__string_88));
+      if (result__LDH) {
+        if ((! read_symbol__SYJ((&__string_14)))) {
+          pos__HZXG=current_position__EZF();
+          put_error__text__NPG( 2,(&__string_272));
+          put_position__XQG(pos__HZXG);
+          put_string__P3F(msg_err__SPG);
+          if ((type_error__RPG !=  2)) {
             exit(( 1));
           };
         };
-        result__ZBJH=FALSE__;
-        if ((! read_space__KSD())) {
-          result__ZBJH=FALSE__;
+        result__YJJH=FALSE__;
+        if ((! read_space__MTD())) {
+          result__YJJH=FALSE__;
         } else {
-          result__0BJH='\0';
+          result__ZJJH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__0BJH=((__CHARACTER )(( 0)));
+            result__ZJJH=((__CHARACTER )(( 0)));
           } else {
-            result__0BJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+            result__ZJJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__0BJH == '(')) {
+          if ((result__ZJJH == '(')) {
             position__CCC=(__INTEGER)(position__CCC +  1);
-            result__ZBJH=TRUE__;
+            result__YJJH=TRUE__;
           };
         };
-        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)) {
+        if ((! result__YJJH)) {
+          pos__JZXG=current_position__EZF();
+          put_error__text__NPG( 2,(&__string_273));
+          put_position__XQG(pos__JZXG);
+          put_string__P3F(msg_err__SPG);
+          if ((type_error__RPG !=  2)) {
             exit(( 1));
           };
         };
-        while_do__IDFB:
+        while_do__FHFB:
         {
-          instr__XBE=readlip_expr__ZRPB();
-          if (((void *)instr__XBE != (void *)NULL)) {
-            switch (((struct ___OBJ *)instr__XBE)->__id) {
+          instr__1EE=readlip_expr__LVPB();
+          if (((void *)instr__1EE != (void *)NULL)) {
+            switch (((struct ___OBJ *)instr__1EE)->__id) {
             case __LIP_AFFECT__: {
-              run__1FFC(instr__XBE);
+              run__JJFC(instr__1EE);
             } break;
             case __LIP_BINARY__: {
-              __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)) {
+              __tmp__PEQD=((__LIP_BINARY *)instr__1EE)->parent_lip_code__JRZB.parent_itm_object__0EE.position__GFJ;
+              put_error__text__NPG( 2,(&__string_274));
+              put_position__XQG(__tmp__PEQD);
+              put_string__P3F(msg_err__SPG);
+              if ((type_error__RPG !=  2)) {
                 exit(( 1));
               };
             } break;
             case __LIP_UNARY__: {
-              __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)) {
+              __tmp__UEQD=((__LIP_UNARY *)instr__1EE)->parent_lip_code__Y24B.parent_itm_object__0EE.position__GFJ;
+              put_error__text__NPG( 2,(&__string_274));
+              put_position__XQG(__tmp__UEQD);
+              put_string__P3F(msg_err__SPG);
+              if ((type_error__RPG !=  2)) {
                 exit(( 1));
               };
             } break;
             case __LIP_CALL__: {
-              run__RLUE(instr__XBE);
+              run__FQUE(instr__1EE);
             } break;
             case __LIP_IF__: {
-              run__IBQD(instr__XBE);
+              run__WEQD(instr__1EE);
             } break;
             case __LIP_PRINT__: {
-              run__FQUE(instr__XBE);
+              run__ZUUE(instr__1EE);
             } break;
             case __LIP_VALUE__: {
-              __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)) {
+              __tmp__SB2G=((__LIP_VALUE *)instr__1EE)->parent_lip_code__MIFE.parent_itm_object__0EE.position__GFJ;
+              put_error__text__NPG( 2,(&__string_274));
+              put_position__XQG(__tmp__SB2G);
+              put_string__P3F(msg_err__SPG);
+              if ((type_error__RPG !=  2)) {
                 exit(( 1));
               };
             } break;
             };
-            result__2BJH=FALSE__;
-            if ((! read_space__KSD())) {
-              result__2BJH=FALSE__;
+            result__1JJH=FALSE__;
+            if ((! read_space__MTD())) {
+              result__1JJH=FALSE__;
             } else {
-              result__3BJH='\0';
+              result__2JJH='\0';
               if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                result__3BJH=((__CHARACTER )(( 0)));
+                result__2JJH=((__CHARACTER )(( 0)));
               } else {
-                result__3BJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+                result__2JJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
               };
-              if ((result__3BJH == ';')) {
+              if ((result__2JJH == ';')) {
                 position__CCC=(__INTEGER)(position__CCC +  1);
-                result__2BJH=TRUE__;
+                result__1JJH=TRUE__;
               };
             };
-            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)) {
+            if ((! result__1JJH)) {
+              pos__LZXG=current_position__EZF();
+              put_error__text__NPG( 2,(&__string_167));
+              put_position__XQG(pos__LZXG);
+              put_string__P3F(msg_err__SPG);
+              if ((type_error__RPG !=  2)) {
                 exit(( 1));
               };
             };
-            goto while_do__IDFB;
+            goto while_do__FHFB;
           };
         };
-        result__5BJH=FALSE__;
-        if ((! read_space__KSD())) {
-          result__5BJH=FALSE__;
+        result__4JJH=FALSE__;
+        if ((! read_space__MTD())) {
+          result__4JJH=FALSE__;
         } else {
-          result__ACJH='\0';
+          result__5JJH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__ACJH=((__CHARACTER )(( 0)));
+            result__5JJH=((__CHARACTER )(( 0)));
           } else {
-            result__ACJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+            result__5JJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__ACJH == ')')) {
+          if ((result__5JJH == ')')) {
             position__CCC=(__INTEGER)(position__CCC +  1);
-            result__5BJH=TRUE__;
+            result__4JJH=TRUE__;
           };
         };
-        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)) {
+        if ((! result__4JJH)) {
+          pos__NZXG=current_position__EZF();
+          put_error__text__NPG( 2,(&__string_238));
+          put_position__XQG(pos__NZXG);
+          put_string__P3F(msg_err__SPG);
+          if ((type_error__RPG !=  2)) {
             exit(( 1));
           };
         };
       };
-      __tmp__HYE=result__55G;
+      __tmp__L1E=result__LDH;
     };
-    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__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)) {
+    if ((! __tmp__L1E)) {
+      if (((((((read_word__LRF((&__string_69)) || read_word__LRF((&__string_70))) || read_word__LRF((&__string_71))) || read_word__LRF((&__string_72))) || read_word__LRF((&__string_73))) || read_word__LRF((&__string_74))) || read_word__LRF((&__string_75)))) {
+        short__token__to__YCD((&__string_130),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V1C)->count__DD),position__CCC);
+        if ((! read_symbol__SYJ((&__string_12)))) {
+          pos__PZXG=current_position__EZF();
+          put_error__text__NPG( 2,(&__string_254));
+          put_position__XQG(pos__PZXG);
+          put_string__P3F(msg_err__SPG);
+          if ((type_error__RPG !=  2)) {
             exit(( 1));
           };
         };
-        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)) {
+        if ((! read_string__1FQ())) {
+          pos__RZXG=current_position__EZF();
+          put_error__text__NPG( 0,(&__string_275));
+          put_position__XQG(pos__RZXG);
+          put_string__P3F(msg_err__SPG);
+          if ((type_error__RPG !=  2)) {
             exit(( 1));
           };
         };
         if (is_shorter2__VI) {
-          ((__PROTOTYPE *)object__ZBC)->comment_slot__QRTC=last_string__V0C;
+          ((__PROTOTYPE *)object__ZBC)->comment_slot__4UTC=last_string__V1C;
         };
       } else {
-        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)) {
+        pos__TZXG=current_position__EZF();
+        put_error__text__NPG( 2,(&__string_276));
+        put_position__XQG(pos__TZXG);
+        put_string__P3F(msg_err__SPG);
+        if ((type_error__RPG !=  2)) {
           exit(( 1));
         };
       };
     };
-    result__CCJH=FALSE__;
-    if ((! read_space__KSD())) {
-      result__CCJH=FALSE__;
+    result__BKJH=FALSE__;
+    if ((! read_space__MTD())) {
+      result__BKJH=FALSE__;
     } else {
-      result__DCJH='\0';
+      result__CKJH='\0';
       if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__DCJH=((__CHARACTER )(( 0)));
+        result__CKJH=((__CHARACTER )(( 0)));
       } else {
-        result__DCJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+        result__CKJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__DCJH == ';')) {
+      if ((result__CKJH == ';')) {
         position__CCC=(__INTEGER)(position__CCC +  1);
-        result__CCJH=TRUE__;
+        result__BKJH=TRUE__;
       };
     };
-    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)) {
+    if ((! result__BKJH)) {
+      pos__VZXG=current_position__EZF();
+      put_error__text__NPG( 2,(&__string_242));
+      put_position__XQG(pos__VZXG);
+      put_string__P3F(msg_err__SPG);
+      if ((type_error__RPG !=  2)) {
         exit(( 1));
       };
     };
   };
-  return(result__NBE);
+  return(result__REE);
 }
 
-static void* get_name__YROB(void *n__0ROB)
+static void* get_name__EVOB(void *n__GVOB)
 // ({NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  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)));
+  void *result__UREC,*result__IVOB;
+  __STRING_CONSTANT *Self__0FIH,*Self__5FIH,*Self__EGIH;
+  __INTEGER result__ZFIH,__tmp__1FIH,Self__2FIH,typ_id__IAZB;
+  __INTEGER result__4FIH,__tmp__AGIH,Self__BGIH,idx__W0FC,idx__RBID;
+  __INTEGER new_capacity__SBID,i__TBID,result__DGIH,__tmp__FGIH;
+  __INTEGER Self__GGIH,typ_id__AEID;
+  __SECTION_ *result__CAZB,*Self__H0FC;
+  __POINTER ptr__DAZB,ptr_table__FKJH,next__EKJH,result__GKJH;
+  __POINTER ptr_table__KKJH,next__JKJH,result__LKJH,ptr__1DID;
+  __POINTER ptr_table__PKJH,next__OKJH,result__QKJH,ptr_table__UKJH;
+  __POINTER next__TKJH,result__VKJH;
+  __UINTEGER_32 sz__FAZB,a__RGGH,new_size__SGGH,t__WGGH,a__VGGH;
+  __UINTEGER_32 new_size__NKJH,lab_type__MKJH,sz__3DID,a__VFGH;
+  __UINTEGER_32 new_size__WFGH,t__0FGH,a__ZFGH,new_size__XKJH;
+  __UINTEGER_32 lab_type__WKJH;
+  __HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo *Self__IREC,*Self__M0FC;
+  void *node__TREC,*node__X0FC,*node1__VBID,*node2__WBID,*__tmp__F2FC;
+  void **old_buckets__UBID;
+  __HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *result__0DID;
+  __HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *Self__EFTD;
+  Self__IREC=((__HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo *)bucket_name__NVOB);
+  result__UREC=NULL;
+  Self__0FIH=((__STRING_CONSTANT *)n__GVOB);
+  result__ZFIH= 0;
+  __tmp__1FIH=Self__0FIH->count__DD;
+  Self__2FIH= 1;
+  while ((Self__2FIH <= __tmp__1FIH)) {
+    result__ZFIH=(__INTEGER)((__INTEGER)( 5 * result__ZFIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__0FIH->storage__FRO)[(__INTEGER)(Self__2FIH -  1)])));
+    Self__2FIH=(__INTEGER)(Self__2FIH +  1);
+  };
+  if ((result__ZFIH <  0)) {
+    result__ZFIH=(__INTEGER)(~ result__ZFIH);
+  };
+  node__TREC=((void **)Self__IREC->buckets__1REC)[(__INTEGER)(result__ZFIH % Self__IREC->capacity__WREC)];
+  while ((! (((void *)node__TREC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node__TREC)->key__HSEC == (void *)n__GVOB)))) {
+    node__TREC=((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node__TREC)->next__SSEC;
+  };
+  if (((void *)node__TREC != (void *)NULL)) {
+    result__UREC=((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node__TREC)->item__0SEC;
+  };
+  result__IVOB=result__UREC;
+  if (((void *)result__UREC == (void *)NULL)) {
+    result__CAZB=NULL;
+    ptr__DAZB=((__POINTER )(NULL));
+    typ_id__IAZB= 0;
+    sz__FAZB=((__UINTEGER_32 )sizeof(__SECTION_));
+    if ((sz__FAZB ==  0)) {
+      result__CAZB=SECTION___;
+    } else {
+      typ_id__IAZB=__SECTION___;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__FAZB);
+      if ((typ_id__IAZB == (__INTEGER)(-  1))) {
+        a__RGGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__SGGH=(__UINTEGER_32)((__UINTEGER_32)(sz__FAZB + a__RGGH) & (__UINTEGER_32)(~ a__RGGH));
+        ptr_table__FKJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__SGGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__EKJH=((__POINTER )(NULL));
+        result__GKJH=((__POINTER *)ptr_table__FKJH)[ 0];
+        if ((result__GKJH == (void *)NULL)) {
+          result__GKJH=new_lab__FTJ(new_size__SGGH);
+          next__EKJH=(void *)((unsigned long)result__GKJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SGGH)));
+          ((__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__SXH)))) &  4095) + (__UINTEGER_32)(new_size__SGGH <<  1)) <=  4096)) {
+              next__EKJH=(void *)((unsigned long)result__GKJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SGGH)));
             } else {
-              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)));
+              next__EKJH=new_lab__FTJ(new_size__SGGH);
+            };
+            ((__POINTER *)next__EKJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__FKJH)[ 0]=next__EKJH;
+          } else {
+            ((__POINTER *)result__GKJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EKJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__GKJH=next__EKJH;
+          };
+        };
+        ptr__DAZB=result__GKJH;
+      } else {
+        t__WGGH=((__UINTEGER_32 )typ_id__IAZB);
+        a__VGGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__NKJH=(__UINTEGER_32)((__UINTEGER_32)(sz__FAZB + a__VGGH) & (__UINTEGER_32)(~ a__VGGH));
+        ptr_table__KKJH=((__POINTER )(&(table_type[(t__WGGH)])));
+        lab_type__MKJH=(__UINTEGER_32)(t__WGGH |  1);
+        next__JKJH=((__POINTER )(NULL));
+        result__LKJH=((__POINTER *)ptr_table__KKJH)[ 0];
+        if ((result__LKJH == (void *)NULL)) {
+          result__LKJH=new_lab__FTJ(lab_type__MKJH);
+          next__JKJH=(void *)((unsigned long)result__LKJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NKJH)));
+          ((__POINTER *)next__JKJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__KKJH)[ 0]=next__JKJH;
+        } else {
+          next__JKJH=((__POINTER *)result__LKJH)[ 0];
+          if ((next__JKJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LKJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__NKJH <<  1)) <=  4096)) {
+              next__JKJH=(void *)((unsigned long)result__LKJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NKJH)));
             } else {
-              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)));
+              next__JKJH=new_lab__FTJ(lab_type__MKJH);
+            };
+            ((__POINTER *)next__JKJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__KKJH)[ 0]=next__JKJH;
+          } else {
+            ((__POINTER *)result__LKJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JKJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__LKJH=next__JKJH;
+          };
+        };
+        ptr__DAZB=result__LKJH;
+      };
+      result__CAZB=((__SECTION_ *)ptr__DAZB);
+      *(result__CAZB) = *(SECTION___);
+    };
+    result__IVOB=result__CAZB;
+    Self__H0FC=((__SECTION_ *)result__CAZB);
+    Self__H0FC->name__11DC=n__GVOB;
+    Self__H0FC->type_list__K0FC=NULL;
+    Self__M0FC=((__HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo *)bucket_name__NVOB);
+    Self__5FIH=((__STRING_CONSTANT *)n__GVOB);
+    result__4FIH= 0;
+    __tmp__AGIH=Self__5FIH->count__DD;
+    Self__BGIH= 1;
+    while ((Self__BGIH <= __tmp__AGIH)) {
+      result__4FIH=(__INTEGER)((__INTEGER)( 5 * result__4FIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__5FIH->storage__FRO)[(__INTEGER)(Self__BGIH -  1)])));
+      Self__BGIH=(__INTEGER)(Self__BGIH +  1);
+    };
+    if ((result__4FIH <  0)) {
+      result__4FIH=(__INTEGER)(~ result__4FIH);
+    };
+    idx__W0FC=(__INTEGER)(result__4FIH % Self__M0FC->capacity__WREC);
+    node__X0FC=((void **)Self__M0FC->buckets__1REC)[idx__W0FC];
+    while ((! (((void *)node__X0FC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node__X0FC)->key__HSEC == (void *)n__GVOB)))) {
+      node__X0FC=((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node__X0FC)->next__SSEC;
+    };
+    if (((void *)node__X0FC == (void *)NULL)) {
+      if ((Self__M0FC->capacity__WREC == Self__M0FC->count__Y1FC)) {
+        idx__RBID= 0;
+        node1__VBID=NULL;
+        node2__WBID=NULL;
+        old_buckets__UBID=Self__M0FC->buckets__1REC;
+        new_capacity__SBID=prime_number_ceiling__541((__INTEGER)(Self__M0FC->capacity__WREC +  1));
+        Self__M0FC->buckets__1REC=create__IAYC(new_capacity__SBID);
+        i__TBID=(__INTEGER)(Self__M0FC->capacity__WREC -  1);
+        Self__M0FC->capacity__WREC=new_capacity__SBID;
+        while ((i__TBID >=  0)) {
+          node1__VBID=((void **)old_buckets__UBID)[i__TBID];
+          while (((void *)node1__VBID != (void *)NULL)) {
+            node2__WBID=((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node1__VBID)->next__SSEC;
+            Self__EGIH=((__STRING_CONSTANT *)((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node1__VBID)->key__HSEC);
+            result__DGIH= 0;
+            __tmp__FGIH=Self__EGIH->count__DD;
+            Self__GGIH= 1;
+            while ((Self__GGIH <= __tmp__FGIH)) {
+              result__DGIH=(__INTEGER)((__INTEGER)( 5 * result__DGIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__EGIH->storage__FRO)[(__INTEGER)(Self__GGIH -  1)])));
+              Self__GGIH=(__INTEGER)(Self__GGIH +  1);
+            };
+            if ((result__DGIH <  0)) {
+              result__DGIH=(__INTEGER)(~ result__DGIH);
+            };
+            idx__RBID=(__INTEGER)(result__DGIH % Self__M0FC->capacity__WREC);
+            ((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node1__VBID)->next__SSEC=((void **)Self__M0FC->buckets__1REC)[idx__RBID];
+            ((void **)Self__M0FC->buckets__1REC)[idx__RBID]=node1__VBID;
+            node1__VBID=node2__WBID;
+          };
+          i__TBID=(__INTEGER)(i__TBID -  1);
+        };
+        idx__W0FC=(__INTEGER)(result__4FIH % new_capacity__SBID);
+      };
+      __tmp__F2FC=((void **)Self__M0FC->buckets__1REC)[idx__W0FC];
+      result__0DID=NULL;
+      ptr__1DID=((__POINTER )(NULL));
+      typ_id__AEID= 0;
+      sz__3DID=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo));
+      if ((sz__3DID ==  0)) {
+        result__0DID=HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__;
+      } else {
+        typ_id__AEID=__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__3DID);
+        if ((typ_id__AEID == (__INTEGER)(-  1))) {
+          a__VFGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__WFGH=(__UINTEGER_32)((__UINTEGER_32)(sz__3DID + a__VFGH) & (__UINTEGER_32)(~ a__VFGH));
+          ptr_table__PKJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__WFGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__OKJH=((__POINTER )(NULL));
+          result__QKJH=((__POINTER *)ptr_table__PKJH)[ 0];
+          if ((result__QKJH == (void *)NULL)) {
+            result__QKJH=new_lab__FTJ(new_size__WFGH);
+            next__OKJH=(void *)((unsigned long)result__QKJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WFGH)));
+            ((__POINTER *)next__OKJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__PKJH)[ 0]=next__OKJH;
+          } else {
+            next__OKJH=((__POINTER *)result__QKJH)[ 0];
+            if ((next__OKJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__QKJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__WFGH <<  1)) <=  4096)) {
+                next__OKJH=(void *)((unsigned long)result__QKJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WFGH)));
               } else {
-                next__PCJH=new_lab__ZPJ(new_size__14FH);
+                next__OKJH=new_lab__FTJ(new_size__WFGH);
               };
-              ((__POINTER *)next__PCJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__QCJH)[ 0]=next__PCJH;
+              ((__POINTER *)next__OKJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__PKJH)[ 0]=next__OKJH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__QKJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OKJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__QKJH=next__OKJH;
+            };
+          };
+          ptr__1DID=result__QKJH;
+        } else {
+          t__0FGH=((__UINTEGER_32 )typ_id__AEID);
+          a__ZFGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__XKJH=(__UINTEGER_32)((__UINTEGER_32)(sz__3DID + a__ZFGH) & (__UINTEGER_32)(~ a__ZFGH));
+          ptr_table__UKJH=((__POINTER )(&(table_type[(t__0FGH)])));
+          lab_type__WKJH=(__UINTEGER_32)(t__0FGH |  1);
+          next__TKJH=((__POINTER )(NULL));
+          result__VKJH=((__POINTER *)ptr_table__UKJH)[ 0];
+          if ((result__VKJH == (void *)NULL)) {
+            result__VKJH=new_lab__FTJ(lab_type__WKJH);
+            next__TKJH=(void *)((unsigned long)result__VKJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XKJH)));
+            ((__POINTER *)next__TKJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__UKJH)[ 0]=next__TKJH;
+          } else {
+            next__TKJH=((__POINTER *)result__VKJH)[ 0];
+            if ((next__TKJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__VKJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__XKJH <<  1)) <=  4096)) {
+                next__TKJH=(void *)((unsigned long)result__VKJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XKJH)));
               } else {
-                next__UCJH=new_lab__ZPJ(lab_type__XCJH);
+                next__TKJH=new_lab__FTJ(lab_type__WKJH);
               };
-              ((__POINTER *)next__UCJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__VCJH)[ 0]=next__UCJH;
+              ((__POINTER *)next__TKJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__UKJH)[ 0]=next__TKJH;
             } else {
-              ((__POINTER *)result__WCJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UCJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__WCJH=next__UCJH;
+              ((__POINTER *)result__VKJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TKJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__VKJH=next__TKJH;
             };
           };
-          ptr__NAID=result__WCJH;
+          ptr__1DID=result__VKJH;
         };
-        result__MAID=((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)ptr__NAID);
-        *(result__MAID) = *(HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__);
+        result__0DID=((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)ptr__1DID);
+        *(result__0DID) = *(HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__);
       };
-      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);
+      Self__EFTD=((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)result__0DID);
+      Self__EFTD->item__0SEC=result__CAZB;
+      Self__EFTD->key__HSEC=n__GVOB;
+      Self__EFTD->next__SSEC=__tmp__F2FC;
+      node__X0FC=result__0DID;
+      ((void **)Self__M0FC->buckets__1REC)[idx__W0FC]=result__0DID;
+      Self__M0FC->count__Y1FC=(__INTEGER)(Self__M0FC->count__Y1FC +  1);
     } else {
-      ((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node__JXFC)->item__MPEC=result__W2YB;
+      ((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node__X0FC)->item__0SEC=result__CAZB;
     };
   };
-  return(result__2ROB);
+  return(result__IVOB);
 }
 
-static void* read_type_list__MJO(__PARSER *Self__NJO,__BOOLEAN is_section__OJO)
+static void* read_type_list__YMO(__PARSER *Self__ZMO,__BOOLEAN is_section__0MO)
 // ({PARSER},{TRUExFALSE}) With resultNo recursive, No inlinable.
 {
-  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) {
+  void *ts__4MO,*__tmp__LNO,*__tmp__VOO;
+  void *t__3MO;
+  __POSITION pos__B2XG,pos__D2XG,pos__F2XG;
+  void *lst__2MO,*result__IGIH;
+  __FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *Self__JGIH,*Self__KGIH;
+  __BOOLEAN result__YKJH;
+  __CHARACTER result__ZKJH;
+  lst__2MO=NULL;
+  ts__4MO=NULL;
+  t__3MO=read_type__WCM(Self__ZMO,FALSE__);
+  if (((void *)t__3MO != (void *)NULL)) {
+    if (is_section__0MO) {
+      if (t__3MO==NULL) {
+        __tmp__LNO=NULL;
+      } else {
+        switch (((struct ___OBJ *)t__3MO)->__id) {
         case __ITM_TYPE_PARAMETER__: {
-          __tmp__5JO=((void *)t__RJO);
+          __tmp__LNO=((void *)t__3MO);
         } break;
         case __ITM_TYPE_SIMPLE__: {
-          __tmp__5JO=((void *)t__RJO);
+          __tmp__LNO=((void *)t__3MO);
         } break;
         case __ITM_TYPE_BLOCK__: {
-          __tmp__5JO=NULL;
+          __tmp__LNO=NULL;
         } break;
         case __ITM_TYPE_GENERIC__: {
-          __tmp__5JO=((void *)t__RJO);
+          __tmp__LNO=((void *)t__3MO);
         } break;
         case __ITM_TYPE_STYLE__: {
-          __tmp__5JO=((void *)t__RJO);
+          __tmp__LNO=((void *)t__3MO);
         } break;
         }
       };
-      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)) {
+      ts__4MO=__tmp__LNO;
+      if (((void *)__tmp__LNO == (void *)NULL)) {
+        pos__B2XG=current_position__EZF();
+        put_error__text__NPG( 0,(&__string_277));
+        put_position__XQG(pos__B2XG);
+        put_string__P3F(msg_err__SPG);
+        if ((type_error__RPG !=  2)) {
           exit(( 1));
         };
       };
     };
-    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);
+    result__IGIH=NULL;
+    if ((((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__0UP)->parent_arrayed_collection__ZUP.upper__NVV <  0)) {
+      result__IGIH=create_with_capacity__YFR( 16);
     } else {
-      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);
+      Self__JGIH=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__0UP);
+      result__IGIH=((void **)Self__JGIH->parent_arrayed_collection__ZUP.storage__D0V)[Self__JGIH->parent_arrayed_collection__ZUP.upper__NVV];
+      Self__KGIH=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__0UP);
+      Self__KGIH->parent_arrayed_collection__ZUP.upper__NVV=(__INTEGER)(Self__KGIH->parent_arrayed_collection__ZUP.upper__NVV -  1);
     };
-    lst__QJO=result__V4HH;
-    add_last__WKV(result__V4HH,t__RJO);
-    while_do__ASP:
+    lst__2MO=result__IGIH;
+    add_last__COV(result__IGIH,t__3MO);
+    while_do__MVP:
     {
-      result__ZCJH=FALSE__;
-      if ((! read_space__KSD())) {
-        result__ZCJH=FALSE__;
+      result__YKJH=FALSE__;
+      if ((! read_space__MTD())) {
+        result__YKJH=FALSE__;
       } else {
-        result__0CJH='\0';
+        result__ZKJH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__0CJH=((__CHARACTER )(( 0)));
+          result__ZKJH=((__CHARACTER )(( 0)));
         } else {
-          result__0CJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+          result__ZKJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__0CJH == ',')) {
+        if ((result__ZKJH == ',')) {
           position__CCC=(__INTEGER)(position__CCC +  1);
-          result__ZCJH=TRUE__;
+          result__YKJH=TRUE__;
         };
       };
-      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)) {
+      if (result__YKJH) {
+        t__3MO=read_type__WCM(Self__ZMO,FALSE__);
+        if (((void *)t__3MO == (void *)NULL)) {
+          pos__D2XG=current_position__EZF();
+          put_error__text__NPG( 0,(&__string_265));
+          put_position__XQG(pos__D2XG);
+          put_string__P3F(msg_err__SPG);
+          if ((type_error__RPG !=  2)) {
             exit(( 1));
           };
         };
-        if (is_section__OJO) {
-          if (t__RJO==NULL) {
-            __tmp__JLO=NULL;
+        if (is_section__0MO) {
+          if (t__3MO==NULL) {
+            __tmp__VOO=NULL;
           } else {
-            switch (((struct ___OBJ *)t__RJO)->__id) {
+            switch (((struct ___OBJ *)t__3MO)->__id) {
             case __ITM_TYPE_PARAMETER__: {
-              __tmp__JLO=((void *)t__RJO);
+              __tmp__VOO=((void *)t__3MO);
             } break;
             case __ITM_TYPE_SIMPLE__: {
-              __tmp__JLO=((void *)t__RJO);
+              __tmp__VOO=((void *)t__3MO);
             } break;
             case __ITM_TYPE_BLOCK__: {
-              __tmp__JLO=NULL;
+              __tmp__VOO=NULL;
             } break;
             case __ITM_TYPE_GENERIC__: {
-              __tmp__JLO=((void *)t__RJO);
+              __tmp__VOO=((void *)t__3MO);
             } break;
             case __ITM_TYPE_STYLE__: {
-              __tmp__JLO=((void *)t__RJO);
+              __tmp__VOO=((void *)t__3MO);
             } break;
             }
           };
-          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)) {
+          ts__4MO=__tmp__VOO;
+          if (((void *)__tmp__VOO == (void *)NULL)) {
+            pos__F2XG=current_position__EZF();
+            put_error__text__NPG( 0,(&__string_277));
+            put_position__XQG(pos__F2XG);
+            put_string__P3F(msg_err__SPG);
+            if ((type_error__RPG !=  2)) {
               exit(( 1));
             };
           };
         };
-        add_last__WKV(lst__QJO,t__RJO);
-        goto while_do__ASP;
+        add_last__COV(lst__2MO,t__3MO);
+        goto while_do__MVP;
       };
     };
-    lst__QJO=alias__KSP(result__V4HH);
+    lst__2MO=alias__WVP(result__IGIH);
   };
-  return(lst__QJO);
+  return(lst__2MO);
 }
 
-static __INTEGER hash_code__L20(__FAST_ARRAYoITM_TYPE_MONOo *Self__M20)
+static __INTEGER hash_code__X50(__FAST_ARRAYoITM_TYPE_MONOo *Self__Y50)
 // ({FAST_ARRAYoITM_TYPE_MONOo}) With resultNo recursive, No inlinable.
 {
-  __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) {
+  __INTEGER result__050,result__LGIH,__tmp__NGIH,Self__OGIH,__tmp__JA1;
+  __INTEGER result__QGIH,__tmp__SGIH,Self__TGIH,result__VGIH;
+  __INTEGER __tmp__XGIH,Self__YGIH,result__0GIH,__tmp__2GIH,Self__3GIH;
+  __INTEGER result__5GIH,__tmp__BHIH,Self__CHIH,__tmp__YA1,result__EHIH;
+  __INTEGER __tmp__GHIH,Self__HHIH,result__JHIH,__tmp__LHIH,Self__MHIH;
+  __INTEGER result__OHIH,__tmp__QHIH,Self__RHIH;
+  void *__tmp__IA1,*__tmp__XA1;
+  __STRING_CONSTANT *Self__MGIH,*Self__RGIH,*Self__WGIH,*Self__1GIH;
+  __STRING_CONSTANT *Self__AHIH,*Self__FHIH,*Self__KHIH,*Self__PHIH;
+  __BOOLEAN __tmp__LA1;
+  result__050= 0;
+  if ((! (Self__Y50->parent_arrayed_collection__EYC.upper__SIV <  0))) {
+    if (((void *)((void **)Self__Y50->parent_arrayed_collection__EYC.storage__ZMV)[Self__Y50->parent_arrayed_collection__EYC.upper__SIV] != (void *)NULL)) {
+      __tmp__IA1=((void **)Self__Y50->parent_arrayed_collection__EYC.storage__ZMV)[Self__Y50->parent_arrayed_collection__EYC.upper__SIV];
+      switch (((struct ___OBJ *)__tmp__IA1)->__id) {
       case __ITM_TYPE_PARAMETER__: {
-        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;
+        Self__MGIH=((__STRING_CONSTANT *)((__ITM_TYPE_PARAMETER *)__tmp__IA1)->parent_itm_type__YEE.name__0YP);
+        result__LGIH= 0;
+        __tmp__NGIH=Self__MGIH->count__DD;
+        Self__OGIH= 1;
+        while ((Self__OGIH <= __tmp__NGIH)) {
+          result__LGIH=(__INTEGER)((__INTEGER)( 5 * result__LGIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__MGIH->storage__FRO)[(__INTEGER)(Self__OGIH -  1)])));
+          Self__OGIH=(__INTEGER)(Self__OGIH +  1);
+        };
+        if ((result__LGIH <  0)) {
+          result__LGIH=(__INTEGER)(~ result__LGIH);
+        };
+        __tmp__JA1=result__LGIH;
       } break;
       case __ITM_TYPE_SIMPLE__: {
-        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;
+        Self__RGIH=((__STRING_CONSTANT *)((__ITM_TYPE_SIMPLE *)__tmp__IA1)->name__0YP);
+        result__QGIH= 0;
+        __tmp__SGIH=Self__RGIH->count__DD;
+        Self__TGIH= 1;
+        while ((Self__TGIH <= __tmp__SGIH)) {
+          result__QGIH=(__INTEGER)((__INTEGER)( 5 * result__QGIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__RGIH->storage__FRO)[(__INTEGER)(Self__TGIH -  1)])));
+          Self__TGIH=(__INTEGER)(Self__TGIH +  1);
+        };
+        if ((result__QGIH <  0)) {
+          result__QGIH=(__INTEGER)(~ result__QGIH);
+        };
+        __tmp__JA1=result__QGIH;
       } break;
       case __ITM_TYPE_BLOCK__: {
-        print__DID((&__string_278));
+        print__DJD((&__string_278));
         fputc((int)('\n'),stdout);
         exit(( 1));
-        __tmp__320= 0;
+        __tmp__JA1= 0;
       } break;
       case __ITM_TYPE_GENERIC__: {
-        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;
+        Self__WGIH=((__STRING_CONSTANT *)((__ITM_TYPE_GENERIC *)__tmp__IA1)->parent_itm_type_style__SSN.parent_itm_type_simple__RSN.name__0YP);
+        result__VGIH= 0;
+        __tmp__XGIH=Self__WGIH->count__DD;
+        Self__YGIH= 1;
+        while ((Self__YGIH <= __tmp__XGIH)) {
+          result__VGIH=(__INTEGER)((__INTEGER)( 5 * result__VGIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__WGIH->storage__FRO)[(__INTEGER)(Self__YGIH -  1)])));
+          Self__YGIH=(__INTEGER)(Self__YGIH +  1);
+        };
+        if ((result__VGIH <  0)) {
+          result__VGIH=(__INTEGER)(~ result__VGIH);
+        };
+        __tmp__JA1=result__VGIH;
       } break;
       case __ITM_TYPE_STYLE__: {
-        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;
+        Self__1GIH=((__STRING_CONSTANT *)((__ITM_TYPE_STYLE *)__tmp__IA1)->parent_itm_type_simple__RSN.name__0YP);
+        result__0GIH= 0;
+        __tmp__2GIH=Self__1GIH->count__DD;
+        Self__3GIH= 1;
+        while ((Self__3GIH <= __tmp__2GIH)) {
+          result__0GIH=(__INTEGER)((__INTEGER)( 5 * result__0GIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__1GIH->storage__FRO)[(__INTEGER)(Self__3GIH -  1)])));
+          Self__3GIH=(__INTEGER)(Self__3GIH +  1);
+        };
+        if ((result__0GIH <  0)) {
+          result__0GIH=(__INTEGER)(~ result__0GIH);
+        };
+        __tmp__JA1=result__0GIH;
       } break;
       };
-      result__O20=__tmp__320;
-      __tmp__520=TRUE__;
+      result__050=__tmp__JA1;
+      __tmp__LA1=TRUE__;
     } else {
-      __tmp__520=FALSE__;
+      __tmp__LA1=FALSE__;
     };
-    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) {
+    if ((! __tmp__LA1)) {
+      if (((void *)((void **)Self__Y50->parent_arrayed_collection__EYC.storage__ZMV)[ 0] != (void *)NULL)) {
+        __tmp__XA1=((void **)Self__Y50->parent_arrayed_collection__EYC.storage__ZMV)[ 0];
+        switch (((struct ___OBJ *)__tmp__XA1)->__id) {
         case __ITM_TYPE_PARAMETER__: {
-          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;
+          Self__AHIH=((__STRING_CONSTANT *)((__ITM_TYPE_PARAMETER *)__tmp__XA1)->parent_itm_type__YEE.name__0YP);
+          result__5GIH= 0;
+          __tmp__BHIH=Self__AHIH->count__DD;
+          Self__CHIH= 1;
+          while ((Self__CHIH <= __tmp__BHIH)) {
+            result__5GIH=(__INTEGER)((__INTEGER)( 5 * result__5GIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__AHIH->storage__FRO)[(__INTEGER)(Self__CHIH -  1)])));
+            Self__CHIH=(__INTEGER)(Self__CHIH +  1);
+          };
+          if ((result__5GIH <  0)) {
+            result__5GIH=(__INTEGER)(~ result__5GIH);
+          };
+          __tmp__YA1=result__5GIH;
         } break;
         case __ITM_TYPE_SIMPLE__: {
-          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;
+          Self__FHIH=((__STRING_CONSTANT *)((__ITM_TYPE_SIMPLE *)__tmp__XA1)->name__0YP);
+          result__EHIH= 0;
+          __tmp__GHIH=Self__FHIH->count__DD;
+          Self__HHIH= 1;
+          while ((Self__HHIH <= __tmp__GHIH)) {
+            result__EHIH=(__INTEGER)((__INTEGER)( 5 * result__EHIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__FHIH->storage__FRO)[(__INTEGER)(Self__HHIH -  1)])));
+            Self__HHIH=(__INTEGER)(Self__HHIH +  1);
+          };
+          if ((result__EHIH <  0)) {
+            result__EHIH=(__INTEGER)(~ result__EHIH);
+          };
+          __tmp__YA1=result__EHIH;
         } break;
         case __ITM_TYPE_BLOCK__: {
-          print__DID((&__string_278));
+          print__DJD((&__string_278));
           fputc((int)('\n'),stdout);
           exit(( 1));
-          __tmp__M30= 0;
+          __tmp__YA1= 0;
         } break;
         case __ITM_TYPE_GENERIC__: {
-          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;
+          Self__KHIH=((__STRING_CONSTANT *)((__ITM_TYPE_GENERIC *)__tmp__XA1)->parent_itm_type_style__SSN.parent_itm_type_simple__RSN.name__0YP);
+          result__JHIH= 0;
+          __tmp__LHIH=Self__KHIH->count__DD;
+          Self__MHIH= 1;
+          while ((Self__MHIH <= __tmp__LHIH)) {
+            result__JHIH=(__INTEGER)((__INTEGER)( 5 * result__JHIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__KHIH->storage__FRO)[(__INTEGER)(Self__MHIH -  1)])));
+            Self__MHIH=(__INTEGER)(Self__MHIH +  1);
+          };
+          if ((result__JHIH <  0)) {
+            result__JHIH=(__INTEGER)(~ result__JHIH);
+          };
+          __tmp__YA1=result__JHIH;
         } break;
         case __ITM_TYPE_STYLE__: {
-          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;
+          Self__PHIH=((__STRING_CONSTANT *)((__ITM_TYPE_STYLE *)__tmp__XA1)->parent_itm_type_simple__RSN.name__0YP);
+          result__OHIH= 0;
+          __tmp__QHIH=Self__PHIH->count__DD;
+          Self__RHIH= 1;
+          while ((Self__RHIH <= __tmp__QHIH)) {
+            result__OHIH=(__INTEGER)((__INTEGER)( 5 * result__OHIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__PHIH->storage__FRO)[(__INTEGER)(Self__RHIH -  1)])));
+            Self__RHIH=(__INTEGER)(Self__RHIH +  1);
+          };
+          if ((result__OHIH <  0)) {
+            result__OHIH=(__INTEGER)(~ result__OHIH);
+          };
+          __tmp__YA1=result__OHIH;
         } break;
         };
-        result__O20=__tmp__M30;
+        result__050=__tmp__YA1;
       };
     };
   };
-  return(result__O20);
+  return(result__050);
 }
 
-static __CHARACTER read_style__OQF()
+static __CHARACTER read_style__STF()
 // () With resultNo recursive, No inlinable.
 {
-  __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__2CJH=FALSE__;
+  __CHARACTER result__VTF,result__2KJH,result__5KJH;
+  __BOOLEAN result__1KJH,__tmp__CUF,result__4KJH;
+  result__VTF='\0';
+  result__1KJH=FALSE__;
+  if ((! read_space__MTD())) {
+    result__1KJH=FALSE__;
   } else {
-    result__3CJH='\0';
+    result__2KJH='\0';
     if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-      result__3CJH=((__CHARACTER )(( 0)));
+      result__2KJH=((__CHARACTER )(( 0)));
     } else {
-      result__3CJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+      result__2KJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
     };
-    if ((result__3CJH == '-')) {
+    if ((result__2KJH == '-')) {
       position__CCC=(__INTEGER)(position__CCC +  1);
-      result__2CJH=TRUE__;
+      result__1KJH=TRUE__;
     };
   };
-  if (result__2CJH) {
-    result__RQF='-';
-    short__token__to__YBD((&__string_132),(__INTEGER)(position__CCC -  1),position__CCC);
-    __tmp__4QF=TRUE__;
+  if (result__1KJH) {
+    result__VTF='-';
+    short__token__to__YCD((&__string_132),(__INTEGER)(position__CCC -  1),position__CCC);
+    __tmp__CUF=TRUE__;
   } else {
-    __tmp__4QF=FALSE__;
+    __tmp__CUF=FALSE__;
   };
-  if ((! __tmp__4QF)) {
-    result__5CJH=FALSE__;
-    if ((! read_space__KSD())) {
-      result__5CJH=FALSE__;
+  if ((! __tmp__CUF)) {
+    result__4KJH=FALSE__;
+    if ((! read_space__MTD())) {
+      result__4KJH=FALSE__;
     } else {
-      result__ADJH='\0';
+      result__5KJH='\0';
       if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__ADJH=((__CHARACTER )(( 0)));
+        result__5KJH=((__CHARACTER )(( 0)));
       } else {
-        result__ADJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+        result__5KJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__ADJH == '+')) {
+      if ((result__5KJH == '+')) {
         position__CCC=(__INTEGER)(position__CCC +  1);
-        result__5CJH=TRUE__;
+        result__4KJH=TRUE__;
       };
     };
-    if (result__5CJH) {
-      result__RQF='+';
-      short__token__to__YBD((&__string_132),(__INTEGER)(position__CCC -  1),position__CCC);
+    if (result__4KJH) {
+      result__VTF='+';
+      short__token__to__YCD((&__string_132),(__INTEGER)(position__CCC -  1),position__CCC);
     } else {
-      result__RQF=' ';
+      result__VTF=' ';
     };
   };
-  return(result__RQF);
+  return(result__VTF);
 }
 
-static __FAST_ARRAYoITM_ARGUMENTo* create_with_capacity__SJ5B(__INTEGER new_count__UJ5B)
+static __FAST_ARRAYoITM_ARGUMENTo* create_with_capacity__4M5B(__INTEGER new_count__AN5B)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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__;
+  __POINTER ptr__V45B,ptr_table__CLJH,next__BLJH,result__DLJH;
+  __POINTER ptr_table__HLJH,next__GLJH,result__ILJH;
+  __INTEGER typ_id__045B;
+  __UINTEGER_32 sz__X45B,a__ZGGH,new_size__0GGH,t__4GGH,a__3GGH;
+  __UINTEGER_32 new_size__KLJH,lab_type__JLJH;
+  __FAST_ARRAYoITM_ARGUMENTo *result__U45B,*Self__ZVHC;
+  result__U45B=NULL;
+  ptr__V45B=((__POINTER )(NULL));
+  typ_id__045B= 0;
+  sz__X45B=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_ARGUMENTo));
+  if ((sz__X45B ==  0)) {
+    result__U45B=FAST_ARRAYoITM_ARGUMENTo__;
   } else {
-    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__CDJH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__DDJH)[ 0]=next__CDJH;
-        } else {
-          ((__POINTER *)result__EDJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CDJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__EDJH=next__CDJH;
-        };
-      };
-      ptr__J15B=result__EDJH;
-    } else {
-      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__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__HDJH=new_lab__ZPJ(lab_type__KDJH);
-          };
-          ((__POINTER *)next__HDJH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__IDJH)[ 0]=next__HDJH;
-        } else {
-          ((__POINTER *)result__JDJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HDJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__JDJH=next__HDJH;
-        };
-      };
-      ptr__J15B=result__JDJH;
-    };
-    result__I15B=((__FAST_ARRAYoITM_ARGUMENTo *)ptr__J15B);
-    *(result__I15B) = *(FAST_ARRAYoITM_ARGUMENTo__);
-  };
-  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__LSHC->parent_arrayed_collection__AAZB.upper__J5GC=(__INTEGER)(-  1);
-  return(result__I15B);
+    typ_id__045B=__FAST_ARRAYoITM_ARGUMENTo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__X45B);
+    if ((typ_id__045B == (__INTEGER)(-  1))) {
+      a__ZGGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__0GGH=(__UINTEGER_32)((__UINTEGER_32)(sz__X45B + a__ZGGH) & (__UINTEGER_32)(~ a__ZGGH));
+      ptr_table__CLJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__0GGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__BLJH=((__POINTER )(NULL));
+      result__DLJH=((__POINTER *)ptr_table__CLJH)[ 0];
+      if ((result__DLJH == (void *)NULL)) {
+        result__DLJH=new_lab__FTJ(new_size__0GGH);
+        next__BLJH=(void *)((unsigned long)result__DLJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0GGH)));
+        ((__POINTER *)next__BLJH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__CLJH)[ 0]=next__BLJH;
+      } else {
+        next__BLJH=((__POINTER *)result__DLJH)[ 0];
+        if ((next__BLJH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DLJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__0GGH <<  1)) <=  4096)) {
+            next__BLJH=(void *)((unsigned long)result__DLJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0GGH)));
+          } else {
+            next__BLJH=new_lab__FTJ(new_size__0GGH);
+          };
+          ((__POINTER *)next__BLJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__CLJH)[ 0]=next__BLJH;
+        } else {
+          ((__POINTER *)result__DLJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BLJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__DLJH=next__BLJH;
+        };
+      };
+      ptr__V45B=result__DLJH;
+    } else {
+      t__4GGH=((__UINTEGER_32 )typ_id__045B);
+      a__3GGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__KLJH=(__UINTEGER_32)((__UINTEGER_32)(sz__X45B + a__3GGH) & (__UINTEGER_32)(~ a__3GGH));
+      ptr_table__HLJH=((__POINTER )(&(table_type[(t__4GGH)])));
+      lab_type__JLJH=(__UINTEGER_32)(t__4GGH |  1);
+      next__GLJH=((__POINTER )(NULL));
+      result__ILJH=((__POINTER *)ptr_table__HLJH)[ 0];
+      if ((result__ILJH == (void *)NULL)) {
+        result__ILJH=new_lab__FTJ(lab_type__JLJH);
+        next__GLJH=(void *)((unsigned long)result__ILJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KLJH)));
+        ((__POINTER *)next__GLJH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__HLJH)[ 0]=next__GLJH;
+      } else {
+        next__GLJH=((__POINTER *)result__ILJH)[ 0];
+        if ((next__GLJH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ILJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__KLJH <<  1)) <=  4096)) {
+            next__GLJH=(void *)((unsigned long)result__ILJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KLJH)));
+          } else {
+            next__GLJH=new_lab__FTJ(lab_type__JLJH);
+          };
+          ((__POINTER *)next__GLJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__HLJH)[ 0]=next__GLJH;
+        } else {
+          ((__POINTER *)result__ILJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GLJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__ILJH=next__GLJH;
+        };
+      };
+      ptr__V45B=result__ILJH;
+    };
+    result__U45B=((__FAST_ARRAYoITM_ARGUMENTo *)ptr__V45B);
+    *(result__U45B) = *(FAST_ARRAYoITM_ARGUMENTo__);
+  };
+  Self__ZVHC=((__FAST_ARRAYoITM_ARGUMENTo *)result__U45B);
+  if ((Self__ZVHC->parent_arrayed_collection__MDZB.capacity__ZCHC < new_count__AN5B)) {
+    Self__ZVHC->parent_arrayed_collection__MDZB.storage__VDHC=create__VUBD(new_count__AN5B);
+    Self__ZVHC->parent_arrayed_collection__MDZB.capacity__ZCHC=new_count__AN5B;
+  };
+  Self__ZVHC->parent_arrayed_collection__MDZB.upper__XCHC=(__INTEGER)(-  1);
+  return(result__U45B);
 }
 
-static void* read_loc_arg__with_self__GBHB(__PARSER *Self__HBHB,__BOOLEAN mute__IBHB,__BOOLEAN self_first__JBHB)
+static void* read_loc_arg__with_self__SEHB(__PARSER *Self__TEHB,__BOOLEAN mute__UEHB,__BOOLEAN self_first__VEHB)
 // ({PARSER},{TRUExFALSE},{TRUExFALSE}) With resultNo recursive, No inlinable.
 {
-  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));
+  void *result__XEHB,*result__R3EE;
+  void *t__YEHB,*t__L3EE,*__tmp__KCFE,*t__N15B;
+  __POSITION pos__ZEHB,pos__R3XG,pos__T3XG,pos__V3XG,pos__X3XG;
+  __POSITION pos__Z3XG,pos__G4XG,pos__I4XG,p__L15B,p__JNMF,pos__SAYG;
+  __POSITION pos__UAYG;
+  void *n__2EHB,*n__M15B;
+  void *tb__3EHB,*__tmp__RHHB,*tb__S3EE,*__tmp__LCFE;
+  __ITM_ARG *result__QLJH,*Self__YLJH,*result__LGAC,*Self__Q3HC;
+  __POINTER ptr__RLJH,ptr_table__3LJH,next__2LJH,result__4LJH;
+  __POINTER ptr_table__CMJH,next__BMJH,result__DMJH,ptr__MGAC;
+  __POINTER ptr_table__SMJH,next__RMJH,result__TMJH,ptr_table__XMJH;
+  __POINTER next__WMJH,result__YMJH,ptr__KP1F,ptr_table__ANJH;
+  __POINTER next__5MJH,result__BNJH,ptr_table__FNJH,next__ENJH;
+  __POINTER result__GNJH,ptr__14MF,ptr_table__KNJH,next__JNJH;
+  __POINTER result__LNJH,ptr_table__PNJH,next__ONJH,result__QNJH;
+  __INTEGER typ_id__SLJH,beg__P3EE,Self__RLTF,limit_up__SLTF;
+  __INTEGER typ_id__RGAC,__tmp__4YIG,i__CIOG,h__ENQF,idx__FNQF;
+  __INTEGER idx__RN2F,new_capacity__SN2F,i__QN2F,typ_id__PP1F;
+  __INTEGER typ_id__A5MF,__tmp__AEFE,Self__SNMF;
+  __UINTEGER_32 sz__TLJH,a__ULJH,new_size__VLJH,t__WLJH,a__XLJH;
+  __UINTEGER_32 new_size__FMJH,lab_type__EMJH,sz__OGAC,a__1JGH;
+  __UINTEGER_32 new_size__2JGH,t__AKGH,a__5JGH,new_size__0MJH;
+  __UINTEGER_32 lab_type__ZMJH,sz__MP1F,a__0IGH,new_size__1IGH,t__5IGH;
+  __UINTEGER_32 a__4IGH,new_size__INJH,lab_type__HNJH,sz__34MF,a__FJGH;
+  __UINTEGER_32 new_size__GJGH,t__KJGH,a__JJGH,new_size__SNJH;
+  __UINTEGER_32 lab_type__RNJH;
+  void *tm__M3EE;
+  __ITM_ARGS *result__04MF,*Self__ZBQF;
+  __BOOLEAN result__MLJH,__tmp__IFHB,result__NLJH,__tmp__LGHB;
+  __BOOLEAN __tmp__UHHB,__tmp__YHHB,__tmp__3IHB,result__GMJH,mute__Q3EE;
+  __BOOLEAN result__KMJH,__tmp__33EE,result__LMJH,__tmp__05EE;
+  __BOOLEAN result__OMJH,__tmp__RCFE,__tmp__OCFE,__tmp__UCFE;
+  __BOOLEAN __tmp__IKQF,result__2XIG,result__TNJH;
+  __CHARACTER result__OLJH,result__K25G,result__HMJH,result__MMJH;
+  __CHARACTER result__P25G,result__PMJH,result__UNJH;
+  void *type__N3EE,*result__UUP;
+  void *name__O3EE,*result__THIH,*result__HMMF,*e__3IQF,*result__QJQF;
+  void *e__3MQF,*e__2MJH,*e__P2RF;
+  __FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *Self__UHIH,*Self__VHIH;
+  __FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *Self__JDBB,*Self__5DBB;
+  __HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo *Self__2IQF,*Self__2MQF;
+  void *node__PJQF,*node__3MJH,*node__Y2RF,*node__GNQF,*node1__UN2F;
+  void *node2__VN2F,*__tmp__WOQF;
+  __FAST_ARRAYoSTRING_CONSTANTo *Self__ZXIG,*o__3XIG,*__tmp__JYIG;
+  void **__tmp__ZYIG,**__tmp__1YIG,**Self__OHOG;
+  void **old_buckets__TN2F;
+  __HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *result__JP1F;
+  __HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *Self__JJ5F;
+  result__XEHB=NULL;
+  t__YEHB=NULL;
+  pos__ZEHB=((__POSITION ) 0);
+  n__2EHB=NULL;
+  tb__3EHB=NULL;
+  if (self_first__VEHB) {
+    result__MLJH=read_word__LRF((&__string_58));
     if (is_shorter__LZ) {
-      if (result__NDJH) {
+      if (result__MLJH) {
         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);
+          short__token__to__YCD((&__string_120),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V1C)->count__DD),position__CCC);
         } else {
-          short__token__to__YBD((&__string_119),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD),position__CCC);
+          short__token__to__YCD((&__string_119),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V1C)->count__DD),position__CCC);
         };
       };
     };
-    __tmp__2BHB=result__NDJH;
+    __tmp__IFHB=result__MLJH;
   } else {
-    __tmp__2BHB=FALSE__;
+    __tmp__IFHB=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__ODJH=FALSE__;
+  if ((__tmp__IFHB || ((! self_first__VEHB) && read_identifier__QBL()))) {
+    pos__ZEHB=current_position__EZF();
+    n__2EHB=last_string__V1C;
+    result__NLJH=FALSE__;
+    if ((! read_space__MTD())) {
+      result__NLJH=FALSE__;
     } else {
-      result__PDJH='\0';
+      result__OLJH='\0';
       if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__PDJH=((__CHARACTER )(( 0)));
+        result__OLJH=((__CHARACTER )(( 0)));
       } else {
-        result__PDJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+        result__OLJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__PDJH == ':')) {
+      if ((result__OLJH == ':')) {
         position__CCC=(__INTEGER)(position__CCC +  1);
-        result__ODJH=TRUE__;
+        result__NLJH=TRUE__;
       };
     };
-    if (result__ODJH) {
-      result__QV5G='\0';
+    if (result__NLJH) {
+      result__K25G='\0';
       if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__QV5G=((__CHARACTER )(( 0)));
+        result__K25G=((__CHARACTER )(( 0)));
       } else {
-        result__QV5G=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+        result__K25G=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
       };
-      __tmp__5CHB=(result__QV5G != '=');
+      __tmp__LGHB=(result__K25G != '=');
     } else {
-      __tmp__5CHB=FALSE__;
+      __tmp__LGHB=FALSE__;
     };
-    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)) {
+    if (__tmp__LGHB) {
+      t__YEHB=read_type__WCM(Self__TEHB,TRUE__);
+      if (((void *)t__YEHB == (void *)NULL)) {
+        pos__R3XG=current_position__EZF();
+        put_error__text__NPG( 0,(&__string_279));
+        put_position__XQG(pos__R3XG);
+        put_string__P3F(msg_err__SPG);
+        if ((type_error__RPG !=  2)) {
           exit(( 1));
         };
       };
-      if ((self_first__JBHB && ((void *)t__MBHB != (void *)type_self__LRN))) {
+      if ((self_first__VEHB && ((void *)t__YEHB != (void *)type_self__XUN))) {
         if (((void *)((__PROTOTYPE *)object__ZBC)->parent_named__5.name__LI != (void *)(&__string_40))) {
-          __tmp__IEHB=TRUE__;
+          __tmp__UHHB=TRUE__;
         } else {
-          if (t__MBHB==NULL) {
-            __tmp__FEHB=NULL;
+          if (t__YEHB==NULL) {
+            __tmp__RHHB=NULL;
           } else {
-            switch (((struct ___OBJ *)t__MBHB)->__id) {
+            switch (((struct ___OBJ *)t__YEHB)->__id) {
             case __ITM_TYPE_PARAMETER__: {
-              __tmp__FEHB=NULL;
+              __tmp__RHHB=NULL;
             } break;
             case __ITM_TYPE_SIMPLE__: {
-              __tmp__FEHB=NULL;
+              __tmp__RHHB=NULL;
             } break;
             case __ITM_TYPE_BLOCK__: {
-              __tmp__FEHB=((void *)t__MBHB);
+              __tmp__RHHB=((void *)t__YEHB);
             } break;
             case __ITM_TYPE_GENERIC__: {
-              __tmp__FEHB=NULL;
+              __tmp__RHHB=NULL;
             } break;
             case __ITM_TYPE_STYLE__: {
-              __tmp__FEHB=NULL;
+              __tmp__RHHB=NULL;
             } break;
             }
           };
-          tb__RBHB=__tmp__FEHB;
-          __tmp__IEHB=((void *)__tmp__FEHB == (void *)NULL);
+          tb__3EHB=__tmp__RHHB;
+          __tmp__UHHB=((void *)__tmp__RHHB == (void *)NULL);
         };
-        __tmp__MEHB=__tmp__IEHB;
+        __tmp__YHHB=__tmp__UHHB;
       } else {
-        __tmp__MEHB=FALSE__;
+        __tmp__YHHB=FALSE__;
       };
-      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)) {
+      if (__tmp__YHHB) {
+        pos__T3XG=current_position__EZF();
+        put_error__text__NPG( 0,(&__string_280));
+        put_position__XQG(pos__T3XG);
+        put_string__P3F(msg_err__SPG);
+        if ((type_error__RPG !=  2)) {
           exit(( 1));
         };
       };
-      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)));
+      result__QLJH=NULL;
+      ptr__RLJH=((__POINTER )(NULL));
+      typ_id__SLJH= 0;
+      sz__TLJH=((__UINTEGER_32 )sizeof(__ITM_ARG));
+      if ((sz__TLJH ==  0)) {
+        result__QLJH=ITM_ARG__;
+      } else {
+        typ_id__SLJH=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__TLJH);
+        if ((typ_id__SLJH == (__INTEGER)(-  1))) {
+          a__ULJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__VLJH=(__UINTEGER_32)((__UINTEGER_32)(sz__TLJH + a__ULJH) & (__UINTEGER_32)(~ a__ULJH));
+          ptr_table__3LJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__VLJH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__2LJH=((__POINTER )(NULL));
+          result__4LJH=((__POINTER *)ptr_table__3LJH)[ 0];
+          if ((result__4LJH == (void *)NULL)) {
+            result__4LJH=new_lab__FTJ(new_size__VLJH);
+            next__2LJH=(void *)((unsigned long)result__4LJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VLJH)));
+            ((__POINTER *)next__2LJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__3LJH)[ 0]=next__2LJH;
+          } else {
+            next__2LJH=((__POINTER *)result__4LJH)[ 0];
+            if ((next__2LJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4LJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__VLJH <<  1)) <=  4096)) {
+                next__2LJH=(void *)((unsigned long)result__4LJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VLJH)));
               } else {
-                next__3DJH=new_lab__ZPJ(new_size__WDJH);
+                next__2LJH=new_lab__FTJ(new_size__VLJH);
               };
-              ((__POINTER *)next__3DJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__4DJH)[ 0]=next__3DJH;
+              ((__POINTER *)next__2LJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__3LJH)[ 0]=next__2LJH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__4LJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2LJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__4LJH=next__2LJH;
+            };
+          };
+          ptr__RLJH=result__4LJH;
+        } else {
+          t__WLJH=((__UINTEGER_32 )typ_id__SLJH);
+          a__XLJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__FMJH=(__UINTEGER_32)((__UINTEGER_32)(sz__TLJH + a__XLJH) & (__UINTEGER_32)(~ a__XLJH));
+          ptr_table__CMJH=((__POINTER )(&(table_type[(t__WLJH)])));
+          lab_type__EMJH=(__UINTEGER_32)(t__WLJH |  1);
+          next__BMJH=((__POINTER )(NULL));
+          result__DMJH=((__POINTER *)ptr_table__CMJH)[ 0];
+          if ((result__DMJH == (void *)NULL)) {
+            result__DMJH=new_lab__FTJ(lab_type__EMJH);
+            next__BMJH=(void *)((unsigned long)result__DMJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FMJH)));
+            ((__POINTER *)next__BMJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__CMJH)[ 0]=next__BMJH;
+          } else {
+            next__BMJH=((__POINTER *)result__DMJH)[ 0];
+            if ((next__BMJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DMJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__FMJH <<  1)) <=  4096)) {
+                next__BMJH=(void *)((unsigned long)result__DMJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FMJH)));
               } else {
-                next__CEJH=new_lab__ZPJ(lab_type__FEJH);
+                next__BMJH=new_lab__FTJ(lab_type__EMJH);
               };
-              ((__POINTER *)next__CEJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__DEJH)[ 0]=next__CEJH;
+              ((__POINTER *)next__BMJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__CMJH)[ 0]=next__BMJH;
             } else {
-              ((__POINTER *)result__EEJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CEJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__EEJH=next__CEJH;
+              ((__POINTER *)result__DMJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BMJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__DMJH=next__BMJH;
             };
           };
-          ptr__SDJH=result__EEJH;
+          ptr__RLJH=result__DMJH;
         };
-        result__RDJH=((__ITM_ARG *)ptr__SDJH);
-        *(result__RDJH) = *(ITM_ARG__);
+        result__QLJH=((__ITM_ARG *)ptr__RLJH);
+        *(result__QLJH) = *(ITM_ARG__);
       };
-      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;
+      Self__YLJH=((__ITM_ARG *)result__QLJH);
+      Self__YLJH->parent_itm_argument__DIHB.parent_itm_code__C5M.position__GFJ=pos__ZEHB;
+      Self__YLJH->name__U3HC=n__2EHB;
+      Self__YLJH->type__V3HC=t__YEHB;
+      result__XEHB=result__QLJH;
       if (is_shorter__LZ) {
-        add__AJHB(short_local__XCC,n__QBHB);
+        add__MMHB(short_local__XCC,n__2EHB);
       };
     } else {
-      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)) {
+      if ((! mute__UEHB)) {
+        pos__V3XG=current_position__EZF();
+        put_error__text__NPG( 2,(&__string_281));
+        put_position__XQG(pos__V3XG);
+        put_string__P3F(msg_err__SPG);
+        if ((type_error__RPG !=  2)) {
           exit(( 1));
         };
       };
     };
-    __tmp__RFHB=TRUE__;
+    __tmp__3IHB=TRUE__;
   } else {
-    __tmp__RFHB=FALSE__;
+    __tmp__3IHB=FALSE__;
   };
-  if ((! __tmp__RFHB)) {
-    result__HEJH=FALSE__;
-    if ((! read_space__KSD())) {
-      result__HEJH=FALSE__;
+  if ((! __tmp__3IHB)) {
+    result__GMJH=FALSE__;
+    if ((! read_space__MTD())) {
+      result__GMJH=FALSE__;
     } else {
-      result__IEJH='\0';
+      result__HMJH='\0';
       if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__IEJH=((__CHARACTER )(( 0)));
+        result__HMJH=((__CHARACTER )(( 0)));
       } else {
-        result__IEJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+        result__HMJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__IEJH == '(')) {
+      if ((result__HMJH == '(')) {
         position__CCC=(__INTEGER)(position__CCC +  1);
-        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));
+        result__GMJH=TRUE__;
+      };
+    };
+    if (result__GMJH) {
+      t__L3EE=NULL;
+      tm__M3EE=NULL;
+      type__N3EE=NULL;
+      name__O3EE=NULL;
+      beg__P3EE= 0;
+      result__R3EE=NULL;
+      tb__S3EE=NULL;
+      mute__Q3EE=mute__UEHB;
+      if (self_first__VEHB) {
+        result__KMJH=read_word__LRF((&__string_58));
         if (is_shorter__LZ) {
-          if (result__LEJH) {
+          if (result__KMJH) {
             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);
+              short__token__to__YCD((&__string_120),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V1C)->count__DD),position__CCC);
             } else {
-              short__token__to__YBD((&__string_119),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD),position__CCC);
+              short__token__to__YCD((&__string_119),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V1C)->count__DD),position__CCC);
             };
           };
         };
-        __tmp__P0EE=result__LEJH;
+        __tmp__33EE=result__KMJH;
       } else {
-        __tmp__P0EE=FALSE__;
+        __tmp__33EE=FALSE__;
       };
-      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);
+      if ((__tmp__33EE || read_identifier__QBL())) {
+        result__THIH=NULL;
+        if ((((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)free_list__PAL)->parent_arrayed_collection__OAL.upper__5UU <  0)) {
+          result__THIH=create_with_capacity__ZKRC( 16);
         } else {
-          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);
+          Self__UHIH=((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)free_list__PAL);
+          result__THIH=((void **)Self__UHIH->parent_arrayed_collection__OAL.storage__PXU)[Self__UHIH->parent_arrayed_collection__OAL.upper__5UU];
+          Self__VHIH=((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)free_list__PAL);
+          Self__VHIH->parent_arrayed_collection__OAL.upper__5UU=(__INTEGER)(Self__VHIH->parent_arrayed_collection__OAL.upper__5UU -  1);
         };
-        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);
+        name__O3EE=result__THIH;
+        result__UUP=NULL;
+        if ((((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__0UP)->parent_arrayed_collection__ZUP.upper__NVV <  0)) {
+          result__UUP=create_with_capacity__YFR( 16);
         } else {
-          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);
+          Self__JDBB=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__0UP);
+          result__UUP=((void **)Self__JDBB->parent_arrayed_collection__ZUP.storage__D0V)[Self__JDBB->parent_arrayed_collection__ZUP.upper__NVV];
+          Self__5DBB=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__0UP);
+          Self__5DBB->parent_arrayed_collection__ZUP.upper__NVV=(__INTEGER)(Self__5DBB->parent_arrayed_collection__ZUP.upper__NVV -  1);
         };
-        type__5ZEE=result__IRP;
-        beg__B0EE= 0;
+        type__N3EE=result__UUP;
+        beg__P3EE= 0;
         do {
-          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)) {
+          if (((((__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)name__O3EE)->parent_arrayed_collection__ABJ.upper__VBPD +  1) !=  0) && (! read_identifier__QBL())) && (! mute__Q3EE))) {
+            pos__X3XG=current_position__EZF();
+            put_error__text__NPG( 0,(&__string_282));
+            put_position__XQG(pos__X3XG);
+            put_string__P3F(msg_err__SPG);
+            if ((type_error__RPG !=  2)) {
               exit(( 1));
             };
           };
-          add_last__35OD(name__A0EE,last_string__V0C);
-          result__MEJH=FALSE__;
-          if ((! read_space__KSD())) {
-            result__MEJH=FALSE__;
+          add_last__LDPD(name__O3EE,last_string__V1C);
+          result__LMJH=FALSE__;
+          if ((! read_space__MTD())) {
+            result__LMJH=FALSE__;
           } else {
-            result__NEJH='\0';
+            result__MMJH='\0';
             if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-              result__NEJH=((__CHARACTER )(( 0)));
+              result__MMJH=((__CHARACTER )(( 0)));
             } else {
-              result__NEJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+              result__MMJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
             };
-            if ((result__NEJH == ':')) {
+            if ((result__MMJH == ':')) {
               position__CCC=(__INTEGER)(position__CCC +  1);
-              result__MEJH=TRUE__;
+              result__LMJH=TRUE__;
             };
           };
-          if (result__MEJH) {
-            result__VV5G='\0';
+          if (result__LMJH) {
+            result__P25G='\0';
             if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-              result__VV5G=((__CHARACTER )(( 0)));
+              result__P25G=((__CHARACTER )(( 0)));
             } else {
-              result__VV5G=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+              result__P25G=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
             };
-            __tmp__M2EE=(result__VV5G != '=');
+            __tmp__05EE=(result__P25G != '=');
           } else {
-            __tmp__M2EE=FALSE__;
+            __tmp__05EE=FALSE__;
           };
-          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)) {
+          if (__tmp__05EE) {
+            mute__Q3EE=FALSE__;
+            t__L3EE=read_type__WCM(Self__TEHB,TRUE__);
+            if (((void *)t__L3EE == (void *)NULL)) {
+              pos__Z3XG=current_position__EZF();
+              put_error__text__NPG( 0,(&__string_283));
+              put_position__XQG(pos__Z3XG);
+              put_string__P3F(msg_err__SPG);
+              if ((type_error__RPG !=  2)) {
                 exit(( 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);
+            Self__RLTF=beg__P3EE;
+            limit_up__SLTF=((__FAST_ARRAYoSTRING_CONSTANTo *)name__O3EE)->parent_arrayed_collection__ABJ.upper__VBPD;
+            while ((Self__RLTF <= limit_up__SLTF)) {
+              add_last__COV(type__N3EE,t__L3EE);
+              Self__RLTF=(__INTEGER)(Self__RLTF +  1);
             };
-            beg__B0EE=(__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)name__A0EE)->parent_arrayed_collection__U3I.upper__H4OD +  1);
+            beg__P3EE=(__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)name__O3EE)->parent_arrayed_collection__ABJ.upper__VBPD +  1);
           };
-          result__PEJH=FALSE__;
-          if ((! read_space__KSD())) {
-            result__PEJH=FALSE__;
+          result__OMJH=FALSE__;
+          if ((! read_space__MTD())) {
+            result__OMJH=FALSE__;
           } else {
-            result__QEJH='\0';
+            result__PMJH='\0';
             if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-              result__QEJH=((__CHARACTER )(( 0)));
+              result__PMJH=((__CHARACTER )(( 0)));
             } else {
-              result__QEJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+              result__PMJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
             };
-            if ((result__QEJH == ',')) {
+            if ((result__PMJH == ',')) {
               position__CCC=(__INTEGER)(position__CCC +  1);
-              result__PEJH=TRUE__;
+              result__OMJH=TRUE__;
             };
           };
-        } 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)) {
+        } while (result__OMJH);
+        if ((beg__P3EE != (__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)result__THIH)->parent_arrayed_collection__ABJ.upper__VBPD +  1))) {
+          if ((! mute__Q3EE)) {
+            pos__G4XG=current_position__EZF();
+            put_error__text__NPG( 0,(&__string_283));
+            put_position__XQG(pos__G4XG);
+            put_string__P3F(msg_err__SPG);
+            if ((type_error__RPG !=  2)) {
               exit(( 1));
             };
           };
-          free__WP5(result__AAIH);
-          free__AKQ(result__IRP);
+          free__EV5(result__THIH);
+          free__MNQ(result__UUP);
         } else {
-          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__;
+          if (self_first__VEHB) {
+            if (((void *)((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)result__UUP)->parent_arrayed_collection__EYC.storage__ZMV)[ 0] != (void *)type_self__XUN)) {
+              __tmp__RCFE=TRUE__;
             } else {
               if (((void *)((__PROTOTYPE *)object__ZBC)->parent_named__5.name__LI == (void *)(&__string_40))) {
-                __tmp__24EE=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)result__IRP)->parent_arrayed_collection__EYC.storage__NJV)[ 0];
-                if (__tmp__24EE==NULL) {
-                  __tmp__34EE=NULL;
+                __tmp__KCFE=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)result__UUP)->parent_arrayed_collection__EYC.storage__ZMV)[ 0];
+                if (__tmp__KCFE==NULL) {
+                  __tmp__LCFE=NULL;
                 } else {
-                  switch (((struct ___OBJ *)__tmp__24EE)->__id) {
+                  switch (((struct ___OBJ *)__tmp__KCFE)->__id) {
                   case __ITM_TYPE_PARAMETER__: {
-                    __tmp__34EE=NULL;
+                    __tmp__LCFE=NULL;
                   } break;
                   case __ITM_TYPE_SIMPLE__: {
-                    __tmp__34EE=NULL;
+                    __tmp__LCFE=NULL;
                   } break;
                   case __ITM_TYPE_BLOCK__: {
-                    __tmp__34EE=((void *)__tmp__24EE);
+                    __tmp__LCFE=((void *)__tmp__KCFE);
                   } break;
                   case __ITM_TYPE_GENERIC__: {
-                    __tmp__34EE=NULL;
+                    __tmp__LCFE=NULL;
                   } break;
                   case __ITM_TYPE_STYLE__: {
-                    __tmp__34EE=NULL;
+                    __tmp__LCFE=NULL;
                   } break;
                   }
                 };
-                tb__E0EE=__tmp__34EE;
-                __tmp__A5EE=((void *)__tmp__34EE == (void *)NULL);
+                tb__S3EE=__tmp__LCFE;
+                __tmp__OCFE=((void *)__tmp__LCFE == (void *)NULL);
               } else {
-                __tmp__A5EE=FALSE__;
+                __tmp__OCFE=FALSE__;
               };
-              __tmp__D5EE=__tmp__A5EE;
+              __tmp__RCFE=__tmp__OCFE;
             };
-            __tmp__G5EE=__tmp__D5EE;
+            __tmp__UCFE=__tmp__RCFE;
           } else {
-            __tmp__G5EE=FALSE__;
+            __tmp__UCFE=FALSE__;
           };
-          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)) {
+          if (__tmp__UCFE) {
+            pos__I4XG=current_position__EZF();
+            put_error__text__NPG( 0,(&__string_280));
+            put_position__XQG(pos__I4XG);
+            put_string__P3F(msg_err__SPG);
+            if ((type_error__RPG !=  2)) {
               exit(( 1));
             };
           };
-          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__;
+          if (((__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)result__THIH)->parent_arrayed_collection__ABJ.upper__VBPD +  1) ==  1)) {
+            p__L15B=current_position__EZF();
+            n__M15B=((void **)((__FAST_ARRAYoSTRING_CONSTANTo *)result__THIH)->parent_arrayed_collection__ABJ.storage__LEPD)[ 0];
+            t__N15B=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)result__UUP)->parent_arrayed_collection__EYC.storage__ZMV)[ 0];
+            result__LGAC=NULL;
+            ptr__MGAC=((__POINTER )(NULL));
+            typ_id__RGAC= 0;
+            sz__OGAC=((__UINTEGER_32 )sizeof(__ITM_ARG));
+            if ((sz__OGAC ==  0)) {
+              result__LGAC=ITM_ARG__;
             } else {
-              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;
+              typ_id__RGAC=-1;
+              clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__OGAC);
+              if ((typ_id__RGAC == (__INTEGER)(-  1))) {
+                a__1JGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                new_size__2JGH=(__UINTEGER_32)((__UINTEGER_32)(sz__OGAC + a__1JGH) & (__UINTEGER_32)(~ a__1JGH));
+                ptr_table__SMJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__2JGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                next__RMJH=((__POINTER )(NULL));
+                result__TMJH=((__POINTER *)ptr_table__SMJH)[ 0];
+                if ((result__TMJH == (void *)NULL)) {
+                  result__TMJH=new_lab__FTJ(new_size__2JGH);
+                  next__RMJH=(void *)((unsigned long)result__TMJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2JGH)));
+                  ((__POINTER *)next__RMJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__SMJH)[ 0]=next__RMJH;
                 } else {
-                  next__SEJH=((__POINTER *)result__UEJH)[ 0];
-                  if ((next__SEJH == (void *)NULL)) {
-                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__UEJH - (unsigned long)begin_memory__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)));
+                  next__RMJH=((__POINTER *)result__TMJH)[ 0];
+                  if ((next__RMJH == (void *)NULL)) {
+                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TMJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__2JGH <<  1)) <=  4096)) {
+                      next__RMJH=(void *)((unsigned long)result__TMJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2JGH)));
                     } else {
-                      next__SEJH=new_lab__ZPJ(new_size__BDGH);
+                      next__RMJH=new_lab__FTJ(new_size__2JGH);
                     };
-                    ((__POINTER *)next__SEJH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__TEJH)[ 0]=next__SEJH;
+                    ((__POINTER *)next__RMJH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__SMJH)[ 0]=next__RMJH;
                   } else {
-                    ((__POINTER *)result__UEJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__SEJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__UEJH=next__SEJH;
+                    ((__POINTER *)result__TMJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RMJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__TMJH=next__RMJH;
                   };
                 };
-                ptr__ADAC=result__UEJH;
+                ptr__MGAC=result__TMJH;
               } else {
-                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;
+                t__AKGH=((__UINTEGER_32 )typ_id__RGAC);
+                a__5JGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                new_size__0MJH=(__UINTEGER_32)((__UINTEGER_32)(sz__OGAC + a__5JGH) & (__UINTEGER_32)(~ a__5JGH));
+                ptr_table__XMJH=((__POINTER )(&(table_type[(t__AKGH)])));
+                lab_type__ZMJH=(__UINTEGER_32)(t__AKGH |  1);
+                next__WMJH=((__POINTER )(NULL));
+                result__YMJH=((__POINTER *)ptr_table__XMJH)[ 0];
+                if ((result__YMJH == (void *)NULL)) {
+                  result__YMJH=new_lab__FTJ(lab_type__ZMJH);
+                  next__WMJH=(void *)((unsigned long)result__YMJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0MJH)));
+                  ((__POINTER *)next__WMJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__XMJH)[ 0]=next__WMJH;
                 } else {
-                  next__XEJH=((__POINTER *)result__ZEJH)[ 0];
-                  if ((next__XEJH == (void *)NULL)) {
-                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ZEJH - (unsigned long)begin_memory__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)));
+                  next__WMJH=((__POINTER *)result__YMJH)[ 0];
+                  if ((next__WMJH == (void *)NULL)) {
+                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YMJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__0MJH <<  1)) <=  4096)) {
+                      next__WMJH=(void *)((unsigned long)result__YMJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0MJH)));
                     } else {
-                      next__XEJH=new_lab__ZPJ(lab_type__0EJH);
+                      next__WMJH=new_lab__FTJ(lab_type__ZMJH);
                     };
-                    ((__POINTER *)next__XEJH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__YEJH)[ 0]=next__XEJH;
+                    ((__POINTER *)next__WMJH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__XMJH)[ 0]=next__WMJH;
                   } else {
-                    ((__POINTER *)result__ZEJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XEJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__ZEJH=next__XEJH;
+                    ((__POINTER *)result__YMJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WMJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__YMJH=next__WMJH;
                   };
                 };
-                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;
+                ptr__MGAC=result__YMJH;
+              };
+              result__LGAC=((__ITM_ARG *)ptr__MGAC);
+              *(result__LGAC) = *(ITM_ARG__);
+            };
+            Self__Q3HC=((__ITM_ARG *)result__LGAC);
+            Self__Q3HC->parent_itm_argument__DIHB.parent_itm_code__C5M.position__GFJ=p__L15B;
+            Self__Q3HC->name__U3HC=n__M15B;
+            Self__Q3HC->type__V3HC=t__N15B;
+            result__R3EE=result__LGAC;
+            free__EV5(result__THIH);
+            free__MNQ(result__UUP);
+          } else {
+            result__HMMF=NULL;
+            if ((((__FAST_ARRAYoSTRING_CONSTANTo *)result__THIH)->parent_arrayed_collection__ABJ.upper__VBPD <  0)) {
+              result__HMMF=empty_list__OMMF;
             } else {
-              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:
+              Self__2IQF=((__HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo *)bucket__YMMF);
+              e__3IQF=result__THIH;
+              result__QJQF=NULL;
+              node__PJQF=((void **)Self__2IQF->buckets__XJQF)[(__INTEGER)(hash_code__TTRF(result__THIH) % Self__2IQF->capacity__SJQF)];
+              until_do__1URF:
               {
-                if (((void *)node__IEQF == (void *)NULL)) {
-                  __tmp__BFQF=TRUE__;
+                if (((void *)node__PJQF == (void *)NULL)) {
+                  __tmp__IKQF=TRUE__;
                 } else {
-                  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__;
+                  Self__ZXIG=((__FAST_ARRAYoSTRING_CONSTANTo *)((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__PJQF)->item__DKQF);
+                  result__2XIG=FALSE__;
+                  o__3XIG=NULL;
+                  if (((void *)Self__ZXIG == (void *)e__3IQF)) {
+                    result__2XIG=TRUE__;
                   } else {
-                    if (e__WDQF==NULL) {
-                      __tmp__CTIG=NULL;
+                    if (e__3IQF==NULL) {
+                      __tmp__JYIG=NULL;
                     } else {
-                      __tmp__CTIG=((__FAST_ARRAYoSTRING_CONSTANTo *)e__WDQF);
+                      __tmp__JYIG=((__FAST_ARRAYoSTRING_CONSTANTo *)e__3IQF);
                     };
-                    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);
+                    o__3XIG=__tmp__JYIG;
+                    if ((((void *)__tmp__JYIG != (void *)NULL) && (Self__ZXIG->parent_arrayed_collection__ABJ.upper__VBPD == __tmp__JYIG->parent_arrayed_collection__ABJ.upper__VBPD))) {
+                      __tmp__ZYIG=Self__ZXIG->parent_arrayed_collection__ABJ.storage__LEPD;
+                      __tmp__1YIG=__tmp__JYIG->parent_arrayed_collection__ABJ.storage__LEPD;
+                      __tmp__4YIG=(__INTEGER)(Self__ZXIG->parent_arrayed_collection__ABJ.upper__VBPD +  1);
+                      Self__OHOG=((void **)__tmp__ZYIG);
+                      i__CIOG=(__INTEGER)(__tmp__4YIG -  1);
+                      while (((i__CIOG >=  0) && ((void *)Self__OHOG[i__CIOG] == (void *)((void **)__tmp__1YIG)[i__CIOG]))) {
+                        i__CIOG=(__INTEGER)(i__CIOG -  1);
                       };
-                      result__VSIG=(i__1COG <  0);
+                      result__2XIG=(i__CIOG <  0);
                     };
                   };
-                  __tmp__BFQF=result__VSIG;
+                  __tmp__IKQF=result__2XIG;
                 };
-                if ((! __tmp__BFQF)) {
-                  node__IEQF=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__IEQF)->next__IFQF;
-                  goto until_do__UPRF;
+                if ((! __tmp__IKQF)) {
+                  node__PJQF=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__PJQF)->next__PKQF;
+                  goto until_do__1URF;
                 };
               };
-              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;
+              if (((void *)node__PJQF != (void *)NULL)) {
+                result__QJQF=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__PJQF)->item__DKQF;
+              };
+              result__HMMF=result__QJQF;
+              if (((void *)result__QJQF == (void *)NULL)) {
+                result__HMMF=create_with_capacity__ZKRC((__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)result__THIH)->parent_arrayed_collection__ABJ.upper__VBPD +  1));
+                copy__44RD(result__HMMF,result__THIH);
+                Self__2MQF=((__HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo *)bucket__YMMF);
+                e__3MQF=result__HMMF;
+                e__2MJH=result__HMMF;
+                node__3MJH=((void **)Self__2MQF->buckets__XJQF)[(__INTEGER)(hash_code__TTRF(result__HMMF) % Self__2MQF->capacity__SJQF)];
+                while ((! (((void *)node__3MJH == (void *)NULL) || ((void *)((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__3MJH)->item__DKQF == (void *)e__2MJH)))) {
+                  node__3MJH=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__3MJH)->next__PKQF;
                 };
-                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;
+                e__P2RF=result__HMMF;
+                node__Y2RF=((void **)Self__2MQF->buckets__XJQF)[(__INTEGER)(hash_code__TTRF(result__HMMF) % Self__2MQF->capacity__SJQF)];
+                while ((! (((void *)node__Y2RF == (void *)NULL) || ((void *)((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__Y2RF)->item__DKQF == (void *)e__P2RF)))) {
+                  node__Y2RF=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__Y2RF)->next__PKQF;
                 };
-                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;
+                h__ENQF=hash_code__TTRF(result__HMMF);
+                idx__FNQF=(__INTEGER)(h__ENQF % Self__2MQF->capacity__SJQF);
+                node__GNQF=((void **)Self__2MQF->buckets__XJQF)[idx__FNQF];
+                while ((! (((void *)node__GNQF == (void *)NULL) || ((void *)((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__GNQF)->item__DKQF == (void *)e__3MQF)))) {
+                  node__GNQF=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__GNQF)->next__PKQF;
                 };
-                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;
+                if (((void *)node__GNQF == (void *)NULL)) {
+                  if ((Self__2MQF->capacity__SJQF == Self__2MQF->count__JOQF)) {
+                    idx__RN2F= 0;
+                    node1__UN2F=NULL;
+                    node2__VN2F=NULL;
+                    new_capacity__SN2F=prime_number_ceiling__541((__INTEGER)(Self__2MQF->capacity__SJQF +  1));
+                    old_buckets__TN2F=Self__2MQF->buckets__XJQF;
+                    Self__2MQF->buckets__XJQF=create__LLUF(new_capacity__SN2F);
+                    i__QN2F=(__INTEGER)(Self__2MQF->capacity__SJQF -  1);
+                    Self__2MQF->capacity__SJQF=new_capacity__SN2F;
+                    while ((i__QN2F >=  0)) {
+                      node1__UN2F=((void **)old_buckets__TN2F)[i__QN2F];
+                      while (((void *)node1__UN2F != (void *)NULL)) {
+                        node2__VN2F=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node1__UN2F)->next__PKQF;
+                        idx__RN2F=(__INTEGER)(hash_code__TTRF(((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node1__UN2F)->item__DKQF) % Self__2MQF->capacity__SJQF);
+                        ((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node1__UN2F)->next__PKQF=((void **)Self__2MQF->buckets__XJQF)[idx__RN2F];
+                        ((void **)Self__2MQF->buckets__XJQF)[idx__RN2F]=node1__UN2F;
+                        node1__UN2F=node2__VN2F;
                       };
-                      i__JI2F=(__INTEGER)(i__JI2F -  1);
+                      i__QN2F=(__INTEGER)(i__QN2F -  1);
                     };
-                    idx__4HQF=(__INTEGER)(h__3HQF % Self__VHQF->capacity__LEQF);
+                    idx__FNQF=(__INTEGER)(h__ENQF % Self__2MQF->capacity__SJQF);
                   };
-                  __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__;
+                  __tmp__WOQF=((void **)Self__2MQF->buckets__XJQF)[idx__FNQF];
+                  result__JP1F=NULL;
+                  ptr__KP1F=((__POINTER )(NULL));
+                  typ_id__PP1F= 0;
+                  sz__MP1F=((__UINTEGER_32 )sizeof(__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo));
+                  if ((sz__MP1F ==  0)) {
+                    result__JP1F=HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo__;
                   } else {
-                    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;
+                    typ_id__PP1F=__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo__;
+                    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__MP1F);
+                    if ((typ_id__PP1F == (__INTEGER)(-  1))) {
+                      a__0IGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                      new_size__1IGH=(__UINTEGER_32)((__UINTEGER_32)(sz__MP1F + a__0IGH) & (__UINTEGER_32)(~ a__0IGH));
+                      ptr_table__ANJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__1IGH / ((__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__FTJ(new_size__1IGH);
+                        next__5MJH=(void *)((unsigned long)result__BNJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1IGH)));
+                        ((__POINTER *)next__5MJH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__ANJH)[ 0]=next__5MJH;
                       } else {
-                        next__AFJH=((__POINTER *)result__CFJH)[ 0];
-                        if ((next__AFJH == (void *)NULL)) {
-                          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__CFJH - (unsigned long)begin_memory__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)));
+                        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__SXH)))) &  4095) + (__UINTEGER_32)(new_size__1IGH <<  1)) <=  4096)) {
+                            next__5MJH=(void *)((unsigned long)result__BNJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1IGH)));
                           } else {
-                            next__AFJH=new_lab__ZPJ(new_size__ACGH);
+                            next__5MJH=new_lab__FTJ(new_size__1IGH);
                           };
-                          ((__POINTER *)next__AFJH)[ 0]=NULL;
-                          ((__POINTER *)ptr_table__BFJH)[ 0]=next__AFJH;
+                          ((__POINTER *)next__5MJH)[ 0]=NULL;
+                          ((__POINTER *)ptr_table__ANJH)[ 0]=next__5MJH;
                         } else {
-                          ((__POINTER *)result__CFJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__AFJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                          result__CFJH=next__AFJH;
+                          ((__POINTER *)result__BNJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5MJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                          result__BNJH=next__5MJH;
                         };
                       };
-                      ptr__DK1F=result__CFJH;
+                      ptr__KP1F=result__BNJH;
                     } else {
-                      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;
+                      t__5IGH=((__UINTEGER_32 )typ_id__PP1F);
+                      a__4IGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                      new_size__INJH=(__UINTEGER_32)((__UINTEGER_32)(sz__MP1F + a__4IGH) & (__UINTEGER_32)(~ a__4IGH));
+                      ptr_table__FNJH=((__POINTER )(&(table_type[(t__5IGH)])));
+                      lab_type__HNJH=(__UINTEGER_32)(t__5IGH |  1);
+                      next__ENJH=((__POINTER )(NULL));
+                      result__GNJH=((__POINTER *)ptr_table__FNJH)[ 0];
+                      if ((result__GNJH == (void *)NULL)) {
+                        result__GNJH=new_lab__FTJ(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__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)));
+                        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__SXH)))) &  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__FFJH=new_lab__ZPJ(lab_type__IFJH);
+                            next__ENJH=new_lab__FTJ(lab_type__HNJH);
                           };
-                          ((__POINTER *)next__FFJH)[ 0]=NULL;
-                          ((__POINTER *)ptr_table__GFJH)[ 0]=next__FFJH;
+                          ((__POINTER *)next__ENJH)[ 0]=NULL;
+                          ((__POINTER *)ptr_table__FNJH)[ 0]=next__ENJH;
                         } else {
-                          ((__POINTER *)result__HFJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FFJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                          result__HFJH=next__FFJH;
+                          ((__POINTER *)result__GNJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ENJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                          result__GNJH=next__ENJH;
                         };
                       };
-                      ptr__DK1F=result__HFJH;
+                      ptr__KP1F=result__GNJH;
                     };
-                    result__CK1F=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)ptr__DK1F);
-                    *(result__CK1F) = *(HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo__);
+                    result__JP1F=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)ptr__KP1F);
+                    *(result__JP1F) = *(HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo__);
                   };
-                  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);
+                  Self__JJ5F=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)result__JP1F);
+                  Self__JJ5F->item__DKQF=result__HMMF;
+                  Self__JJ5F->next__PKQF=__tmp__WOQF;
+                  node__GNQF=result__JP1F;
+                  ((void **)Self__2MQF->buckets__XJQF)[idx__FNQF]=result__JP1F;
+                  Self__2MQF->count__JOQF=(__INTEGER)(Self__2MQF->count__JOQF +  1);
                 };
               };
             };
-            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__;
+            free__EV5(result__THIH);
+            name__O3EE=result__HMMF;
+            type__N3EE=alias__WVP(result__UUP);
+            tm__M3EE=get__SJP(type__N3EE);
+            p__JNMF=current_position__EZF();
+            result__04MF=NULL;
+            ptr__14MF=((__POINTER )(NULL));
+            typ_id__A5MF= 0;
+            sz__34MF=((__UINTEGER_32 )sizeof(__ITM_ARGS));
+            if ((sz__34MF ==  0)) {
+              result__04MF=ITM_ARGS__;
             } else {
-              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;
+              typ_id__A5MF=-1;
+              clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__34MF);
+              if ((typ_id__A5MF == (__INTEGER)(-  1))) {
+                a__FJGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                new_size__GJGH=(__UINTEGER_32)((__UINTEGER_32)(sz__34MF + a__FJGH) & (__UINTEGER_32)(~ a__FJGH));
+                ptr_table__KNJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__GJGH / ((__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__FTJ(new_size__GJGH);
+                  next__JNJH=(void *)((unsigned long)result__LNJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GJGH)));
+                  ((__POINTER *)next__JNJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__KNJH)[ 0]=next__JNJH;
                 } else {
-                  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)));
+                  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__SXH)))) &  4095) + (__UINTEGER_32)(new_size__GJGH <<  1)) <=  4096)) {
+                      next__JNJH=(void *)((unsigned long)result__LNJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GJGH)));
                     } else {
-                      next__KFJH=new_lab__ZPJ(new_size__LCGH);
+                      next__JNJH=new_lab__FTJ(new_size__GJGH);
                     };
-                    ((__POINTER *)next__KFJH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__LFJH)[ 0]=next__KFJH;
+                    ((__POINTER *)next__JNJH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__KNJH)[ 0]=next__JNJH;
                   } else {
-                    ((__POINTER *)result__MFJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KFJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__MFJH=next__KFJH;
+                    ((__POINTER *)result__LNJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JNJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__LNJH=next__JNJH;
                   };
                 };
-                ptr__UZMF=result__MFJH;
+                ptr__14MF=result__LNJH;
               } else {
-                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;
+                t__KJGH=((__UINTEGER_32 )typ_id__A5MF);
+                a__JJGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                new_size__SNJH=(__UINTEGER_32)((__UINTEGER_32)(sz__34MF + a__JJGH) & (__UINTEGER_32)(~ a__JJGH));
+                ptr_table__PNJH=((__POINTER )(&(table_type[(t__KJGH)])));
+                lab_type__RNJH=(__UINTEGER_32)(t__KJGH |  1);
+                next__ONJH=((__POINTER )(NULL));
+                result__QNJH=((__POINTER *)ptr_table__PNJH)[ 0];
+                if ((result__QNJH == (void *)NULL)) {
+                  result__QNJH=new_lab__FTJ(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__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)));
+                  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__SXH)))) &  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__PFJH=new_lab__ZPJ(lab_type__SFJH);
+                      next__ONJH=new_lab__FTJ(lab_type__RNJH);
                     };
-                    ((__POINTER *)next__PFJH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__QFJH)[ 0]=next__PFJH;
+                    ((__POINTER *)next__ONJH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__PNJH)[ 0]=next__ONJH;
                   } else {
-                    ((__POINTER *)result__RFJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PFJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__RFJH=next__PFJH;
+                    ((__POINTER *)result__QNJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ONJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__QNJH=next__ONJH;
                   };
                 };
-                ptr__UZMF=result__RFJH;
+                ptr__14MF=result__QNJH;
               };
-              result__TZMF=((__ITM_ARGS *)ptr__UZMF);
-              *(result__TZMF) = *(ITM_ARGS__);
+              result__04MF=((__ITM_ARGS *)ptr__14MF);
+              *(result__04MF) = *(ITM_ARGS__);
             };
-            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;
+            Self__ZBQF=((__ITM_ARGS *)result__04MF);
+            Self__ZBQF->parent_itm_argument__TDFE.parent_itm_code__C5M.position__GFJ=p__JNMF;
+            Self__ZBQF->name__3BQF=result__HMMF;
+            Self__ZBQF->type__4BQF=tm__M3EE;
+            result__R3EE=result__04MF;
           };
           if (is_shorter__LZ) {
-            __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);
+            __tmp__AEFE=((__FAST_ARRAYoSTRING_CONSTANTo *)name__O3EE)->parent_arrayed_collection__ABJ.upper__VBPD;
+            Self__SNMF= 0;
+            while ((Self__SNMF <= __tmp__AEFE)) {
+              add__MMHB(short_local__XCC,((void **)((__FAST_ARRAYoSTRING_CONSTANTo *)name__O3EE)->parent_arrayed_collection__ABJ.storage__LEPD)[Self__SNMF]);
+              Self__SNMF=(__INTEGER)(Self__SNMF +  1);
             };
           };
         };
       };
-      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)) {
+      result__XEHB=result__R3EE;
+      if (((void *)result__R3EE == (void *)NULL)) {
+        if ((! mute__UEHB)) {
+          pos__SAYG=current_position__EZF();
+          put_error__text__NPG( 0,(&__string_284));
+          put_position__XQG(pos__SAYG);
+          put_string__P3F(msg_err__SPG);
+          if ((type_error__RPG !=  2)) {
             exit(( 1));
           };
         };
       } else {
-        result__UFJH=FALSE__;
-        if ((! read_space__KSD())) {
-          result__UFJH=FALSE__;
+        result__TNJH=FALSE__;
+        if ((! read_space__MTD())) {
+          result__TNJH=FALSE__;
         } else {
-          result__VFJH='\0';
+          result__UNJH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__VFJH=((__CHARACTER )(( 0)));
+            result__UNJH=((__CHARACTER )(( 0)));
           } else {
-            result__VFJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+            result__UNJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__VFJH == ')')) {
+          if ((result__UNJH == ')')) {
             position__CCC=(__INTEGER)(position__CCC +  1);
-            result__UFJH=TRUE__;
+            result__TNJH=TRUE__;
           };
         };
-        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)) {
+        if ((! result__TNJH)) {
+          pos__UAYG=current_position__EZF();
+          put_error__text__NPG( 2,(&__string_262));
+          put_position__XQG(pos__UAYG);
+          put_string__P3F(msg_err__SPG);
+          if ((type_error__RPG !=  2)) {
             exit(( 1));
           };
         };
       };
     };
   };
-  return(result__LBHB);
+  return(result__XEHB);
 }
 
-static void* read_slot_operator__YS5B(void *list_arg__0S5B)
+static void* read_slot_operator__EW5B(void *list_arg__GW5B)
 // ({NULLxFAST_ARRAYoITM_ARGUMENTo}) With resultNo recursive, No inlinable.
 {
-  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)) {
+  void *associativity__KW5B,*name__IW5B,*pretty_name__JW5B;
+  __INTEGER priority__LW5B,typ_id__1NAC;
+  void *arg__MW5B;
+  __POSITION pos__WAYG,pos__YAYG,pos__0AYG,pos__5AYG,pos__BBYG;
+  __POSITION pos__DBYG,__tmp__G15B;
+  void *__tmp__H15B;
+  __ITM_SLOT_OPERATOR *result__VNAC,*Self__I5HC,*Self__02HC;
+  __POINTER ptr__WNAC,ptr_table__4NJH,next__3NJH,result__5NJH;
+  __POINTER ptr_table__DOJH,next__COJH,result__EOJH;
+  __UINTEGER_32 sz__YNAC,a__TJGH,new_size__UJGH,t__YJGH,a__XJGH;
+  __UINTEGER_32 new_size__GOJH,lab_type__FOJH;
+  __BOOLEAN result__WNJH,result__0NJH,__tmp__LY5B,result__2NJH;
+  __CHARACTER result__XNJH;
+  associativity__KW5B=NULL;
+  priority__LW5B= 0;
+  arg__MW5B=NULL;
+  if ((! read_operator__0NM())) {
+    pos__WAYG=current_position__EZF();
+    put_error__text__NPG( 0,(&__string_285));
+    put_position__XQG(pos__WAYG);
+    put_string__P3F(msg_err__SPG);
+    if ((type_error__RPG !=  2)) {
       exit(( 1));
     };
   };
-  if ((((void *)last_string__V0C == (void *)(&__string_16)) || ((void *)last_string__V0C == (void *)(&__string_17)))) {
-    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)) {
+  if ((((void *)last_string__V1C == (void *)(&__string_16)) || ((void *)last_string__V1C == (void *)(&__string_17)))) {
+    pos__YAYG=current_position__EZF();
+    put_error__text__NPG( 0,(&__string_286));
+    put_position__XQG(pos__YAYG);
+    put_string__P3F(msg_err__SPG);
+    if ((type_error__RPG !=  2)) {
       exit(( 1));
     };
   };
-  name__2S5B=last_string__V0C;
-  pretty_name__3S5B=name__2S5B;
-  result__XFJH=FALSE__;
-  if ((! read_space__KSD())) {
-    result__XFJH=FALSE__;
+  name__IW5B=last_string__V1C;
+  pretty_name__JW5B=name__IW5B;
+  result__WNJH=FALSE__;
+  if ((! read_space__MTD())) {
+    result__WNJH=FALSE__;
   } else {
-    result__YFJH='\0';
+    result__XNJH='\0';
     if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-      result__YFJH=((__CHARACTER )(( 0)));
+      result__XNJH=((__CHARACTER )(( 0)));
     } else {
-      result__YFJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+      result__XNJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
     };
-    if ((result__YFJH == '\'')) {
+    if ((result__XNJH == '\'')) {
       position__CCC=(__INTEGER)(position__CCC +  1);
-      result__XFJH=TRUE__;
+      result__WNJH=TRUE__;
     };
   };
-  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)) {
+  if ((! result__WNJH)) {
+    pos__0AYG=current_position__EZF();
+    put_error__text__NPG( 2,(&__string_287));
+    put_position__XQG(pos__0AYG);
+    put_string__P3F(msg_err__SPG);
+    if ((type_error__RPG !=  2)) {
       exit(( 1));
     };
   };
-  result__1FJH=read_word__HOF((&__string_6));
+  result__0NJH=read_word__LRF((&__string_6));
   if (is_shorter__LZ) {
-    if (result__1FJH) {
+    if (result__0NJH) {
       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);
+        short__token__to__YCD((&__string_120),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V1C)->count__DD),position__CCC);
       } else {
-        short__token__to__YBD((&__string_119),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD),position__CCC);
+        short__token__to__YCD((&__string_119),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V1C)->count__DD),position__CCC);
       };
     };
   };
-  if (result__1FJH) {
-    __tmp__5U5B=TRUE__;
+  if (result__0NJH) {
+    __tmp__LY5B=TRUE__;
   } else {
-    result__3FJH=read_word__HOF((&__string_5));
+    result__2NJH=read_word__LRF((&__string_5));
     if (is_shorter__LZ) {
-      if (result__3FJH) {
+      if (result__2NJH) {
         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);
+          short__token__to__YCD((&__string_120),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V1C)->count__DD),position__CCC);
         } else {
-          short__token__to__YBD((&__string_119),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD),position__CCC);
+          short__token__to__YCD((&__string_119),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V1C)->count__DD),position__CCC);
         };
       };
     };
-    __tmp__5U5B=result__3FJH;
+    __tmp__LY5B=result__2NJH;
   };
-  if (__tmp__5U5B) {
-    associativity__4S5B=last_string__V0C;
-    if (read_integer__EZP()) {
-      priority__5S5B=((__INTEGER )last_integer__3OO);
+  if (__tmp__LY5B) {
+    associativity__KW5B=last_string__V1C;
+    if (read_integer__Q2P()) {
+      priority__LW5B=((__INTEGER )last_integer__JSO);
     };
   };
-  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)) {
+  if ((((__FAST_ARRAYoITM_ARGUMENTo *)list_arg__GW5B)->parent_arrayed_collection__MDZB.upper__XCHC <  0)) {
+    arg__MW5B=read_loc_arg__with_self__SEHB(PARSER__,FALSE__,TRUE__);
+    if (((void *)arg__MW5B == (void *)NULL)) {
+      pos__5AYG=current_position__EZF();
+      put_error__text__NPG( 0,(&__string_288));
+      put_position__XQG(pos__5AYG);
+      put_string__P3F(msg_err__SPG);
+      if ((type_error__RPG !=  2)) {
         exit(( 1));
       };
     };
-    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)) {
+    add_last__TCHC(list_arg__GW5B,arg__MW5B);
+    name__IW5B=operator__name__NEO((&__string_83),name__IW5B);
+    if (((void *)associativity__KW5B != (void *)NULL)) {
+      pos__BBYG=current_position__EZF();
+      put_error__text__NPG( 0,(&__string_289));
+      put_position__XQG(pos__BBYG);
+      put_string__P3F(msg_err__SPG);
+      if ((type_error__RPG !=  2)) {
         exit(( 1));
       };
     };
   } else {
-    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)) {
+    arg__MW5B=read_loc_arg__with_self__SEHB(PARSER__,FALSE__,FALSE__);
+    if (((void *)arg__MW5B != (void *)NULL)) {
+      add_last__TCHC(list_arg__GW5B,arg__MW5B);
+      name__IW5B=operator__name__NEO((&__string_81),name__IW5B);
+      if (((void *)associativity__KW5B == (void *)NULL)) {
+        associativity__KW5B=(&__string_6);
+      };
+    } else {
+      name__IW5B=operator__name__NEO((&__string_82),name__IW5B);
+      if (((void *)associativity__KW5B != (void *)NULL)) {
+        pos__DBYG=current_position__EZF();
+        put_error__text__NPG( 0,(&__string_290));
+        put_position__XQG(pos__DBYG);
+        put_string__P3F(msg_err__SPG);
+        if ((type_error__RPG !=  2)) {
           exit(( 1));
         };
       };
     };
   };
-  __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__;
+  __tmp__G15B=current_position__EZF();
+  __tmp__H15B=last_section__E2C;
+  result__VNAC=NULL;
+  ptr__WNAC=((__POINTER )(NULL));
+  typ_id__1NAC= 0;
+  sz__YNAC=((__UINTEGER_32 )sizeof(__ITM_SLOT_OPERATOR));
+  if ((sz__YNAC ==  0)) {
+    result__VNAC=ITM_SLOT_OPERATOR__;
   } else {
-    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;
+    typ_id__1NAC=-1;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__YNAC);
+    if ((typ_id__1NAC == (__INTEGER)(-  1))) {
+      a__TJGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__UJGH=(__UINTEGER_32)((__UINTEGER_32)(sz__YNAC + a__TJGH) & (__UINTEGER_32)(~ a__TJGH));
+      ptr_table__4NJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__UJGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__3NJH=((__POINTER )(NULL));
+      result__5NJH=((__POINTER *)ptr_table__4NJH)[ 0];
+      if ((result__5NJH == (void *)NULL)) {
+        result__5NJH=new_lab__FTJ(new_size__UJGH);
+        next__3NJH=(void *)((unsigned long)result__5NJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UJGH)));
+        ((__POINTER *)next__3NJH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__4NJH)[ 0]=next__3NJH;
+      } else {
+        next__3NJH=((__POINTER *)result__5NJH)[ 0];
+        if ((next__3NJH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__5NJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__UJGH <<  1)) <=  4096)) {
+            next__3NJH=(void *)((unsigned long)result__5NJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UJGH)));
+          } else {
+            next__3NJH=new_lab__FTJ(new_size__UJGH);
+          };
+          ((__POINTER *)next__3NJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__4NJH)[ 0]=next__3NJH;
+        } else {
+          ((__POINTER *)result__5NJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3NJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__5NJH=next__3NJH;
+        };
+      };
+      ptr__WNAC=result__5NJH;
+    } else {
+      t__YJGH=((__UINTEGER_32 )typ_id__1NAC);
+      a__XJGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__GOJH=(__UINTEGER_32)((__UINTEGER_32)(sz__YNAC + a__XJGH) & (__UINTEGER_32)(~ a__XJGH));
+      ptr_table__DOJH=((__POINTER )(&(table_type[(t__YJGH)])));
+      lab_type__FOJH=(__UINTEGER_32)(t__YJGH |  1);
+      next__COJH=((__POINTER )(NULL));
+      result__EOJH=((__POINTER *)ptr_table__DOJH)[ 0];
+      if ((result__EOJH == (void *)NULL)) {
+        result__EOJH=new_lab__FTJ(lab_type__FOJH);
+        next__COJH=(void *)((unsigned long)result__EOJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GOJH)));
+        ((__POINTER *)next__COJH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__DOJH)[ 0]=next__COJH;
+      } else {
+        next__COJH=((__POINTER *)result__EOJH)[ 0];
+        if ((next__COJH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__EOJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__GOJH <<  1)) <=  4096)) {
+            next__COJH=(void *)((unsigned long)result__EOJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GOJH)));
+          } else {
+            next__COJH=new_lab__FTJ(lab_type__FOJH);
+          };
+          ((__POINTER *)next__COJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__DOJH)[ 0]=next__COJH;
+        } else {
+          ((__POINTER *)result__EOJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__COJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__EOJH=next__COJH;
+        };
+      };
+      ptr__WNAC=result__EOJH;
+    };
+    result__VNAC=((__ITM_SLOT_OPERATOR *)ptr__WNAC);
+    *(result__VNAC) = *(ITM_SLOT_OPERATOR__);
+  };
+  Self__I5HC=((__ITM_SLOT_OPERATOR *)result__VNAC);
+  Self__I5HC->parent_itm_slot__NW5B.parent_named__15.name__LI=name__IW5B;
+  Self__I5HC->parent_itm_slot__NW5B.parent_named__15.parent_itm_object__4.position__GFJ=__tmp__G15B;
+  Self__I5HC->parent_itm_slot__NW5B.id_section__F3C=__tmp__H15B;
+  Self__02HC=((__ITM_SLOT_OPERATOR *)result__VNAC);
+  if (((void *)associativity__KW5B == (void *)(&__string_6))) {
+    Self__02HC->priority_and_level__D3HC=priority__LW5B;
   } else {
-    Self__MZHC->priority_and_level__VZHC=(__INTEGER)(- priority__5S5B);
+    Self__02HC->priority_and_level__D3HC=(__INTEGER)(- priority__LW5B);
   };
-  ((__ITM_SLOT_OPERATOR *)result__JKAC)->pretty_name__A0HC=pretty_name__3S5B;
-  return(result__JKAC);
+  ((__ITM_SLOT_OPERATOR *)result__VNAC)->pretty_name__O3HC=pretty_name__JW5B;
+  return(result__VNAC);
 }
 
-static void add_last__F5GC(__FAST_ARRAYoITM_ARGUMENTo *Self__G5GC,void *element__H5GC)
+static void add_last__TCHC(__FAST_ARRAYoITM_ARGUMENTo *Self__UCHC,void *element__VCHC)
 // ({FAST_ARRAYoITM_ARGUMENTo},{NULLxITM_ARGxITM_ARGS}) VoidNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER new_capacity__WCHC,__tmp__5DHC,__tmp__IJTD,Self__FEYE;
+  __BOOLEAN __tmp__GDHC;
+  void **__tmp__4DHC,**new__UITD;
+  new_capacity__WCHC= 0;
+  if (((__INTEGER)(Self__UCHC->parent_arrayed_collection__MDZB.upper__XCHC +  1) <= (__INTEGER)(Self__UCHC->parent_arrayed_collection__MDZB.capacity__ZCHC -  1))) {
+    Self__UCHC->parent_arrayed_collection__MDZB.upper__XCHC=(__INTEGER)(Self__UCHC->parent_arrayed_collection__MDZB.upper__XCHC +  1);
+    __tmp__GDHC=TRUE__;
   } else {
-    __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;
+    __tmp__GDHC=FALSE__;
+  };
+  if ((! __tmp__GDHC)) {
+    if ((Self__UCHC->parent_arrayed_collection__MDZB.capacity__ZCHC ==  0)) {
+      Self__UCHC->parent_arrayed_collection__MDZB.storage__VDHC=create__VUBD( 2);
+      Self__UCHC->parent_arrayed_collection__MDZB.capacity__ZCHC= 2;
+      Self__UCHC->parent_arrayed_collection__MDZB.upper__XCHC= 0;
+    } else {
+      new_capacity__WCHC=(__INTEGER)(Self__UCHC->parent_arrayed_collection__MDZB.capacity__ZCHC <<  1);
+      __tmp__4DHC=Self__UCHC->parent_arrayed_collection__MDZB.storage__VDHC;
+      __tmp__5DHC=Self__UCHC->parent_arrayed_collection__MDZB.capacity__ZCHC;
+      new__UITD=((void **)realloc_dynamic__old_size__new_size__ZHLC(((__POINTER )((void **)__tmp__4DHC)),((__UINTEGER_32 )(__INTEGER)(__tmp__5DHC * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__WCHC * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__IJTD=(__INTEGER)(new_capacity__WCHC -  1);
+      Self__FEYE=__tmp__5DHC;
+      while ((Self__FEYE <= __tmp__IJTD)) {
+        new__UITD[Self__FEYE]=NULL;
+        Self__FEYE=(__INTEGER)(Self__FEYE +  1);
+      };
+      Self__UCHC->parent_arrayed_collection__MDZB.storage__VDHC=new__UITD;
+      Self__UCHC->parent_arrayed_collection__MDZB.capacity__ZCHC=new_capacity__WCHC;
+      Self__UCHC->parent_arrayed_collection__MDZB.upper__XCHC=(__INTEGER)(Self__UCHC->parent_arrayed_collection__MDZB.upper__XCHC +  1);
+    };
+  };
+  ((void **)Self__UCHC->parent_arrayed_collection__MDZB.storage__VDHC)[Self__UCHC->parent_arrayed_collection__MDZB.upper__XCHC]=element__VCHC;
 }
 
-static void* read_slot_keyword__FY5B(void *list_arg__HY5B)
+static void* read_slot_keyword__R15B(void *list_arg__T15B)
 // ({NULLxFAST_ARRAYoITM_ARGUMENTo}) With resultNo recursive, No inlinable.
 {
-  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__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)) {
+  void *n__V15B,*result__QOP;
+  void *arg__W15B;
+  void *result__X15B;
+  __POSITION pos__5CYG,pos__BDYG,p__ROJH;
+  void *result__ARP;
+  void *sec__SOJH;
+  __ITM_SLOT *result__HOJH,*Self__POJH;
+  __POINTER ptr__IOJH,ptr_table__UOJH,next__TOJH,result__VOJH;
+  __POINTER ptr_table__ZOJH,next__YOJH,result__0OJH;
+  __INTEGER typ_id__JOJH;
+  __UINTEGER_32 sz__KOJH,a__LOJH,new_size__MOJH,t__NOJH,a__OOJH;
+  __UINTEGER_32 new_size__2OJH,lab_type__1OJH;
+  __FAST_ARRAYoSTRINGo *Self__K3AB,*Self__A4AB;
+  n__V15B=NULL;
+  arg__W15B=NULL;
+  result__X15B=NULL;
+  if (read_identifier__QBL()) {
+    short__token__to__YCD((&__string_130),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V1C)->count__DD),position__CCC);
+    result__QOP=NULL;
+    if ((((__FAST_ARRAYoSTRINGo *)free__ROP)->parent_arrayed_collection__RKC.upper__UKC <  0)) {
+      result__QOP=create__ZBB( 128);
+    } else {
+      Self__K3AB=((__FAST_ARRAYoSTRINGo *)free__ROP);
+      result__QOP=((void **)Self__K3AB->parent_arrayed_collection__RKC.storage__HHT)[Self__K3AB->parent_arrayed_collection__RKC.upper__UKC];
+      Self__A4AB=((__FAST_ARRAYoSTRINGo *)free__ROP);
+      Self__A4AB->parent_arrayed_collection__RKC.upper__UKC=(__INTEGER)(Self__A4AB->parent_arrayed_collection__RKC.upper__UKC -  1);
+    };
+    n__V15B=result__QOP;
+    copy__JDS(result__QOP,last_string__V1C);
+    arg__W15B=read_loc_arg__with_self__SEHB(PARSER__,FALSE__,FALSE__);
+    if (((void *)arg__W15B != (void *)NULL)) {
+      add_last__TCHC(list_arg__T15B,arg__W15B);
+      if (read_identifier__QBL()) {
+        if (((void *)((__SECTION_ *)last_section__E2C)->name__11DC == (void *)(&__string_30))) {
+          pos__5CYG=current_position__EZF();
+          put_error__text__NPG( 0,(&__string_291));
+          put_position__XQG(pos__5CYG);
+          put_string__P3F(msg_err__SPG);
+          if ((type_error__RPG !=  2)) {
             exit(( 1));
           };
         };
         do {
-          short__token__to__YBD((&__string_130),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD),position__CCC);
-          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)) {
+          short__token__to__YCD((&__string_130),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V1C)->count__DD),position__CCC);
+          append__ROS(n__V15B,(&__string_112));
+          append__ROS(n__V15B,last_string__V1C);
+          arg__W15B=read_loc_arg__with_self__SEHB(PARSER__,FALSE__,FALSE__);
+          if (((void *)arg__W15B == (void *)NULL)) {
+            pos__BDYG=current_position__EZF();
+            put_error__text__NPG( 0,(&__string_168));
+            put_position__XQG(pos__BDYG);
+            put_string__P3F(msg_err__SPG);
+            if ((type_error__RPG !=  2)) {
               exit(( 1));
             };
           };
-          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)));
+          add_last__TCHC(list_arg__T15B,arg__W15B);
+        } while (read_identifier__QBL());
+      };
+    };
+    result__ARP=get__YWB(result__QOP);
+    add_last__ISV(free__ROP,result__QOP);
+    ((__STRING *)result__QOP)->count__EGC= 0;
+    p__ROJH=current_position__EZF();
+    sec__SOJH=last_section__E2C;
+    result__HOJH=NULL;
+    ptr__IOJH=((__POINTER )(NULL));
+    typ_id__JOJH= 0;
+    sz__KOJH=((__UINTEGER_32 )sizeof(__ITM_SLOT));
+    if ((sz__KOJH ==  0)) {
+      result__HOJH=ITM_SLOT__;
+    } else {
+      typ_id__JOJH=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__KOJH);
+      if ((typ_id__JOJH == (__INTEGER)(-  1))) {
+        a__LOJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__MOJH=(__UINTEGER_32)((__UINTEGER_32)(sz__KOJH + a__LOJH) & (__UINTEGER_32)(~ a__LOJH));
+        ptr_table__UOJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__MOJH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__TOJH=((__POINTER )(NULL));
+        result__VOJH=((__POINTER *)ptr_table__UOJH)[ 0];
+        if ((result__VOJH == (void *)NULL)) {
+          result__VOJH=new_lab__FTJ(new_size__MOJH);
+          next__TOJH=(void *)((unsigned long)result__VOJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MOJH)));
+          ((__POINTER *)next__TOJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__UOJH)[ 0]=next__TOJH;
+        } else {
+          next__TOJH=((__POINTER *)result__VOJH)[ 0];
+          if ((next__TOJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__VOJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__MOJH <<  1)) <=  4096)) {
+              next__TOJH=(void *)((unsigned long)result__VOJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MOJH)));
             } else {
-              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)));
+              next__TOJH=new_lab__FTJ(new_size__MOJH);
+            };
+            ((__POINTER *)next__TOJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__UOJH)[ 0]=next__TOJH;
+          } else {
+            ((__POINTER *)result__VOJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TOJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__VOJH=next__TOJH;
+          };
+        };
+        ptr__IOJH=result__VOJH;
+      } else {
+        t__NOJH=((__UINTEGER_32 )typ_id__JOJH);
+        a__OOJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__2OJH=(__UINTEGER_32)((__UINTEGER_32)(sz__KOJH + a__OOJH) & (__UINTEGER_32)(~ a__OOJH));
+        ptr_table__ZOJH=((__POINTER )(&(table_type[(t__NOJH)])));
+        lab_type__1OJH=(__UINTEGER_32)(t__NOJH |  1);
+        next__YOJH=((__POINTER )(NULL));
+        result__0OJH=((__POINTER *)ptr_table__ZOJH)[ 0];
+        if ((result__0OJH == (void *)NULL)) {
+          result__0OJH=new_lab__FTJ(lab_type__1OJH);
+          next__YOJH=(void *)((unsigned long)result__0OJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2OJH)));
+          ((__POINTER *)next__YOJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__ZOJH)[ 0]=next__YOJH;
+        } else {
+          next__YOJH=((__POINTER *)result__0OJH)[ 0];
+          if ((next__YOJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__0OJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__2OJH <<  1)) <=  4096)) {
+              next__YOJH=(void *)((unsigned long)result__0OJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2OJH)));
             } else {
-              next__ZGJH=new_lab__ZPJ(lab_type__2GJH);
+              next__YOJH=new_lab__FTJ(lab_type__1OJH);
             };
-            ((__POINTER *)next__ZGJH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__0GJH)[ 0]=next__ZGJH;
+            ((__POINTER *)next__YOJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__ZOJH)[ 0]=next__YOJH;
           } else {
-            ((__POINTER *)result__1GJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZGJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__1GJH=next__ZGJH;
+            ((__POINTER *)result__0OJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YOJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__0OJH=next__YOJH;
           };
         };
-        ptr__JGJH=result__1GJH;
+        ptr__IOJH=result__0OJH;
       };
-      result__IGJH=((__ITM_SLOT *)ptr__JGJH);
-      *(result__IGJH) = *(ITM_SLOT__);
+      result__HOJH=((__ITM_SLOT *)ptr__IOJH);
+      *(result__HOJH) = *(ITM_SLOT__);
     };
-    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;
+    Self__POJH=((__ITM_SLOT *)result__HOJH);
+    Self__POJH->parent_named__15.name__LI=result__ARP;
+    Self__POJH->parent_named__15.parent_itm_object__4.position__GFJ=p__ROJH;
+    Self__POJH->id_section__F3C=sec__SOJH;
+    result__X15B=result__HOJH;
   };
-  return(result__LY5B);
+  return(result__X15B);
 }
 
-static void** create__HRBD(__INTEGER nb_elements__JRBD)
+static void** create__VUBD(__INTEGER nb_elements__XUBD)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__4IEH,a__DJEH,new_size__5IEH,new_size2__AJEH,a__DKGH;
+  __UINTEGER_32 new_size__EKGH;
+  __POINTER result__3IEH,ptr_table__4OJH,next__3OJH,result__5OJH;
+  void *result__CPJH;
+  __INTEGER Self__GJXD;
+  void **Result__VHGD;
+  sz__4IEH=((__UINTEGER_32 )(__INTEGER)(nb_elements__XUBD * ((__INTEGER )(sizeof(void *)))));
+  result__3IEH=((__POINTER )(NULL));
+  a__DJEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__5IEH=(__UINTEGER_32)((__UINTEGER_32)(sz__4IEH + a__DJEH) & (__UINTEGER_32)(~ a__DJEH));
+  new_size2__AJEH=(__UINTEGER_32)(new_size__5IEH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__AJEH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__DKGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__EKGH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__AJEH + a__DKGH) & (__UINTEGER_32)(~ a__DKGH));
+    ptr_table__4OJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__EKGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__3OJH=((__POINTER )(NULL));
+    result__5OJH=((__POINTER *)ptr_table__4OJH)[ 0];
+    if ((result__5OJH == (void *)NULL)) {
+      result__5OJH=new_lab__FTJ(new_size__EKGH);
+      next__3OJH=(void *)((unsigned long)result__5OJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EKGH)));
+      ((__POINTER *)next__3OJH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__4OJH)[ 0]=next__3OJH;
+    } else {
+      next__3OJH=((__POINTER *)result__5OJH)[ 0];
+      if ((next__3OJH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__5OJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__EKGH <<  1)) <=  4096)) {
+          next__3OJH=(void *)((unsigned long)result__5OJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EKGH)));
+        } else {
+          next__3OJH=new_lab__FTJ(new_size__EKGH);
+        };
+        ((__POINTER *)next__3OJH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__4OJH)[ 0]=next__3OJH;
+      } else {
+        ((__POINTER *)result__5OJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3OJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__5OJH=next__3OJH;
+      };
+    };
+    ((__POINTER *)result__5OJH)[ 0]=((__POINTER ) 3);
+    result__3IEH=(void *)((unsigned long)result__5OJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__CPJH=first_free__NFVB;
+    while ((((void *)result__CPJH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__CPJH)->map_size_and_id__YTB &  4294967292LU) < new_size__5IEH))) {
+      result__CPJH=((__MEMORY *)result__CPJH)->map_next_free__ZTB;
     };
-    if (((void *)result__DHJH == (void *)NULL)) {
-      result__DHJH=new_page__K34();
+    if (((void *)result__CPJH == (void *)NULL)) {
+      result__CPJH=new_page__YC5();
     };
-    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)));
+    to_busy__index__MWFC(result__CPJH,new_size__5IEH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__CPJH)) - (unsigned long)begin_memory__SXH)))) >>  26));
+    result__3IEH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__CPJH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__VHGD=((void **)result__3IEH);
+  Self__GJXD=(__INTEGER)(nb_elements__XUBD -  1);
+  while ((Self__GJXD >=  0)) {
+    Result__VHGD[Self__GJXD]=NULL;
+    Self__GJXD=(__INTEGER)(Self__GJXD -  1);
   };
-  return(Result__HEGD);
+  return(Result__VHGD);
 }
 
-static void set_argument_list__ACHC(__ITM_SLOT *Self__BCHC,void *p__CCHC)
+static void set_argument_list__OFHC(__ITM_SLOT *Self__PFHC,void *p__QFHC)
 // ({ITM_SLOT},{NULLxFAST_ARRAYoITM_ARGUMENTo}) VoidNo recursive, No inlinable.
 {
-  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__;
+  void *__tmp__YFHC,*__tmp__KGHC,*__tmp__XGHC;
+  __INTEGER __tmp__ZFHC;
+  __POSITION __tmp__LGHC,__tmp__YGHC;
+  __SECTION_ *Self__GC2G;
+  __BOOLEAN __tmp__3FHC;
+  __FAST_ARRAYoITM_ARGUMENTo *Self__JKGH,*Self__Q1ID;
+  if (((__INTEGER)(((__FAST_ARRAYoITM_ARGUMENTo *)p__QFHC)->parent_arrayed_collection__MDZB.upper__XCHC +  1) >  1)) {
+    __tmp__3FHC=TRUE__;
   } else {
-    __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;
+    __tmp__YFHC=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)p__QFHC)->parent_arrayed_collection__MDZB.storage__VDHC)[ 0];
+    if (((struct ___OBJ *)__tmp__YFHC)->__id==__ITM_ARG__) {
+      __tmp__ZFHC= 1;
     } else {
-      __tmp__LCHC=(__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)((__ITM_ARGS *)__tmp__KCHC)->name__W2PF)->parent_arrayed_collection__U3I.upper__H4OD +  1);
+      __tmp__ZFHC=(__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)((__ITM_ARGS *)__tmp__YFHC)->name__3BQF)->parent_arrayed_collection__ABJ.upper__VBPD +  1);
     };
-    __tmp__PCHC=(__tmp__LCHC >  1);
+    __tmp__3FHC=(__tmp__ZFHC >  1);
   };
-  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;
+  if (__tmp__3FHC) {
+    if (((void *)((__SECTION_ *)Self__PFHC->id_section__F3C)->name__11DC == (void *)(&__string_25))) {
+      Self__JKGH=((__FAST_ARRAYoITM_ARGUMENTo *)p__QFHC);
+      __tmp__KGHC=((void **)Self__JKGH->parent_arrayed_collection__MDZB.storage__VDHC)[Self__JKGH->parent_arrayed_collection__MDZB.upper__XCHC];
+      if (((struct ___OBJ *)__tmp__KGHC)->__id==__ITM_ARG__) {
+        __tmp__LGHC=((__ITM_ARG *)__tmp__KGHC)->parent_itm_argument__DIHB.parent_itm_code__C5M.position__GFJ;
       } else {
-        __tmp__3CHC=((__ITM_ARGS *)__tmp__2CHC)->parent_itm_argument__FAFE.parent_itm_code__W1M.position__0BJ;
+        __tmp__LGHC=((__ITM_ARGS *)__tmp__KGHC)->parent_itm_argument__TDFE.parent_itm_code__C5M.position__GFJ;
       };
-      put_error__text__BMG( 1,(&__string_234));
-      put_position__LNG(__tmp__3CHC);
-      put_string__L0F(msg_err__GMG);
-      if ((type_error__FMG !=  2)) {
+      put_error__text__NPG( 1,(&__string_234));
+      put_position__XQG(__tmp__LGHC);
+      put_string__P3F(msg_err__SPG);
+      if ((type_error__RPG !=  2)) {
         exit(( 1));
       };
     };
-    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;
+    Self__GC2G=((__SECTION_ *)Self__PFHC->id_section__F3C);
+    if ((((void *)Self__GC2G->name__11DC == (void *)(&__string_23)) || ((void *)Self__GC2G->name__11DC == (void *)(&__string_24)))) {
+      Self__Q1ID=((__FAST_ARRAYoITM_ARGUMENTo *)p__QFHC);
+      __tmp__XGHC=((void **)Self__Q1ID->parent_arrayed_collection__MDZB.storage__VDHC)[Self__Q1ID->parent_arrayed_collection__MDZB.upper__XCHC];
+      if (((struct ___OBJ *)__tmp__XGHC)->__id==__ITM_ARG__) {
+        __tmp__YGHC=((__ITM_ARG *)__tmp__XGHC)->parent_itm_argument__DIHB.parent_itm_code__C5M.position__GFJ;
       } else {
-        __tmp__KDHC=((__ITM_ARGS *)__tmp__JDHC)->parent_itm_argument__FAFE.parent_itm_code__W1M.position__0BJ;
+        __tmp__YGHC=((__ITM_ARGS *)__tmp__XGHC)->parent_itm_argument__TDFE.parent_itm_code__C5M.position__GFJ;
       };
-      put_error__text__BMG( 1,(&__string_235));
-      put_position__LNG(__tmp__KDHC);
-      put_string__L0F(msg_err__GMG);
-      if ((type_error__FMG !=  2)) {
+      put_error__text__NPG( 1,(&__string_235));
+      put_position__XQG(__tmp__YGHC);
+      put_string__P3F(msg_err__SPG);
+      if ((type_error__RPG !=  2)) {
         exit(( 1));
       };
     };
   };
-  Self__BCHC->argument_list__RDHC=p__CCHC;
+  Self__PFHC->argument_list__5GHC=p__QFHC;
 }
 
-static __ITM_TYPE_MULTI* get__GGP(void *lt__IGP)
+static __ITM_TYPE_MULTI* get__SJP(void *lt__UJP)
 // ({NULLxFAST_ARRAYoITM_TYPE_MONOo}) With resultNo recursive, No inlinable.
 {
-  __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;
+  __ITM_TYPE_MULTI *result__WJP,*__tmp__ILP,*result__B3HB;
+  __INTEGER idx__XJP,typ_id__H3HB,new_capacity__3ZAB,__tmp__B1AB;
+  __INTEGER __tmp__JQFC,Self__V1VD;
+  void *__tmp__HLP;
+  __POINTER ptr__C3HB,ptr_table__GPJH,next__FPJH,result__HPJH;
+  __POINTER ptr_table__LPJH,next__KPJH,result__MPJH;
+  __UINTEGER_32 sz__E3HB,a__TKGH,new_size__UKGH,t__YKGH,a__XKGH;
+  __UINTEGER_32 new_size__OPJH,lab_type__NPJH;
+  __FAST_ARRAYoITM_TYPE_MULTIo *Self__1ZAB;
+  __BOOLEAN __tmp__L0AB;
+  void **__tmp__A1AB,**new__VPFC;
+  result__WJP=NULL;
+  idx__XJP= 0;
+  while (((idx__XJP <= ((__FAST_ARRAYoITM_TYPE_MULTIo *)dico__3JP)->parent_arrayed_collection__2JP.upper__GKP) && ((void *)((__ITM_TYPE_MULTI *)((void **)((__FAST_ARRAYoITM_TYPE_MULTIo *)dico__3JP)->parent_arrayed_collection__2JP.storage__Q2V)[idx__XJP])->list_type__QKP != (void *)lt__UJP))) {
+    idx__XJP=(__INTEGER)(idx__XJP +  1);
+  };
+  if ((idx__XJP <= ((__FAST_ARRAYoITM_TYPE_MULTIo *)dico__3JP)->parent_arrayed_collection__2JP.upper__GKP)) {
+    __tmp__HLP=((void **)((__FAST_ARRAYoITM_TYPE_MULTIo *)dico__3JP)->parent_arrayed_collection__2JP.storage__Q2V)[idx__XJP];
+    if (__tmp__HLP==NULL) {
+      __tmp__ILP=NULL;
+    } else {
+      __tmp__ILP=((__ITM_TYPE_MULTI *)__tmp__HLP);
+    };
+    result__WJP=__tmp__ILP;
   } else {
-    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)));
+    result__B3HB=NULL;
+    ptr__C3HB=((__POINTER )(NULL));
+    typ_id__H3HB= 0;
+    sz__E3HB=((__UINTEGER_32 )sizeof(__ITM_TYPE_MULTI));
+    if ((sz__E3HB ==  0)) {
+      result__B3HB=ITM_TYPE_MULTI__;
+    } else {
+      typ_id__H3HB=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__E3HB);
+      if ((typ_id__H3HB == (__INTEGER)(-  1))) {
+        a__TKGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__UKGH=(__UINTEGER_32)((__UINTEGER_32)(sz__E3HB + a__TKGH) & (__UINTEGER_32)(~ a__TKGH));
+        ptr_table__GPJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__UKGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__FPJH=((__POINTER )(NULL));
+        result__HPJH=((__POINTER *)ptr_table__GPJH)[ 0];
+        if ((result__HPJH == (void *)NULL)) {
+          result__HPJH=new_lab__FTJ(new_size__UKGH);
+          next__FPJH=(void *)((unsigned long)result__HPJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UKGH)));
+          ((__POINTER *)next__FPJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__GPJH)[ 0]=next__FPJH;
+        } else {
+          next__FPJH=((__POINTER *)result__HPJH)[ 0];
+          if ((next__FPJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HPJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__UKGH <<  1)) <=  4096)) {
+              next__FPJH=(void *)((unsigned long)result__HPJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UKGH)));
             } else {
-              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)));
+              next__FPJH=new_lab__FTJ(new_size__UKGH);
+            };
+            ((__POINTER *)next__FPJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__GPJH)[ 0]=next__FPJH;
+          } else {
+            ((__POINTER *)result__HPJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FPJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__HPJH=next__FPJH;
+          };
+        };
+        ptr__C3HB=result__HPJH;
+      } else {
+        t__YKGH=((__UINTEGER_32 )typ_id__H3HB);
+        a__XKGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__OPJH=(__UINTEGER_32)((__UINTEGER_32)(sz__E3HB + a__XKGH) & (__UINTEGER_32)(~ a__XKGH));
+        ptr_table__LPJH=((__POINTER )(&(table_type[(t__YKGH)])));
+        lab_type__NPJH=(__UINTEGER_32)(t__YKGH |  1);
+        next__KPJH=((__POINTER )(NULL));
+        result__MPJH=((__POINTER *)ptr_table__LPJH)[ 0];
+        if ((result__MPJH == (void *)NULL)) {
+          result__MPJH=new_lab__FTJ(lab_type__NPJH);
+          next__KPJH=(void *)((unsigned long)result__MPJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OPJH)));
+          ((__POINTER *)next__KPJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__LPJH)[ 0]=next__KPJH;
+        } else {
+          next__KPJH=((__POINTER *)result__MPJH)[ 0];
+          if ((next__KPJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MPJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__OPJH <<  1)) <=  4096)) {
+              next__KPJH=(void *)((unsigned long)result__MPJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OPJH)));
             } else {
-              next__LHJH=new_lab__ZPJ(lab_type__OHJH);
+              next__KPJH=new_lab__FTJ(lab_type__NPJH);
             };
-            ((__POINTER *)next__LHJH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__MHJH)[ 0]=next__LHJH;
+            ((__POINTER *)next__KPJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__LPJH)[ 0]=next__KPJH;
           } else {
-            ((__POINTER *)result__NHJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LHJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__NHJH=next__LHJH;
+            ((__POINTER *)result__MPJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KPJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__MPJH=next__KPJH;
           };
         };
-        ptr__WZHB=result__NHJH;
+        ptr__C3HB=result__MPJH;
       };
-      result__VZHB=((__ITM_TYPE_MULTI *)ptr__WZHB);
-      *(result__VZHB) = *(ITM_TYPE_MULTI__);
+      result__B3HB=((__ITM_TYPE_MULTI *)ptr__C3HB);
+      *(result__B3HB) = *(ITM_TYPE_MULTI__);
     };
-    ((__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__;
+    ((__ITM_TYPE_MULTI *)result__B3HB)->list_type__QKP=lt__UJP;
+    result__WJP=result__B3HB;
+    Self__1ZAB=((__FAST_ARRAYoITM_TYPE_MULTIo *)dico__3JP);
+    new_capacity__3ZAB= 0;
+    if (((__INTEGER)(Self__1ZAB->parent_arrayed_collection__2JP.upper__GKP +  1) <= (__INTEGER)(Self__1ZAB->parent_arrayed_collection__2JP.capacity__F2V -  1))) {
+      Self__1ZAB->parent_arrayed_collection__2JP.upper__GKP=(__INTEGER)(Self__1ZAB->parent_arrayed_collection__2JP.upper__GKP +  1);
+      __tmp__L0AB=TRUE__;
     } else {
-      __tmp__5WAB=FALSE__;
+      __tmp__L0AB=FALSE__;
     };
-    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;
+    if ((! __tmp__L0AB)) {
+      if ((Self__1ZAB->parent_arrayed_collection__2JP.capacity__F2V ==  0)) {
+        Self__1ZAB->parent_arrayed_collection__2JP.storage__Q2V=create__CNXB( 2);
+        Self__1ZAB->parent_arrayed_collection__2JP.capacity__F2V= 2;
+        Self__1ZAB->parent_arrayed_collection__2JP.upper__GKP= 0;
       } else {
-        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);
+        new_capacity__3ZAB=(__INTEGER)(Self__1ZAB->parent_arrayed_collection__2JP.capacity__F2V <<  1);
+        __tmp__A1AB=Self__1ZAB->parent_arrayed_collection__2JP.storage__Q2V;
+        __tmp__B1AB=Self__1ZAB->parent_arrayed_collection__2JP.capacity__F2V;
+        new__VPFC=((void **)realloc_dynamic__old_size__new_size__ZHLC(((__POINTER )((void **)__tmp__A1AB)),((__UINTEGER_32 )(__INTEGER)(__tmp__B1AB * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__3ZAB * ((__INTEGER )(sizeof(void *)))))));
+        __tmp__JQFC=(__INTEGER)(new_capacity__3ZAB -  1);
+        Self__V1VD=__tmp__B1AB;
+        while ((Self__V1VD <= __tmp__JQFC)) {
+          new__VPFC[Self__V1VD]=NULL;
+          Self__V1VD=(__INTEGER)(Self__V1VD +  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);
+        Self__1ZAB->parent_arrayed_collection__2JP.storage__Q2V=new__VPFC;
+        Self__1ZAB->parent_arrayed_collection__2JP.capacity__F2V=new_capacity__3ZAB;
+        Self__1ZAB->parent_arrayed_collection__2JP.upper__GKP=(__INTEGER)(Self__1ZAB->parent_arrayed_collection__2JP.upper__GKP +  1);
       };
     };
-    ((void **)Self__PWAB->parent_arrayed_collection__QGP.storage__EZV)[Self__PWAB->parent_arrayed_collection__QGP.upper__0GP]=result__VZHB;
+    ((void **)Self__1ZAB->parent_arrayed_collection__2JP.storage__Q2V)[Self__1ZAB->parent_arrayed_collection__2JP.upper__GKP]=result__B3HB;
   };
-  return(result__KGP);
+  return(result__WJP);
 }
 
-static void* read_type__K5L(__PARSER *Self__L5L,__BOOLEAN is_local__M5L)
+static void* read_type__WCM(__PARSER *Self__XCM,__BOOLEAN is_local__YCM)
 // ({PARSER},{TRUExFALSE}) With resultRecursive, No inlinable.
 {
-  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__QHJH=FALSE__;
+  void *style__0CM;
+  void *result__1CM;
+  void *typ_arg__3CM,*typ_res__4CM,*typ_arg__FMN,*typ_res__GMN;
+  __POSITION pos__QGYG,pos__SGYG,pos__UGYG,__tmp__BGM,pos__YGYG;
+  __POSITION pos__XIYG,pos__ZIYG;
+  __ITM_TYPE_STYLE *Self__ULGH;
+  void *result__IMN;
+  __INTEGER idx__JMN,typ_id__V1GB,new_capacity__BNAB,__tmp__FOAB;
+  __INTEGER __tmp__1NFC,Self__WZVD;
+  __ITM_TYPE_BLOCK *result__P1GB,*Self__01CC;
+  __POINTER ptr__Q1GB,ptr_table__CQJH,next__BQJH,result__DQJH;
+  __POINTER ptr_table__HQJH,next__GQJH,result__IQJH;
+  __UINTEGER_32 sz__S1GB,a__3LGH,new_size__4LGH,t__CMGH,a__BMGH;
+  __UINTEGER_32 new_size__KQJH,lab_type__JQJH;
+  void *lst__2CM;
+  __BOOLEAN result__PPJH,result__SPJH,result__VPJH,result__YPJH;
+  __BOOLEAN result__1PJH,result__4PJH,__tmp__PNAB,result__MQJH;
+  __BOOLEAN __tmp__AIM,result__OQJH;
+  __CHARACTER result__QPJH,result__TPJH,result__WPJH,result__ZPJH;
+  __CHARACTER result__2PJH,result__5PJH;
+  __FAST_ARRAYoITM_TYPE_BLOCKo *Self__5MAB;
+  void **__tmp__EOAB,**new__HNFC;
+  style__0CM=NULL;
+  result__1CM=NULL;
+  lst__2CM=NULL;
+  typ_arg__3CM=NULL;
+  typ_res__4CM=NULL;
+  result__PPJH=FALSE__;
+  if ((! read_space__MTD())) {
+    result__PPJH=FALSE__;
   } else {
-    result__RHJH='\0';
+    result__QPJH='\0';
     if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-      result__RHJH=((__CHARACTER )(( 0)));
+      result__QPJH=((__CHARACTER )(( 0)));
     } else {
-      result__RHJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+      result__QPJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
     };
-    if ((result__RHJH == '{')) {
+    if ((result__QPJH == '{')) {
       position__CCC=(__INTEGER)(position__CCC +  1);
-      result__QHJH=TRUE__;
+      result__PPJH=TRUE__;
     };
   };
-  if (result__QHJH) {
-    result__THJH=FALSE__;
-    if ((! read_space__KSD())) {
-      result__THJH=FALSE__;
+  if (result__PPJH) {
+    result__SPJH=FALSE__;
+    if ((! read_space__MTD())) {
+      result__SPJH=FALSE__;
     } else {
-      result__UHJH='\0';
+      result__TPJH='\0';
       if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__UHJH=((__CHARACTER )(( 0)));
+        result__TPJH=((__CHARACTER )(( 0)));
       } else {
-        result__UHJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+        result__TPJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__UHJH == '(')) {
+      if ((result__TPJH == '(')) {
         position__CCC=(__INTEGER)(position__CCC +  1);
-        result__THJH=TRUE__;
+        result__SPJH=TRUE__;
       };
     };
-    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)) {
+    if (result__SPJH) {
+      lst__2CM=read_type_list__YMO(Self__XCM,FALSE__);
+      if (((void *)lst__2CM == (void *)NULL)) {
+        pos__QGYG=current_position__EZF();
+        put_error__text__NPG( 0,(&__string_265));
+        put_position__XQG(pos__QGYG);
+        put_string__P3F(msg_err__SPG);
+        if ((type_error__RPG !=  2)) {
           exit(( 1));
         };
       };
-      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];
+      if (((__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)lst__2CM)->parent_arrayed_collection__EYC.upper__SIV +  1) ==  1)) {
+        typ_arg__3CM=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)lst__2CM)->parent_arrayed_collection__EYC.storage__ZMV)[ 0];
       } else {
-        typ_arg__R5L=get__GGP(lst__Q5L);
+        typ_arg__3CM=get__SJP(lst__2CM);
       };
-      result__WHJH=FALSE__;
-      if ((! read_space__KSD())) {
-        result__WHJH=FALSE__;
+      result__VPJH=FALSE__;
+      if ((! read_space__MTD())) {
+        result__VPJH=FALSE__;
       } else {
-        result__XHJH='\0';
+        result__WPJH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__XHJH=((__CHARACTER )(( 0)));
+          result__WPJH=((__CHARACTER )(( 0)));
         } else {
-          result__XHJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+          result__WPJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__XHJH == ')')) {
+        if ((result__WPJH == ')')) {
           position__CCC=(__INTEGER)(position__CCC +  1);
-          result__WHJH=TRUE__;
+          result__VPJH=TRUE__;
         };
       };
-      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)) {
+      if ((! result__VPJH)) {
+        pos__SGYG=current_position__EZF();
+        put_error__text__NPG( 2,(&__string_262));
+        put_position__XQG(pos__SGYG);
+        put_string__P3F(msg_err__SPG);
+        if ((type_error__RPG !=  2)) {
           exit(( 1));
         };
       };
-      result__ZHJH=FALSE__;
-      if ((! read_space__KSD())) {
-        result__ZHJH=FALSE__;
+      result__YPJH=FALSE__;
+      if ((! read_space__MTD())) {
+        result__YPJH=FALSE__;
       } else {
-        result__0HJH='\0';
+        result__ZPJH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__0HJH=((__CHARACTER )(( 0)));
+          result__ZPJH=((__CHARACTER )(( 0)));
         } else {
-          result__0HJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+          result__ZPJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__0HJH == ';')) {
+        if ((result__ZPJH == ';')) {
           position__CCC=(__INTEGER)(position__CCC +  1);
-          result__ZHJH=TRUE__;
+          result__YPJH=TRUE__;
         };
       };
-      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)) {
+      if ((! result__YPJH)) {
+        pos__UGYG=current_position__EZF();
+        put_error__text__NPG( 2,(&__string_242));
+        put_position__XQG(pos__UGYG);
+        put_string__P3F(msg_err__SPG);
+        if ((type_error__RPG !=  2)) {
           exit(( 1));
         };
       };
-      lst__Q5L=read_type_list__MJO(Self__L5L,FALSE__);
+      lst__2CM=read_type_list__YMO(Self__XCM,FALSE__);
     } else {
-      lst__Q5L=read_type_list__MJO(Self__L5L,FALSE__);
-      if (((void *)lst__Q5L != (void *)NULL)) {
-        result__2HJH=FALSE__;
-        if ((! read_space__KSD())) {
-          result__2HJH=FALSE__;
+      lst__2CM=read_type_list__YMO(Self__XCM,FALSE__);
+      if (((void *)lst__2CM != (void *)NULL)) {
+        result__1PJH=FALSE__;
+        if ((! read_space__MTD())) {
+          result__1PJH=FALSE__;
         } else {
-          result__3HJH='\0';
+          result__2PJH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__3HJH=((__CHARACTER )(( 0)));
+            result__2PJH=((__CHARACTER )(( 0)));
           } else {
-            result__3HJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+            result__2PJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__3HJH == ';')) {
+          if ((result__2PJH == ';')) {
             position__CCC=(__INTEGER)(position__CCC +  1);
-            result__2HJH=TRUE__;
+            result__1PJH=TRUE__;
           };
         };
-        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];
+        if (result__1PJH) {
+          if (((__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)lst__2CM)->parent_arrayed_collection__EYC.upper__SIV +  1) ==  1)) {
+            typ_arg__3CM=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)lst__2CM)->parent_arrayed_collection__EYC.storage__ZMV)[ 0];
           } else {
-            typ_arg__R5L=get__GGP(lst__Q5L);
-            copy__35R(string_tmp__VH,(&__string_292));
-            switch (((struct ___OBJ *)typ_arg__R5L)->__id) {
+            typ_arg__3CM=get__SJP(lst__2CM);
+            copy__JDS(string_tmp__VH,(&__string_292));
+            switch (((struct ___OBJ *)typ_arg__3CM)->__id) {
             case __ITM_TYPE_PARAMETER__: {
-              append__FLS(string_tmp__VH,((__ITM_TYPE_PARAMETER *)typ_arg__R5L)->parent_itm_type__UBE.name__OVP);
+              append__ROS(string_tmp__VH,((__ITM_TYPE_PARAMETER *)typ_arg__3CM)->parent_itm_type__YEE.name__0YP);
             } break;
             case __ITM_TYPE_SIMPLE__: {
-              append__FLS(string_tmp__VH,((__ITM_TYPE_SIMPLE *)typ_arg__R5L)->name__OVP);
+              append__ROS(string_tmp__VH,((__ITM_TYPE_SIMPLE *)typ_arg__3CM)->name__0YP);
             } break;
             case __ITM_TYPE_MULTI__: {
-              append_in__NHBC(typ_arg__R5L,string_tmp__VH);
+              append_in__1KBC(typ_arg__3CM,string_tmp__VH);
             } break;
             case __ITM_TYPE_BLOCK__: {
-              append_in__0EPD(typ_arg__R5L,string_tmp__VH);
+              append_in__IIPD(typ_arg__3CM,string_tmp__VH);
             } break;
             case __ITM_TYPE_GENERIC__: {
-              append_in__4FPD(typ_arg__R5L,string_tmp__VH);
+              append_in__MJPD(typ_arg__3CM,string_tmp__VH);
             } break;
             case __ITM_TYPE_STYLE__: {
-              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,' ');
+              Self__ULGH=((__ITM_TYPE_STYLE *)typ_arg__3CM);
+              if (((void *)Self__ULGH->style__DZP != (void *)NULL)) {
+                append__ROS(string_tmp__VH,Self__ULGH->style__DZP);
+                add_last__GOT(string_tmp__VH,' ');
               };
-              append__FLS(string_tmp__VH,Self__ZEGH->parent_itm_type_simple__FPN.name__OVP);
+              append__ROS(string_tmp__VH,Self__ULGH->parent_itm_type_simple__RSN.name__0YP);
             } break;
             };
-            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)) {
+            append__ROS(string_tmp__VH,(&__string_293));
+            __tmp__BGM=current_position__EZF();
+            put_error__text__NPG( 2,string_tmp__VH);
+            put_position__XQG(__tmp__BGM);
+            put_string__P3F(msg_err__SPG);
+            if ((type_error__RPG !=  2)) {
               exit(( 1));
             };
           };
-          lst__Q5L=read_type_list__MJO(Self__L5L,FALSE__);
+          lst__2CM=read_type_list__YMO(Self__XCM,FALSE__);
         };
       };
     };
-    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];
+    if (((void *)lst__2CM != (void *)NULL)) {
+      if (((__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)lst__2CM)->parent_arrayed_collection__EYC.upper__SIV +  1) ==  1)) {
+        typ_res__4CM=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)lst__2CM)->parent_arrayed_collection__EYC.storage__ZMV)[ 0];
       } else {
-        typ_res__S5L=get__GGP(lst__Q5L);
+        typ_res__4CM=get__SJP(lst__2CM);
       };
     };
-    result__5HJH=FALSE__;
-    if ((! read_space__KSD())) {
-      result__5HJH=FALSE__;
+    result__4PJH=FALSE__;
+    if ((! read_space__MTD())) {
+      result__4PJH=FALSE__;
     } else {
-      result__AIJH='\0';
+      result__5PJH='\0';
       if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__AIJH=((__CHARACTER )(( 0)));
+        result__5PJH=((__CHARACTER )(( 0)));
       } else {
-        result__AIJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+        result__5PJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__AIJH == '}')) {
+      if ((result__5PJH == '}')) {
         position__CCC=(__INTEGER)(position__CCC +  1);
-        result__5HJH=TRUE__;
+        result__4PJH=TRUE__;
       };
     };
-    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)) {
+    if ((! result__4PJH)) {
+      pos__YGYG=current_position__EZF();
+      put_error__text__NPG( 2,(&__string_294));
+      put_position__XQG(pos__YGYG);
+      put_string__P3F(msg_err__SPG);
+      if ((type_error__RPG !=  2)) {
         exit(( 1));
       };
     };
-    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)));
+    typ_arg__FMN=typ_arg__3CM;
+    typ_res__GMN=typ_res__4CM;
+    result__IMN=NULL;
+    idx__JMN= 0;
+    while (((idx__JMN <= ((__FAST_ARRAYoITM_TYPE_BLOCKo *)dico__PMN)->parent_arrayed_collection__OMN.upper__YMN) && (((void *)((__ITM_TYPE_BLOCK *)((void **)((__FAST_ARRAYoITM_TYPE_BLOCKo *)dico__PMN)->parent_arrayed_collection__OMN.storage__ZKV)[idx__JMN])->type_argument__GNN != (void *)typ_arg__FMN) || ((void *)((__ITM_TYPE_BLOCK *)((void **)((__FAST_ARRAYoITM_TYPE_BLOCKo *)dico__PMN)->parent_arrayed_collection__OMN.storage__ZKV)[idx__JMN])->type_result__QNN != (void *)typ_res__GMN)))) {
+      idx__JMN=(__INTEGER)(idx__JMN +  1);
+    };
+    if ((idx__JMN <= ((__FAST_ARRAYoITM_TYPE_BLOCKo *)dico__PMN)->parent_arrayed_collection__OMN.upper__YMN)) {
+      result__IMN=((void **)((__FAST_ARRAYoITM_TYPE_BLOCKo *)dico__PMN)->parent_arrayed_collection__OMN.storage__ZKV)[idx__JMN];
+    } else {
+      result__P1GB=NULL;
+      ptr__Q1GB=((__POINTER )(NULL));
+      typ_id__V1GB= 0;
+      sz__S1GB=((__UINTEGER_32 )sizeof(__ITM_TYPE_BLOCK));
+      if ((sz__S1GB ==  0)) {
+        result__P1GB=ITM_TYPE_BLOCK__;
+      } else {
+        typ_id__V1GB=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__S1GB);
+        if ((typ_id__V1GB == (__INTEGER)(-  1))) {
+          a__3LGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__4LGH=(__UINTEGER_32)((__UINTEGER_32)(sz__S1GB + a__3LGH) & (__UINTEGER_32)(~ a__3LGH));
+          ptr_table__CQJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__4LGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__BQJH=((__POINTER )(NULL));
+          result__DQJH=((__POINTER *)ptr_table__CQJH)[ 0];
+          if ((result__DQJH == (void *)NULL)) {
+            result__DQJH=new_lab__FTJ(new_size__4LGH);
+            next__BQJH=(void *)((unsigned long)result__DQJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4LGH)));
+            ((__POINTER *)next__BQJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__CQJH)[ 0]=next__BQJH;
+          } else {
+            next__BQJH=((__POINTER *)result__DQJH)[ 0];
+            if ((next__BQJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DQJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__4LGH <<  1)) <=  4096)) {
+                next__BQJH=(void *)((unsigned long)result__DQJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4LGH)));
               } else {
-                next__CIJH=new_lab__ZPJ(new_size__DFGH);
+                next__BQJH=new_lab__FTJ(new_size__4LGH);
               };
-              ((__POINTER *)next__CIJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__DIJH)[ 0]=next__CIJH;
+              ((__POINTER *)next__BQJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__CQJH)[ 0]=next__BQJH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__DQJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BQJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__DQJH=next__BQJH;
+            };
+          };
+          ptr__Q1GB=result__DQJH;
+        } else {
+          t__CMGH=((__UINTEGER_32 )typ_id__V1GB);
+          a__BMGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__KQJH=(__UINTEGER_32)((__UINTEGER_32)(sz__S1GB + a__BMGH) & (__UINTEGER_32)(~ a__BMGH));
+          ptr_table__HQJH=((__POINTER )(&(table_type[(t__CMGH)])));
+          lab_type__JQJH=(__UINTEGER_32)(t__CMGH |  1);
+          next__GQJH=((__POINTER )(NULL));
+          result__IQJH=((__POINTER *)ptr_table__HQJH)[ 0];
+          if ((result__IQJH == (void *)NULL)) {
+            result__IQJH=new_lab__FTJ(lab_type__JQJH);
+            next__GQJH=(void *)((unsigned long)result__IQJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KQJH)));
+            ((__POINTER *)next__GQJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__HQJH)[ 0]=next__GQJH;
+          } else {
+            next__GQJH=((__POINTER *)result__IQJH)[ 0];
+            if ((next__GQJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__IQJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__KQJH <<  1)) <=  4096)) {
+                next__GQJH=(void *)((unsigned long)result__IQJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KQJH)));
               } else {
-                next__HIJH=new_lab__ZPJ(lab_type__KIJH);
+                next__GQJH=new_lab__FTJ(lab_type__JQJH);
               };
-              ((__POINTER *)next__HIJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__IIJH)[ 0]=next__HIJH;
+              ((__POINTER *)next__GQJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__HQJH)[ 0]=next__GQJH;
             } else {
-              ((__POINTER *)result__JIJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HIJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__JIJH=next__HIJH;
+              ((__POINTER *)result__IQJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GQJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__IQJH=next__GQJH;
             };
           };
-          ptr__EYGB=result__JIJH;
+          ptr__Q1GB=result__IQJH;
         };
-        result__DYGB=((__ITM_TYPE_BLOCK *)ptr__EYGB);
-        *(result__DYGB) = *(ITM_TYPE_BLOCK__);
+        result__P1GB=((__ITM_TYPE_BLOCK *)ptr__Q1GB);
+        *(result__P1GB) = *(ITM_TYPE_BLOCK__);
       };
-      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__;
+      Self__01CC=((__ITM_TYPE_BLOCK *)result__P1GB);
+      Self__01CC->type_argument__GNN=typ_arg__3CM;
+      Self__01CC->type_result__QNN=typ_res__4CM;
+      result__IMN=result__P1GB;
+      Self__5MAB=((__FAST_ARRAYoITM_TYPE_BLOCKo *)dico__PMN);
+      new_capacity__BNAB= 0;
+      if (((__INTEGER)(Self__5MAB->parent_arrayed_collection__OMN.upper__YMN +  1) <= (__INTEGER)(Self__5MAB->parent_arrayed_collection__OMN.capacity__OKV -  1))) {
+        Self__5MAB->parent_arrayed_collection__OMN.upper__YMN=(__INTEGER)(Self__5MAB->parent_arrayed_collection__OMN.upper__YMN +  1);
+        __tmp__PNAB=TRUE__;
       } else {
-        __tmp__DKAB=FALSE__;
+        __tmp__PNAB=FALSE__;
       };
-      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;
+      if ((! __tmp__PNAB)) {
+        if ((Self__5MAB->parent_arrayed_collection__OMN.capacity__OKV ==  0)) {
+          Self__5MAB->parent_arrayed_collection__OMN.storage__ZKV=create__3VWB( 2);
+          Self__5MAB->parent_arrayed_collection__OMN.capacity__OKV= 2;
+          Self__5MAB->parent_arrayed_collection__OMN.upper__YMN= 0;
         } else {
-          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);
+          new_capacity__BNAB=(__INTEGER)(Self__5MAB->parent_arrayed_collection__OMN.capacity__OKV <<  1);
+          __tmp__EOAB=Self__5MAB->parent_arrayed_collection__OMN.storage__ZKV;
+          __tmp__FOAB=Self__5MAB->parent_arrayed_collection__OMN.capacity__OKV;
+          new__HNFC=((void **)realloc_dynamic__old_size__new_size__ZHLC(((__POINTER )((void **)__tmp__EOAB)),((__UINTEGER_32 )(__INTEGER)(__tmp__FOAB * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__BNAB * ((__INTEGER )(sizeof(void *)))))));
+          __tmp__1NFC=(__INTEGER)(new_capacity__BNAB -  1);
+          Self__WZVD=__tmp__FOAB;
+          while ((Self__WZVD <= __tmp__1NFC)) {
+            new__HNFC[Self__WZVD]=NULL;
+            Self__WZVD=(__INTEGER)(Self__WZVD +  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);
+          Self__5MAB->parent_arrayed_collection__OMN.storage__ZKV=new__HNFC;
+          Self__5MAB->parent_arrayed_collection__OMN.capacity__OKV=new_capacity__BNAB;
+          Self__5MAB->parent_arrayed_collection__OMN.upper__YMN=(__INTEGER)(Self__5MAB->parent_arrayed_collection__OMN.upper__YMN +  1);
         };
       };
-      ((void **)Self__TJAB->parent_arrayed_collection__CJN.storage__NHV)[Self__TJAB->parent_arrayed_collection__CJN.upper__MJN]=result__DYGB;
+      ((void **)Self__5MAB->parent_arrayed_collection__OMN.storage__ZKV)[Self__5MAB->parent_arrayed_collection__OMN.upper__YMN]=result__P1GB;
     };
-    result__P5L=result__2IN;
+    result__1CM=result__IMN;
   } else {
-    result__NIJH=read_word__HOF((&__string_9));
+    result__MQJH=read_word__LRF((&__string_9));
     if (is_shorter__LZ) {
-      if (result__NIJH) {
+      if (result__MQJH) {
         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);
+          short__token__to__YCD((&__string_120),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V1C)->count__DD),position__CCC);
         } else {
-          short__token__to__YBD((&__string_119),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD),position__CCC);
+          short__token__to__YCD((&__string_119),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V1C)->count__DD),position__CCC);
         };
       };
     };
-    if (result__NIJH) {
-      __tmp__UEM=TRUE__;
+    if (result__MQJH) {
+      __tmp__AIM=TRUE__;
     } else {
-      result__PIJH=read_word__HOF((&__string_10));
+      result__OQJH=read_word__LRF((&__string_10));
       if (is_shorter__LZ) {
-        if (result__PIJH) {
+        if (result__OQJH) {
           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);
+            short__token__to__YCD((&__string_120),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V1C)->count__DD),position__CCC);
           } else {
-            short__token__to__YBD((&__string_119),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD),position__CCC);
+            short__token__to__YCD((&__string_119),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V1C)->count__DD),position__CCC);
           };
         };
       };
-      __tmp__UEM=result__PIJH;
+      __tmp__AIM=result__OQJH;
     };
-    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)) {
+    if (__tmp__AIM) {
+      style__0CM=last_string__V1C;
+      if ((is_local__YCM && ((void *)last_string__V1C == (void *)(&__string_9)))) {
+        pos__XIYG=current_position__EZF();
+        put_error__text__NPG( 0,(&__string_295));
+        put_position__XQG(pos__XIYG);
+        put_string__P3F(msg_err__SPG);
+        if ((type_error__RPG !=  2)) {
           exit(( 1));
         };
       };
     };
-    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)) {
+    result__1CM=read_prototype__XON(Self__XCM,style__0CM);
+    if (((void *)read_contract__CVF(Self__XCM) != (void *)NULL)) {
+      pos__ZIYG=current_position__EZF();
+      put_error__text__NPG( 2,(&__string_260));
+      put_position__XQG(pos__ZIYG);
+      put_string__P3F(msg_err__SPG);
+      if ((type_error__RPG !=  2)) {
         exit(( 1));
       };
     };
   };
-  return(result__P5L);
+  return(result__1CM);
 }
 
-static void set_result_type__X2FC(__ITM_SLOT *Self__Y2FC,void *t__Z2FC)
+static void set_result_type__FAGC(__ITM_SLOT *Self__GAGC,void *t__HAGC)
 // ({ITM_SLOT},{NULLxITM_TYPE_PARAMETERxITM_TYPE_SIMPLExITM_TYPE_MULTIxITM_TYPE_BLOCKxITM_TYPE_GENERICxITM_TYPE_STYLE}) VoidNo recursive, No inlinable.
 {
-  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) {
+  void *tm__IAGC,*__tmp__RAGC;
+  __SECTION_ *Self__MC2G;
+  __POSITION pos__43ID;
+  tm__IAGC=NULL;
+  Self__MC2G=((__SECTION_ *)Self__GAGC->id_section__F3C);
+  if ((((void *)Self__MC2G->name__11DC == (void *)(&__string_23)) || ((void *)Self__MC2G->name__11DC == (void *)(&__string_24)))) {
+    if (t__HAGC==NULL) {
+      __tmp__RAGC=NULL;
+    } else {
+      switch (((struct ___OBJ *)t__HAGC)->__id) {
       case __ITM_TYPE_PARAMETER__: {
-        __tmp__D3FC=((void *)t__Z2FC);
+        __tmp__RAGC=((void *)t__HAGC);
       } break;
       case __ITM_TYPE_SIMPLE__: {
-        __tmp__D3FC=((void *)t__Z2FC);
+        __tmp__RAGC=((void *)t__HAGC);
       } break;
       case __ITM_TYPE_MULTI__: {
-        __tmp__D3FC=NULL;
+        __tmp__RAGC=NULL;
       } break;
       case __ITM_TYPE_BLOCK__: {
-        __tmp__D3FC=((void *)t__Z2FC);
+        __tmp__RAGC=((void *)t__HAGC);
       } break;
       case __ITM_TYPE_GENERIC__: {
-        __tmp__D3FC=((void *)t__Z2FC);
+        __tmp__RAGC=((void *)t__HAGC);
       } break;
       case __ITM_TYPE_STYLE__: {
-        __tmp__D3FC=((void *)t__Z2FC);
+        __tmp__RAGC=((void *)t__HAGC);
       } break;
       }
     };
-    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)) {
+    tm__IAGC=__tmp__RAGC;
+    if (((((void *)__tmp__RAGC == (void *)NULL) || ((void *)__tmp__RAGC == (void *)type_self__XUN)) || ((void *)__tmp__RAGC == (void *)type_void__ZXF))) {
+      pos__43ID=Self__GAGC->parent_named__15.parent_itm_object__4.position__GFJ;
+      put_error__text__NPG( 1,(&__string_239));
+      put_position__XQG(pos__43ID);
+      put_string__P3F(msg_err__SPG);
+      if ((type_error__RPG !=  2)) {
         exit(( 1));
       };
     };
   };
-  Self__Y2FC->result_type__B4FC=t__Z2FC;
+  Self__GAGC->result_type__PBGC=t__HAGC;
 }
 
-static void* read_contract__4RF(__PARSER *Self__5RF)
+static void* read_contract__CVF(__PARSER *Self__DVF)
 // ({PARSER}) With resultNo recursive, No inlinable.
 {
-  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__QIJH=FALSE__;
+  void *e__GVF;
+  void *result__HVF;
+  __POSITION p__0QJH,p__MYL,pos__BJYG,pos__DJYG,p__3RJH;
+  __ITM_LIST *result__SQJH;
+  __POINTER ptr__TQJH,ptr_table__2QJH,next__1QJH,result__3QJH;
+  __POINTER ptr_table__BRJH,next__ARJH,result__CRJH,ptr__O4L;
+  __POINTER ptr_table__GRJH,next__FRJH,result__HRJH,ptr_table__LRJH;
+  __POINTER next__KRJH,result__MRJH,ptr__WRJH,ptr_table__5RJH;
+  __POINTER next__4RJH,result__ASJH,ptr_table__ESJH,next__DSJH;
+  __POINTER result__FSJH;
+  __INTEGER typ_id__UQJH,typ_id__T4L,typ_id__XRJH;
+  __UINTEGER_32 sz__VQJH,a__WQJH,new_size__XQJH,t__YQJH,a__ZQJH;
+  __UINTEGER_32 new_size__ERJH,lab_type__DRJH,sz__Q4L,a__LMGH;
+  __UINTEGER_32 new_size__MMGH,t__QMGH,a__PMGH,new_size__ORJH;
+  __UINTEGER_32 lab_type__NRJH,sz__YRJH,a__ZRJH,new_size__0RJH,t__1RJH;
+  __UINTEGER_32 a__2RJH,new_size__HSJH,lab_type__GSJH;
+  __ITM_LDOTS *result__N4L;
+  __ITM_PROTOTYPE *result__VRJH;
+  __BOOLEAN continue__FVF,result__PQJH,result__PRJH,result__SRJH;
+  void *lst__NVF,*result__WHIH;
+  __CHARACTER result__QQJH,result__QRJH,result__TRJH;
+  __FAST_ARRAYoFAST_ARRAYoITM_CODEoo *Self__XHIH,*Self__YHIH;
+  continue__FVF=FALSE__;
+  e__GVF=NULL;
+  result__HVF=NULL;
+  lst__NVF=NULL;
+  result__PQJH=FALSE__;
+  if ((! read_space__MTD())) {
+    result__PQJH=FALSE__;
   } else {
-    result__RIJH='\0';
+    result__QQJH='\0';
     if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-      result__RIJH=((__CHARACTER )(( 0)));
+      result__QQJH=((__CHARACTER )(( 0)));
     } else {
-      result__RIJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+      result__QQJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
     };
-    if ((result__RIJH == '[')) {
+    if ((result__QQJH == '[')) {
       position__CCC=(__INTEGER)(position__CCC +  1);
-      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)));
+      result__PQJH=TRUE__;
+    };
+  };
+  if (result__PQJH) {
+    p__0QJH=current_position__EZF();
+    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__FTJ(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__SXH)))) &  4095) + (__UINTEGER_32)(new_size__XQJH <<  1)) <=  4096)) {
+              next__1QJH=(void *)((unsigned long)result__3QJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XQJH)));
             } else {
-              next__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)));
+              next__1QJH=new_lab__FTJ(new_size__XQJH);
+            };
+            ((__POINTER *)next__1QJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__2QJH)[ 0]=next__1QJH;
+          } 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__FTJ(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__SXH)))) &  4095) + (__UINTEGER_32)(new_size__ERJH <<  1)) <=  4096)) {
+              next__ARJH=(void *)((unsigned long)result__CRJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ERJH)));
             } else {
-              next__BJJH=new_lab__ZPJ(lab_type__EJJH);
+              next__ARJH=new_lab__FTJ(lab_type__DRJH);
             };
-            ((__POINTER *)next__BJJH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__CJJH)[ 0]=next__BJJH;
+            ((__POINTER *)next__ARJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__BRJH)[ 0]=next__ARJH;
           } else {
-            ((__POINTER *)result__DJJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BJJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__DJJH=next__BJJH;
+            ((__POINTER *)result__CRJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ARJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__CRJH=next__ARJH;
           };
         };
-        ptr__UIJH=result__DJJH;
+        ptr__TQJH=result__CRJH;
       };
-      result__TIJH=((__ITM_LIST *)ptr__UIJH);
-      *(result__TIJH) = *(ITM_LIST__);
+      result__SQJH=((__ITM_LIST *)ptr__TQJH);
+      *(result__SQJH) = *(ITM_LIST__);
     };
-    ((__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);
+    ((__ITM_LIST *)result__SQJH)->parent_itm_code__VAF.parent_itm_object__SEE.position__GFJ=p__0QJH;
+    last_group__WVF=result__SQJH;
+    result__HVF=result__SQJH;
+    read_def_local__A3H(Self__DVF);
+    result__WHIH=NULL;
+    if ((((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__EAI)->parent_arrayed_collection__DAI.upper__VYT <  0)) {
+      result__WHIH=create_with_capacity__LXI( 16);
     } else {
-      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);
+      Self__XHIH=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__EAI);
+      result__WHIH=((void **)Self__XHIH->parent_arrayed_collection__DAI.storage__DDU)[Self__XHIH->parent_arrayed_collection__DAI.upper__VYT];
+      Self__YHIH=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__EAI);
+      Self__YHIH->parent_arrayed_collection__DAI.upper__VYT=(__INTEGER)(Self__YHIH->parent_arrayed_collection__DAI.upper__VYT -  1);
     };
-    lst__JSF=result__DAIH;
+    lst__NVF=result__WHIH;
     do {
-      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;
+      e__GVF=read_expr__XAJ(Self__DVF);
+      if (((void *)e__GVF == (void *)NULL)) {
+        continue__FVF=read_word__LRF((&__string_7));
+        if (continue__FVF) {
+          p__MYL=current_position__EZF();
+          result__N4L=NULL;
+          ptr__O4L=((__POINTER )(NULL));
+          typ_id__T4L= 0;
+          sz__Q4L=((__UINTEGER_32 )sizeof(__ITM_LDOTS));
+          if ((sz__Q4L ==  0)) {
+            result__N4L=ITM_LDOTS__;
+          } else {
+            typ_id__T4L=-1;
+            clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__Q4L);
+            if ((typ_id__T4L == (__INTEGER)(-  1))) {
+              a__LMGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__MMGH=(__UINTEGER_32)((__UINTEGER_32)(sz__Q4L + a__LMGH) & (__UINTEGER_32)(~ a__LMGH));
+              ptr_table__GRJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__MMGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__FRJH=((__POINTER )(NULL));
+              result__HRJH=((__POINTER *)ptr_table__GRJH)[ 0];
+              if ((result__HRJH == (void *)NULL)) {
+                result__HRJH=new_lab__FTJ(new_size__MMGH);
+                next__FRJH=(void *)((unsigned long)result__HRJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MMGH)));
+                ((__POINTER *)next__FRJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__GRJH)[ 0]=next__FRJH;
               } else {
-                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)));
+                next__FRJH=((__POINTER *)result__HRJH)[ 0];
+                if ((next__FRJH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HRJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__MMGH <<  1)) <=  4096)) {
+                    next__FRJH=(void *)((unsigned long)result__HRJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MMGH)));
                   } else {
-                    next__GJJH=new_lab__ZPJ(new_size__RFGH);
+                    next__FRJH=new_lab__FTJ(new_size__MMGH);
                   };
-                  ((__POINTER *)next__GJJH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__HJJH)[ 0]=next__GJJH;
+                  ((__POINTER *)next__FRJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__GRJH)[ 0]=next__FRJH;
                 } else {
-                  ((__POINTER *)result__IJJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GJJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__IJJH=next__GJJH;
+                  ((__POINTER *)result__HRJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FRJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__HRJH=next__FRJH;
                 };
               };
-              ptr__C1L=result__IJJH;
+              ptr__O4L=result__HRJH;
             } else {
-              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;
+              t__QMGH=((__UINTEGER_32 )typ_id__T4L);
+              a__PMGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__ORJH=(__UINTEGER_32)((__UINTEGER_32)(sz__Q4L + a__PMGH) & (__UINTEGER_32)(~ a__PMGH));
+              ptr_table__LRJH=((__POINTER )(&(table_type[(t__QMGH)])));
+              lab_type__NRJH=(__UINTEGER_32)(t__QMGH |  1);
+              next__KRJH=((__POINTER )(NULL));
+              result__MRJH=((__POINTER *)ptr_table__LRJH)[ 0];
+              if ((result__MRJH == (void *)NULL)) {
+                result__MRJH=new_lab__FTJ(lab_type__NRJH);
+                next__KRJH=(void *)((unsigned long)result__MRJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ORJH)));
+                ((__POINTER *)next__KRJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__LRJH)[ 0]=next__KRJH;
               } else {
-                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)));
+                next__KRJH=((__POINTER *)result__MRJH)[ 0];
+                if ((next__KRJH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MRJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__ORJH <<  1)) <=  4096)) {
+                    next__KRJH=(void *)((unsigned long)result__MRJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ORJH)));
                   } else {
-                    next__LJJH=new_lab__ZPJ(lab_type__OJJH);
+                    next__KRJH=new_lab__FTJ(lab_type__NRJH);
                   };
-                  ((__POINTER *)next__LJJH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__MJJH)[ 0]=next__LJJH;
+                  ((__POINTER *)next__KRJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__LRJH)[ 0]=next__KRJH;
                 } else {
-                  ((__POINTER *)result__NJJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LJJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__NJJH=next__LJJH;
+                  ((__POINTER *)result__MRJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KRJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__MRJH=next__KRJH;
                 };
               };
-              ptr__C1L=result__NJJH;
+              ptr__O4L=result__MRJH;
             };
-            result__B1L=((__ITM_LDOTS *)ptr__C1L);
-            *(result__B1L) = *(ITM_LDOTS__);
+            result__N4L=((__ITM_LDOTS *)ptr__O4L);
+            *(result__N4L) = *(ITM_LDOTS__);
           };
-          ((__ITM_LDOTS *)result__B1L)->parent_itm_constant__HTF.parent_itm_object__OBE.position__0BJ=p__AVL;
-          add_last__Q2U(lst__JSF,result__B1L);
+          ((__ITM_LDOTS *)result__N4L)->parent_itm_constant__LWF.parent_itm_object__SEE.position__GFJ=p__MYL;
+          add_last__25U(lst__NVF,result__N4L);
         };
       } else {
-        add_last__Q2U(lst__JSF,e__CSF);
-        result__QJJH=FALSE__;
-        if ((! read_space__KSD())) {
-          result__QJJH=FALSE__;
+        add_last__25U(lst__NVF,e__GVF);
+        result__PRJH=FALSE__;
+        if ((! read_space__MTD())) {
+          result__PRJH=FALSE__;
         } else {
-          result__RJJH='\0';
+          result__QRJH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__RJJH=((__CHARACTER )(( 0)));
+            result__QRJH=((__CHARACTER )(( 0)));
           } else {
-            result__RJJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+            result__QRJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__RJJH == ';')) {
+          if ((result__QRJH == ';')) {
             position__CCC=(__INTEGER)(position__CCC +  1);
-            result__QJJH=TRUE__;
+            result__PRJH=TRUE__;
           };
         };
-        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)) {
+        if ((! result__PRJH)) {
+          pos__BJYG=current_position__EZF();
+          put_error__text__NPG( 2,(&__string_242));
+          put_position__XQG(pos__BJYG);
+          put_string__P3F(msg_err__SPG);
+          if ((type_error__RPG !=  2)) {
             exit(( 1));
           };
         };
-        continue__BSF=TRUE__;
+        continue__FVF=TRUE__;
       };
-    } while (continue__BSF);
-    result__TJJH=FALSE__;
-    if ((! read_space__KSD())) {
-      result__TJJH=FALSE__;
+    } while (continue__FVF);
+    result__SRJH=FALSE__;
+    if ((! read_space__MTD())) {
+      result__SRJH=FALSE__;
     } else {
-      result__UJJH='\0';
+      result__TRJH='\0';
       if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__UJJH=((__CHARACTER )(( 0)));
+        result__TRJH=((__CHARACTER )(( 0)));
       } else {
-        result__UJJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+        result__TRJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__UJJH == ']')) {
+      if ((result__TRJH == ']')) {
         position__CCC=(__INTEGER)(position__CCC +  1);
-        result__TJJH=TRUE__;
+        result__SRJH=TRUE__;
       };
     };
-    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)) {
+    if ((! result__SRJH)) {
+      pos__DJYG=current_position__EZF();
+      put_error__text__NPG( 2,(&__string_296));
+      put_position__XQG(pos__DJYG);
+      put_string__P3F(msg_err__SPG);
+      if ((type_error__RPG !=  2)) {
         exit(( 1));
       };
     };
-    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)));
+    p__3RJH=current_position__EZF();
+    result__VRJH=NULL;
+    ptr__WRJH=((__POINTER )(NULL));
+    typ_id__XRJH= 0;
+    sz__YRJH=((__UINTEGER_32 )sizeof(__ITM_PROTOTYPE));
+    if ((sz__YRJH ==  0)) {
+      result__VRJH=ITM_PROTOTYPE__;
+    } else {
+      typ_id__XRJH=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__YRJH);
+      if ((typ_id__XRJH == (__INTEGER)(-  1))) {
+        a__ZRJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__0RJH=(__UINTEGER_32)((__UINTEGER_32)(sz__YRJH + a__ZRJH) & (__UINTEGER_32)(~ a__ZRJH));
+        ptr_table__5RJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__0RJH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__4RJH=((__POINTER )(NULL));
+        result__ASJH=((__POINTER *)ptr_table__5RJH)[ 0];
+        if ((result__ASJH == (void *)NULL)) {
+          result__ASJH=new_lab__FTJ(new_size__0RJH);
+          next__4RJH=(void *)((unsigned long)result__ASJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0RJH)));
+          ((__POINTER *)next__4RJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__5RJH)[ 0]=next__4RJH;
+        } else {
+          next__4RJH=((__POINTER *)result__ASJH)[ 0];
+          if ((next__4RJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ASJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__0RJH <<  1)) <=  4096)) {
+              next__4RJH=(void *)((unsigned long)result__ASJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0RJH)));
             } else {
-              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)));
+              next__4RJH=new_lab__FTJ(new_size__0RJH);
+            };
+            ((__POINTER *)next__4RJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__5RJH)[ 0]=next__4RJH;
+          } else {
+            ((__POINTER *)result__ASJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4RJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__ASJH=next__4RJH;
+          };
+        };
+        ptr__WRJH=result__ASJH;
+      } else {
+        t__1RJH=((__UINTEGER_32 )typ_id__XRJH);
+        a__2RJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__HSJH=(__UINTEGER_32)((__UINTEGER_32)(sz__YRJH + a__2RJH) & (__UINTEGER_32)(~ a__2RJH));
+        ptr_table__ESJH=((__POINTER )(&(table_type[(t__1RJH)])));
+        lab_type__GSJH=(__UINTEGER_32)(t__1RJH |  1);
+        next__DSJH=((__POINTER )(NULL));
+        result__FSJH=((__POINTER *)ptr_table__ESJH)[ 0];
+        if ((result__FSJH == (void *)NULL)) {
+          result__FSJH=new_lab__FTJ(lab_type__GSJH);
+          next__DSJH=(void *)((unsigned long)result__FSJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HSJH)));
+          ((__POINTER *)next__DSJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__ESJH)[ 0]=next__DSJH;
+        } else {
+          next__DSJH=((__POINTER *)result__FSJH)[ 0];
+          if ((next__DSJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__FSJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__HSJH <<  1)) <=  4096)) {
+              next__DSJH=(void *)((unsigned long)result__FSJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HSJH)));
             } else {
-              next__EKJH=new_lab__ZPJ(lab_type__HKJH);
+              next__DSJH=new_lab__FTJ(lab_type__GSJH);
             };
-            ((__POINTER *)next__EKJH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__FKJH)[ 0]=next__EKJH;
+            ((__POINTER *)next__DSJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__ESJH)[ 0]=next__DSJH;
           } else {
-            ((__POINTER *)result__GKJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EKJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__GKJH=next__EKJH;
+            ((__POINTER *)result__FSJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DSJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__FSJH=next__DSJH;
           };
         };
-        ptr__XJJH=result__GKJH;
+        ptr__WRJH=result__FSJH;
       };
-      result__WJJH=((__ITM_PROTOTYPE *)ptr__XJJH);
-      *(result__WJJH) = *(ITM_PROTOTYPE__);
+      result__VRJH=((__ITM_PROTOTYPE *)ptr__WRJH);
+      *(result__VRJH) = *(ITM_PROTOTYPE__);
     };
-    ((__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);
+    ((__ITM_PROTOTYPE *)result__VRJH)->parent_itm_constant__XXF.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ=p__3RJH;
+    e__GVF=result__VRJH;
+    add_last__25U(result__WHIH,result__VRJH);
+    copy__TBI(result__WHIH);
   };
-  return(result__DSF);
+  return(result__HVF);
 }
 
-static void* read_expr__L3I(__PARSER *Self__M3I)
+static void* read_expr__XAJ(__PARSER *Self__YAJ)
 // ({PARSER}) With resultRecursive, No inlinable.
 {
-  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__JKJH=FALSE__;
+  void *result__0AJ,*value__1AJ,*result__GGL,*expr__HGL,*__tmp__NJL;
+  void *__tmp__UKL,*__tmp__0LL;
+  __INTEGER p__CBJ,typ_id__RD1C,typ_id__3SJH,typ_id__QTJH,typ_id__DUJH;
+  __INTEGER typ_id__5QJD,typ_id__34JD,typ_id__SSJD,last_msg__LGL;
+  __INTEGER first_msg__MGL,typ_id__UVJH,typ_id__JTP,typ_id__TWJH;
+  __INTEGER index__IXJH,__tmp__GXJH,i__JXJH,typ_id__NXJH,__tmp__IJ1C;
+  __INTEGER i__LLCD,typ_id__3XO,typ_id__QZO;
+  void *name__DBJ,*n__2VJH,*n__AIP;
+  __POSITION p__OIRC,pos__MJYG,p__DTJH,pos__OJYG,pos__QJYG,__tmp__3FJ;
+  __POSITION p__JUJH,pos__UJYG,__tmp__4IJ,__tmp__IJJ,__tmp__RJJ,p__1VJH;
+  __POSITION pos__5JYG,p__5HP,__tmp__RJL,__tmp__XKL,__tmp__4LL;
+  __ITM_LIST_IDF *result__LD1C;
+  __POINTER ptr__MD1C,ptr_table__SSJH,next__RSJH,result__TSJH;
+  __POINTER ptr_table__XSJH,next__WSJH,result__YSJH,ptr__2SJH;
+  __POINTER ptr_table__FTJH,next__ETJH,result__GTJH,ptr_table__KTJH;
+  __POINTER next__JTJH,result__LTJH,ptr__PTJH,ptr_table__YTJH;
+  __POINTER next__XTJH,result__ZTJH,ptr_table__3TJH,next__2TJH;
+  __POINTER result__4TJH,ptr__CUJH,ptr_table__LUJH,next__KUJH;
+  __POINTER result__MUJH,ptr_table__QUJH,next__PUJH,result__RUJH;
+  __POINTER ptr__0QJD,ptr_table__VUJH,next__UUJH,result__WUJH;
+  __POINTER ptr_table__0UJH,next__ZUJH,result__1UJH,ptr__Y4JD;
+  __POINTER ptr_table__5UJH,next__4UJH,result__AVJH,ptr_table__EVJH;
+  __POINTER next__DVJH,result__FVJH,ptr__NSJD,ptr_table__JVJH;
+  __POINTER next__IVJH,result__KVJH,ptr_table__OVJH,next__NVJH;
+  __POINTER result__PVJH,ptr__TVJH,ptr_table__4VJH,next__3VJH;
+  __POINTER result__5VJH,ptr_table__DWJH,next__CWJH,result__EWJH;
+  __POINTER ptr__ETP,ptr_table__IWJH,next__HWJH,result__JWJH;
+  __POINTER ptr_table__NWJH,next__MWJH,result__OWJH,ptr__SWJH;
+  __POINTER ptr_table__1WJH,next__0WJH,result__2WJH,ptr_table__AXJH;
+  __POINTER next__5WJH,result__BXJH,ptr__MXJH,ptr_table__VXJH;
+  __POINTER next__UXJH,result__WXJH,ptr_table__0XJH,next__ZXJH;
+  __POINTER result__1XJH,ptr__YXO,ptr_table__5XJH,next__4XJH;
+  __POINTER result__AYJH,ptr_table__EYJH,next__DYJH,result__FYJH;
+  __POINTER ptr__LZO,ptr_table__JYJH,next__IYJH,result__KYJH;
+  __POINTER ptr_table__OYJH,next__NYJH,result__PYJH;
+  __UINTEGER_32 sz__OD1C,a__TMGH,new_size__UMGH,t__YMGH,a__XMGH;
+  __UINTEGER_32 new_size__0SJH,lab_type__ZSJH,sz__4SJH,a__5SJH;
+  __UINTEGER_32 new_size__ATJH,t__BTJH,a__CTJH,new_size__NTJH;
+  __UINTEGER_32 lab_type__MTJH,sz__RTJH,a__STJH,new_size__TTJH,t__UTJH;
+  __UINTEGER_32 a__VTJH,new_size__AUJH,lab_type__5TJH,sz__EUJH,a__FUJH;
+  __UINTEGER_32 new_size__GUJH,t__HUJH,a__IUJH,new_size__TUJH;
+  __UINTEGER_32 lab_type__SUJH,sz__2QJD,a__U1GH,new_size__V1GH,t__Z1GH;
+  __UINTEGER_32 a__Y1GH,new_size__3UJH,lab_type__2UJH,sz__04JD,a__1MGH;
+  __UINTEGER_32 new_size__2MGH,t__ANGH,a__5MGH,new_size__HVJH;
+  __UINTEGER_32 lab_type__GVJH,sz__PSJD,a__21GH,new_size__31GH,t__B2GH;
+  __UINTEGER_32 a__A2GH,new_size__RVJH,lab_type__QVJH,sz__VVJH,a__WVJH;
+  __UINTEGER_32 new_size__XVJH,t__YVJH,a__ZVJH,new_size__GWJH;
+  __UINTEGER_32 lab_type__FWJH,sz__GTP,a__M2GH,new_size__N2GH,t__R2GH;
+  __UINTEGER_32 a__Q2GH,new_size__QWJH,lab_type__PWJH,sz__UWJH,a__VWJH;
+  __UINTEGER_32 new_size__WWJH,t__XWJH,a__YWJH,new_size__DXJH;
+  __UINTEGER_32 lab_type__CXJH,sz__OXJH,a__PXJH,new_size__QXJH,t__RXJH;
+  __UINTEGER_32 a__SXJH,new_size__3XJH,lab_type__2XJH,sz__0XO,a__C3GH;
+  __UINTEGER_32 new_size__D3GH,t__H3GH,a__G3GH,new_size__HYJH;
+  __UINTEGER_32 lab_type__GYJH,sz__NZO,a__1OGH,new_size__2OGH,t__APGH;
+  __UINTEGER_32 a__5OGH,new_size__RYJH,lab_type__QYJH;
+  __ITM_WRITE_VALUE *result__1SJH,*result__ZQJD;
+  __ITM_WRITE_CAST *result__OTJH,*result__MSJD;
+  __ITM_READ *result__BUJH;
+  __ITM_WRITE_CODE *result__X4JD;
+  void *itm_op__KGL,*__tmp__OJL,*__tmp__VKL,*__tmp__1LL;
+  __ITM_OPERATOR *result__SVJH,*Self__0VJH,*result__DTP,*Self__5NV;
+  __ITM_READ_ARG1 *result__RWJH,*result__LXJH;
+  __ITM_READ_ARG2 *result__XXO;
+  __ITM_EXPRESSION *result__KZO;
+  __CHARACTER affect__2AJ,result__JSJH,result__MSJH,result__PSJH;
+  __BOOLEAN again__3AJ,result__ISJH,result__LSJH,result__OSJH;
+  __BOOLEAN __tmp__HEJ,__tmp__JGJ,__tmp__NLL;
+  void *l_assignment__BBJ,*result__JAL,*result__IIRC;
+  __FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *Self__IY5,*Self__4Y5;
+  void *result__45H,*l_expr__IGL;
+  __FAST_ARRAYoFAST_ARRAYoITM_CODEoo *Self__FQ4,*Self__1Q4;
+  __FAST_ARRAYoITM_CODEo *Self__EXJH,*Self__4I1C;
+  void **__tmp__FXJH,**Self__HXJH,**__tmp__HJ1C,**Self__0KCD;
+  result__0AJ=NULL;
+  value__1AJ=NULL;
+  affect__2AJ='\0';
+  again__3AJ=FALSE__;
+  l_assignment__BBJ=NULL;
+  p__CBJ= 0;
+  name__DBJ=NULL;
+  old_position__2SI=position__CCC;
+  old_pos_cur__4SI=pos_cur__FCC;
+  old_pos_line__ATI=pos_line__GCC;
+  old_pos_col__CTI=pos_col__HCC;
+  old_short_derive__ETI=short_derive__PCC;
+  result__ISJH=FALSE__;
+  if ((! read_space__MTD())) {
+    result__ISJH=FALSE__;
   } else {
-    result__KKJH='\0';
+    result__JSJH='\0';
     if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-      result__KKJH=((__CHARACTER )(( 0)));
+      result__JSJH=((__CHARACTER )(( 0)));
     } else {
-      result__KKJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+      result__JSJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
     };
-    if ((result__KKJH == '(')) {
+    if ((result__JSJH == '(')) {
       position__CCC=(__INTEGER)(position__CCC +  1);
-      result__JKJH=TRUE__;
+      result__ISJH=TRUE__;
     };
   };
-  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);
+  if (result__ISJH) {
+    result__JAL=NULL;
+    if ((((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)free_list__PAL)->parent_arrayed_collection__OAL.upper__5UU <  0)) {
+      result__JAL=create_with_capacity__ZKRC( 16);
     } else {
-      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);
+      Self__IY5=((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)free_list__PAL);
+      result__JAL=((void **)Self__IY5->parent_arrayed_collection__OAL.storage__PXU)[Self__IY5->parent_arrayed_collection__OAL.upper__5UU];
+      Self__4Y5=((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)free_list__PAL);
+      Self__4Y5->parent_arrayed_collection__OAL.upper__5UU=(__INTEGER)(Self__4Y5->parent_arrayed_collection__OAL.upper__5UU -  1);
     };
-    l_assignment__V3I=result__32K;
+    l_assignment__BBJ=result__JAL;
     do {
-      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);
+      again__3AJ=FALSE__;
+      if (read_identifier__QBL()) {
+        p__CBJ=(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V1C)->count__DD);
+        copy__JDS(string_tmp2__0BJ,last_string__V1C);
+        while (read_identifier__QBL()) {
+          append__ROS(string_tmp2__0BJ,(&__string_112));
+          append__ROS(string_tmp2__0BJ,last_string__V1C);
+        };
+        name__DBJ=get__YWB(string_tmp2__0BJ);
+        add_last__LDPD(l_assignment__BBJ,name__DBJ);
         if (is_shorter__LZ) {
-          if ((! fast_has__ZAV(short_local__XCC,name__X3I))) {
-            short__token__to__YBD((&__string_131),p__W3I,position__CCC);
+          if ((! fast_has__FEV(short_local__XCC,name__DBJ))) {
+            short__token__to__YCD((&__string_131),p__CBJ,position__CCC);
           };
         };
-        result__MKJH=FALSE__;
-        if ((! read_space__KSD())) {
-          result__MKJH=FALSE__;
+        result__LSJH=FALSE__;
+        if ((! read_space__MTD())) {
+          result__LSJH=FALSE__;
         } else {
-          result__NKJH='\0';
+          result__MSJH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__NKJH=((__CHARACTER )(( 0)));
+            result__MSJH=((__CHARACTER )(( 0)));
           } else {
-            result__NKJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+            result__MSJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__NKJH == ',')) {
+          if ((result__MSJH == ',')) {
             position__CCC=(__INTEGER)(position__CCC +  1);
-            result__MKJH=TRUE__;
+            result__LSJH=TRUE__;
           };
         };
-        if (result__MKJH) {
-          again__R3I=TRUE__;
+        if (result__LSJH) {
+          again__3AJ=TRUE__;
         };
       };
-    } while (again__R3I);
-    if ((! (((__FAST_ARRAYoSTRING_CONSTANTo *)result__32K)->parent_arrayed_collection__U3I.upper__H4OD <  0))) {
-      result__PKJH=FALSE__;
-      if ((! read_space__KSD())) {
-        result__PKJH=FALSE__;
+    } while (again__3AJ);
+    if ((! (((__FAST_ARRAYoSTRING_CONSTANTo *)result__JAL)->parent_arrayed_collection__ABJ.upper__VBPD <  0))) {
+      result__OSJH=FALSE__;
+      if ((! read_space__MTD())) {
+        result__OSJH=FALSE__;
       } else {
-        result__QKJH='\0';
+        result__PSJH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__QKJH=((__CHARACTER )(( 0)));
+          result__PSJH=((__CHARACTER )(( 0)));
         } else {
-          result__QKJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+          result__PSJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__QKJH == ')')) {
+        if ((result__PSJH == ')')) {
           position__CCC=(__INTEGER)(position__CCC +  1);
-          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)));
+          result__OSJH=TRUE__;
+        };
+      };
+      __tmp__HEJ=result__OSJH;
+    } else {
+      __tmp__HEJ=FALSE__;
+    };
+    if ((__tmp__HEJ && ((read_symbol__SYJ((&__string_12)) || read_symbol__SYJ((&__string_13))) || read_symbol__SYJ((&__string_14))))) {
+      result__IIRC=create_with_capacity__ZKRC((__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)result__JAL)->parent_arrayed_collection__ABJ.upper__VBPD +  1));
+      copy__44RD(result__IIRC,result__JAL);
+      free__EV5(result__JAL);
+      l_assignment__BBJ=result__IIRC;
+      p__OIRC=current_position__EZF();
+      result__LD1C=NULL;
+      ptr__MD1C=((__POINTER )(NULL));
+      typ_id__RD1C= 0;
+      sz__OD1C=((__UINTEGER_32 )sizeof(__ITM_LIST_IDF));
+      if ((sz__OD1C ==  0)) {
+        result__LD1C=ITM_LIST_IDF__;
+      } else {
+        typ_id__RD1C=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__OD1C);
+        if ((typ_id__RD1C == (__INTEGER)(-  1))) {
+          a__TMGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__UMGH=(__UINTEGER_32)((__UINTEGER_32)(sz__OD1C + a__TMGH) & (__UINTEGER_32)(~ a__TMGH));
+          ptr_table__SSJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__UMGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__RSJH=((__POINTER )(NULL));
+          result__TSJH=((__POINTER *)ptr_table__SSJH)[ 0];
+          if ((result__TSJH == (void *)NULL)) {
+            result__TSJH=new_lab__FTJ(new_size__UMGH);
+            next__RSJH=(void *)((unsigned long)result__TSJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UMGH)));
+            ((__POINTER *)next__RSJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__SSJH)[ 0]=next__RSJH;
+          } else {
+            next__RSJH=((__POINTER *)result__TSJH)[ 0];
+            if ((next__RSJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TSJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__UMGH <<  1)) <=  4096)) {
+                next__RSJH=(void *)((unsigned long)result__TSJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UMGH)));
               } else {
-                next__SKJH=new_lab__ZPJ(new_size__ZFGH);
+                next__RSJH=new_lab__FTJ(new_size__UMGH);
               };
-              ((__POINTER *)next__SKJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__TKJH)[ 0]=next__SKJH;
+              ((__POINTER *)next__RSJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__SSJH)[ 0]=next__RSJH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__TSJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RSJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__TSJH=next__RSJH;
+            };
+          };
+          ptr__MD1C=result__TSJH;
+        } else {
+          t__YMGH=((__UINTEGER_32 )typ_id__RD1C);
+          a__XMGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__0SJH=(__UINTEGER_32)((__UINTEGER_32)(sz__OD1C + a__XMGH) & (__UINTEGER_32)(~ a__XMGH));
+          ptr_table__XSJH=((__POINTER )(&(table_type[(t__YMGH)])));
+          lab_type__ZSJH=(__UINTEGER_32)(t__YMGH |  1);
+          next__WSJH=((__POINTER )(NULL));
+          result__YSJH=((__POINTER *)ptr_table__XSJH)[ 0];
+          if ((result__YSJH == (void *)NULL)) {
+            result__YSJH=new_lab__FTJ(lab_type__ZSJH);
+            next__WSJH=(void *)((unsigned long)result__YSJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0SJH)));
+            ((__POINTER *)next__WSJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__XSJH)[ 0]=next__WSJH;
+          } else {
+            next__WSJH=((__POINTER *)result__YSJH)[ 0];
+            if ((next__WSJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YSJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__0SJH <<  1)) <=  4096)) {
+                next__WSJH=(void *)((unsigned long)result__YSJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0SJH)));
               } else {
-                next__XKJH=new_lab__ZPJ(lab_type__0KJH);
+                next__WSJH=new_lab__FTJ(lab_type__ZSJH);
               };
-              ((__POINTER *)next__XKJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__YKJH)[ 0]=next__XKJH;
+              ((__POINTER *)next__WSJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__XSJH)[ 0]=next__WSJH;
             } else {
-              ((__POINTER *)result__ZKJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XKJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__ZKJH=next__XKJH;
+              ((__POINTER *)result__YSJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WSJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__YSJH=next__WSJH;
             };
           };
-          ptr__450C=result__ZKJH;
+          ptr__MD1C=result__YSJH;
         };
-        result__350C=((__ITM_LIST_IDF *)ptr__450C);
-        *(result__350C) = *(ITM_LIST_IDF__);
+        result__LD1C=((__ITM_LIST_IDF *)ptr__MD1C);
+        *(result__LD1C) = *(ITM_LIST_IDF__);
       };
-      ((__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)) {
+      ((__ITM_LIST_IDF *)result__LD1C)->parent_itm_code__PEJ.parent_itm_object__SEE.position__GFJ=p__OIRC;
+      result__0AJ=result__LD1C;
+      affect__2AJ=((__CHARACTER *)((__STRING_CONSTANT *)last_string__V1C)->storage__FRO)[ 0];
+      value__1AJ=read_expr__XAJ(Self__YAJ);
+      if (((void *)value__1AJ == (void *)NULL)) {
+        pos__MJYG=current_position__EZF();
+        put_error__text__NPG( 0,(&__string_240));
+        put_position__XQG(pos__MJYG);
+        put_string__P3F(msg_err__SPG);
+        if ((type_error__RPG !=  2)) {
           exit(( 1));
         };
       };
-      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;
+      if ((affect__2AJ == ':')) {
+        p__DTJH=result__LD1C->parent_itm_code__PEJ.parent_itm_object__SEE.position__GFJ;
+        result__1SJH=NULL;
+        ptr__2SJH=((__POINTER )(NULL));
+        typ_id__3SJH= 0;
+        sz__4SJH=((__UINTEGER_32 )sizeof(__ITM_WRITE_VALUE));
+        if ((sz__4SJH ==  0)) {
+          result__1SJH=ITM_WRITE_VALUE__;
+        } else {
+          typ_id__3SJH=-1;
+          clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__4SJH);
+          if ((typ_id__3SJH == (__INTEGER)(-  1))) {
+            a__5SJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__ATJH=(__UINTEGER_32)((__UINTEGER_32)(sz__4SJH + a__5SJH) & (__UINTEGER_32)(~ a__5SJH));
+            ptr_table__FTJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ATJH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__ETJH=((__POINTER )(NULL));
+            result__GTJH=((__POINTER *)ptr_table__FTJH)[ 0];
+            if ((result__GTJH == (void *)NULL)) {
+              result__GTJH=new_lab__FTJ(new_size__ATJH);
+              next__ETJH=(void *)((unsigned long)result__GTJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ATJH)));
+              ((__POINTER *)next__ETJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__FTJH)[ 0]=next__ETJH;
             } else {
-              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)));
+              next__ETJH=((__POINTER *)result__GTJH)[ 0];
+              if ((next__ETJH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GTJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__ATJH <<  1)) <=  4096)) {
+                  next__ETJH=(void *)((unsigned long)result__GTJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ATJH)));
                 } else {
-                  next__FLJH=new_lab__ZPJ(new_size__BLJH);
+                  next__ETJH=new_lab__FTJ(new_size__ATJH);
                 };
-                ((__POINTER *)next__FLJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__GLJH)[ 0]=next__FLJH;
+                ((__POINTER *)next__ETJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__FTJH)[ 0]=next__ETJH;
               } else {
-                ((__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;
+                ((__POINTER *)result__GTJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ETJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__GTJH=next__ETJH;
+              };
+            };
+            ptr__2SJH=result__GTJH;
+          } else {
+            t__BTJH=((__UINTEGER_32 )typ_id__3SJH);
+            a__CTJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__NTJH=(__UINTEGER_32)((__UINTEGER_32)(sz__4SJH + a__CTJH) & (__UINTEGER_32)(~ a__CTJH));
+            ptr_table__KTJH=((__POINTER )(&(table_type[(t__BTJH)])));
+            lab_type__MTJH=(__UINTEGER_32)(t__BTJH |  1);
+            next__JTJH=((__POINTER )(NULL));
+            result__LTJH=((__POINTER *)ptr_table__KTJH)[ 0];
+            if ((result__LTJH == (void *)NULL)) {
+              result__LTJH=new_lab__FTJ(lab_type__MTJH);
+              next__JTJH=(void *)((unsigned long)result__LTJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NTJH)));
+              ((__POINTER *)next__JTJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__KTJH)[ 0]=next__JTJH;
             } else {
-              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)));
+              next__JTJH=((__POINTER *)result__LTJH)[ 0];
+              if ((next__JTJH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LTJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__NTJH <<  1)) <=  4096)) {
+                  next__JTJH=(void *)((unsigned long)result__LTJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NTJH)));
                 } else {
-                  next__KLJH=new_lab__ZPJ(lab_type__NLJH);
+                  next__JTJH=new_lab__FTJ(lab_type__MTJH);
                 };
-                ((__POINTER *)next__KLJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__LLJH)[ 0]=next__KLJH;
+                ((__POINTER *)next__JTJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__KTJH)[ 0]=next__JTJH;
               } else {
-                ((__POINTER *)result__MLJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KLJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__MLJH=next__KLJH;
+                ((__POINTER *)result__LTJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JTJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__LTJH=next__JTJH;
               };
             };
-            ptr__3KJH=result__MLJH;
+            ptr__2SJH=result__LTJH;
           };
-          result__2KJH=((__ITM_WRITE_VALUE *)ptr__3KJH);
-          *(result__2KJH) = *(ITM_WRITE_VALUE__);
+          result__1SJH=((__ITM_WRITE_VALUE *)ptr__2SJH);
+          *(result__1SJH) = *(ITM_WRITE_VALUE__);
         };
-        ((__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;
+        ((__ITM_WRITE_VALUE *)result__1SJH)->parent_itm_write__FFJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ=p__DTJH;
+        result__0AJ=result__1SJH;
       };
-      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)) {
+      if ((affect__2AJ == '<')) {
+        pos__OJYG=current_position__EZF();
+        put_error__text__NPG( 0,(&__string_297));
+        put_position__XQG(pos__OJYG);
+        put_string__P3F(msg_err__SPG);
+        if ((type_error__RPG !=  2)) {
           exit(( 1));
         };
       };
-      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)) {
+      if ((affect__2AJ == '?')) {
+        pos__QJYG=current_position__EZF();
+        put_error__text__NPG( 0,(&__string_298));
+        put_position__XQG(pos__QJYG);
+        put_string__P3F(msg_err__SPG);
+        if ((type_error__RPG !=  2)) {
           exit(( 1));
         };
-        switch (((struct ___OBJ *)result__O3I)->__id) {
+        switch (((struct ___OBJ *)result__0AJ)->__id) {
         case __ITM_LIST__: {
-          __tmp__RCJ=((__ITM_LIST *)result__O3I)->parent_itm_code__R3E.parent_itm_object__OBE.position__0BJ;
+          __tmp__3FJ=((__ITM_LIST *)result__0AJ)->parent_itm_code__VAF.parent_itm_object__SEE.position__GFJ;
         } break;
         case __ITM_LDOTS__: {
-          __tmp__RCJ=((__ITM_LDOTS *)result__O3I)->parent_itm_constant__HTF.parent_itm_object__OBE.position__0BJ;
+          __tmp__3FJ=((__ITM_LDOTS *)result__0AJ)->parent_itm_constant__LWF.parent_itm_object__SEE.position__GFJ;
         } break;
         case __ITM_PROTOTYPE__: {
-          __tmp__RCJ=((__ITM_PROTOTYPE *)result__O3I)->parent_itm_constant__TUF.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
+          __tmp__3FJ=((__ITM_PROTOTYPE *)result__0AJ)->parent_itm_constant__XXF.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
         } break;
         case __ITM_LIST_IDF__: {
-          __tmp__RCJ=((__ITM_LIST_IDF *)result__O3I)->parent_itm_code__DBJ.parent_itm_object__OBE.position__0BJ;
+          __tmp__3FJ=((__ITM_LIST_IDF *)result__0AJ)->parent_itm_code__PEJ.parent_itm_object__SEE.position__GFJ;
         } break;
         case __ITM_WRITE_VALUE__: {
-          __tmp__RCJ=((__ITM_WRITE_VALUE *)result__O3I)->parent_itm_write__ZBJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
+          __tmp__3FJ=((__ITM_WRITE_VALUE *)result__0AJ)->parent_itm_write__FFJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
         } break;
         case __ITM_WRITE_CAST__: {
-          __tmp__RCJ=((__ITM_WRITE_CAST *)result__O3I)->parent_itm_write__QCJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
+          __tmp__3FJ=((__ITM_WRITE_CAST *)result__0AJ)->parent_itm_write__2FJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
         } break;
         case __ITM_READ__: {
-          __tmp__RCJ=((__ITM_READ *)result__O3I)->parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
+          __tmp__3FJ=((__ITM_READ *)result__0AJ)->parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
         } break;
         case __ITM_WRITE_CODE__: {
-          __tmp__RCJ=((__ITM_WRITE_CODE *)result__O3I)->parent_itm_write__1FJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
+          __tmp__3FJ=((__ITM_WRITE_CODE *)result__0AJ)->parent_itm_write__HJJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
         } break;
         case __ITM_OPERATOR__: {
-          __tmp__RCJ=((__ITM_OPERATOR *)result__O3I)->parent_itm_code__3CL.parent_itm_object__OBE.position__0BJ;
+          __tmp__3FJ=((__ITM_OPERATOR *)result__0AJ)->parent_itm_code__JGL.parent_itm_object__SEE.position__GFJ;
         } break;
         case __ITM_READ_ARG1__: {
-          __tmp__RCJ=((__ITM_READ_ARG1 *)result__O3I)->parent_itm_read__DGL.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
+          __tmp__3FJ=((__ITM_READ_ARG1 *)result__0AJ)->parent_itm_read__PJL.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
         } break;
         case __ITM_READ_ARG2__: {
-          __tmp__RCJ=((__ITM_READ_ARG2 *)result__O3I)->parent_itm_read__QIL.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
+          __tmp__3FJ=((__ITM_READ_ARG2 *)result__0AJ)->parent_itm_read__2LL.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
         } break;
         case __ITM_EXPRESSION__: {
-          __tmp__RCJ=position__GB5B(result__O3I);
+          __tmp__3FJ=position__SE5B(result__0AJ);
         } break;
         case __ITM_OLD__: {
-          __tmp__RCJ=((__ITM_OLD *)result__O3I)->parent_itm_code__4ZL.parent_itm_object__OBE.position__0BJ;
+          __tmp__3FJ=((__ITM_OLD *)result__0AJ)->parent_itm_code__K3L.parent_itm_object__SEE.position__GFJ;
         } break;
         case __ITM_EXTERNAL_TYPE__: {
-          __tmp__RCJ=((__ITM_EXTERNAL_TYPE *)result__O3I)->parent_itm_extern__T1M.parent_itm_code__S1M.parent_itm_object__OBE.position__0BJ;
+          __tmp__3FJ=((__ITM_EXTERNAL_TYPE *)result__0AJ)->parent_itm_extern__54M.parent_itm_code__44M.parent_itm_object__SEE.position__GFJ;
         } break;
         case __ITM_BLOCK__: {
-          __tmp__RCJ=((__ITM_LIST *)((__ITM_BLOCK *)result__O3I)->list__LMDC)->parent_itm_code__R3E.parent_itm_object__OBE.position__0BJ;
+          __tmp__3FJ=((__ITM_LIST *)((__ITM_BLOCK *)result__0AJ)->list__ZPDC)->parent_itm_code__VAF.parent_itm_object__SEE.position__GFJ;
         } break;
         case __ITM_EXTERNAL__: {
-          __tmp__RCJ=((__ITM_EXTERNAL *)result__O3I)->parent_itm_extern__YCN.parent_itm_code__S1M.parent_itm_object__OBE.position__0BJ;
+          __tmp__3FJ=((__ITM_EXTERNAL *)result__0AJ)->parent_itm_extern__EGN.parent_itm_code__44M.parent_itm_object__SEE.position__GFJ;
         } break;
         case __ITM_READ_ARGS__: {
-          __tmp__RCJ=((__ITM_READ_ARGS *)result__O3I)->parent_itm_read__OAO.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
+          __tmp__3FJ=((__ITM_READ_ARGS *)result__0AJ)->parent_itm_read__0DO.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
         } break;
         case __ITM_REAL__: {
-          __tmp__RCJ=((__ITM_REAL *)result__O3I)->parent_itm_constant__JOO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
+          __tmp__3FJ=((__ITM_REAL *)result__0AJ)->parent_itm_constant__VRO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
         } break;
         case __ITM_NUMBER__: {
-          __tmp__RCJ=((__ITM_NUMBER *)result__O3I)->parent_itm_constant__1OO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
+          __tmp__3FJ=((__ITM_NUMBER *)result__0AJ)->parent_itm_constant__HSO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
         } break;
         case __ITM_CHARACTER__: {
-          __tmp__RCJ=((__ITM_CHARACTER *)result__O3I)->parent_itm_constant__NPO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
+          __tmp__3FJ=((__ITM_CHARACTER *)result__0AJ)->parent_itm_constant__ZSO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
         } break;
         case __ITM_STRING__: {
-          __tmp__RCJ=((__ITM_STRING *)result__O3I)->parent_itm_constant__4PO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
+          __tmp__3FJ=((__ITM_STRING *)result__0AJ)->parent_itm_constant__KTO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
         } break;
         case __ITM_RESULT__: {
-          __tmp__RCJ=position__QIHC(result__O3I);
+          __tmp__3FJ=position__4LHC(result__0AJ);
         } break;
         };
-        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;
+        result__OTJH=NULL;
+        ptr__PTJH=((__POINTER )(NULL));
+        typ_id__QTJH= 0;
+        sz__RTJH=((__UINTEGER_32 )sizeof(__ITM_WRITE_CAST));
+        if ((sz__RTJH ==  0)) {
+          result__OTJH=ITM_WRITE_CAST__;
+        } else {
+          typ_id__QTJH=-1;
+          clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__RTJH);
+          if ((typ_id__QTJH == (__INTEGER)(-  1))) {
+            a__STJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__TTJH=(__UINTEGER_32)((__UINTEGER_32)(sz__RTJH + a__STJH) & (__UINTEGER_32)(~ a__STJH));
+            ptr_table__YTJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__TTJH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__XTJH=((__POINTER )(NULL));
+            result__ZTJH=((__POINTER *)ptr_table__YTJH)[ 0];
+            if ((result__ZTJH == (void *)NULL)) {
+              result__ZTJH=new_lab__FTJ(new_size__TTJH);
+              next__XTJH=(void *)((unsigned long)result__ZTJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TTJH)));
+              ((__POINTER *)next__XTJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__YTJH)[ 0]=next__XTJH;
             } else {
-              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)));
+              next__XTJH=((__POINTER *)result__ZTJH)[ 0];
+              if ((next__XTJH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ZTJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__TTJH <<  1)) <=  4096)) {
+                  next__XTJH=(void *)((unsigned long)result__ZTJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TTJH)));
                 } else {
-                  next__YLJH=new_lab__ZPJ(new_size__ULJH);
+                  next__XTJH=new_lab__FTJ(new_size__TTJH);
                 };
-                ((__POINTER *)next__YLJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__ZLJH)[ 0]=next__YLJH;
+                ((__POINTER *)next__XTJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__YTJH)[ 0]=next__XTJH;
               } else {
-                ((__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;
+                ((__POINTER *)result__ZTJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XTJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__ZTJH=next__XTJH;
+              };
+            };
+            ptr__PTJH=result__ZTJH;
+          } else {
+            t__UTJH=((__UINTEGER_32 )typ_id__QTJH);
+            a__VTJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__AUJH=(__UINTEGER_32)((__UINTEGER_32)(sz__RTJH + a__VTJH) & (__UINTEGER_32)(~ a__VTJH));
+            ptr_table__3TJH=((__POINTER )(&(table_type[(t__UTJH)])));
+            lab_type__5TJH=(__UINTEGER_32)(t__UTJH |  1);
+            next__2TJH=((__POINTER )(NULL));
+            result__4TJH=((__POINTER *)ptr_table__3TJH)[ 0];
+            if ((result__4TJH == (void *)NULL)) {
+              result__4TJH=new_lab__FTJ(lab_type__5TJH);
+              next__2TJH=(void *)((unsigned long)result__4TJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AUJH)));
+              ((__POINTER *)next__2TJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__3TJH)[ 0]=next__2TJH;
             } else {
-              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)));
+              next__2TJH=((__POINTER *)result__4TJH)[ 0];
+              if ((next__2TJH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4TJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__AUJH <<  1)) <=  4096)) {
+                  next__2TJH=(void *)((unsigned long)result__4TJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AUJH)));
                 } else {
-                  next__3LJH=new_lab__ZPJ(lab_type__AMJH);
+                  next__2TJH=new_lab__FTJ(lab_type__5TJH);
                 };
-                ((__POINTER *)next__3LJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__4LJH)[ 0]=next__3LJH;
+                ((__POINTER *)next__2TJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__3TJH)[ 0]=next__2TJH;
               } else {
-                ((__POINTER *)result__5LJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3LJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__5LJH=next__3LJH;
+                ((__POINTER *)result__4TJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2TJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__4TJH=next__2TJH;
               };
             };
-            ptr__QLJH=result__5LJH;
+            ptr__PTJH=result__4TJH;
           };
-          result__PLJH=((__ITM_WRITE_CAST *)ptr__QLJH);
-          *(result__PLJH) = *(ITM_WRITE_CAST__);
+          result__OTJH=((__ITM_WRITE_CAST *)ptr__PTJH);
+          *(result__OTJH) = *(ITM_WRITE_CAST__);
         };
-        ((__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;
+        ((__ITM_WRITE_CAST *)result__OTJH)->parent_itm_write__2FJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ=__tmp__3FJ;
+        result__0AJ=result__OTJH;
       };
     } else {
-      free__WP5(l_assignment__V3I);
+      free__EV5(l_assignment__BBJ);
     };
-    __tmp__3CJ=TRUE__;
+    __tmp__JGJ=TRUE__;
   } else {
-    __tmp__3CJ=FALSE__;
+    __tmp__JGJ=FALSE__;
   };
-  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);
+  if ((! __tmp__JGJ)) {
+    if (read_identifier__QBL()) {
+      p__CBJ=(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V1C)->count__DD);
+      copy__JDS(string_tmp2__0BJ,last_string__V1C);
+      while (read_identifier__QBL()) {
+        append__ROS(string_tmp2__0BJ,(&__string_112));
+        append__ROS(string_tmp2__0BJ,last_string__V1C);
       };
-      name__X3I=get__YWB(string_tmp2__O4I);
+      name__DBJ=get__YWB(string_tmp2__0BJ);
       if (is_shorter__LZ) {
-        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;
+        if ((! fast_has__FEV(short_local__XCC,name__DBJ))) {
+          short__token__to__YCD((&__string_131),p__CBJ,position__CCC);
+        };
+      };
+      if (((read_symbol__SYJ((&__string_12)) || read_symbol__SYJ((&__string_13))) || read_symbol__SYJ((&__string_14)))) {
+        p__JUJH=current_position__EZF();
+        result__BUJH=NULL;
+        ptr__CUJH=((__POINTER )(NULL));
+        typ_id__DUJH= 0;
+        sz__EUJH=((__UINTEGER_32 )sizeof(__ITM_READ));
+        if ((sz__EUJH ==  0)) {
+          result__BUJH=ITM_READ__;
+        } else {
+          typ_id__DUJH=-1;
+          clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__EUJH);
+          if ((typ_id__DUJH == (__INTEGER)(-  1))) {
+            a__FUJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__GUJH=(__UINTEGER_32)((__UINTEGER_32)(sz__EUJH + a__FUJH) & (__UINTEGER_32)(~ a__FUJH));
+            ptr_table__LUJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__GUJH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__KUJH=((__POINTER )(NULL));
+            result__MUJH=((__POINTER *)ptr_table__LUJH)[ 0];
+            if ((result__MUJH == (void *)NULL)) {
+              result__MUJH=new_lab__FTJ(new_size__GUJH);
+              next__KUJH=(void *)((unsigned long)result__MUJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GUJH)));
+              ((__POINTER *)next__KUJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__LUJH)[ 0]=next__KUJH;
             } else {
-              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)));
+              next__KUJH=((__POINTER *)result__MUJH)[ 0];
+              if ((next__KUJH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MUJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__GUJH <<  1)) <=  4096)) {
+                  next__KUJH=(void *)((unsigned long)result__MUJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GUJH)));
                 } else {
-                  next__LMJH=new_lab__ZPJ(new_size__HMJH);
+                  next__KUJH=new_lab__FTJ(new_size__GUJH);
                 };
-                ((__POINTER *)next__LMJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__MMJH)[ 0]=next__LMJH;
+                ((__POINTER *)next__KUJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__LUJH)[ 0]=next__KUJH;
               } else {
-                ((__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;
+                ((__POINTER *)result__MUJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KUJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__MUJH=next__KUJH;
+              };
+            };
+            ptr__CUJH=result__MUJH;
+          } else {
+            t__HUJH=((__UINTEGER_32 )typ_id__DUJH);
+            a__IUJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__TUJH=(__UINTEGER_32)((__UINTEGER_32)(sz__EUJH + a__IUJH) & (__UINTEGER_32)(~ a__IUJH));
+            ptr_table__QUJH=((__POINTER )(&(table_type[(t__HUJH)])));
+            lab_type__SUJH=(__UINTEGER_32)(t__HUJH |  1);
+            next__PUJH=((__POINTER )(NULL));
+            result__RUJH=((__POINTER *)ptr_table__QUJH)[ 0];
+            if ((result__RUJH == (void *)NULL)) {
+              result__RUJH=new_lab__FTJ(lab_type__SUJH);
+              next__PUJH=(void *)((unsigned long)result__RUJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TUJH)));
+              ((__POINTER *)next__PUJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__QUJH)[ 0]=next__PUJH;
             } else {
-              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)));
+              next__PUJH=((__POINTER *)result__RUJH)[ 0];
+              if ((next__PUJH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__RUJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__TUJH <<  1)) <=  4096)) {
+                  next__PUJH=(void *)((unsigned long)result__RUJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TUJH)));
                 } else {
-                  next__QMJH=new_lab__ZPJ(lab_type__TMJH);
+                  next__PUJH=new_lab__FTJ(lab_type__SUJH);
                 };
-                ((__POINTER *)next__QMJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__RMJH)[ 0]=next__QMJH;
+                ((__POINTER *)next__PUJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__QUJH)[ 0]=next__PUJH;
               } else {
-                ((__POINTER *)result__SMJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QMJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__SMJH=next__QMJH;
+                ((__POINTER *)result__RUJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PUJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__RUJH=next__PUJH;
               };
             };
-            ptr__DMJH=result__SMJH;
+            ptr__CUJH=result__RUJH;
           };
-          result__CMJH=((__ITM_READ *)ptr__DMJH);
-          *(result__CMJH) = *(ITM_READ__);
+          result__BUJH=((__ITM_READ *)ptr__CUJH);
+          *(result__BUJH) = *(ITM_READ__);
         };
-        ((__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)) {
+        ((__ITM_READ *)result__BUJH)->parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ=p__JUJH;
+        result__0AJ=result__BUJH;
+        affect__2AJ=((__CHARACTER *)((__STRING_CONSTANT *)last_string__V1C)->storage__FRO)[ 0];
+        value__1AJ=read_expr__XAJ(Self__YAJ);
+        if (((void *)value__1AJ == (void *)NULL)) {
+          pos__UJYG=current_position__EZF();
+          put_error__text__NPG( 0,(&__string_240));
+          put_position__XQG(pos__UJYG);
+          put_string__P3F(msg_err__SPG);
+          if ((type_error__RPG !=  2)) {
             exit(( 1));
           };
         };
-        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;
+        if ((affect__2AJ == ':')) {
+          __tmp__4IJ=result__BUJH->parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
+          result__ZQJD=NULL;
+          ptr__0QJD=((__POINTER )(NULL));
+          typ_id__5QJD= 0;
+          sz__2QJD=((__UINTEGER_32 )sizeof(__ITM_WRITE_VALUE));
+          if ((sz__2QJD ==  0)) {
+            result__ZQJD=ITM_WRITE_VALUE__;
+          } else {
+            typ_id__5QJD=-1;
+            clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__2QJD);
+            if ((typ_id__5QJD == (__INTEGER)(-  1))) {
+              a__U1GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__V1GH=(__UINTEGER_32)((__UINTEGER_32)(sz__2QJD + a__U1GH) & (__UINTEGER_32)(~ a__U1GH));
+              ptr_table__VUJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__V1GH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__UUJH=((__POINTER )(NULL));
+              result__WUJH=((__POINTER *)ptr_table__VUJH)[ 0];
+              if ((result__WUJH == (void *)NULL)) {
+                result__WUJH=new_lab__FTJ(new_size__V1GH);
+                next__UUJH=(void *)((unsigned long)result__WUJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__V1GH)));
+                ((__POINTER *)next__UUJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__VUJH)[ 0]=next__UUJH;
               } else {
-                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)));
+                next__UUJH=((__POINTER *)result__WUJH)[ 0];
+                if ((next__UUJH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__WUJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__V1GH <<  1)) <=  4096)) {
+                    next__UUJH=(void *)((unsigned long)result__WUJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__V1GH)));
                   } else {
-                    next__VMJH=new_lab__ZPJ(new_size__0UGH);
+                    next__UUJH=new_lab__FTJ(new_size__V1GH);
                   };
-                  ((__POINTER *)next__VMJH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__WMJH)[ 0]=next__VMJH;
+                  ((__POINTER *)next__UUJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__VUJH)[ 0]=next__UUJH;
                 } else {
-                  ((__POINTER *)result__XMJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VMJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__XMJH=next__VMJH;
+                  ((__POINTER *)result__WUJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UUJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__WUJH=next__UUJH;
                 };
               };
-              ptr__MNJD=result__XMJH;
+              ptr__0QJD=result__WUJH;
             } else {
-              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;
+              t__Z1GH=((__UINTEGER_32 )typ_id__5QJD);
+              a__Y1GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__3UJH=(__UINTEGER_32)((__UINTEGER_32)(sz__2QJD + a__Y1GH) & (__UINTEGER_32)(~ a__Y1GH));
+              ptr_table__0UJH=((__POINTER )(&(table_type[(t__Z1GH)])));
+              lab_type__2UJH=(__UINTEGER_32)(t__Z1GH |  1);
+              next__ZUJH=((__POINTER )(NULL));
+              result__1UJH=((__POINTER *)ptr_table__0UJH)[ 0];
+              if ((result__1UJH == (void *)NULL)) {
+                result__1UJH=new_lab__FTJ(lab_type__2UJH);
+                next__ZUJH=(void *)((unsigned long)result__1UJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3UJH)));
+                ((__POINTER *)next__ZUJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__0UJH)[ 0]=next__ZUJH;
               } else {
-                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)));
+                next__ZUJH=((__POINTER *)result__1UJH)[ 0];
+                if ((next__ZUJH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1UJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__3UJH <<  1)) <=  4096)) {
+                    next__ZUJH=(void *)((unsigned long)result__1UJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3UJH)));
                   } else {
-                    next__0MJH=new_lab__ZPJ(lab_type__3MJH);
+                    next__ZUJH=new_lab__FTJ(lab_type__2UJH);
                   };
-                  ((__POINTER *)next__0MJH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__1MJH)[ 0]=next__0MJH;
+                  ((__POINTER *)next__ZUJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__0UJH)[ 0]=next__ZUJH;
                 } else {
-                  ((__POINTER *)result__2MJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0MJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__2MJH=next__0MJH;
+                  ((__POINTER *)result__1UJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZUJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__1UJH=next__ZUJH;
                 };
               };
-              ptr__MNJD=result__2MJH;
+              ptr__0QJD=result__1UJH;
             };
-            result__LNJD=((__ITM_WRITE_VALUE *)ptr__MNJD);
-            *(result__LNJD) = *(ITM_WRITE_VALUE__);
+            result__ZQJD=((__ITM_WRITE_VALUE *)ptr__0QJD);
+            *(result__ZQJD) = *(ITM_WRITE_VALUE__);
           };
-          ((__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;
+          ((__ITM_WRITE_VALUE *)result__ZQJD)->parent_itm_write__FFJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ=__tmp__4IJ;
+          result__0AJ=result__ZQJD;
         };
-        if ((affect__Q3I == '<')) {
-          switch (((struct ___OBJ *)result__O3I)->__id) {
+        if ((affect__2AJ == '<')) {
+          switch (((struct ___OBJ *)result__0AJ)->__id) {
           case __ITM_LIST__: {
-            __tmp__2FJ=((__ITM_LIST *)result__O3I)->parent_itm_code__R3E.parent_itm_object__OBE.position__0BJ;
+            __tmp__IJJ=((__ITM_LIST *)result__0AJ)->parent_itm_code__VAF.parent_itm_object__SEE.position__GFJ;
           } break;
           case __ITM_LDOTS__: {
-            __tmp__2FJ=((__ITM_LDOTS *)result__O3I)->parent_itm_constant__HTF.parent_itm_object__OBE.position__0BJ;
+            __tmp__IJJ=((__ITM_LDOTS *)result__0AJ)->parent_itm_constant__LWF.parent_itm_object__SEE.position__GFJ;
           } break;
           case __ITM_PROTOTYPE__: {
-            __tmp__2FJ=((__ITM_PROTOTYPE *)result__O3I)->parent_itm_constant__TUF.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
+            __tmp__IJJ=((__ITM_PROTOTYPE *)result__0AJ)->parent_itm_constant__XXF.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
           } break;
           case __ITM_LIST_IDF__: {
-            __tmp__2FJ=((__ITM_LIST_IDF *)result__O3I)->parent_itm_code__DBJ.parent_itm_object__OBE.position__0BJ;
+            __tmp__IJJ=((__ITM_LIST_IDF *)result__0AJ)->parent_itm_code__PEJ.parent_itm_object__SEE.position__GFJ;
           } break;
           case __ITM_WRITE_VALUE__: {
-            __tmp__2FJ=((__ITM_WRITE_VALUE *)result__O3I)->parent_itm_write__ZBJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
+            __tmp__IJJ=((__ITM_WRITE_VALUE *)result__0AJ)->parent_itm_write__FFJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
           } break;
           case __ITM_WRITE_CAST__: {
-            __tmp__2FJ=((__ITM_WRITE_CAST *)result__O3I)->parent_itm_write__QCJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
+            __tmp__IJJ=((__ITM_WRITE_CAST *)result__0AJ)->parent_itm_write__2FJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
           } break;
           case __ITM_READ__: {
-            __tmp__2FJ=((__ITM_READ *)result__O3I)->parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
+            __tmp__IJJ=((__ITM_READ *)result__0AJ)->parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
           } break;
           case __ITM_WRITE_CODE__: {
-            __tmp__2FJ=((__ITM_WRITE_CODE *)result__O3I)->parent_itm_write__1FJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
+            __tmp__IJJ=((__ITM_WRITE_CODE *)result__0AJ)->parent_itm_write__HJJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
           } break;
           case __ITM_OPERATOR__: {
-            __tmp__2FJ=((__ITM_OPERATOR *)result__O3I)->parent_itm_code__3CL.parent_itm_object__OBE.position__0BJ;
+            __tmp__IJJ=((__ITM_OPERATOR *)result__0AJ)->parent_itm_code__JGL.parent_itm_object__SEE.position__GFJ;
           } break;
           case __ITM_READ_ARG1__: {
-            __tmp__2FJ=((__ITM_READ_ARG1 *)result__O3I)->parent_itm_read__DGL.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
+            __tmp__IJJ=((__ITM_READ_ARG1 *)result__0AJ)->parent_itm_read__PJL.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
           } break;
           case __ITM_READ_ARG2__: {
-            __tmp__2FJ=((__ITM_READ_ARG2 *)result__O3I)->parent_itm_read__QIL.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
+            __tmp__IJJ=((__ITM_READ_ARG2 *)result__0AJ)->parent_itm_read__2LL.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
           } break;
           case __ITM_EXPRESSION__: {
-            __tmp__2FJ=position__GB5B(result__O3I);
+            __tmp__IJJ=position__SE5B(result__0AJ);
           } break;
           case __ITM_OLD__: {
-            __tmp__2FJ=((__ITM_OLD *)result__O3I)->parent_itm_code__4ZL.parent_itm_object__OBE.position__0BJ;
+            __tmp__IJJ=((__ITM_OLD *)result__0AJ)->parent_itm_code__K3L.parent_itm_object__SEE.position__GFJ;
           } break;
           case __ITM_EXTERNAL_TYPE__: {
-            __tmp__2FJ=((__ITM_EXTERNAL_TYPE *)result__O3I)->parent_itm_extern__T1M.parent_itm_code__S1M.parent_itm_object__OBE.position__0BJ;
+            __tmp__IJJ=((__ITM_EXTERNAL_TYPE *)result__0AJ)->parent_itm_extern__54M.parent_itm_code__44M.parent_itm_object__SEE.position__GFJ;
           } break;
           case __ITM_BLOCK__: {
-            __tmp__2FJ=((__ITM_LIST *)((__ITM_BLOCK *)result__O3I)->list__LMDC)->parent_itm_code__R3E.parent_itm_object__OBE.position__0BJ;
+            __tmp__IJJ=((__ITM_LIST *)((__ITM_BLOCK *)result__0AJ)->list__ZPDC)->parent_itm_code__VAF.parent_itm_object__SEE.position__GFJ;
           } break;
           case __ITM_EXTERNAL__: {
-            __tmp__2FJ=((__ITM_EXTERNAL *)result__O3I)->parent_itm_extern__YCN.parent_itm_code__S1M.parent_itm_object__OBE.position__0BJ;
+            __tmp__IJJ=((__ITM_EXTERNAL *)result__0AJ)->parent_itm_extern__EGN.parent_itm_code__44M.parent_itm_object__SEE.position__GFJ;
           } break;
           case __ITM_READ_ARGS__: {
-            __tmp__2FJ=((__ITM_READ_ARGS *)result__O3I)->parent_itm_read__OAO.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
+            __tmp__IJJ=((__ITM_READ_ARGS *)result__0AJ)->parent_itm_read__0DO.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
           } break;
           case __ITM_REAL__: {
-            __tmp__2FJ=((__ITM_REAL *)result__O3I)->parent_itm_constant__JOO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
+            __tmp__IJJ=((__ITM_REAL *)result__0AJ)->parent_itm_constant__VRO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
           } break;
           case __ITM_NUMBER__: {
-            __tmp__2FJ=((__ITM_NUMBER *)result__O3I)->parent_itm_constant__1OO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
+            __tmp__IJJ=((__ITM_NUMBER *)result__0AJ)->parent_itm_constant__HSO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
           } break;
           case __ITM_CHARACTER__: {
-            __tmp__2FJ=((__ITM_CHARACTER *)result__O3I)->parent_itm_constant__NPO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
+            __tmp__IJJ=((__ITM_CHARACTER *)result__0AJ)->parent_itm_constant__ZSO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
           } break;
           case __ITM_STRING__: {
-            __tmp__2FJ=((__ITM_STRING *)result__O3I)->parent_itm_constant__4PO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
+            __tmp__IJJ=((__ITM_STRING *)result__0AJ)->parent_itm_constant__KTO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
           } break;
           case __ITM_RESULT__: {
-            __tmp__2FJ=position__QIHC(result__O3I);
+            __tmp__IJJ=position__4LHC(result__0AJ);
           } break;
           };
-          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;
+          result__X4JD=NULL;
+          ptr__Y4JD=((__POINTER )(NULL));
+          typ_id__34JD= 0;
+          sz__04JD=((__UINTEGER_32 )sizeof(__ITM_WRITE_CODE));
+          if ((sz__04JD ==  0)) {
+            result__X4JD=ITM_WRITE_CODE__;
+          } else {
+            typ_id__34JD=-1;
+            clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__04JD);
+            if ((typ_id__34JD == (__INTEGER)(-  1))) {
+              a__1MGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__2MGH=(__UINTEGER_32)((__UINTEGER_32)(sz__04JD + a__1MGH) & (__UINTEGER_32)(~ a__1MGH));
+              ptr_table__5UJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__2MGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__4UJH=((__POINTER )(NULL));
+              result__AVJH=((__POINTER *)ptr_table__5UJH)[ 0];
+              if ((result__AVJH == (void *)NULL)) {
+                result__AVJH=new_lab__FTJ(new_size__2MGH);
+                next__4UJH=(void *)((unsigned long)result__AVJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2MGH)));
+                ((__POINTER *)next__4UJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__5UJH)[ 0]=next__4UJH;
               } else {
-                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)));
+                next__4UJH=((__POINTER *)result__AVJH)[ 0];
+                if ((next__4UJH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__AVJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__2MGH <<  1)) <=  4096)) {
+                    next__4UJH=(void *)((unsigned long)result__AVJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2MGH)));
                   } else {
-                    next__5MJH=new_lab__ZPJ(new_size__BGGH);
+                    next__4UJH=new_lab__FTJ(new_size__2MGH);
                   };
-                  ((__POINTER *)next__5MJH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__ANJH)[ 0]=next__5MJH;
+                  ((__POINTER *)next__4UJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__5UJH)[ 0]=next__4UJH;
                 } else {
-                  ((__POINTER *)result__BNJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5MJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__BNJH=next__5MJH;
+                  ((__POINTER *)result__AVJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4UJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__AVJH=next__4UJH;
                 };
               };
-              ptr__K1JD=result__BNJH;
+              ptr__Y4JD=result__AVJH;
             } else {
-              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;
+              t__ANGH=((__UINTEGER_32 )typ_id__34JD);
+              a__5MGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__HVJH=(__UINTEGER_32)((__UINTEGER_32)(sz__04JD + a__5MGH) & (__UINTEGER_32)(~ a__5MGH));
+              ptr_table__EVJH=((__POINTER )(&(table_type[(t__ANGH)])));
+              lab_type__GVJH=(__UINTEGER_32)(t__ANGH |  1);
+              next__DVJH=((__POINTER )(NULL));
+              result__FVJH=((__POINTER *)ptr_table__EVJH)[ 0];
+              if ((result__FVJH == (void *)NULL)) {
+                result__FVJH=new_lab__FTJ(lab_type__GVJH);
+                next__DVJH=(void *)((unsigned long)result__FVJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HVJH)));
+                ((__POINTER *)next__DVJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__EVJH)[ 0]=next__DVJH;
               } else {
-                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)));
+                next__DVJH=((__POINTER *)result__FVJH)[ 0];
+                if ((next__DVJH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__FVJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__HVJH <<  1)) <=  4096)) {
+                    next__DVJH=(void *)((unsigned long)result__FVJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HVJH)));
                   } else {
-                    next__ENJH=new_lab__ZPJ(lab_type__HNJH);
+                    next__DVJH=new_lab__FTJ(lab_type__GVJH);
                   };
-                  ((__POINTER *)next__ENJH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__FNJH)[ 0]=next__ENJH;
+                  ((__POINTER *)next__DVJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__EVJH)[ 0]=next__DVJH;
                 } else {
-                  ((__POINTER *)result__GNJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ENJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__GNJH=next__ENJH;
+                  ((__POINTER *)result__FVJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DVJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__FVJH=next__DVJH;
                 };
               };
-              ptr__K1JD=result__GNJH;
+              ptr__Y4JD=result__FVJH;
             };
-            result__J1JD=((__ITM_WRITE_CODE *)ptr__K1JD);
-            *(result__J1JD) = *(ITM_WRITE_CODE__);
+            result__X4JD=((__ITM_WRITE_CODE *)ptr__Y4JD);
+            *(result__X4JD) = *(ITM_WRITE_CODE__);
           };
-          ((__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;
+          ((__ITM_WRITE_CODE *)result__X4JD)->parent_itm_write__HJJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ=__tmp__IJJ;
+          result__0AJ=result__X4JD;
         };
-        if ((affect__Q3I == '?')) {
-          switch (((struct ___OBJ *)result__O3I)->__id) {
+        if ((affect__2AJ == '?')) {
+          switch (((struct ___OBJ *)result__0AJ)->__id) {
           case __ITM_LIST__: {
-            __tmp__FGJ=((__ITM_LIST *)result__O3I)->parent_itm_code__R3E.parent_itm_object__OBE.position__0BJ;
+            __tmp__RJJ=((__ITM_LIST *)result__0AJ)->parent_itm_code__VAF.parent_itm_object__SEE.position__GFJ;
           } break;
           case __ITM_LDOTS__: {
-            __tmp__FGJ=((__ITM_LDOTS *)result__O3I)->parent_itm_constant__HTF.parent_itm_object__OBE.position__0BJ;
+            __tmp__RJJ=((__ITM_LDOTS *)result__0AJ)->parent_itm_constant__LWF.parent_itm_object__SEE.position__GFJ;
           } break;
           case __ITM_PROTOTYPE__: {
-            __tmp__FGJ=((__ITM_PROTOTYPE *)result__O3I)->parent_itm_constant__TUF.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
+            __tmp__RJJ=((__ITM_PROTOTYPE *)result__0AJ)->parent_itm_constant__XXF.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
           } break;
           case __ITM_LIST_IDF__: {
-            __tmp__FGJ=((__ITM_LIST_IDF *)result__O3I)->parent_itm_code__DBJ.parent_itm_object__OBE.position__0BJ;
+            __tmp__RJJ=((__ITM_LIST_IDF *)result__0AJ)->parent_itm_code__PEJ.parent_itm_object__SEE.position__GFJ;
           } break;
           case __ITM_WRITE_VALUE__: {
-            __tmp__FGJ=((__ITM_WRITE_VALUE *)result__O3I)->parent_itm_write__ZBJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
+            __tmp__RJJ=((__ITM_WRITE_VALUE *)result__0AJ)->parent_itm_write__FFJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
           } break;
           case __ITM_WRITE_CAST__: {
-            __tmp__FGJ=((__ITM_WRITE_CAST *)result__O3I)->parent_itm_write__QCJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
+            __tmp__RJJ=((__ITM_WRITE_CAST *)result__0AJ)->parent_itm_write__2FJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
           } break;
           case __ITM_READ__: {
-            __tmp__FGJ=((__ITM_READ *)result__O3I)->parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
+            __tmp__RJJ=((__ITM_READ *)result__0AJ)->parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
           } break;
           case __ITM_WRITE_CODE__: {
-            __tmp__FGJ=((__ITM_WRITE_CODE *)result__O3I)->parent_itm_write__1FJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
+            __tmp__RJJ=((__ITM_WRITE_CODE *)result__0AJ)->parent_itm_write__HJJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
           } break;
           case __ITM_OPERATOR__: {
-            __tmp__FGJ=((__ITM_OPERATOR *)result__O3I)->parent_itm_code__3CL.parent_itm_object__OBE.position__0BJ;
+            __tmp__RJJ=((__ITM_OPERATOR *)result__0AJ)->parent_itm_code__JGL.parent_itm_object__SEE.position__GFJ;
           } break;
           case __ITM_READ_ARG1__: {
-            __tmp__FGJ=((__ITM_READ_ARG1 *)result__O3I)->parent_itm_read__DGL.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
+            __tmp__RJJ=((__ITM_READ_ARG1 *)result__0AJ)->parent_itm_read__PJL.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
           } break;
           case __ITM_READ_ARG2__: {
-            __tmp__FGJ=((__ITM_READ_ARG2 *)result__O3I)->parent_itm_read__QIL.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
+            __tmp__RJJ=((__ITM_READ_ARG2 *)result__0AJ)->parent_itm_read__2LL.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
           } break;
           case __ITM_EXPRESSION__: {
-            __tmp__FGJ=position__GB5B(result__O3I);
+            __tmp__RJJ=position__SE5B(result__0AJ);
           } break;
           case __ITM_OLD__: {
-            __tmp__FGJ=((__ITM_OLD *)result__O3I)->parent_itm_code__4ZL.parent_itm_object__OBE.position__0BJ;
+            __tmp__RJJ=((__ITM_OLD *)result__0AJ)->parent_itm_code__K3L.parent_itm_object__SEE.position__GFJ;
           } break;
           case __ITM_EXTERNAL_TYPE__: {
-            __tmp__FGJ=((__ITM_EXTERNAL_TYPE *)result__O3I)->parent_itm_extern__T1M.parent_itm_code__S1M.parent_itm_object__OBE.position__0BJ;
+            __tmp__RJJ=((__ITM_EXTERNAL_TYPE *)result__0AJ)->parent_itm_extern__54M.parent_itm_code__44M.parent_itm_object__SEE.position__GFJ;
           } break;
           case __ITM_BLOCK__: {
-            __tmp__FGJ=((__ITM_LIST *)((__ITM_BLOCK *)result__O3I)->list__LMDC)->parent_itm_code__R3E.parent_itm_object__OBE.position__0BJ;
+            __tmp__RJJ=((__ITM_LIST *)((__ITM_BLOCK *)result__0AJ)->list__ZPDC)->parent_itm_code__VAF.parent_itm_object__SEE.position__GFJ;
           } break;
           case __ITM_EXTERNAL__: {
-            __tmp__FGJ=((__ITM_EXTERNAL *)result__O3I)->parent_itm_extern__YCN.parent_itm_code__S1M.parent_itm_object__OBE.position__0BJ;
+            __tmp__RJJ=((__ITM_EXTERNAL *)result__0AJ)->parent_itm_extern__EGN.parent_itm_code__44M.parent_itm_object__SEE.position__GFJ;
           } break;
           case __ITM_READ_ARGS__: {
-            __tmp__FGJ=((__ITM_READ_ARGS *)result__O3I)->parent_itm_read__OAO.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
+            __tmp__RJJ=((__ITM_READ_ARGS *)result__0AJ)->parent_itm_read__0DO.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
           } break;
           case __ITM_REAL__: {
-            __tmp__FGJ=((__ITM_REAL *)result__O3I)->parent_itm_constant__JOO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
+            __tmp__RJJ=((__ITM_REAL *)result__0AJ)->parent_itm_constant__VRO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
           } break;
           case __ITM_NUMBER__: {
-            __tmp__FGJ=((__ITM_NUMBER *)result__O3I)->parent_itm_constant__1OO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
+            __tmp__RJJ=((__ITM_NUMBER *)result__0AJ)->parent_itm_constant__HSO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
           } break;
           case __ITM_CHARACTER__: {
-            __tmp__FGJ=((__ITM_CHARACTER *)result__O3I)->parent_itm_constant__NPO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
+            __tmp__RJJ=((__ITM_CHARACTER *)result__0AJ)->parent_itm_constant__ZSO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
           } break;
           case __ITM_STRING__: {
-            __tmp__FGJ=((__ITM_STRING *)result__O3I)->parent_itm_constant__4PO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
+            __tmp__RJJ=((__ITM_STRING *)result__0AJ)->parent_itm_constant__KTO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
           } break;
           case __ITM_RESULT__: {
-            __tmp__FGJ=position__QIHC(result__O3I);
+            __tmp__RJJ=position__4LHC(result__0AJ);
           } break;
           };
-          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;
+          result__MSJD=NULL;
+          ptr__NSJD=((__POINTER )(NULL));
+          typ_id__SSJD= 0;
+          sz__PSJD=((__UINTEGER_32 )sizeof(__ITM_WRITE_CAST));
+          if ((sz__PSJD ==  0)) {
+            result__MSJD=ITM_WRITE_CAST__;
+          } else {
+            typ_id__SSJD=-1;
+            clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__PSJD);
+            if ((typ_id__SSJD == (__INTEGER)(-  1))) {
+              a__21GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__31GH=(__UINTEGER_32)((__UINTEGER_32)(sz__PSJD + a__21GH) & (__UINTEGER_32)(~ a__21GH));
+              ptr_table__JVJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__31GH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__IVJH=((__POINTER )(NULL));
+              result__KVJH=((__POINTER *)ptr_table__JVJH)[ 0];
+              if ((result__KVJH == (void *)NULL)) {
+                result__KVJH=new_lab__FTJ(new_size__31GH);
+                next__IVJH=(void *)((unsigned long)result__KVJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__31GH)));
+                ((__POINTER *)next__IVJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__JVJH)[ 0]=next__IVJH;
               } else {
-                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)));
+                next__IVJH=((__POINTER *)result__KVJH)[ 0];
+                if ((next__IVJH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__KVJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__31GH <<  1)) <=  4096)) {
+                    next__IVJH=(void *)((unsigned long)result__KVJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__31GH)));
                   } else {
-                    next__JNJH=new_lab__ZPJ(new_size__CVGH);
+                    next__IVJH=new_lab__FTJ(new_size__31GH);
                   };
-                  ((__POINTER *)next__JNJH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__KNJH)[ 0]=next__JNJH;
+                  ((__POINTER *)next__IVJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__JVJH)[ 0]=next__IVJH;
                 } else {
-                  ((__POINTER *)result__LNJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JNJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__LNJH=next__JNJH;
+                  ((__POINTER *)result__KVJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__IVJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__KVJH=next__IVJH;
                 };
               };
-              ptr__5OJD=result__LNJH;
+              ptr__NSJD=result__KVJH;
             } else {
-              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;
+              t__B2GH=((__UINTEGER_32 )typ_id__SSJD);
+              a__A2GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__RVJH=(__UINTEGER_32)((__UINTEGER_32)(sz__PSJD + a__A2GH) & (__UINTEGER_32)(~ a__A2GH));
+              ptr_table__OVJH=((__POINTER )(&(table_type[(t__B2GH)])));
+              lab_type__QVJH=(__UINTEGER_32)(t__B2GH |  1);
+              next__NVJH=((__POINTER )(NULL));
+              result__PVJH=((__POINTER *)ptr_table__OVJH)[ 0];
+              if ((result__PVJH == (void *)NULL)) {
+                result__PVJH=new_lab__FTJ(lab_type__QVJH);
+                next__NVJH=(void *)((unsigned long)result__PVJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RVJH)));
+                ((__POINTER *)next__NVJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__OVJH)[ 0]=next__NVJH;
               } else {
-                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)));
+                next__NVJH=((__POINTER *)result__PVJH)[ 0];
+                if ((next__NVJH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__PVJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__RVJH <<  1)) <=  4096)) {
+                    next__NVJH=(void *)((unsigned long)result__PVJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RVJH)));
                   } else {
-                    next__ONJH=new_lab__ZPJ(lab_type__RNJH);
+                    next__NVJH=new_lab__FTJ(lab_type__QVJH);
                   };
-                  ((__POINTER *)next__ONJH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__PNJH)[ 0]=next__ONJH;
+                  ((__POINTER *)next__NVJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__OVJH)[ 0]=next__NVJH;
                 } else {
-                  ((__POINTER *)result__QNJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ONJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__QNJH=next__ONJH;
+                  ((__POINTER *)result__PVJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NVJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__PVJH=next__NVJH;
                 };
               };
-              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)));
+              ptr__NSJD=result__PVJH;
+            };
+            result__MSJD=((__ITM_WRITE_CAST *)ptr__NSJD);
+            *(result__MSJD) = *(ITM_WRITE_CAST__);
+          };
+          ((__ITM_WRITE_CAST *)result__MSJD)->parent_itm_write__2FJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ=__tmp__RJJ;
+          result__0AJ=result__MSJD;
+        };
+      };
+    };
+  };
+  if (((void *)result__0AJ == (void *)NULL)) {
+    restore_context__YEL();
+    result__GGL=NULL;
+    expr__HGL=NULL;
+    itm_op__KGL=NULL;
+    last_msg__LGL= 0;
+    first_msg__MGL= 0;
+    result__45H=NULL;
+    if ((((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__EAI)->parent_arrayed_collection__DAI.upper__VYT <  0)) {
+      result__45H=create_with_capacity__LXI( 16);
+    } else {
+      Self__FQ4=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__EAI);
+      result__45H=((void **)Self__FQ4->parent_arrayed_collection__DAI.storage__DDU)[Self__FQ4->parent_arrayed_collection__DAI.upper__VYT];
+      Self__1Q4=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__EAI);
+      Self__1Q4->parent_arrayed_collection__DAI.upper__VYT=(__INTEGER)(Self__1Q4->parent_arrayed_collection__DAI.upper__VYT -  1);
+    };
+    l_expr__IGL=result__45H;
+    while (read_operator__0NM()) {
+      p__1VJH=current_position__EZF();
+      n__2VJH=last_string__V1C;
+      result__SVJH=NULL;
+      ptr__TVJH=((__POINTER )(NULL));
+      typ_id__UVJH= 0;
+      sz__VVJH=((__UINTEGER_32 )sizeof(__ITM_OPERATOR));
+      if ((sz__VVJH ==  0)) {
+        result__SVJH=ITM_OPERATOR__;
+      } else {
+        typ_id__UVJH=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__VVJH);
+        if ((typ_id__UVJH == (__INTEGER)(-  1))) {
+          a__WVJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__XVJH=(__UINTEGER_32)((__UINTEGER_32)(sz__VVJH + a__WVJH) & (__UINTEGER_32)(~ a__WVJH));
+          ptr_table__4VJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__XVJH / ((__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__FTJ(new_size__XVJH);
+            next__3VJH=(void *)((unsigned long)result__5VJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XVJH)));
+            ((__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__SXH)))) &  4095) + (__UINTEGER_32)(new_size__XVJH <<  1)) <=  4096)) {
+                next__3VJH=(void *)((unsigned long)result__5VJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XVJH)));
               } else {
-                next__4NJH=new_lab__ZPJ(new_size__YNJH);
+                next__3VJH=new_lab__FTJ(new_size__XVJH);
               };
-              ((__POINTER *)next__4NJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__5NJH)[ 0]=next__4NJH;
+              ((__POINTER *)next__3VJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__4VJH)[ 0]=next__3VJH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__5VJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3VJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__5VJH=next__3VJH;
+            };
+          };
+          ptr__TVJH=result__5VJH;
+        } else {
+          t__YVJH=((__UINTEGER_32 )typ_id__UVJH);
+          a__ZVJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__GWJH=(__UINTEGER_32)((__UINTEGER_32)(sz__VVJH + a__ZVJH) & (__UINTEGER_32)(~ a__ZVJH));
+          ptr_table__DWJH=((__POINTER )(&(table_type[(t__YVJH)])));
+          lab_type__FWJH=(__UINTEGER_32)(t__YVJH |  1);
+          next__CWJH=((__POINTER )(NULL));
+          result__EWJH=((__POINTER *)ptr_table__DWJH)[ 0];
+          if ((result__EWJH == (void *)NULL)) {
+            result__EWJH=new_lab__FTJ(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__SXH)))) &  4095) + (__UINTEGER_32)(new_size__GWJH <<  1)) <=  4096)) {
+                next__CWJH=(void *)((unsigned long)result__EWJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GWJH)));
               } else {
-                next__DOJH=new_lab__ZPJ(lab_type__GOJH);
+                next__CWJH=new_lab__FTJ(lab_type__FWJH);
               };
-              ((__POINTER *)next__DOJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__EOJH)[ 0]=next__DOJH;
+              ((__POINTER *)next__CWJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__DWJH)[ 0]=next__CWJH;
             } else {
-              ((__POINTER *)result__FOJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DOJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__FOJH=next__DOJH;
+              ((__POINTER *)result__EWJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CWJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__EWJH=next__CWJH;
             };
           };
-          ptr__UNJH=result__FOJH;
+          ptr__TVJH=result__EWJH;
         };
-        result__TNJH=((__ITM_OPERATOR *)ptr__UNJH);
-        *(result__TNJH) = *(ITM_OPERATOR__);
+        result__SVJH=((__ITM_OPERATOR *)ptr__TVJH);
+        *(result__SVJH) = *(ITM_OPERATOR__);
       };
-      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);
+      Self__0VJH=((__ITM_OPERATOR *)result__SVJH);
+      Self__0VJH->parent_itm_code__JGL.parent_itm_object__SEE.position__GFJ=p__1VJH;
+      Self__0VJH->name__UJL=n__2VJH;
+      expr__HGL=result__SVJH;
+      add_last__25U(l_expr__IGL,result__SVJH);
     };
-    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)) {
+    expr__HGL=read_expr_message__5WL(Self__YAJ);
+    if (((void *)expr__HGL == (void *)NULL)) {
+      if ((! (((__FAST_ARRAYoITM_CODEo *)result__45H)->parent_arrayed_collection__MVF.upper__BJL <  0))) {
+        pos__5JYG=current_position__EZF();
+        put_error__text__NPG( 0,(&__string_240));
+        put_position__XQG(pos__5JYG);
+        put_string__P3F(msg_err__SPG);
+        if ((type_error__RPG !=  2)) {
           exit(( 1));
         };
       };
-      free__FUI(result__S2H);
+      free__RXI(result__45H);
     } else {
-      first_msg__ADL=(__INTEGER)(((__FAST_ARRAYoITM_CODEo *)result__S2H)->parent_arrayed_collection__ISF.upper__VFL +  1);
+      first_msg__MGL=(__INTEGER)(((__FAST_ARRAYoITM_CODEo *)result__45H)->parent_arrayed_collection__MVF.upper__BJL +  1);
       do {
-        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()) {
+        last_msg__LGL=(__INTEGER)(((__FAST_ARRAYoITM_CODEo *)l_expr__IGL)->parent_arrayed_collection__MVF.upper__BJL +  1);
+        add_last__25U(l_expr__IGL,expr__HGL);
+        if (read_operator__0NM()) {
           do {
-            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__;
+            p__5HP=current_position__EZF();
+            n__AIP=last_string__V1C;
+            result__DTP=NULL;
+            ptr__ETP=((__POINTER )(NULL));
+            typ_id__JTP= 0;
+            sz__GTP=((__UINTEGER_32 )sizeof(__ITM_OPERATOR));
+            if ((sz__GTP ==  0)) {
+              result__DTP=ITM_OPERATOR__;
             } else {
-              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;
+              typ_id__JTP=-1;
+              clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__GTP);
+              if ((typ_id__JTP == (__INTEGER)(-  1))) {
+                a__M2GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                new_size__N2GH=(__UINTEGER_32)((__UINTEGER_32)(sz__GTP + a__M2GH) & (__UINTEGER_32)(~ a__M2GH));
+                ptr_table__IWJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__N2GH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                next__HWJH=((__POINTER )(NULL));
+                result__JWJH=((__POINTER *)ptr_table__IWJH)[ 0];
+                if ((result__JWJH == (void *)NULL)) {
+                  result__JWJH=new_lab__FTJ(new_size__N2GH);
+                  next__HWJH=(void *)((unsigned long)result__JWJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__N2GH)));
+                  ((__POINTER *)next__HWJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__IWJH)[ 0]=next__HWJH;
                 } else {
-                  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)));
+                  next__HWJH=((__POINTER *)result__JWJH)[ 0];
+                  if ((next__HWJH == (void *)NULL)) {
+                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__JWJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__N2GH <<  1)) <=  4096)) {
+                      next__HWJH=(void *)((unsigned long)result__JWJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__N2GH)));
                     } else {
-                      next__IOJH=new_lab__ZPJ(new_size__SVGH);
+                      next__HWJH=new_lab__FTJ(new_size__N2GH);
                     };
-                    ((__POINTER *)next__IOJH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__JOJH)[ 0]=next__IOJH;
+                    ((__POINTER *)next__HWJH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__IWJH)[ 0]=next__HWJH;
                   } else {
-                    ((__POINTER *)result__KOJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__IOJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__KOJH=next__IOJH;
+                    ((__POINTER *)result__JWJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HWJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__JWJH=next__HWJH;
                   };
                 };
-                ptr__YPP=result__KOJH;
+                ptr__ETP=result__JWJH;
               } else {
-                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;
+                t__R2GH=((__UINTEGER_32 )typ_id__JTP);
+                a__Q2GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                new_size__QWJH=(__UINTEGER_32)((__UINTEGER_32)(sz__GTP + a__Q2GH) & (__UINTEGER_32)(~ a__Q2GH));
+                ptr_table__NWJH=((__POINTER )(&(table_type[(t__R2GH)])));
+                lab_type__PWJH=(__UINTEGER_32)(t__R2GH |  1);
+                next__MWJH=((__POINTER )(NULL));
+                result__OWJH=((__POINTER *)ptr_table__NWJH)[ 0];
+                if ((result__OWJH == (void *)NULL)) {
+                  result__OWJH=new_lab__FTJ(lab_type__PWJH);
+                  next__MWJH=(void *)((unsigned long)result__OWJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QWJH)));
+                  ((__POINTER *)next__MWJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__NWJH)[ 0]=next__MWJH;
                 } else {
-                  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)));
+                  next__MWJH=((__POINTER *)result__OWJH)[ 0];
+                  if ((next__MWJH == (void *)NULL)) {
+                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__OWJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__QWJH <<  1)) <=  4096)) {
+                      next__MWJH=(void *)((unsigned long)result__OWJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QWJH)));
                     } else {
-                      next__NOJH=new_lab__ZPJ(lab_type__QOJH);
+                      next__MWJH=new_lab__FTJ(lab_type__PWJH);
                     };
-                    ((__POINTER *)next__NOJH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__OOJH)[ 0]=next__NOJH;
+                    ((__POINTER *)next__MWJH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__NWJH)[ 0]=next__MWJH;
                   } else {
-                    ((__POINTER *)result__POJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NOJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__POJH=next__NOJH;
+                    ((__POINTER *)result__OWJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MWJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__OWJH=next__MWJH;
                   };
                 };
-                ptr__YPP=result__POJH;
+                ptr__ETP=result__OWJH;
               };
-              result__XPP=((__ITM_OPERATOR *)ptr__YPP);
-              *(result__XPP) = *(ITM_OPERATOR__);
+              result__DTP=((__ITM_OPERATOR *)ptr__ETP);
+              *(result__DTP) = *(ITM_OPERATOR__);
             };
-            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);
+            Self__5NV=((__ITM_OPERATOR *)result__DTP);
+            Self__5NV->parent_itm_code__JGL.parent_itm_object__SEE.position__GFJ=p__5HP;
+            Self__5NV->name__UJL=n__AIP;
+            expr__HGL=result__DTP;
+            add_last__25U(l_expr__IGL,result__DTP);
+          } while (read_operator__0NM());
+          expr__HGL=read_expr_message__5WL(Self__YAJ);
         } else {
-          expr__1CL=NULL;
+          expr__HGL=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;
+      } while (((void *)expr__HGL != (void *)NULL));
+      while ((last_msg__LGL < ((__FAST_ARRAYoITM_CODEo *)l_expr__IGL)->parent_arrayed_collection__MVF.upper__BJL)) {
+        __tmp__NJL=((void **)((__FAST_ARRAYoITM_CODEo *)l_expr__IGL)->parent_arrayed_collection__MVF.storage__S0T)[(__INTEGER)(last_msg__LGL +  1)];
+        if (__tmp__NJL==NULL) {
+          __tmp__OJL=NULL;
         } else {
-          switch (((struct ___OBJ *)__tmp__BGL)->__id) {
+          switch (((struct ___OBJ *)__tmp__NJL)->__id) {
           case __ITM_LIST__: {
-            __tmp__CGL=NULL;
+            __tmp__OJL=NULL;
           } break;
           case __ITM_LDOTS__: {
-            __tmp__CGL=NULL;
+            __tmp__OJL=NULL;
           } break;
           case __ITM_PROTOTYPE__: {
-            __tmp__CGL=NULL;
+            __tmp__OJL=NULL;
           } break;
           case __ITM_LIST_IDF__: {
-            __tmp__CGL=NULL;
+            __tmp__OJL=NULL;
           } break;
           case __ITM_WRITE_VALUE__: {
-            __tmp__CGL=NULL;
+            __tmp__OJL=NULL;
           } break;
           case __ITM_WRITE_CAST__: {
-            __tmp__CGL=NULL;
+            __tmp__OJL=NULL;
           } break;
           case __ITM_READ__: {
-            __tmp__CGL=NULL;
+            __tmp__OJL=NULL;
           } break;
           case __ITM_WRITE_CODE__: {
-            __tmp__CGL=NULL;
+            __tmp__OJL=NULL;
           } break;
           case __ITM_OPERATOR__: {
-            __tmp__CGL=((void *)__tmp__BGL);
+            __tmp__OJL=((void *)__tmp__NJL);
           } break;
           case __ITM_READ_ARG1__: {
-            __tmp__CGL=NULL;
+            __tmp__OJL=NULL;
           } break;
           case __ITM_READ_ARG2__: {
-            __tmp__CGL=NULL;
+            __tmp__OJL=NULL;
           } break;
           case __ITM_EXPRESSION__: {
-            __tmp__CGL=NULL;
+            __tmp__OJL=NULL;
           } break;
           case __ITM_OLD__: {
-            __tmp__CGL=NULL;
+            __tmp__OJL=NULL;
           } break;
           case __ITM_EXTERNAL_TYPE__: {
-            __tmp__CGL=NULL;
+            __tmp__OJL=NULL;
           } break;
           case __ITM_BLOCK__: {
-            __tmp__CGL=NULL;
+            __tmp__OJL=NULL;
           } break;
           case __ITM_EXTERNAL__: {
-            __tmp__CGL=NULL;
+            __tmp__OJL=NULL;
           } break;
           case __ITM_READ_ARGS__: {
-            __tmp__CGL=NULL;
+            __tmp__OJL=NULL;
           } break;
           case __ITM_REAL__: {
-            __tmp__CGL=NULL;
+            __tmp__OJL=NULL;
           } break;
           case __ITM_NUMBER__: {
-            __tmp__CGL=NULL;
+            __tmp__OJL=NULL;
           } break;
           case __ITM_CHARACTER__: {
-            __tmp__CGL=NULL;
+            __tmp__OJL=NULL;
           } break;
           case __ITM_STRING__: {
-            __tmp__CGL=NULL;
+            __tmp__OJL=NULL;
           } break;
           case __ITM_RESULT__: {
-            __tmp__CGL=NULL;
+            __tmp__OJL=NULL;
           } break;
           }
         };
-        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;
+        itm_op__KGL=__tmp__OJL;
+        __tmp__RJL=((__ITM_OPERATOR *)__tmp__OJL)->parent_itm_code__JGL.parent_itm_object__SEE.position__GFJ;
+        operator__name__NEO((&__string_82),((__ITM_OPERATOR *)__tmp__OJL)->name__UJL);
+        result__RWJH=NULL;
+        ptr__SWJH=((__POINTER )(NULL));
+        typ_id__TWJH= 0;
+        sz__UWJH=((__UINTEGER_32 )sizeof(__ITM_READ_ARG1));
+        if ((sz__UWJH ==  0)) {
+          result__RWJH=ITM_READ_ARG1__;
+        } else {
+          typ_id__TWJH=-1;
+          clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__UWJH);
+          if ((typ_id__TWJH == (__INTEGER)(-  1))) {
+            a__VWJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__WWJH=(__UINTEGER_32)((__UINTEGER_32)(sz__UWJH + a__VWJH) & (__UINTEGER_32)(~ a__VWJH));
+            ptr_table__1WJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__WWJH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__0WJH=((__POINTER )(NULL));
+            result__2WJH=((__POINTER *)ptr_table__1WJH)[ 0];
+            if ((result__2WJH == (void *)NULL)) {
+              result__2WJH=new_lab__FTJ(new_size__WWJH);
+              next__0WJH=(void *)((unsigned long)result__2WJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WWJH)));
+              ((__POINTER *)next__0WJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__1WJH)[ 0]=next__0WJH;
             } else {
-              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)));
+              next__0WJH=((__POINTER *)result__2WJH)[ 0];
+              if ((next__0WJH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2WJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__WWJH <<  1)) <=  4096)) {
+                  next__0WJH=(void *)((unsigned long)result__2WJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WWJH)));
                 } else {
-                  next__1OJH=new_lab__ZPJ(new_size__XOJH);
+                  next__0WJH=new_lab__FTJ(new_size__WWJH);
                 };
-                ((__POINTER *)next__1OJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__2OJH)[ 0]=next__1OJH;
+                ((__POINTER *)next__0WJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__1WJH)[ 0]=next__0WJH;
               } else {
-                ((__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;
+                ((__POINTER *)result__2WJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0WJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__2WJH=next__0WJH;
+              };
+            };
+            ptr__SWJH=result__2WJH;
+          } else {
+            t__XWJH=((__UINTEGER_32 )typ_id__TWJH);
+            a__YWJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__DXJH=(__UINTEGER_32)((__UINTEGER_32)(sz__UWJH + a__YWJH) & (__UINTEGER_32)(~ a__YWJH));
+            ptr_table__AXJH=((__POINTER )(&(table_type[(t__XWJH)])));
+            lab_type__CXJH=(__UINTEGER_32)(t__XWJH |  1);
+            next__5WJH=((__POINTER )(NULL));
+            result__BXJH=((__POINTER *)ptr_table__AXJH)[ 0];
+            if ((result__BXJH == (void *)NULL)) {
+              result__BXJH=new_lab__FTJ(lab_type__CXJH);
+              next__5WJH=(void *)((unsigned long)result__BXJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DXJH)));
+              ((__POINTER *)next__5WJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__AXJH)[ 0]=next__5WJH;
             } else {
-              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)));
+              next__5WJH=((__POINTER *)result__BXJH)[ 0];
+              if ((next__5WJH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BXJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__DXJH <<  1)) <=  4096)) {
+                  next__5WJH=(void *)((unsigned long)result__BXJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DXJH)));
                 } else {
-                  next__APJH=new_lab__ZPJ(lab_type__DPJH);
+                  next__5WJH=new_lab__FTJ(lab_type__CXJH);
                 };
-                ((__POINTER *)next__APJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__BPJH)[ 0]=next__APJH;
+                ((__POINTER *)next__5WJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__AXJH)[ 0]=next__5WJH;
               } else {
-                ((__POINTER *)result__CPJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__APJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__CPJH=next__APJH;
+                ((__POINTER *)result__BXJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5WJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__BXJH=next__5WJH;
               };
             };
-            ptr__TOJH=result__CPJH;
+            ptr__SWJH=result__BXJH;
           };
-          result__SOJH=((__ITM_READ_ARG1 *)ptr__TOJH);
-          *(result__SOJH) = *(ITM_READ_ARG1__);
+          result__RWJH=((__ITM_READ_ARG1 *)ptr__SWJH);
+          *(result__RWJH) = *(ITM_READ_ARG1__);
         };
-        ((__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);
+        ((__ITM_READ_ARG1 *)result__RWJH)->parent_itm_read__PJL.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ=__tmp__RJL;
+        expr__HGL=result__RWJH;
+        ((void **)((__FAST_ARRAYoITM_CODEo *)l_expr__IGL)->parent_arrayed_collection__MVF.storage__S0T)[last_msg__LGL]=result__RWJH;
+        Self__EXJH=((__FAST_ARRAYoITM_CODEo *)l_expr__IGL);
+        index__IXJH=(__INTEGER)(last_msg__LGL +  1);
+        __tmp__FXJH=Self__EXJH->parent_arrayed_collection__MVF.storage__S0T;
+        __tmp__GXJH=Self__EXJH->parent_arrayed_collection__MVF.upper__BJL;
+        Self__HXJH=((void **)__tmp__FXJH);
+        i__JXJH=index__IXJH;
+        while ((i__JXJH != __tmp__GXJH)) {
+          Self__HXJH[i__JXJH]=Self__HXJH[(__INTEGER)(i__JXJH +  1)];
+          i__JXJH=(__INTEGER)(i__JXJH +  1);
         };
-        Self__FPJH->parent_arrayed_collection__ISF.upper__VFL=(__INTEGER)(Self__FPJH->parent_arrayed_collection__ISF.upper__VFL -  1);
+        Self__EXJH->parent_arrayed_collection__MVF.upper__BJL=(__INTEGER)(Self__EXJH->parent_arrayed_collection__MVF.upper__BJL -  1);
       };
-      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;
+      if (((__INTEGER)(last_msg__LGL - first_msg__MGL) <  3)) {
+        while ((first_msg__MGL !=  0)) {
+          __tmp__UKL=((void **)((__FAST_ARRAYoITM_CODEo *)l_expr__IGL)->parent_arrayed_collection__MVF.storage__S0T)[(__INTEGER)(first_msg__MGL -  1)];
+          if (__tmp__UKL==NULL) {
+            __tmp__VKL=NULL;
           } else {
-            switch (((struct ___OBJ *)__tmp__IHL)->__id) {
+            switch (((struct ___OBJ *)__tmp__UKL)->__id) {
             case __ITM_LIST__: {
-              __tmp__JHL=NULL;
+              __tmp__VKL=NULL;
             } break;
             case __ITM_LDOTS__: {
-              __tmp__JHL=NULL;
+              __tmp__VKL=NULL;
             } break;
             case __ITM_PROTOTYPE__: {
-              __tmp__JHL=NULL;
+              __tmp__VKL=NULL;
             } break;
             case __ITM_LIST_IDF__: {
-              __tmp__JHL=NULL;
+              __tmp__VKL=NULL;
             } break;
             case __ITM_WRITE_VALUE__: {
-              __tmp__JHL=NULL;
+              __tmp__VKL=NULL;
             } break;
             case __ITM_WRITE_CAST__: {
-              __tmp__JHL=NULL;
+              __tmp__VKL=NULL;
             } break;
             case __ITM_READ__: {
-              __tmp__JHL=NULL;
+              __tmp__VKL=NULL;
             } break;
             case __ITM_WRITE_CODE__: {
-              __tmp__JHL=NULL;
+              __tmp__VKL=NULL;
             } break;
             case __ITM_OPERATOR__: {
-              __tmp__JHL=((void *)__tmp__IHL);
+              __tmp__VKL=((void *)__tmp__UKL);
             } break;
             case __ITM_READ_ARG1__: {
-              __tmp__JHL=NULL;
+              __tmp__VKL=NULL;
             } break;
             case __ITM_READ_ARG2__: {
-              __tmp__JHL=NULL;
+              __tmp__VKL=NULL;
             } break;
             case __ITM_EXPRESSION__: {
-              __tmp__JHL=NULL;
+              __tmp__VKL=NULL;
             } break;
             case __ITM_OLD__: {
-              __tmp__JHL=NULL;
+              __tmp__VKL=NULL;
             } break;
             case __ITM_EXTERNAL_TYPE__: {
-              __tmp__JHL=NULL;
+              __tmp__VKL=NULL;
             } break;
             case __ITM_BLOCK__: {
-              __tmp__JHL=NULL;
+              __tmp__VKL=NULL;
             } break;
             case __ITM_EXTERNAL__: {
-              __tmp__JHL=NULL;
+              __tmp__VKL=NULL;
             } break;
             case __ITM_READ_ARGS__: {
-              __tmp__JHL=NULL;
+              __tmp__VKL=NULL;
             } break;
             case __ITM_REAL__: {
-              __tmp__JHL=NULL;
+              __tmp__VKL=NULL;
             } break;
             case __ITM_NUMBER__: {
-              __tmp__JHL=NULL;
+              __tmp__VKL=NULL;
             } break;
             case __ITM_CHARACTER__: {
-              __tmp__JHL=NULL;
+              __tmp__VKL=NULL;
             } break;
             case __ITM_STRING__: {
-              __tmp__JHL=NULL;
+              __tmp__VKL=NULL;
             } break;
             case __ITM_RESULT__: {
-              __tmp__JHL=NULL;
+              __tmp__VKL=NULL;
             } break;
             }
           };
-          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;
+          itm_op__KGL=__tmp__VKL;
+          __tmp__XKL=((__ITM_OPERATOR *)__tmp__VKL)->parent_itm_code__JGL.parent_itm_object__SEE.position__GFJ;
+          operator__name__NEO((&__string_83),((__ITM_OPERATOR *)__tmp__VKL)->name__UJL);
+          result__LXJH=NULL;
+          ptr__MXJH=((__POINTER )(NULL));
+          typ_id__NXJH= 0;
+          sz__OXJH=((__UINTEGER_32 )sizeof(__ITM_READ_ARG1));
+          if ((sz__OXJH ==  0)) {
+            result__LXJH=ITM_READ_ARG1__;
+          } else {
+            typ_id__NXJH=-1;
+            clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__OXJH);
+            if ((typ_id__NXJH == (__INTEGER)(-  1))) {
+              a__PXJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__QXJH=(__UINTEGER_32)((__UINTEGER_32)(sz__OXJH + a__PXJH) & (__UINTEGER_32)(~ a__PXJH));
+              ptr_table__VXJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__QXJH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__UXJH=((__POINTER )(NULL));
+              result__WXJH=((__POINTER *)ptr_table__VXJH)[ 0];
+              if ((result__WXJH == (void *)NULL)) {
+                result__WXJH=new_lab__FTJ(new_size__QXJH);
+                next__UXJH=(void *)((unsigned long)result__WXJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QXJH)));
+                ((__POINTER *)next__UXJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__VXJH)[ 0]=next__UXJH;
               } else {
-                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)));
+                next__UXJH=((__POINTER *)result__WXJH)[ 0];
+                if ((next__UXJH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__WXJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__QXJH <<  1)) <=  4096)) {
+                    next__UXJH=(void *)((unsigned long)result__WXJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QXJH)));
                   } else {
-                    next__VPJH=new_lab__ZPJ(new_size__RPJH);
+                    next__UXJH=new_lab__FTJ(new_size__QXJH);
                   };
-                  ((__POINTER *)next__VPJH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__WPJH)[ 0]=next__VPJH;
+                  ((__POINTER *)next__UXJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__VXJH)[ 0]=next__UXJH;
                 } else {
-                  ((__POINTER *)result__XPJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VPJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__XPJH=next__VPJH;
+                  ((__POINTER *)result__WXJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UXJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__WXJH=next__UXJH;
                 };
               };
-              ptr__NPJH=result__XPJH;
+              ptr__MXJH=result__WXJH;
             } else {
-              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;
+              t__RXJH=((__UINTEGER_32 )typ_id__NXJH);
+              a__SXJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__3XJH=(__UINTEGER_32)((__UINTEGER_32)(sz__OXJH + a__SXJH) & (__UINTEGER_32)(~ a__SXJH));
+              ptr_table__0XJH=((__POINTER )(&(table_type[(t__RXJH)])));
+              lab_type__2XJH=(__UINTEGER_32)(t__RXJH |  1);
+              next__ZXJH=((__POINTER )(NULL));
+              result__1XJH=((__POINTER *)ptr_table__0XJH)[ 0];
+              if ((result__1XJH == (void *)NULL)) {
+                result__1XJH=new_lab__FTJ(lab_type__2XJH);
+                next__ZXJH=(void *)((unsigned long)result__1XJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3XJH)));
+                ((__POINTER *)next__ZXJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__0XJH)[ 0]=next__ZXJH;
               } else {
-                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)));
+                next__ZXJH=((__POINTER *)result__1XJH)[ 0];
+                if ((next__ZXJH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1XJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__3XJH <<  1)) <=  4096)) {
+                    next__ZXJH=(void *)((unsigned long)result__1XJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3XJH)));
                   } else {
-                    next__0PJH=new_lab__ZPJ(lab_type__3PJH);
+                    next__ZXJH=new_lab__FTJ(lab_type__2XJH);
                   };
-                  ((__POINTER *)next__0PJH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__1PJH)[ 0]=next__0PJH;
+                  ((__POINTER *)next__ZXJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__0XJH)[ 0]=next__ZXJH;
                 } else {
-                  ((__POINTER *)result__2PJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0PJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__2PJH=next__0PJH;
+                  ((__POINTER *)result__1XJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZXJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__1XJH=next__ZXJH;
                 };
               };
-              ptr__NPJH=result__2PJH;
+              ptr__MXJH=result__1XJH;
             };
-            result__MPJH=((__ITM_READ_ARG1 *)ptr__NPJH);
-            *(result__MPJH) = *(ITM_READ_ARG1__);
+            result__LXJH=((__ITM_READ_ARG1 *)ptr__MXJH);
+            *(result__LXJH) = *(ITM_READ_ARG1__);
           };
-          ((__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);
+          ((__ITM_READ_ARG1 *)result__LXJH)->parent_itm_read__PJL.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ=__tmp__XKL;
+          expr__HGL=result__LXJH;
+          ((void **)((__FAST_ARRAYoITM_CODEo *)l_expr__IGL)->parent_arrayed_collection__MVF.storage__S0T)[first_msg__MGL]=result__LXJH;
+          first_msg__MGL=(__INTEGER)(first_msg__MGL -  1);
+          Self__4I1C=((__FAST_ARRAYoITM_CODEo *)l_expr__IGL);
+          __tmp__HJ1C=Self__4I1C->parent_arrayed_collection__MVF.storage__S0T;
+          __tmp__IJ1C=Self__4I1C->parent_arrayed_collection__MVF.upper__BJL;
+          Self__0KCD=((void **)__tmp__HJ1C);
+          i__LLCD=first_msg__MGL;
+          while ((i__LLCD != __tmp__IJ1C)) {
+            Self__0KCD[i__LLCD]=Self__0KCD[(__INTEGER)(i__LLCD +  1)];
+            i__LLCD=(__INTEGER)(i__LLCD +  1);
           };
-          Self__QF1C->parent_arrayed_collection__ISF.upper__VFL=(__INTEGER)(Self__QF1C->parent_arrayed_collection__ISF.upper__VFL -  1);
+          Self__4I1C->parent_arrayed_collection__MVF.upper__BJL=(__INTEGER)(Self__4I1C->parent_arrayed_collection__MVF.upper__BJL -  1);
         };
       };
-      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__;
+      if (((__INTEGER)(((__FAST_ARRAYoITM_CODEo *)result__45H)->parent_arrayed_collection__MVF.upper__BJL +  1) ==  1)) {
+        result__GGL=((void **)((__FAST_ARRAYoITM_CODEo *)result__45H)->parent_arrayed_collection__MVF.storage__S0T)[ 0];
+        free__RXI(result__45H);
+        __tmp__NLL=TRUE__;
       } else {
-        __tmp__BIL=FALSE__;
+        __tmp__NLL=FALSE__;
       };
-      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;
+      if ((! __tmp__NLL)) {
+        if (((__INTEGER)(((__FAST_ARRAYoITM_CODEo *)result__45H)->parent_arrayed_collection__MVF.upper__BJL +  1) ==  3)) {
+          __tmp__0LL=((void **)((__FAST_ARRAYoITM_CODEo *)result__45H)->parent_arrayed_collection__MVF.storage__S0T)[ 1];
+          if (__tmp__0LL==NULL) {
+            __tmp__1LL=NULL;
           } else {
-            switch (((struct ___OBJ *)__tmp__OIL)->__id) {
+            switch (((struct ___OBJ *)__tmp__0LL)->__id) {
             case __ITM_LIST__: {
-              __tmp__PIL=NULL;
+              __tmp__1LL=NULL;
             } break;
             case __ITM_LDOTS__: {
-              __tmp__PIL=NULL;
+              __tmp__1LL=NULL;
             } break;
             case __ITM_PROTOTYPE__: {
-              __tmp__PIL=NULL;
+              __tmp__1LL=NULL;
             } break;
             case __ITM_LIST_IDF__: {
-              __tmp__PIL=NULL;
+              __tmp__1LL=NULL;
             } break;
             case __ITM_WRITE_VALUE__: {
-              __tmp__PIL=NULL;
+              __tmp__1LL=NULL;
             } break;
             case __ITM_WRITE_CAST__: {
-              __tmp__PIL=NULL;
+              __tmp__1LL=NULL;
             } break;
             case __ITM_READ__: {
-              __tmp__PIL=NULL;
+              __tmp__1LL=NULL;
             } break;
             case __ITM_WRITE_CODE__: {
-              __tmp__PIL=NULL;
+              __tmp__1LL=NULL;
             } break;
             case __ITM_OPERATOR__: {
-              __tmp__PIL=((void *)__tmp__OIL);
+              __tmp__1LL=((void *)__tmp__0LL);
             } break;
             case __ITM_READ_ARG1__: {
-              __tmp__PIL=NULL;
+              __tmp__1LL=NULL;
             } break;
             case __ITM_READ_ARG2__: {
-              __tmp__PIL=NULL;
+              __tmp__1LL=NULL;
             } break;
             case __ITM_EXPRESSION__: {
-              __tmp__PIL=NULL;
+              __tmp__1LL=NULL;
             } break;
             case __ITM_OLD__: {
-              __tmp__PIL=NULL;
+              __tmp__1LL=NULL;
             } break;
             case __ITM_EXTERNAL_TYPE__: {
-              __tmp__PIL=NULL;
+              __tmp__1LL=NULL;
             } break;
             case __ITM_BLOCK__: {
-              __tmp__PIL=NULL;
+              __tmp__1LL=NULL;
             } break;
             case __ITM_EXTERNAL__: {
-              __tmp__PIL=NULL;
+              __tmp__1LL=NULL;
             } break;
             case __ITM_READ_ARGS__: {
-              __tmp__PIL=NULL;
+              __tmp__1LL=NULL;
             } break;
             case __ITM_REAL__: {
-              __tmp__PIL=NULL;
+              __tmp__1LL=NULL;
             } break;
             case __ITM_NUMBER__: {
-              __tmp__PIL=NULL;
+              __tmp__1LL=NULL;
             } break;
             case __ITM_CHARACTER__: {
-              __tmp__PIL=NULL;
+              __tmp__1LL=NULL;
             } break;
             case __ITM_STRING__: {
-              __tmp__PIL=NULL;
+              __tmp__1LL=NULL;
             } break;
             case __ITM_RESULT__: {
-              __tmp__PIL=NULL;
+              __tmp__1LL=NULL;
             } break;
             }
           };
-          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;
+          itm_op__KGL=__tmp__1LL;
+          __tmp__4LL=((__ITM_OPERATOR *)__tmp__1LL)->parent_itm_code__JGL.parent_itm_object__SEE.position__GFJ;
+          operator__name__NEO((&__string_81),((__ITM_OPERATOR *)__tmp__1LL)->name__UJL);
+          result__XXO=NULL;
+          ptr__YXO=((__POINTER )(NULL));
+          typ_id__3XO= 0;
+          sz__0XO=((__UINTEGER_32 )sizeof(__ITM_READ_ARG2));
+          if ((sz__0XO ==  0)) {
+            result__XXO=ITM_READ_ARG2__;
+          } else {
+            typ_id__3XO=-1;
+            clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__0XO);
+            if ((typ_id__3XO == (__INTEGER)(-  1))) {
+              a__C3GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__D3GH=(__UINTEGER_32)((__UINTEGER_32)(sz__0XO + a__C3GH) & (__UINTEGER_32)(~ a__C3GH));
+              ptr_table__5XJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__D3GH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__4XJH=((__POINTER )(NULL));
+              result__AYJH=((__POINTER *)ptr_table__5XJH)[ 0];
+              if ((result__AYJH == (void *)NULL)) {
+                result__AYJH=new_lab__FTJ(new_size__D3GH);
+                next__4XJH=(void *)((unsigned long)result__AYJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__D3GH)));
+                ((__POINTER *)next__4XJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__5XJH)[ 0]=next__4XJH;
               } else {
-                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)));
+                next__4XJH=((__POINTER *)result__AYJH)[ 0];
+                if ((next__4XJH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__AYJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__D3GH <<  1)) <=  4096)) {
+                    next__4XJH=(void *)((unsigned long)result__AYJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__D3GH)));
                   } else {
-                    next__5PJH=new_lab__ZPJ(new_size__IWGH);
+                    next__4XJH=new_lab__FTJ(new_size__D3GH);
                   };
-                  ((__POINTER *)next__5PJH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__AQJH)[ 0]=next__5PJH;
+                  ((__POINTER *)next__4XJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__5XJH)[ 0]=next__4XJH;
                 } else {
-                  ((__POINTER *)result__BQJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5PJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__BQJH=next__5PJH;
+                  ((__POINTER *)result__AYJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4XJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__AYJH=next__4XJH;
                 };
               };
-              ptr__MUO=result__BQJH;
+              ptr__YXO=result__AYJH;
             } else {
-              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;
+              t__H3GH=((__UINTEGER_32 )typ_id__3XO);
+              a__G3GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__HYJH=(__UINTEGER_32)((__UINTEGER_32)(sz__0XO + a__G3GH) & (__UINTEGER_32)(~ a__G3GH));
+              ptr_table__EYJH=((__POINTER )(&(table_type[(t__H3GH)])));
+              lab_type__GYJH=(__UINTEGER_32)(t__H3GH |  1);
+              next__DYJH=((__POINTER )(NULL));
+              result__FYJH=((__POINTER *)ptr_table__EYJH)[ 0];
+              if ((result__FYJH == (void *)NULL)) {
+                result__FYJH=new_lab__FTJ(lab_type__GYJH);
+                next__DYJH=(void *)((unsigned long)result__FYJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HYJH)));
+                ((__POINTER *)next__DYJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__EYJH)[ 0]=next__DYJH;
               } else {
-                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)));
+                next__DYJH=((__POINTER *)result__FYJH)[ 0];
+                if ((next__DYJH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__FYJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__HYJH <<  1)) <=  4096)) {
+                    next__DYJH=(void *)((unsigned long)result__FYJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HYJH)));
                   } else {
-                    next__EQJH=new_lab__ZPJ(lab_type__HQJH);
+                    next__DYJH=new_lab__FTJ(lab_type__GYJH);
                   };
-                  ((__POINTER *)next__EQJH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__FQJH)[ 0]=next__EQJH;
+                  ((__POINTER *)next__DYJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__EYJH)[ 0]=next__DYJH;
                 } else {
-                  ((__POINTER *)result__GQJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EQJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__GQJH=next__EQJH;
+                  ((__POINTER *)result__FYJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DYJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__FYJH=next__DYJH;
                 };
               };
-              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;
+              ptr__YXO=result__FYJH;
+            };
+            result__XXO=((__ITM_READ_ARG2 *)ptr__YXO);
+            *(result__XXO) = *(ITM_READ_ARG2__);
+          };
+          ((__ITM_READ_ARG2 *)result__XXO)->parent_itm_read__2LL.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ=__tmp__4LL;
+          result__GGL=result__XXO;
+          free__RXI(result__45H);
+        } else {
+          l_expr__IGL=copy__TBI(result__45H);
+          result__KZO=NULL;
+          ptr__LZO=((__POINTER )(NULL));
+          typ_id__QZO= 0;
+          sz__NZO=((__UINTEGER_32 )sizeof(__ITM_EXPRESSION));
+          if ((sz__NZO ==  0)) {
+            result__KZO=ITM_EXPRESSION__;
+          } else {
+            typ_id__QZO=-1;
+            clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__NZO);
+            if ((typ_id__QZO == (__INTEGER)(-  1))) {
+              a__1OGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__2OGH=(__UINTEGER_32)((__UINTEGER_32)(sz__NZO + a__1OGH) & (__UINTEGER_32)(~ a__1OGH));
+              ptr_table__JYJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__2OGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__IYJH=((__POINTER )(NULL));
+              result__KYJH=((__POINTER *)ptr_table__JYJH)[ 0];
+              if ((result__KYJH == (void *)NULL)) {
+                result__KYJH=new_lab__FTJ(new_size__2OGH);
+                next__IYJH=(void *)((unsigned long)result__KYJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2OGH)));
+                ((__POINTER *)next__IYJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__JYJH)[ 0]=next__IYJH;
               } else {
-                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)));
+                next__IYJH=((__POINTER *)result__KYJH)[ 0];
+                if ((next__IYJH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__KYJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__2OGH <<  1)) <=  4096)) {
+                    next__IYJH=(void *)((unsigned long)result__KYJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2OGH)));
                   } else {
-                    next__JQJH=new_lab__ZPJ(new_size__BIGH);
+                    next__IYJH=new_lab__FTJ(new_size__2OGH);
                   };
-                  ((__POINTER *)next__JQJH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__KQJH)[ 0]=next__JQJH;
+                  ((__POINTER *)next__IYJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__JYJH)[ 0]=next__IYJH;
                 } else {
-                  ((__POINTER *)result__LQJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JQJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__LQJH=next__JQJH;
+                  ((__POINTER *)result__KYJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__IYJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__KYJH=next__IYJH;
                 };
               };
-              ptr__5VO=result__LQJH;
+              ptr__LZO=result__KYJH;
             } else {
-              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;
+              t__APGH=((__UINTEGER_32 )typ_id__QZO);
+              a__5OGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__RYJH=(__UINTEGER_32)((__UINTEGER_32)(sz__NZO + a__5OGH) & (__UINTEGER_32)(~ a__5OGH));
+              ptr_table__OYJH=((__POINTER )(&(table_type[(t__APGH)])));
+              lab_type__QYJH=(__UINTEGER_32)(t__APGH |  1);
+              next__NYJH=((__POINTER )(NULL));
+              result__PYJH=((__POINTER *)ptr_table__OYJH)[ 0];
+              if ((result__PYJH == (void *)NULL)) {
+                result__PYJH=new_lab__FTJ(lab_type__QYJH);
+                next__NYJH=(void *)((unsigned long)result__PYJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RYJH)));
+                ((__POINTER *)next__NYJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__OYJH)[ 0]=next__NYJH;
               } else {
-                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)));
+                next__NYJH=((__POINTER *)result__PYJH)[ 0];
+                if ((next__NYJH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__PYJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__RYJH <<  1)) <=  4096)) {
+                    next__NYJH=(void *)((unsigned long)result__PYJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RYJH)));
                   } else {
-                    next__OQJH=new_lab__ZPJ(lab_type__RQJH);
+                    next__NYJH=new_lab__FTJ(lab_type__QYJH);
                   };
-                  ((__POINTER *)next__OQJH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__PQJH)[ 0]=next__OQJH;
+                  ((__POINTER *)next__NYJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__OYJH)[ 0]=next__NYJH;
                 } else {
-                  ((__POINTER *)result__QQJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OQJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__QQJH=next__OQJH;
+                  ((__POINTER *)result__PYJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NYJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__PYJH=next__NYJH;
                 };
               };
-              ptr__5VO=result__QQJH;
+              ptr__LZO=result__PYJH;
             };
-            result__4VO=((__ITM_EXPRESSION *)ptr__5VO);
-            *(result__4VO) = *(ITM_EXPRESSION__);
+            result__KZO=((__ITM_EXPRESSION *)ptr__LZO);
+            *(result__KZO) = *(ITM_EXPRESSION__);
           };
-          ((__ITM_EXPRESSION *)result__4VO)->value_list__XGV=l_expr__2CL;
-          result__0CL=result__4VO;
+          ((__ITM_EXPRESSION *)result__KZO)->value_list__DKV=l_expr__IGL;
+          result__GGL=result__KZO;
         };
       };
     };
-    result__O3I=result__0CL;
+    result__0AJ=result__GGL;
   };
-  return(result__O3I);
+  return(result__0AJ);
 }
 
-static void set_value__type__EFHC(__ITM_SLOT *Self__FFHC,void *e__GFHC,void *p__HFHC)
+static void set_value__type__SIHC(__ITM_SLOT *Self__TIHC,void *e__UIHC,void *p__VIHC)
 // ({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__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) {
+  void *n__2GBD;
+  void *sec__3GBD;
+  __POSITION __tmp__JHBD,__tmp__RHBD,__tmp__FIBD,__tmp__OIBD;
+  __ITM_ARG *result__3HIH,*Self__FIIH;
+  __POINTER ptr__4HIH,ptr_table__TYJH,next__SYJH,result__UYJH;
+  __POINTER ptr_table__YYJH,next__XYJH,result__ZYJH,ptr__LUAC;
+  __POINTER ptr_table__3YJH,next__2YJH,result__4YJH,ptr_table__CZJH;
+  __POINTER next__BZJH,result__DZJH,ptr__CWI,ptr_table__HZJH,next__GZJH;
+  __POINTER result__IZJH,ptr_table__MZJH,next__LZJH,result__NZJH;
+  __POINTER ptr__WICD,ptr_table__RZJH,next__QZJH,result__SZJH;
+  __POINTER ptr_table__WZJH,next__VZJH,result__XZJH;
+  __INTEGER typ_id__5HIH,typ_id__QUAC,typ_id__HWI,typ_id__1ICD;
+  __UINTEGER_32 sz__AIIH,a__BIIH,new_size__CIIH,t__DIIH,a__EIIH;
+  __UINTEGER_32 new_size__1YJH,lab_type__0YJH,sz__NUAC,a__GPGH;
+  __UINTEGER_32 new_size__HPGH,t__LPGH,a__KPGH,new_size__FZJH;
+  __UINTEGER_32 lab_type__EZJH,sz__EWI,a__CQGH,new_size__DQGH,t__HQGH;
+  __UINTEGER_32 a__GQGH,new_size__PZJH,lab_type__OZJH,sz__YICD,a__KQGH;
+  __UINTEGER_32 new_size__LQGH,t__PQGH,a__OQGH,new_size__ZZJH;
+  __UINTEGER_32 lab_type__YZJH;
+  __ITM_SLOT *result__KUAC,*Self__R5HC;
+  __ITM_PROTOTYPE *result__BWI;
+  __ITM_READ_ARG1 *result__VICD;
+  void *larg__4GBD;
+  if ((Self__TIHC->affect__4CGC != '<')) {
+    copy__JDS(string_tmp__VH,(&__string_241));
+    append__ROS(string_tmp__VH,Self__TIHC->parent_named__15.name__LI);
+    n__2GBD=get__YWB(string_tmp__VH);
+    sec__3GBD=get_name__EVOB((&__string_27));
+    larg__4GBD=create_with_capacity__4M5B( 1);
+    switch (((struct ___OBJ *)e__UIHC)->__id) {
     case __ITM_LIST__: {
-      __tmp__1DBD=((__ITM_LIST *)e__GFHC)->parent_itm_code__R3E.parent_itm_object__OBE.position__0BJ;
+      __tmp__JHBD=((__ITM_LIST *)e__UIHC)->parent_itm_code__VAF.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_LDOTS__: {
-      __tmp__1DBD=((__ITM_LDOTS *)e__GFHC)->parent_itm_constant__HTF.parent_itm_object__OBE.position__0BJ;
+      __tmp__JHBD=((__ITM_LDOTS *)e__UIHC)->parent_itm_constant__LWF.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_PROTOTYPE__: {
-      __tmp__1DBD=((__ITM_PROTOTYPE *)e__GFHC)->parent_itm_constant__TUF.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
+      __tmp__JHBD=((__ITM_PROTOTYPE *)e__UIHC)->parent_itm_constant__XXF.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_LIST_IDF__: {
-      __tmp__1DBD=((__ITM_LIST_IDF *)e__GFHC)->parent_itm_code__DBJ.parent_itm_object__OBE.position__0BJ;
+      __tmp__JHBD=((__ITM_LIST_IDF *)e__UIHC)->parent_itm_code__PEJ.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_WRITE_VALUE__: {
-      __tmp__1DBD=((__ITM_WRITE_VALUE *)e__GFHC)->parent_itm_write__ZBJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
+      __tmp__JHBD=((__ITM_WRITE_VALUE *)e__UIHC)->parent_itm_write__FFJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_WRITE_CAST__: {
-      __tmp__1DBD=((__ITM_WRITE_CAST *)e__GFHC)->parent_itm_write__QCJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
+      __tmp__JHBD=((__ITM_WRITE_CAST *)e__UIHC)->parent_itm_write__2FJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_READ__: {
-      __tmp__1DBD=((__ITM_READ *)e__GFHC)->parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
+      __tmp__JHBD=((__ITM_READ *)e__UIHC)->parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_WRITE_CODE__: {
-      __tmp__1DBD=((__ITM_WRITE_CODE *)e__GFHC)->parent_itm_write__1FJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
+      __tmp__JHBD=((__ITM_WRITE_CODE *)e__UIHC)->parent_itm_write__HJJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_OPERATOR__: {
-      __tmp__1DBD=((__ITM_OPERATOR *)e__GFHC)->parent_itm_code__3CL.parent_itm_object__OBE.position__0BJ;
+      __tmp__JHBD=((__ITM_OPERATOR *)e__UIHC)->parent_itm_code__JGL.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_READ_ARG1__: {
-      __tmp__1DBD=((__ITM_READ_ARG1 *)e__GFHC)->parent_itm_read__DGL.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
+      __tmp__JHBD=((__ITM_READ_ARG1 *)e__UIHC)->parent_itm_read__PJL.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_READ_ARG2__: {
-      __tmp__1DBD=((__ITM_READ_ARG2 *)e__GFHC)->parent_itm_read__QIL.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
+      __tmp__JHBD=((__ITM_READ_ARG2 *)e__UIHC)->parent_itm_read__2LL.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_EXPRESSION__: {
-      __tmp__1DBD=position__GB5B(e__GFHC);
+      __tmp__JHBD=position__SE5B(e__UIHC);
     } break;
     case __ITM_OLD__: {
-      __tmp__1DBD=((__ITM_OLD *)e__GFHC)->parent_itm_code__4ZL.parent_itm_object__OBE.position__0BJ;
+      __tmp__JHBD=((__ITM_OLD *)e__UIHC)->parent_itm_code__K3L.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_EXTERNAL_TYPE__: {
-      __tmp__1DBD=((__ITM_EXTERNAL_TYPE *)e__GFHC)->parent_itm_extern__T1M.parent_itm_code__S1M.parent_itm_object__OBE.position__0BJ;
+      __tmp__JHBD=((__ITM_EXTERNAL_TYPE *)e__UIHC)->parent_itm_extern__54M.parent_itm_code__44M.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_BLOCK__: {
-      __tmp__1DBD=((__ITM_LIST *)((__ITM_BLOCK *)e__GFHC)->list__LMDC)->parent_itm_code__R3E.parent_itm_object__OBE.position__0BJ;
+      __tmp__JHBD=((__ITM_LIST *)((__ITM_BLOCK *)e__UIHC)->list__ZPDC)->parent_itm_code__VAF.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_EXTERNAL__: {
-      __tmp__1DBD=((__ITM_EXTERNAL *)e__GFHC)->parent_itm_extern__YCN.parent_itm_code__S1M.parent_itm_object__OBE.position__0BJ;
+      __tmp__JHBD=((__ITM_EXTERNAL *)e__UIHC)->parent_itm_extern__EGN.parent_itm_code__44M.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_READ_ARGS__: {
-      __tmp__1DBD=((__ITM_READ_ARGS *)e__GFHC)->parent_itm_read__OAO.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
+      __tmp__JHBD=((__ITM_READ_ARGS *)e__UIHC)->parent_itm_read__0DO.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_REAL__: {
-      __tmp__1DBD=((__ITM_REAL *)e__GFHC)->parent_itm_constant__JOO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
+      __tmp__JHBD=((__ITM_REAL *)e__UIHC)->parent_itm_constant__VRO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_NUMBER__: {
-      __tmp__1DBD=((__ITM_NUMBER *)e__GFHC)->parent_itm_constant__1OO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
+      __tmp__JHBD=((__ITM_NUMBER *)e__UIHC)->parent_itm_constant__HSO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_CHARACTER__: {
-      __tmp__1DBD=((__ITM_CHARACTER *)e__GFHC)->parent_itm_constant__NPO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
+      __tmp__JHBD=((__ITM_CHARACTER *)e__UIHC)->parent_itm_constant__ZSO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_STRING__: {
-      __tmp__1DBD=((__ITM_STRING *)e__GFHC)->parent_itm_constant__4PO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
+      __tmp__JHBD=((__ITM_STRING *)e__UIHC)->parent_itm_constant__KTO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_RESULT__: {
-      __tmp__1DBD=position__QIHC(e__GFHC);
+      __tmp__JHBD=position__4LHC(e__UIHC);
     } break;
     };
-    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)));
+    result__3HIH=NULL;
+    ptr__4HIH=((__POINTER )(NULL));
+    typ_id__5HIH= 0;
+    sz__AIIH=((__UINTEGER_32 )sizeof(__ITM_ARG));
+    if ((sz__AIIH ==  0)) {
+      result__3HIH=ITM_ARG__;
+    } else {
+      typ_id__5HIH=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__AIIH);
+      if ((typ_id__5HIH == (__INTEGER)(-  1))) {
+        a__BIIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__CIIH=(__UINTEGER_32)((__UINTEGER_32)(sz__AIIH + a__BIIH) & (__UINTEGER_32)(~ a__BIIH));
+        ptr_table__TYJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__CIIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__SYJH=((__POINTER )(NULL));
+        result__UYJH=((__POINTER *)ptr_table__TYJH)[ 0];
+        if ((result__UYJH == (void *)NULL)) {
+          result__UYJH=new_lab__FTJ(new_size__CIIH);
+          next__SYJH=(void *)((unsigned long)result__UYJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CIIH)));
+          ((__POINTER *)next__SYJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__TYJH)[ 0]=next__SYJH;
+        } else {
+          next__SYJH=((__POINTER *)result__UYJH)[ 0];
+          if ((next__SYJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__UYJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__CIIH <<  1)) <=  4096)) {
+              next__SYJH=(void *)((unsigned long)result__UYJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CIIH)));
             } else {
-              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)));
+              next__SYJH=new_lab__FTJ(new_size__CIIH);
+            };
+            ((__POINTER *)next__SYJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__TYJH)[ 0]=next__SYJH;
+          } else {
+            ((__POINTER *)result__UYJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__SYJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__UYJH=next__SYJH;
+          };
+        };
+        ptr__4HIH=result__UYJH;
+      } else {
+        t__DIIH=((__UINTEGER_32 )typ_id__5HIH);
+        a__EIIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__1YJH=(__UINTEGER_32)((__UINTEGER_32)(sz__AIIH + a__EIIH) & (__UINTEGER_32)(~ a__EIIH));
+        ptr_table__YYJH=((__POINTER )(&(table_type[(t__DIIH)])));
+        lab_type__0YJH=(__UINTEGER_32)(t__DIIH |  1);
+        next__XYJH=((__POINTER )(NULL));
+        result__ZYJH=((__POINTER *)ptr_table__YYJH)[ 0];
+        if ((result__ZYJH == (void *)NULL)) {
+          result__ZYJH=new_lab__FTJ(lab_type__0YJH);
+          next__XYJH=(void *)((unsigned long)result__ZYJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1YJH)));
+          ((__POINTER *)next__XYJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__YYJH)[ 0]=next__XYJH;
+        } else {
+          next__XYJH=((__POINTER *)result__ZYJH)[ 0];
+          if ((next__XYJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ZYJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__1YJH <<  1)) <=  4096)) {
+              next__XYJH=(void *)((unsigned long)result__ZYJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1YJH)));
             } else {
-              next__YQJH=new_lab__ZPJ(lab_type__1QJH);
+              next__XYJH=new_lab__FTJ(lab_type__0YJH);
             };
-            ((__POINTER *)next__YQJH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__ZQJH)[ 0]=next__YQJH;
+            ((__POINTER *)next__XYJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__YYJH)[ 0]=next__XYJH;
           } else {
-            ((__POINTER *)result__0QJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YQJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__0QJH=next__YQJH;
+            ((__POINTER *)result__ZYJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XYJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__ZYJH=next__XYJH;
           };
         };
-        ptr__LAIH=result__0QJH;
+        ptr__4HIH=result__ZYJH;
       };
-      result__KAIH=((__ITM_ARG *)ptr__LAIH);
-      *(result__KAIH) = *(ITM_ARG__);
+      result__3HIH=((__ITM_ARG *)ptr__4HIH);
+      *(result__3HIH) = *(ITM_ARG__);
     };
-    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) {
+    Self__FIIH=((__ITM_ARG *)result__3HIH);
+    Self__FIIH->parent_itm_argument__DIHB.parent_itm_code__C5M.position__GFJ=__tmp__JHBD;
+    Self__FIIH->name__U3HC=(&__string_58);
+    Self__FIIH->type__V3HC=type_self__XUN;
+    add_last__TCHC(larg__4GBD,result__3HIH);
+    switch (((struct ___OBJ *)e__UIHC)->__id) {
     case __ITM_LIST__: {
-      __tmp__DEBD=((__ITM_LIST *)e__GFHC)->parent_itm_code__R3E.parent_itm_object__OBE.position__0BJ;
+      __tmp__RHBD=((__ITM_LIST *)e__UIHC)->parent_itm_code__VAF.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_LDOTS__: {
-      __tmp__DEBD=((__ITM_LDOTS *)e__GFHC)->parent_itm_constant__HTF.parent_itm_object__OBE.position__0BJ;
+      __tmp__RHBD=((__ITM_LDOTS *)e__UIHC)->parent_itm_constant__LWF.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_PROTOTYPE__: {
-      __tmp__DEBD=((__ITM_PROTOTYPE *)e__GFHC)->parent_itm_constant__TUF.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
+      __tmp__RHBD=((__ITM_PROTOTYPE *)e__UIHC)->parent_itm_constant__XXF.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_LIST_IDF__: {
-      __tmp__DEBD=((__ITM_LIST_IDF *)e__GFHC)->parent_itm_code__DBJ.parent_itm_object__OBE.position__0BJ;
+      __tmp__RHBD=((__ITM_LIST_IDF *)e__UIHC)->parent_itm_code__PEJ.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_WRITE_VALUE__: {
-      __tmp__DEBD=((__ITM_WRITE_VALUE *)e__GFHC)->parent_itm_write__ZBJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
+      __tmp__RHBD=((__ITM_WRITE_VALUE *)e__UIHC)->parent_itm_write__FFJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_WRITE_CAST__: {
-      __tmp__DEBD=((__ITM_WRITE_CAST *)e__GFHC)->parent_itm_write__QCJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
+      __tmp__RHBD=((__ITM_WRITE_CAST *)e__UIHC)->parent_itm_write__2FJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_READ__: {
-      __tmp__DEBD=((__ITM_READ *)e__GFHC)->parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
+      __tmp__RHBD=((__ITM_READ *)e__UIHC)->parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_WRITE_CODE__: {
-      __tmp__DEBD=((__ITM_WRITE_CODE *)e__GFHC)->parent_itm_write__1FJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
+      __tmp__RHBD=((__ITM_WRITE_CODE *)e__UIHC)->parent_itm_write__HJJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_OPERATOR__: {
-      __tmp__DEBD=((__ITM_OPERATOR *)e__GFHC)->parent_itm_code__3CL.parent_itm_object__OBE.position__0BJ;
+      __tmp__RHBD=((__ITM_OPERATOR *)e__UIHC)->parent_itm_code__JGL.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_READ_ARG1__: {
-      __tmp__DEBD=((__ITM_READ_ARG1 *)e__GFHC)->parent_itm_read__DGL.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
+      __tmp__RHBD=((__ITM_READ_ARG1 *)e__UIHC)->parent_itm_read__PJL.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_READ_ARG2__: {
-      __tmp__DEBD=((__ITM_READ_ARG2 *)e__GFHC)->parent_itm_read__QIL.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
+      __tmp__RHBD=((__ITM_READ_ARG2 *)e__UIHC)->parent_itm_read__2LL.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_EXPRESSION__: {
-      __tmp__DEBD=position__GB5B(e__GFHC);
+      __tmp__RHBD=position__SE5B(e__UIHC);
     } break;
     case __ITM_OLD__: {
-      __tmp__DEBD=((__ITM_OLD *)e__GFHC)->parent_itm_code__4ZL.parent_itm_object__OBE.position__0BJ;
+      __tmp__RHBD=((__ITM_OLD *)e__UIHC)->parent_itm_code__K3L.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_EXTERNAL_TYPE__: {
-      __tmp__DEBD=((__ITM_EXTERNAL_TYPE *)e__GFHC)->parent_itm_extern__T1M.parent_itm_code__S1M.parent_itm_object__OBE.position__0BJ;
+      __tmp__RHBD=((__ITM_EXTERNAL_TYPE *)e__UIHC)->parent_itm_extern__54M.parent_itm_code__44M.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_BLOCK__: {
-      __tmp__DEBD=((__ITM_LIST *)((__ITM_BLOCK *)e__GFHC)->list__LMDC)->parent_itm_code__R3E.parent_itm_object__OBE.position__0BJ;
+      __tmp__RHBD=((__ITM_LIST *)((__ITM_BLOCK *)e__UIHC)->list__ZPDC)->parent_itm_code__VAF.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_EXTERNAL__: {
-      __tmp__DEBD=((__ITM_EXTERNAL *)e__GFHC)->parent_itm_extern__YCN.parent_itm_code__S1M.parent_itm_object__OBE.position__0BJ;
+      __tmp__RHBD=((__ITM_EXTERNAL *)e__UIHC)->parent_itm_extern__EGN.parent_itm_code__44M.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_READ_ARGS__: {
-      __tmp__DEBD=((__ITM_READ_ARGS *)e__GFHC)->parent_itm_read__OAO.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
+      __tmp__RHBD=((__ITM_READ_ARGS *)e__UIHC)->parent_itm_read__0DO.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_REAL__: {
-      __tmp__DEBD=((__ITM_REAL *)e__GFHC)->parent_itm_constant__JOO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
+      __tmp__RHBD=((__ITM_REAL *)e__UIHC)->parent_itm_constant__VRO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_NUMBER__: {
-      __tmp__DEBD=((__ITM_NUMBER *)e__GFHC)->parent_itm_constant__1OO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
+      __tmp__RHBD=((__ITM_NUMBER *)e__UIHC)->parent_itm_constant__HSO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_CHARACTER__: {
-      __tmp__DEBD=((__ITM_CHARACTER *)e__GFHC)->parent_itm_constant__NPO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
+      __tmp__RHBD=((__ITM_CHARACTER *)e__UIHC)->parent_itm_constant__ZSO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_STRING__: {
-      __tmp__DEBD=((__ITM_STRING *)e__GFHC)->parent_itm_constant__4PO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
+      __tmp__RHBD=((__ITM_STRING *)e__UIHC)->parent_itm_constant__KTO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_RESULT__: {
-      __tmp__DEBD=position__QIHC(e__GFHC);
+      __tmp__RHBD=position__4LHC(e__UIHC);
     } break;
     };
-    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)));
+    result__KUAC=NULL;
+    ptr__LUAC=((__POINTER )(NULL));
+    typ_id__QUAC= 0;
+    sz__NUAC=((__UINTEGER_32 )sizeof(__ITM_SLOT));
+    if ((sz__NUAC ==  0)) {
+      result__KUAC=ITM_SLOT__;
+    } else {
+      typ_id__QUAC=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__NUAC);
+      if ((typ_id__QUAC == (__INTEGER)(-  1))) {
+        a__GPGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__HPGH=(__UINTEGER_32)((__UINTEGER_32)(sz__NUAC + a__GPGH) & (__UINTEGER_32)(~ a__GPGH));
+        ptr_table__3YJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__HPGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__2YJH=((__POINTER )(NULL));
+        result__4YJH=((__POINTER *)ptr_table__3YJH)[ 0];
+        if ((result__4YJH == (void *)NULL)) {
+          result__4YJH=new_lab__FTJ(new_size__HPGH);
+          next__2YJH=(void *)((unsigned long)result__4YJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HPGH)));
+          ((__POINTER *)next__2YJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__3YJH)[ 0]=next__2YJH;
+        } else {
+          next__2YJH=((__POINTER *)result__4YJH)[ 0];
+          if ((next__2YJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4YJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__HPGH <<  1)) <=  4096)) {
+              next__2YJH=(void *)((unsigned long)result__4YJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HPGH)));
             } else {
-              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)));
+              next__2YJH=new_lab__FTJ(new_size__HPGH);
+            };
+            ((__POINTER *)next__2YJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__3YJH)[ 0]=next__2YJH;
+          } else {
+            ((__POINTER *)result__4YJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2YJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__4YJH=next__2YJH;
+          };
+        };
+        ptr__LUAC=result__4YJH;
+      } else {
+        t__LPGH=((__UINTEGER_32 )typ_id__QUAC);
+        a__KPGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__FZJH=(__UINTEGER_32)((__UINTEGER_32)(sz__NUAC + a__KPGH) & (__UINTEGER_32)(~ a__KPGH));
+        ptr_table__CZJH=((__POINTER )(&(table_type[(t__LPGH)])));
+        lab_type__EZJH=(__UINTEGER_32)(t__LPGH |  1);
+        next__BZJH=((__POINTER )(NULL));
+        result__DZJH=((__POINTER *)ptr_table__CZJH)[ 0];
+        if ((result__DZJH == (void *)NULL)) {
+          result__DZJH=new_lab__FTJ(lab_type__EZJH);
+          next__BZJH=(void *)((unsigned long)result__DZJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FZJH)));
+          ((__POINTER *)next__BZJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__CZJH)[ 0]=next__BZJH;
+        } else {
+          next__BZJH=((__POINTER *)result__DZJH)[ 0];
+          if ((next__BZJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DZJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__FZJH <<  1)) <=  4096)) {
+              next__BZJH=(void *)((unsigned long)result__DZJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FZJH)));
             } else {
-              next__CRJH=new_lab__ZPJ(lab_type__FRJH);
+              next__BZJH=new_lab__FTJ(lab_type__EZJH);
             };
-            ((__POINTER *)next__CRJH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__DRJH)[ 0]=next__CRJH;
+            ((__POINTER *)next__BZJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__CZJH)[ 0]=next__BZJH;
           } else {
-            ((__POINTER *)result__ERJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CRJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__ERJH=next__CRJH;
+            ((__POINTER *)result__DZJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BZJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__DZJH=next__BZJH;
           };
         };
-        ptr__5QAC=result__ERJH;
+        ptr__LUAC=result__DZJH;
       };
-      result__4QAC=((__ITM_SLOT *)ptr__5QAC);
-      *(result__4QAC) = *(ITM_SLOT__);
+      result__KUAC=((__ITM_SLOT *)ptr__LUAC);
+      *(result__KUAC) = *(ITM_SLOT__);
     };
-    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) {
+    Self__R5HC=((__ITM_SLOT *)result__KUAC);
+    Self__R5HC->parent_named__15.name__LI=n__2GBD;
+    Self__R5HC->parent_named__15.parent_itm_object__4.position__GFJ=__tmp__RHBD;
+    Self__R5HC->id_section__F3C=sec__3GBD;
+    ((__ITM_SLOT *)result__KUAC)->affect__4CGC='<';
+    set_value__type__SIHC(result__KUAC,e__UIHC,p__VIHC);
+    set_argument_list__OFHC(result__KUAC,larg__4GBD);
+    set_result_type__FAGC(result__KUAC,Self__TIHC->result_type__PBGC);
+    fast_put__to__0QGC(((__PROTOTYPE *)p__VIHC)->slot_list__MVS,result__KUAC,result__KUAC->parent_named__15.name__LI);
+    switch (((struct ___OBJ *)e__UIHC)->__id) {
     case __ITM_LIST__: {
-      __tmp__XEBD=((__ITM_LIST *)e__GFHC)->parent_itm_code__R3E.parent_itm_object__OBE.position__0BJ;
+      __tmp__FIBD=((__ITM_LIST *)e__UIHC)->parent_itm_code__VAF.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_LDOTS__: {
-      __tmp__XEBD=((__ITM_LDOTS *)e__GFHC)->parent_itm_constant__HTF.parent_itm_object__OBE.position__0BJ;
+      __tmp__FIBD=((__ITM_LDOTS *)e__UIHC)->parent_itm_constant__LWF.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_PROTOTYPE__: {
-      __tmp__XEBD=((__ITM_PROTOTYPE *)e__GFHC)->parent_itm_constant__TUF.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
+      __tmp__FIBD=((__ITM_PROTOTYPE *)e__UIHC)->parent_itm_constant__XXF.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_LIST_IDF__: {
-      __tmp__XEBD=((__ITM_LIST_IDF *)e__GFHC)->parent_itm_code__DBJ.parent_itm_object__OBE.position__0BJ;
+      __tmp__FIBD=((__ITM_LIST_IDF *)e__UIHC)->parent_itm_code__PEJ.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_WRITE_VALUE__: {
-      __tmp__XEBD=((__ITM_WRITE_VALUE *)e__GFHC)->parent_itm_write__ZBJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
+      __tmp__FIBD=((__ITM_WRITE_VALUE *)e__UIHC)->parent_itm_write__FFJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_WRITE_CAST__: {
-      __tmp__XEBD=((__ITM_WRITE_CAST *)e__GFHC)->parent_itm_write__QCJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
+      __tmp__FIBD=((__ITM_WRITE_CAST *)e__UIHC)->parent_itm_write__2FJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_READ__: {
-      __tmp__XEBD=((__ITM_READ *)e__GFHC)->parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
+      __tmp__FIBD=((__ITM_READ *)e__UIHC)->parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_WRITE_CODE__: {
-      __tmp__XEBD=((__ITM_WRITE_CODE *)e__GFHC)->parent_itm_write__1FJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
+      __tmp__FIBD=((__ITM_WRITE_CODE *)e__UIHC)->parent_itm_write__HJJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_OPERATOR__: {
-      __tmp__XEBD=((__ITM_OPERATOR *)e__GFHC)->parent_itm_code__3CL.parent_itm_object__OBE.position__0BJ;
+      __tmp__FIBD=((__ITM_OPERATOR *)e__UIHC)->parent_itm_code__JGL.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_READ_ARG1__: {
-      __tmp__XEBD=((__ITM_READ_ARG1 *)e__GFHC)->parent_itm_read__DGL.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
+      __tmp__FIBD=((__ITM_READ_ARG1 *)e__UIHC)->parent_itm_read__PJL.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_READ_ARG2__: {
-      __tmp__XEBD=((__ITM_READ_ARG2 *)e__GFHC)->parent_itm_read__QIL.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
+      __tmp__FIBD=((__ITM_READ_ARG2 *)e__UIHC)->parent_itm_read__2LL.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_EXPRESSION__: {
-      __tmp__XEBD=position__GB5B(e__GFHC);
+      __tmp__FIBD=position__SE5B(e__UIHC);
     } break;
     case __ITM_OLD__: {
-      __tmp__XEBD=((__ITM_OLD *)e__GFHC)->parent_itm_code__4ZL.parent_itm_object__OBE.position__0BJ;
+      __tmp__FIBD=((__ITM_OLD *)e__UIHC)->parent_itm_code__K3L.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_EXTERNAL_TYPE__: {
-      __tmp__XEBD=((__ITM_EXTERNAL_TYPE *)e__GFHC)->parent_itm_extern__T1M.parent_itm_code__S1M.parent_itm_object__OBE.position__0BJ;
+      __tmp__FIBD=((__ITM_EXTERNAL_TYPE *)e__UIHC)->parent_itm_extern__54M.parent_itm_code__44M.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_BLOCK__: {
-      __tmp__XEBD=((__ITM_LIST *)((__ITM_BLOCK *)e__GFHC)->list__LMDC)->parent_itm_code__R3E.parent_itm_object__OBE.position__0BJ;
+      __tmp__FIBD=((__ITM_LIST *)((__ITM_BLOCK *)e__UIHC)->list__ZPDC)->parent_itm_code__VAF.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_EXTERNAL__: {
-      __tmp__XEBD=((__ITM_EXTERNAL *)e__GFHC)->parent_itm_extern__YCN.parent_itm_code__S1M.parent_itm_object__OBE.position__0BJ;
+      __tmp__FIBD=((__ITM_EXTERNAL *)e__UIHC)->parent_itm_extern__EGN.parent_itm_code__44M.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_READ_ARGS__: {
-      __tmp__XEBD=((__ITM_READ_ARGS *)e__GFHC)->parent_itm_read__OAO.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
+      __tmp__FIBD=((__ITM_READ_ARGS *)e__UIHC)->parent_itm_read__0DO.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_REAL__: {
-      __tmp__XEBD=((__ITM_REAL *)e__GFHC)->parent_itm_constant__JOO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
+      __tmp__FIBD=((__ITM_REAL *)e__UIHC)->parent_itm_constant__VRO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_NUMBER__: {
-      __tmp__XEBD=((__ITM_NUMBER *)e__GFHC)->parent_itm_constant__1OO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
+      __tmp__FIBD=((__ITM_NUMBER *)e__UIHC)->parent_itm_constant__HSO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_CHARACTER__: {
-      __tmp__XEBD=((__ITM_CHARACTER *)e__GFHC)->parent_itm_constant__NPO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
+      __tmp__FIBD=((__ITM_CHARACTER *)e__UIHC)->parent_itm_constant__ZSO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_STRING__: {
-      __tmp__XEBD=((__ITM_STRING *)e__GFHC)->parent_itm_constant__4PO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
+      __tmp__FIBD=((__ITM_STRING *)e__UIHC)->parent_itm_constant__KTO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_RESULT__: {
-      __tmp__XEBD=position__QIHC(e__GFHC);
+      __tmp__FIBD=position__4LHC(e__UIHC);
     } break;
     };
-    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)));
+    get__2UI(((__PROTOTYPE *)p__VIHC)->parent_named__5.name__LI);
+    result__BWI=NULL;
+    ptr__CWI=((__POINTER )(NULL));
+    typ_id__HWI= 0;
+    sz__EWI=((__UINTEGER_32 )sizeof(__ITM_PROTOTYPE));
+    if ((sz__EWI ==  0)) {
+      result__BWI=ITM_PROTOTYPE__;
+    } else {
+      typ_id__HWI=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__EWI);
+      if ((typ_id__HWI == (__INTEGER)(-  1))) {
+        a__CQGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__DQGH=(__UINTEGER_32)((__UINTEGER_32)(sz__EWI + a__CQGH) & (__UINTEGER_32)(~ a__CQGH));
+        ptr_table__HZJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__DQGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__GZJH=((__POINTER )(NULL));
+        result__IZJH=((__POINTER *)ptr_table__HZJH)[ 0];
+        if ((result__IZJH == (void *)NULL)) {
+          result__IZJH=new_lab__FTJ(new_size__DQGH);
+          next__GZJH=(void *)((unsigned long)result__IZJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DQGH)));
+          ((__POINTER *)next__GZJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__HZJH)[ 0]=next__GZJH;
+        } else {
+          next__GZJH=((__POINTER *)result__IZJH)[ 0];
+          if ((next__GZJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__IZJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__DQGH <<  1)) <=  4096)) {
+              next__GZJH=(void *)((unsigned long)result__IZJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DQGH)));
             } else {
-              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)));
+              next__GZJH=new_lab__FTJ(new_size__DQGH);
+            };
+            ((__POINTER *)next__GZJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__HZJH)[ 0]=next__GZJH;
+          } else {
+            ((__POINTER *)result__IZJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GZJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__IZJH=next__GZJH;
+          };
+        };
+        ptr__CWI=result__IZJH;
+      } else {
+        t__HQGH=((__UINTEGER_32 )typ_id__HWI);
+        a__GQGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__PZJH=(__UINTEGER_32)((__UINTEGER_32)(sz__EWI + a__GQGH) & (__UINTEGER_32)(~ a__GQGH));
+        ptr_table__MZJH=((__POINTER )(&(table_type[(t__HQGH)])));
+        lab_type__OZJH=(__UINTEGER_32)(t__HQGH |  1);
+        next__LZJH=((__POINTER )(NULL));
+        result__NZJH=((__POINTER *)ptr_table__MZJH)[ 0];
+        if ((result__NZJH == (void *)NULL)) {
+          result__NZJH=new_lab__FTJ(lab_type__OZJH);
+          next__LZJH=(void *)((unsigned long)result__NZJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PZJH)));
+          ((__POINTER *)next__LZJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__MZJH)[ 0]=next__LZJH;
+        } else {
+          next__LZJH=((__POINTER *)result__NZJH)[ 0];
+          if ((next__LZJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__NZJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__PZJH <<  1)) <=  4096)) {
+              next__LZJH=(void *)((unsigned long)result__NZJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PZJH)));
             } else {
-              next__MRJH=new_lab__ZPJ(lab_type__PRJH);
+              next__LZJH=new_lab__FTJ(lab_type__OZJH);
             };
-            ((__POINTER *)next__MRJH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__NRJH)[ 0]=next__MRJH;
+            ((__POINTER *)next__LZJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__MZJH)[ 0]=next__LZJH;
           } else {
-            ((__POINTER *)result__ORJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MRJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__ORJH=next__MRJH;
+            ((__POINTER *)result__NZJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LZJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__NZJH=next__LZJH;
           };
         };
-        ptr__WSI=result__ORJH;
+        ptr__CWI=result__NZJH;
       };
-      result__VSI=((__ITM_PROTOTYPE *)ptr__WSI);
-      *(result__VSI) = *(ITM_PROTOTYPE__);
+      result__BWI=((__ITM_PROTOTYPE *)ptr__CWI);
+      *(result__BWI) = *(ITM_PROTOTYPE__);
     };
-    ((__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) {
+    ((__ITM_PROTOTYPE *)result__BWI)->parent_itm_constant__XXF.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ=__tmp__FIBD;
+    switch (((struct ___OBJ *)e__UIHC)->__id) {
     case __ITM_LIST__: {
-      __tmp__AFBD=((__ITM_LIST *)e__GFHC)->parent_itm_code__R3E.parent_itm_object__OBE.position__0BJ;
+      __tmp__OIBD=((__ITM_LIST *)e__UIHC)->parent_itm_code__VAF.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_LDOTS__: {
-      __tmp__AFBD=((__ITM_LDOTS *)e__GFHC)->parent_itm_constant__HTF.parent_itm_object__OBE.position__0BJ;
+      __tmp__OIBD=((__ITM_LDOTS *)e__UIHC)->parent_itm_constant__LWF.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_PROTOTYPE__: {
-      __tmp__AFBD=((__ITM_PROTOTYPE *)e__GFHC)->parent_itm_constant__TUF.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
+      __tmp__OIBD=((__ITM_PROTOTYPE *)e__UIHC)->parent_itm_constant__XXF.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_LIST_IDF__: {
-      __tmp__AFBD=((__ITM_LIST_IDF *)e__GFHC)->parent_itm_code__DBJ.parent_itm_object__OBE.position__0BJ;
+      __tmp__OIBD=((__ITM_LIST_IDF *)e__UIHC)->parent_itm_code__PEJ.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_WRITE_VALUE__: {
-      __tmp__AFBD=((__ITM_WRITE_VALUE *)e__GFHC)->parent_itm_write__ZBJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
+      __tmp__OIBD=((__ITM_WRITE_VALUE *)e__UIHC)->parent_itm_write__FFJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_WRITE_CAST__: {
-      __tmp__AFBD=((__ITM_WRITE_CAST *)e__GFHC)->parent_itm_write__QCJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
+      __tmp__OIBD=((__ITM_WRITE_CAST *)e__UIHC)->parent_itm_write__2FJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_READ__: {
-      __tmp__AFBD=((__ITM_READ *)e__GFHC)->parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
+      __tmp__OIBD=((__ITM_READ *)e__UIHC)->parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_WRITE_CODE__: {
-      __tmp__AFBD=((__ITM_WRITE_CODE *)e__GFHC)->parent_itm_write__1FJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
+      __tmp__OIBD=((__ITM_WRITE_CODE *)e__UIHC)->parent_itm_write__HJJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_OPERATOR__: {
-      __tmp__AFBD=((__ITM_OPERATOR *)e__GFHC)->parent_itm_code__3CL.parent_itm_object__OBE.position__0BJ;
+      __tmp__OIBD=((__ITM_OPERATOR *)e__UIHC)->parent_itm_code__JGL.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_READ_ARG1__: {
-      __tmp__AFBD=((__ITM_READ_ARG1 *)e__GFHC)->parent_itm_read__DGL.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
+      __tmp__OIBD=((__ITM_READ_ARG1 *)e__UIHC)->parent_itm_read__PJL.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_READ_ARG2__: {
-      __tmp__AFBD=((__ITM_READ_ARG2 *)e__GFHC)->parent_itm_read__QIL.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
+      __tmp__OIBD=((__ITM_READ_ARG2 *)e__UIHC)->parent_itm_read__2LL.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_EXPRESSION__: {
-      __tmp__AFBD=position__GB5B(e__GFHC);
+      __tmp__OIBD=position__SE5B(e__UIHC);
     } break;
     case __ITM_OLD__: {
-      __tmp__AFBD=((__ITM_OLD *)e__GFHC)->parent_itm_code__4ZL.parent_itm_object__OBE.position__0BJ;
+      __tmp__OIBD=((__ITM_OLD *)e__UIHC)->parent_itm_code__K3L.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_EXTERNAL_TYPE__: {
-      __tmp__AFBD=((__ITM_EXTERNAL_TYPE *)e__GFHC)->parent_itm_extern__T1M.parent_itm_code__S1M.parent_itm_object__OBE.position__0BJ;
+      __tmp__OIBD=((__ITM_EXTERNAL_TYPE *)e__UIHC)->parent_itm_extern__54M.parent_itm_code__44M.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_BLOCK__: {
-      __tmp__AFBD=((__ITM_LIST *)((__ITM_BLOCK *)e__GFHC)->list__LMDC)->parent_itm_code__R3E.parent_itm_object__OBE.position__0BJ;
+      __tmp__OIBD=((__ITM_LIST *)((__ITM_BLOCK *)e__UIHC)->list__ZPDC)->parent_itm_code__VAF.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_EXTERNAL__: {
-      __tmp__AFBD=((__ITM_EXTERNAL *)e__GFHC)->parent_itm_extern__YCN.parent_itm_code__S1M.parent_itm_object__OBE.position__0BJ;
+      __tmp__OIBD=((__ITM_EXTERNAL *)e__UIHC)->parent_itm_extern__EGN.parent_itm_code__44M.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_READ_ARGS__: {
-      __tmp__AFBD=((__ITM_READ_ARGS *)e__GFHC)->parent_itm_read__OAO.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
+      __tmp__OIBD=((__ITM_READ_ARGS *)e__UIHC)->parent_itm_read__0DO.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_REAL__: {
-      __tmp__AFBD=((__ITM_REAL *)e__GFHC)->parent_itm_constant__JOO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
+      __tmp__OIBD=((__ITM_REAL *)e__UIHC)->parent_itm_constant__VRO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_NUMBER__: {
-      __tmp__AFBD=((__ITM_NUMBER *)e__GFHC)->parent_itm_constant__1OO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
+      __tmp__OIBD=((__ITM_NUMBER *)e__UIHC)->parent_itm_constant__HSO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_CHARACTER__: {
-      __tmp__AFBD=((__ITM_CHARACTER *)e__GFHC)->parent_itm_constant__NPO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
+      __tmp__OIBD=((__ITM_CHARACTER *)e__UIHC)->parent_itm_constant__ZSO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_STRING__: {
-      __tmp__AFBD=((__ITM_STRING *)e__GFHC)->parent_itm_constant__4PO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
+      __tmp__OIBD=((__ITM_STRING *)e__UIHC)->parent_itm_constant__KTO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
     } break;
     case __ITM_RESULT__: {
-      __tmp__AFBD=position__QIHC(e__GFHC);
+      __tmp__OIBD=position__4LHC(e__UIHC);
     } break;
     };
-    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)));
+    result__VICD=NULL;
+    ptr__WICD=((__POINTER )(NULL));
+    typ_id__1ICD= 0;
+    sz__YICD=((__UINTEGER_32 )sizeof(__ITM_READ_ARG1));
+    if ((sz__YICD ==  0)) {
+      result__VICD=ITM_READ_ARG1__;
+    } else {
+      typ_id__1ICD=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__YICD);
+      if ((typ_id__1ICD == (__INTEGER)(-  1))) {
+        a__KQGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__LQGH=(__UINTEGER_32)((__UINTEGER_32)(sz__YICD + a__KQGH) & (__UINTEGER_32)(~ a__KQGH));
+        ptr_table__RZJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__LQGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__QZJH=((__POINTER )(NULL));
+        result__SZJH=((__POINTER *)ptr_table__RZJH)[ 0];
+        if ((result__SZJH == (void *)NULL)) {
+          result__SZJH=new_lab__FTJ(new_size__LQGH);
+          next__QZJH=(void *)((unsigned long)result__SZJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LQGH)));
+          ((__POINTER *)next__QZJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__RZJH)[ 0]=next__QZJH;
+        } else {
+          next__QZJH=((__POINTER *)result__SZJH)[ 0];
+          if ((next__QZJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__SZJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__LQGH <<  1)) <=  4096)) {
+              next__QZJH=(void *)((unsigned long)result__SZJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LQGH)));
             } else {
-              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)));
+              next__QZJH=new_lab__FTJ(new_size__LQGH);
+            };
+            ((__POINTER *)next__QZJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__RZJH)[ 0]=next__QZJH;
+          } else {
+            ((__POINTER *)result__SZJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QZJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__SZJH=next__QZJH;
+          };
+        };
+        ptr__WICD=result__SZJH;
+      } else {
+        t__PQGH=((__UINTEGER_32 )typ_id__1ICD);
+        a__OQGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__ZZJH=(__UINTEGER_32)((__UINTEGER_32)(sz__YICD + a__OQGH) & (__UINTEGER_32)(~ a__OQGH));
+        ptr_table__WZJH=((__POINTER )(&(table_type[(t__PQGH)])));
+        lab_type__YZJH=(__UINTEGER_32)(t__PQGH |  1);
+        next__VZJH=((__POINTER )(NULL));
+        result__XZJH=((__POINTER *)ptr_table__WZJH)[ 0];
+        if ((result__XZJH == (void *)NULL)) {
+          result__XZJH=new_lab__FTJ(lab_type__YZJH);
+          next__VZJH=(void *)((unsigned long)result__XZJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZZJH)));
+          ((__POINTER *)next__VZJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__WZJH)[ 0]=next__VZJH;
+        } else {
+          next__VZJH=((__POINTER *)result__XZJH)[ 0];
+          if ((next__VZJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XZJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__ZZJH <<  1)) <=  4096)) {
+              next__VZJH=(void *)((unsigned long)result__XZJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZZJH)));
             } else {
-              next__WRJH=new_lab__ZPJ(lab_type__ZRJH);
+              next__VZJH=new_lab__FTJ(lab_type__YZJH);
             };
-            ((__POINTER *)next__WRJH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__XRJH)[ 0]=next__WRJH;
+            ((__POINTER *)next__VZJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__WZJH)[ 0]=next__VZJH;
           } else {
-            ((__POINTER *)result__YRJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WRJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__YRJH=next__WRJH;
+            ((__POINTER *)result__XZJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VZJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__XZJH=next__VZJH;
           };
         };
-        ptr__IFCD=result__YRJH;
+        ptr__WICD=result__XZJH;
       };
-      result__HFCD=((__ITM_READ_ARG1 *)ptr__IFCD);
-      *(result__HFCD) = *(ITM_READ_ARG1__);
+      result__VICD=((__ITM_READ_ARG1 *)ptr__WICD);
+      *(result__VICD) = *(ITM_READ_ARG1__);
     };
-    ((__ITM_READ_ARG1 *)result__HFCD)->parent_itm_read__DGL.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ=__tmp__AFBD;
+    ((__ITM_READ_ARG1 *)result__VICD)->parent_itm_read__PJL.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ=__tmp__OIBD;
   };
 }
 
-static __POSITION position__GB5B(__ITM_EXPRESSION *Self__HB5B)
+static __POSITION position__SE5B(__ITM_EXPRESSION *Self__TE5B)
 // ({ITM_EXPRESSION}) With resultRecursive, No inlinable.
 {
-  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) {
+  void *__tmp__WE5B;
+  __POSITION __tmp__XE5B;
+  __tmp__WE5B=((void **)((__FAST_ARRAYoITM_CODEo *)Self__TE5B->value_list__DKV)->parent_arrayed_collection__MVF.storage__S0T)[ 0];
+  switch (((struct ___OBJ *)__tmp__WE5B)->__id) {
   case __ITM_LIST__: {
-    __tmp__LB5B=((__ITM_LIST *)__tmp__KB5B)->parent_itm_code__R3E.parent_itm_object__OBE.position__0BJ;
+    __tmp__XE5B=((__ITM_LIST *)__tmp__WE5B)->parent_itm_code__VAF.parent_itm_object__SEE.position__GFJ;
   } break;
   case __ITM_LDOTS__: {
-    __tmp__LB5B=((__ITM_LDOTS *)__tmp__KB5B)->parent_itm_constant__HTF.parent_itm_object__OBE.position__0BJ;
+    __tmp__XE5B=((__ITM_LDOTS *)__tmp__WE5B)->parent_itm_constant__LWF.parent_itm_object__SEE.position__GFJ;
   } break;
   case __ITM_PROTOTYPE__: {
-    __tmp__LB5B=((__ITM_PROTOTYPE *)__tmp__KB5B)->parent_itm_constant__TUF.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
+    __tmp__XE5B=((__ITM_PROTOTYPE *)__tmp__WE5B)->parent_itm_constant__XXF.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
   } break;
   case __ITM_LIST_IDF__: {
-    __tmp__LB5B=((__ITM_LIST_IDF *)__tmp__KB5B)->parent_itm_code__DBJ.parent_itm_object__OBE.position__0BJ;
+    __tmp__XE5B=((__ITM_LIST_IDF *)__tmp__WE5B)->parent_itm_code__PEJ.parent_itm_object__SEE.position__GFJ;
   } break;
   case __ITM_WRITE_VALUE__: {
-    __tmp__LB5B=((__ITM_WRITE_VALUE *)__tmp__KB5B)->parent_itm_write__ZBJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
+    __tmp__XE5B=((__ITM_WRITE_VALUE *)__tmp__WE5B)->parent_itm_write__FFJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
   } break;
   case __ITM_WRITE_CAST__: {
-    __tmp__LB5B=((__ITM_WRITE_CAST *)__tmp__KB5B)->parent_itm_write__QCJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
+    __tmp__XE5B=((__ITM_WRITE_CAST *)__tmp__WE5B)->parent_itm_write__2FJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
   } break;
   case __ITM_READ__: {
-    __tmp__LB5B=((__ITM_READ *)__tmp__KB5B)->parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
+    __tmp__XE5B=((__ITM_READ *)__tmp__WE5B)->parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
   } break;
   case __ITM_WRITE_CODE__: {
-    __tmp__LB5B=((__ITM_WRITE_CODE *)__tmp__KB5B)->parent_itm_write__1FJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
+    __tmp__XE5B=((__ITM_WRITE_CODE *)__tmp__WE5B)->parent_itm_write__HJJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
   } break;
   case __ITM_OPERATOR__: {
-    __tmp__LB5B=((__ITM_OPERATOR *)__tmp__KB5B)->parent_itm_code__3CL.parent_itm_object__OBE.position__0BJ;
+    __tmp__XE5B=((__ITM_OPERATOR *)__tmp__WE5B)->parent_itm_code__JGL.parent_itm_object__SEE.position__GFJ;
   } break;
   case __ITM_READ_ARG1__: {
-    __tmp__LB5B=((__ITM_READ_ARG1 *)__tmp__KB5B)->parent_itm_read__DGL.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
+    __tmp__XE5B=((__ITM_READ_ARG1 *)__tmp__WE5B)->parent_itm_read__PJL.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
   } break;
   case __ITM_READ_ARG2__: {
-    __tmp__LB5B=((__ITM_READ_ARG2 *)__tmp__KB5B)->parent_itm_read__QIL.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
+    __tmp__XE5B=((__ITM_READ_ARG2 *)__tmp__WE5B)->parent_itm_read__2LL.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
   } break;
   case __ITM_EXPRESSION__: {
-    __tmp__LB5B=position__GB5B(__tmp__KB5B);
+    __tmp__XE5B=position__SE5B(__tmp__WE5B);
   } break;
   case __ITM_OLD__: {
-    __tmp__LB5B=((__ITM_OLD *)__tmp__KB5B)->parent_itm_code__4ZL.parent_itm_object__OBE.position__0BJ;
+    __tmp__XE5B=((__ITM_OLD *)__tmp__WE5B)->parent_itm_code__K3L.parent_itm_object__SEE.position__GFJ;
   } break;
   case __ITM_EXTERNAL_TYPE__: {
-    __tmp__LB5B=((__ITM_EXTERNAL_TYPE *)__tmp__KB5B)->parent_itm_extern__T1M.parent_itm_code__S1M.parent_itm_object__OBE.position__0BJ;
+    __tmp__XE5B=((__ITM_EXTERNAL_TYPE *)__tmp__WE5B)->parent_itm_extern__54M.parent_itm_code__44M.parent_itm_object__SEE.position__GFJ;
   } break;
   case __ITM_BLOCK__: {
-    __tmp__LB5B=((__ITM_LIST *)((__ITM_BLOCK *)__tmp__KB5B)->list__LMDC)->parent_itm_code__R3E.parent_itm_object__OBE.position__0BJ;
+    __tmp__XE5B=((__ITM_LIST *)((__ITM_BLOCK *)__tmp__WE5B)->list__ZPDC)->parent_itm_code__VAF.parent_itm_object__SEE.position__GFJ;
   } break;
   case __ITM_EXTERNAL__: {
-    __tmp__LB5B=((__ITM_EXTERNAL *)__tmp__KB5B)->parent_itm_extern__YCN.parent_itm_code__S1M.parent_itm_object__OBE.position__0BJ;
+    __tmp__XE5B=((__ITM_EXTERNAL *)__tmp__WE5B)->parent_itm_extern__EGN.parent_itm_code__44M.parent_itm_object__SEE.position__GFJ;
   } break;
   case __ITM_READ_ARGS__: {
-    __tmp__LB5B=((__ITM_READ_ARGS *)__tmp__KB5B)->parent_itm_read__OAO.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
+    __tmp__XE5B=((__ITM_READ_ARGS *)__tmp__WE5B)->parent_itm_read__0DO.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
   } break;
   case __ITM_REAL__: {
-    __tmp__LB5B=((__ITM_REAL *)__tmp__KB5B)->parent_itm_constant__JOO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
+    __tmp__XE5B=((__ITM_REAL *)__tmp__WE5B)->parent_itm_constant__VRO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
   } break;
   case __ITM_NUMBER__: {
-    __tmp__LB5B=((__ITM_NUMBER *)__tmp__KB5B)->parent_itm_constant__1OO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
+    __tmp__XE5B=((__ITM_NUMBER *)__tmp__WE5B)->parent_itm_constant__HSO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
   } break;
   case __ITM_CHARACTER__: {
-    __tmp__LB5B=((__ITM_CHARACTER *)__tmp__KB5B)->parent_itm_constant__NPO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
+    __tmp__XE5B=((__ITM_CHARACTER *)__tmp__WE5B)->parent_itm_constant__ZSO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
   } break;
   case __ITM_STRING__: {
-    __tmp__LB5B=((__ITM_STRING *)__tmp__KB5B)->parent_itm_constant__4PO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
+    __tmp__XE5B=((__ITM_STRING *)__tmp__WE5B)->parent_itm_constant__KTO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
   } break;
   case __ITM_RESULT__: {
-    __tmp__LB5B=position__QIHC(__tmp__KB5B);
+    __tmp__XE5B=position__4LHC(__tmp__WE5B);
   } break;
   };
-  return(__tmp__LB5B);
+  return(__tmp__XE5B);
 }
 
-static __POSITION position__QIHC(__ITM_RESULT *Self__RIHC)
+static __POSITION position__4LHC(__ITM_RESULT *Self__5LHC)
 // ({ITM_RESULT}) With resultRecursive, No inlinable.
 {
-  void *__tmp__TIHC;
-  __POSITION __tmp__UIHC;
-  __tmp__TIHC=Self__RIHC->value__XKFC;
-  switch (((struct ___OBJ *)__tmp__TIHC)->__id) {
+  void *__tmp__BMHC;
+  __POSITION __tmp__CMHC;
+  __tmp__BMHC=Self__5LHC->value__FOFC;
+  switch (((struct ___OBJ *)__tmp__BMHC)->__id) {
   case __ITM_LIST__: {
-    __tmp__UIHC=((__ITM_LIST *)__tmp__TIHC)->parent_itm_code__R3E.parent_itm_object__OBE.position__0BJ;
+    __tmp__CMHC=((__ITM_LIST *)__tmp__BMHC)->parent_itm_code__VAF.parent_itm_object__SEE.position__GFJ;
   } break;
   case __ITM_LDOTS__: {
-    __tmp__UIHC=((__ITM_LDOTS *)__tmp__TIHC)->parent_itm_constant__HTF.parent_itm_object__OBE.position__0BJ;
+    __tmp__CMHC=((__ITM_LDOTS *)__tmp__BMHC)->parent_itm_constant__LWF.parent_itm_object__SEE.position__GFJ;
   } break;
   case __ITM_PROTOTYPE__: {
-    __tmp__UIHC=((__ITM_PROTOTYPE *)__tmp__TIHC)->parent_itm_constant__TUF.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
+    __tmp__CMHC=((__ITM_PROTOTYPE *)__tmp__BMHC)->parent_itm_constant__XXF.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
   } break;
   case __ITM_LIST_IDF__: {
-    __tmp__UIHC=((__ITM_LIST_IDF *)__tmp__TIHC)->parent_itm_code__DBJ.parent_itm_object__OBE.position__0BJ;
+    __tmp__CMHC=((__ITM_LIST_IDF *)__tmp__BMHC)->parent_itm_code__PEJ.parent_itm_object__SEE.position__GFJ;
   } break;
   case __ITM_WRITE_VALUE__: {
-    __tmp__UIHC=((__ITM_WRITE_VALUE *)__tmp__TIHC)->parent_itm_write__ZBJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
+    __tmp__CMHC=((__ITM_WRITE_VALUE *)__tmp__BMHC)->parent_itm_write__FFJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
   } break;
   case __ITM_WRITE_CAST__: {
-    __tmp__UIHC=((__ITM_WRITE_CAST *)__tmp__TIHC)->parent_itm_write__QCJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
+    __tmp__CMHC=((__ITM_WRITE_CAST *)__tmp__BMHC)->parent_itm_write__2FJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
   } break;
   case __ITM_READ__: {
-    __tmp__UIHC=((__ITM_READ *)__tmp__TIHC)->parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
+    __tmp__CMHC=((__ITM_READ *)__tmp__BMHC)->parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
   } break;
   case __ITM_WRITE_CODE__: {
-    __tmp__UIHC=((__ITM_WRITE_CODE *)__tmp__TIHC)->parent_itm_write__1FJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
+    __tmp__CMHC=((__ITM_WRITE_CODE *)__tmp__BMHC)->parent_itm_write__HJJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
   } break;
   case __ITM_OPERATOR__: {
-    __tmp__UIHC=((__ITM_OPERATOR *)__tmp__TIHC)->parent_itm_code__3CL.parent_itm_object__OBE.position__0BJ;
+    __tmp__CMHC=((__ITM_OPERATOR *)__tmp__BMHC)->parent_itm_code__JGL.parent_itm_object__SEE.position__GFJ;
   } break;
   case __ITM_READ_ARG1__: {
-    __tmp__UIHC=((__ITM_READ_ARG1 *)__tmp__TIHC)->parent_itm_read__DGL.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
+    __tmp__CMHC=((__ITM_READ_ARG1 *)__tmp__BMHC)->parent_itm_read__PJL.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
   } break;
   case __ITM_READ_ARG2__: {
-    __tmp__UIHC=((__ITM_READ_ARG2 *)__tmp__TIHC)->parent_itm_read__QIL.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
+    __tmp__CMHC=((__ITM_READ_ARG2 *)__tmp__BMHC)->parent_itm_read__2LL.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
   } break;
   case __ITM_EXPRESSION__: {
-    __tmp__UIHC=position__GB5B(__tmp__TIHC);
+    __tmp__CMHC=position__SE5B(__tmp__BMHC);
   } break;
   case __ITM_OLD__: {
-    __tmp__UIHC=((__ITM_OLD *)__tmp__TIHC)->parent_itm_code__4ZL.parent_itm_object__OBE.position__0BJ;
+    __tmp__CMHC=((__ITM_OLD *)__tmp__BMHC)->parent_itm_code__K3L.parent_itm_object__SEE.position__GFJ;
   } break;
   case __ITM_EXTERNAL_TYPE__: {
-    __tmp__UIHC=((__ITM_EXTERNAL_TYPE *)__tmp__TIHC)->parent_itm_extern__T1M.parent_itm_code__S1M.parent_itm_object__OBE.position__0BJ;
+    __tmp__CMHC=((__ITM_EXTERNAL_TYPE *)__tmp__BMHC)->parent_itm_extern__54M.parent_itm_code__44M.parent_itm_object__SEE.position__GFJ;
   } break;
   case __ITM_BLOCK__: {
-    __tmp__UIHC=((__ITM_LIST *)((__ITM_BLOCK *)__tmp__TIHC)->list__LMDC)->parent_itm_code__R3E.parent_itm_object__OBE.position__0BJ;
+    __tmp__CMHC=((__ITM_LIST *)((__ITM_BLOCK *)__tmp__BMHC)->list__ZPDC)->parent_itm_code__VAF.parent_itm_object__SEE.position__GFJ;
   } break;
   case __ITM_EXTERNAL__: {
-    __tmp__UIHC=((__ITM_EXTERNAL *)__tmp__TIHC)->parent_itm_extern__YCN.parent_itm_code__S1M.parent_itm_object__OBE.position__0BJ;
+    __tmp__CMHC=((__ITM_EXTERNAL *)__tmp__BMHC)->parent_itm_extern__EGN.parent_itm_code__44M.parent_itm_object__SEE.position__GFJ;
   } break;
   case __ITM_READ_ARGS__: {
-    __tmp__UIHC=((__ITM_READ_ARGS *)__tmp__TIHC)->parent_itm_read__OAO.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
+    __tmp__CMHC=((__ITM_READ_ARGS *)__tmp__BMHC)->parent_itm_read__0DO.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
   } break;
   case __ITM_REAL__: {
-    __tmp__UIHC=((__ITM_REAL *)__tmp__TIHC)->parent_itm_constant__JOO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
+    __tmp__CMHC=((__ITM_REAL *)__tmp__BMHC)->parent_itm_constant__VRO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
   } break;
   case __ITM_NUMBER__: {
-    __tmp__UIHC=((__ITM_NUMBER *)__tmp__TIHC)->parent_itm_constant__1OO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
+    __tmp__CMHC=((__ITM_NUMBER *)__tmp__BMHC)->parent_itm_constant__HSO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
   } break;
   case __ITM_CHARACTER__: {
-    __tmp__UIHC=((__ITM_CHARACTER *)__tmp__TIHC)->parent_itm_constant__NPO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
+    __tmp__CMHC=((__ITM_CHARACTER *)__tmp__BMHC)->parent_itm_constant__ZSO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
   } break;
   case __ITM_STRING__: {
-    __tmp__UIHC=((__ITM_STRING *)__tmp__TIHC)->parent_itm_constant__4PO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
+    __tmp__CMHC=((__ITM_STRING *)__tmp__BMHC)->parent_itm_constant__KTO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
   } break;
   case __ITM_RESULT__: {
-    __tmp__UIHC=position__QIHC(__tmp__TIHC);
+    __tmp__CMHC=position__4LHC(__tmp__BMHC);
   } break;
   };
-  return(__tmp__UIHC);
+  return(__tmp__CMHC);
 }
 
-static void fast_put__to__MNGC(__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *Self__NNGC,void *v__ONGC,void *k__PNGC)
+static void fast_put__to__0QGC(__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *Self__1QGC,void *v__2QGC,void *k__3QGC)
 // ({HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo},{NULLxITM_SLOTxITM_SLOT_OPERATOR},{NULLxSTRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __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)));
+  __STRING_CONSTANT *Self__KIIH,*Self__PIIH;
+  __INTEGER result__JIIH,__tmp__LIIH,Self__MIIH,idx__FRGC,idx__URID;
+  __INTEGER new_capacity__VRID,i__WRID,result__OIIH,__tmp__QIIH;
+  __INTEGER Self__RIIH,typ_id__DUID;
+  __POINTER ptr__4TID,ptr_table__1ZJH,next__0ZJH,result__2ZJH;
+  __POINTER ptr_table__A0JH,next__5ZJH,result__B0JH;
+  __UINTEGER_32 sz__AUID,a__0PGH,new_size__1PGH,t__5PGH,a__4PGH;
+  __UINTEGER_32 new_size__D0JH,lab_type__C0JH;
+  void *node__GRGC,*node1__YRID,*node2__ZRID,*__tmp__USGC;
+  void **old_buckets__XRID;
+  __HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *result__3TID;
+  __HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *Self__4GTD;
+  Self__KIIH=((__STRING_CONSTANT *)k__3QGC);
+  result__JIIH= 0;
+  __tmp__LIIH=Self__KIIH->count__DD;
+  Self__MIIH= 1;
+  while ((Self__MIIH <= __tmp__LIIH)) {
+    result__JIIH=(__INTEGER)((__INTEGER)( 5 * result__JIIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__KIIH->storage__FRO)[(__INTEGER)(Self__MIIH -  1)])));
+    Self__MIIH=(__INTEGER)(Self__MIIH +  1);
+  };
+  if ((result__JIIH <  0)) {
+    result__JIIH=(__INTEGER)(~ result__JIIH);
+  };
+  idx__FRGC=(__INTEGER)(result__JIIH % Self__1QGC->capacity__FBCC);
+  node__GRGC=((void **)Self__1QGC->buckets__2DGC)[idx__FRGC];
+  while ((! (((void *)node__GRGC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node__GRGC)->key__IEGC == (void *)k__3QGC)))) {
+    node__GRGC=((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node__GRGC)->next__TEGC;
+  };
+  if (((void *)node__GRGC == (void *)NULL)) {
+    if ((Self__1QGC->capacity__FBCC == Self__1QGC->count__HSGC)) {
+      idx__URID= 0;
+      node1__YRID=NULL;
+      node2__ZRID=NULL;
+      old_buckets__XRID=Self__1QGC->buckets__2DGC;
+      new_capacity__VRID=prime_number_ceiling__541((__INTEGER)(Self__1QGC->capacity__FBCC +  1));
+      Self__1QGC->buckets__2DGC=create__VUSC(new_capacity__VRID);
+      i__WRID=(__INTEGER)(Self__1QGC->capacity__FBCC -  1);
+      Self__1QGC->capacity__FBCC=new_capacity__VRID;
+      while ((i__WRID >=  0)) {
+        node1__YRID=((void **)old_buckets__XRID)[i__WRID];
+        while (((void *)node1__YRID != (void *)NULL)) {
+          node2__ZRID=((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node1__YRID)->next__TEGC;
+          Self__PIIH=((__STRING_CONSTANT *)((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node1__YRID)->key__IEGC);
+          result__OIIH= 0;
+          __tmp__QIIH=Self__PIIH->count__DD;
+          Self__RIIH= 1;
+          while ((Self__RIIH <= __tmp__QIIH)) {
+            result__OIIH=(__INTEGER)((__INTEGER)( 5 * result__OIIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__PIIH->storage__FRO)[(__INTEGER)(Self__RIIH -  1)])));
+            Self__RIIH=(__INTEGER)(Self__RIIH +  1);
+          };
+          if ((result__OIIH <  0)) {
+            result__OIIH=(__INTEGER)(~ result__OIIH);
+          };
+          idx__URID=(__INTEGER)(result__OIIH % Self__1QGC->capacity__FBCC);
+          ((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node1__YRID)->next__TEGC=((void **)Self__1QGC->buckets__2DGC)[idx__URID];
+          ((void **)Self__1QGC->buckets__2DGC)[idx__URID]=node1__YRID;
+          node1__YRID=node2__ZRID;
+        };
+        i__WRID=(__INTEGER)(i__WRID -  1);
+      };
+      idx__FRGC=(__INTEGER)(result__JIIH % new_capacity__VRID);
+    };
+    __tmp__USGC=((void **)Self__1QGC->buckets__2DGC)[idx__FRGC];
+    result__3TID=NULL;
+    ptr__4TID=((__POINTER )(NULL));
+    typ_id__DUID= 0;
+    sz__AUID=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo));
+    if ((sz__AUID ==  0)) {
+      result__3TID=HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__;
+    } else {
+      typ_id__DUID=__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__AUID);
+      if ((typ_id__DUID == (__INTEGER)(-  1))) {
+        a__0PGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__1PGH=(__UINTEGER_32)((__UINTEGER_32)(sz__AUID + a__0PGH) & (__UINTEGER_32)(~ a__0PGH));
+        ptr_table__1ZJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__1PGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__0ZJH=((__POINTER )(NULL));
+        result__2ZJH=((__POINTER *)ptr_table__1ZJH)[ 0];
+        if ((result__2ZJH == (void *)NULL)) {
+          result__2ZJH=new_lab__FTJ(new_size__1PGH);
+          next__0ZJH=(void *)((unsigned long)result__2ZJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1PGH)));
+          ((__POINTER *)next__0ZJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__1ZJH)[ 0]=next__0ZJH;
+        } else {
+          next__0ZJH=((__POINTER *)result__2ZJH)[ 0];
+          if ((next__0ZJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2ZJH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__1PGH <<  1)) <=  4096)) {
+              next__0ZJH=(void *)((unsigned long)result__2ZJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1PGH)));
             } else {
-              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)));
+              next__0ZJH=new_lab__FTJ(new_size__1PGH);
+            };
+            ((__POINTER *)next__0ZJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__1ZJH)[ 0]=next__0ZJH;
+          } else {
+            ((__POINTER *)result__2ZJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0ZJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__2ZJH=next__0ZJH;
+          };
+        };
+        ptr__4TID=result__2ZJH;
+      } else {
+        t__5PGH=((__UINTEGER_32 )typ_id__DUID);
+        a__4PGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__D0JH=(__UINTEGER_32)((__UINTEGER_32)(sz__AUID + a__4PGH) & (__UINTEGER_32)(~ a__4PGH));
+        ptr_table__A0JH=((__POINTER )(&(table_type[(t__5PGH)])));
+        lab_type__C0JH=(__UINTEGER_32)(t__5PGH |  1);
+        next__5ZJH=((__POINTER )(NULL));
+        result__B0JH=((__POINTER *)ptr_table__A0JH)[ 0];
+        if ((result__B0JH == (void *)NULL)) {
+          result__B0JH=new_lab__FTJ(lab_type__C0JH);
+          next__5ZJH=(void *)((unsigned long)result__B0JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__D0JH)));
+          ((__POINTER *)next__5ZJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__A0JH)[ 0]=next__5ZJH;
+        } else {
+          next__5ZJH=((__POINTER *)result__B0JH)[ 0];
+          if ((next__5ZJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__B0JH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__D0JH <<  1)) <=  4096)) {
+              next__5ZJH=(void *)((unsigned long)result__B0JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__D0JH)));
             } else {
-              next__ASJH=new_lab__ZPJ(lab_type__DSJH);
+              next__5ZJH=new_lab__FTJ(lab_type__C0JH);
             };
-            ((__POINTER *)next__ASJH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__BSJH)[ 0]=next__ASJH;
+            ((__POINTER *)next__5ZJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__A0JH)[ 0]=next__5ZJH;
           } else {
-            ((__POINTER *)result__CSJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ASJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__CSJH=next__ASJH;
+            ((__POINTER *)result__B0JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5ZJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__B0JH=next__5ZJH;
           };
         };
-        ptr__QQID=result__CSJH;
+        ptr__4TID=result__B0JH;
       };
-      result__PQID=((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)ptr__QQID);
-      *(result__PQID) = *(HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__);
+      result__3TID=((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)ptr__4TID);
+      *(result__3TID) = *(HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__);
     };
-    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);
+    Self__4GTD=((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)result__3TID);
+    Self__4GTD->item__1EGC=v__2QGC;
+    Self__4GTD->key__IEGC=k__3QGC;
+    Self__4GTD->next__TEGC=__tmp__USGC;
+    node__GRGC=result__3TID;
+    ((void **)Self__1QGC->buckets__2DGC)[idx__FRGC]=result__3TID;
+    Self__1QGC->count__HSGC=(__INTEGER)(Self__1QGC->count__HSGC +  1);
   } else {
-    ((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node__YNGC)->item__NBGC=v__ONGC;
+    ((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node__GRGC)->item__1EGC=v__2QGC;
   };
 }
 
-static void* fast_reference_at__15FC(__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *Self__25FC,void *k__35FC)
+static void* fast_reference_at__JDGC(__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *Self__KDGC,void *k__LDGC)
 // ({HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  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);
+  void *result__WDGC;
+  __STRING_CONSTANT *Self__UIIH;
+  __INTEGER result__TIIH,__tmp__VIIH,Self__WIIH;
+  void *node__VDGC;
+  result__WDGC=NULL;
+  Self__UIIH=((__STRING_CONSTANT *)k__LDGC);
+  result__TIIH= 0;
+  __tmp__VIIH=Self__UIIH->count__DD;
+  Self__WIIH= 1;
+  while ((Self__WIIH <= __tmp__VIIH)) {
+    result__TIIH=(__INTEGER)((__INTEGER)( 5 * result__TIIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__UIIH->storage__FRO)[(__INTEGER)(Self__WIIH -  1)])));
+    Self__WIIH=(__INTEGER)(Self__WIIH +  1);
+  };
+  if ((result__TIIH <  0)) {
+    result__TIIH=(__INTEGER)(~ result__TIIH);
+  };
+  node__VDGC=((void **)Self__KDGC->buckets__2DGC)[(__INTEGER)(result__TIIH % Self__KDGC->capacity__FBCC)];
+  while ((! (((void *)node__VDGC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node__VDGC)->key__IEGC == (void *)k__LDGC)))) {
+    node__VDGC=((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node__VDGC)->next__TEGC;
+  };
+  if (((void *)node__VDGC != (void *)NULL)) {
+    result__WDGC=((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node__VDGC)->item__1EGC;
+  };
+  return(result__WDGC);
 }
 
-static void* fast_reference_at__LHNE(__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__MHNE,void *k__NHNE)
+static void* fast_reference_at__TLNE(__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__ULNE,void *k__VLNE)
 // ({HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __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);
+  __STRING_CONSTANT *Self__ZIIH;
+  __INTEGER result__YIIH,__tmp__0IIH,Self__1IIH;
+  void *result__5LNE;
+  void *node__4LNE;
+  result__5LNE=NULL;
+  Self__ZIIH=((__STRING_CONSTANT *)k__VLNE);
+  result__YIIH= 0;
+  __tmp__0IIH=Self__ZIIH->count__DD;
+  Self__1IIH= 1;
+  while ((Self__1IIH <= __tmp__0IIH)) {
+    result__YIIH=(__INTEGER)((__INTEGER)( 5 * result__YIIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__ZIIH->storage__FRO)[(__INTEGER)(Self__1IIH -  1)])));
+    Self__1IIH=(__INTEGER)(Self__1IIH +  1);
+  };
+  if ((result__YIIH <  0)) {
+    result__YIIH=(__INTEGER)(~ result__YIIH);
+  };
+  node__4LNE=((void **)Self__ULNE->buckets__PDT)[(__INTEGER)(result__YIIH % Self__ULNE->capacity__KDT)];
+  while ((! (((void *)node__4LNE == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__4LNE)->key__1DT == (void *)k__VLNE)))) {
+    node__4LNE=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__4LNE)->next__GET;
+  };
+  if (((void *)node__4LNE != (void *)NULL)) {
+    result__5LNE=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__4LNE)->item__PY3;
+  };
+  return(result__5LNE);
 }
 
-static void append_in__0EPD(__ITM_TYPE_BLOCK *Self__1EPD,void *buffer__2EPD)
+static void append_in__IIPD(__ITM_TYPE_BLOCK *Self__JIPD,void *buffer__KIPD)
 // ({ITM_TYPE_BLOCK},{NULLxSTRING}) VoidRecursive, No inlinable.
 {
-  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) {
+  void *typ_mul__LIPD,*__tmp__3IPD;
+  void *__tmp__SIPD,*__tmp__2IPD,*__tmp__DJPD;
+  __ITM_TYPE_STYLE *Self__XQGH,*Self__ZQGH;
+  typ_mul__LIPD=NULL;
+  add_last__GOT(buffer__KIPD,'{');
+  if (((void *)Self__JIPD->type_argument__GNN != (void *)NULL)) {
+    __tmp__SIPD=Self__JIPD->type_argument__GNN;
+    switch (((struct ___OBJ *)__tmp__SIPD)->__id) {
     case __ITM_TYPE_PARAMETER__: {
-      append__FLS(buffer__2EPD,((__ITM_TYPE_PARAMETER *)__tmp__EFPD)->parent_itm_type__UBE.name__OVP);
+      append__ROS(buffer__KIPD,((__ITM_TYPE_PARAMETER *)__tmp__SIPD)->parent_itm_type__YEE.name__0YP);
     } break;
     case __ITM_TYPE_SIMPLE__: {
-      append__FLS(buffer__2EPD,((__ITM_TYPE_SIMPLE *)__tmp__EFPD)->name__OVP);
+      append__ROS(buffer__KIPD,((__ITM_TYPE_SIMPLE *)__tmp__SIPD)->name__0YP);
     } break;
     case __ITM_TYPE_MULTI__: {
-      append_in__NHBC(__tmp__EFPD,buffer__2EPD);
+      append_in__1KBC(__tmp__SIPD,buffer__KIPD);
     } break;
     case __ITM_TYPE_BLOCK__: {
-      append_in__0EPD(__tmp__EFPD,buffer__2EPD);
+      append_in__IIPD(__tmp__SIPD,buffer__KIPD);
     } break;
     case __ITM_TYPE_GENERIC__: {
-      append_in__4FPD(__tmp__EFPD,buffer__2EPD);
+      append_in__MJPD(__tmp__SIPD,buffer__KIPD);
     } break;
     case __ITM_TYPE_STYLE__: {
-      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,' ');
+      Self__XQGH=((__ITM_TYPE_STYLE *)__tmp__SIPD);
+      if (((void *)Self__XQGH->style__DZP != (void *)NULL)) {
+        append__ROS(buffer__KIPD,Self__XQGH->style__DZP);
+        add_last__GOT(buffer__KIPD,' ');
       };
-      append__FLS(buffer__2EPD,Self__2JGH->parent_itm_type_simple__FPN.name__OVP);
+      append__ROS(buffer__KIPD,Self__XQGH->parent_itm_type_simple__RSN.name__0YP);
     } break;
     };
-    add_last__3IT(buffer__2EPD,';');
-    add_last__3IT(buffer__2EPD,' ');
+    add_last__GOT(buffer__KIPD,';');
+    add_last__GOT(buffer__KIPD,' ');
   };
-  if (((void *)Self__1EPD->type_result__EKN != (void *)NULL)) {
-    __tmp__OFPD=Self__1EPD->type_result__EKN;
-    if (__tmp__OFPD==NULL) {
-      __tmp__PFPD=NULL;
+  if (((void *)Self__JIPD->type_result__QNN != (void *)NULL)) {
+    __tmp__2IPD=Self__JIPD->type_result__QNN;
+    if (__tmp__2IPD==NULL) {
+      __tmp__3IPD=NULL;
     } else {
-      switch (((struct ___OBJ *)__tmp__OFPD)->__id) {
+      switch (((struct ___OBJ *)__tmp__2IPD)->__id) {
       case __ITM_TYPE_PARAMETER__: {
-        __tmp__PFPD=NULL;
+        __tmp__3IPD=NULL;
       } break;
       case __ITM_TYPE_SIMPLE__: {
-        __tmp__PFPD=NULL;
+        __tmp__3IPD=NULL;
       } break;
       case __ITM_TYPE_MULTI__: {
-        __tmp__PFPD=((void *)__tmp__OFPD);
+        __tmp__3IPD=((void *)__tmp__2IPD);
       } break;
       case __ITM_TYPE_BLOCK__: {
-        __tmp__PFPD=NULL;
+        __tmp__3IPD=NULL;
       } break;
       case __ITM_TYPE_GENERIC__: {
-        __tmp__PFPD=NULL;
+        __tmp__3IPD=NULL;
       } break;
       case __ITM_TYPE_STYLE__: {
-        __tmp__PFPD=NULL;
+        __tmp__3IPD=NULL;
       } break;
       }
     };
-    typ_mul__3EPD=__tmp__PFPD;
-    if (((void *)__tmp__PFPD == (void *)NULL)) {
-      __tmp__VFPD=Self__1EPD->type_result__EKN;
-      switch (((struct ___OBJ *)__tmp__VFPD)->__id) {
+    typ_mul__LIPD=__tmp__3IPD;
+    if (((void *)__tmp__3IPD == (void *)NULL)) {
+      __tmp__DJPD=Self__JIPD->type_result__QNN;
+      switch (((struct ___OBJ *)__tmp__DJPD)->__id) {
       case __ITM_TYPE_PARAMETER__: {
-        append__FLS(buffer__2EPD,((__ITM_TYPE_PARAMETER *)__tmp__VFPD)->parent_itm_type__UBE.name__OVP);
+        append__ROS(buffer__KIPD,((__ITM_TYPE_PARAMETER *)__tmp__DJPD)->parent_itm_type__YEE.name__0YP);
       } break;
       case __ITM_TYPE_SIMPLE__: {
-        append__FLS(buffer__2EPD,((__ITM_TYPE_SIMPLE *)__tmp__VFPD)->name__OVP);
+        append__ROS(buffer__KIPD,((__ITM_TYPE_SIMPLE *)__tmp__DJPD)->name__0YP);
       } break;
       case __ITM_TYPE_MULTI__: {
-        append_in__NHBC(__tmp__VFPD,buffer__2EPD);
+        append_in__1KBC(__tmp__DJPD,buffer__KIPD);
       } break;
       case __ITM_TYPE_BLOCK__: {
-        append_in__0EPD(__tmp__VFPD,buffer__2EPD);
+        append_in__IIPD(__tmp__DJPD,buffer__KIPD);
       } break;
       case __ITM_TYPE_GENERIC__: {
-        append_in__4FPD(__tmp__VFPD,buffer__2EPD);
+        append_in__MJPD(__tmp__DJPD,buffer__KIPD);
       } break;
       case __ITM_TYPE_STYLE__: {
-        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,' ');
+        Self__ZQGH=((__ITM_TYPE_STYLE *)__tmp__DJPD);
+        if (((void *)Self__ZQGH->style__DZP != (void *)NULL)) {
+          append__ROS(buffer__KIPD,Self__ZQGH->style__DZP);
+          add_last__GOT(buffer__KIPD,' ');
         };
-        append__FLS(buffer__2EPD,Self__4JGH->parent_itm_type_simple__FPN.name__OVP);
+        append__ROS(buffer__KIPD,Self__ZQGH->parent_itm_type_simple__RSN.name__0YP);
       } break;
       };
     } else {
-      display_raw__NLIC(__tmp__PFPD,buffer__2EPD);
+      display_raw__1OIC(__tmp__3IPD,buffer__KIPD);
     };
   };
-  add_last__3IT(buffer__2EPD,'}');
+  add_last__GOT(buffer__KIPD,'}');
 }
 
-static void append_in__4FPD(__ITM_TYPE_GENERIC *Self__5FPD,void *buffer__AGPD)
+static void append_in__MJPD(__ITM_TYPE_GENERIC *Self__NJPD,void *buffer__OJPD)
 // ({ITM_TYPE_GENERIC},{NULLxSTRING}) VoidRecursive, No inlinable.
 {
-  __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) {
+  __INTEGER __tmp__5JPD,Self__R1UD;
+  void *__tmp__GKPD,*__tmp__JKPD;
+  __ITM_TYPE_STYLE *Self__4QGH,*Self__LKPD;
+  __FAST_ARRAYoITM_TYPE_MONOo *Self__PERB;
+  if (((void *)Self__NJPD->parent_itm_type_style__SSN.style__DZP != (void *)NULL)) {
+    append__ROS(buffer__OJPD,Self__NJPD->parent_itm_type_style__SSN.style__DZP);
+    add_last__GOT(buffer__OJPD,' ');
+  };
+  append__ROS(buffer__OJPD,Self__NJPD->parent_itm_type_style__SSN.parent_itm_type_simple__RSN.name__0YP);
+  add_last__GOT(buffer__OJPD,'(');
+  __tmp__5JPD=(__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)Self__NJPD->list_type__NZP)->parent_arrayed_collection__EYC.upper__SIV -  1);
+  Self__R1UD= 0;
+  while ((Self__R1UD <= __tmp__5JPD)) {
+    __tmp__GKPD=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)Self__NJPD->list_type__NZP)->parent_arrayed_collection__EYC.storage__ZMV)[Self__R1UD];
+    switch (((struct ___OBJ *)__tmp__GKPD)->__id) {
     case __ITM_TYPE_PARAMETER__: {
-      append__FLS(buffer__AGPD,((__ITM_TYPE_PARAMETER *)__tmp__YGPD)->parent_itm_type__UBE.name__OVP);
+      append__ROS(buffer__OJPD,((__ITM_TYPE_PARAMETER *)__tmp__GKPD)->parent_itm_type__YEE.name__0YP);
     } break;
     case __ITM_TYPE_SIMPLE__: {
-      append__FLS(buffer__AGPD,((__ITM_TYPE_SIMPLE *)__tmp__YGPD)->name__OVP);
+      append__ROS(buffer__OJPD,((__ITM_TYPE_SIMPLE *)__tmp__GKPD)->name__0YP);
     } break;
     case __ITM_TYPE_BLOCK__: {
-      append_in__0EPD(__tmp__YGPD,buffer__AGPD);
+      append_in__IIPD(__tmp__GKPD,buffer__OJPD);
     } break;
     case __ITM_TYPE_GENERIC__: {
-      append_in__4FPD(__tmp__YGPD,buffer__AGPD);
+      append_in__MJPD(__tmp__GKPD,buffer__OJPD);
     } break;
     case __ITM_TYPE_STYLE__: {
-      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,' ');
+      Self__4QGH=((__ITM_TYPE_STYLE *)__tmp__GKPD);
+      if (((void *)Self__4QGH->style__DZP != (void *)NULL)) {
+        append__ROS(buffer__OJPD,Self__4QGH->style__DZP);
+        add_last__GOT(buffer__OJPD,' ');
       };
-      append__FLS(buffer__AGPD,Self__DKGH->parent_itm_type_simple__FPN.name__OVP);
+      append__ROS(buffer__OJPD,Self__4QGH->parent_itm_type_simple__RSN.name__0YP);
     } break;
     };
-    add_last__3IT(buffer__AGPD,',');
-    Self__DYUD=(__INTEGER)(Self__DYUD +  1);
+    add_last__GOT(buffer__OJPD,',');
+    Self__R1UD=(__INTEGER)(Self__R1UD +  1);
   };
-  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) {
+  Self__PERB=((__FAST_ARRAYoITM_TYPE_MONOo *)Self__NJPD->list_type__NZP);
+  __tmp__JKPD=((void **)Self__PERB->parent_arrayed_collection__EYC.storage__ZMV)[Self__PERB->parent_arrayed_collection__EYC.upper__SIV];
+  switch (((struct ___OBJ *)__tmp__JKPD)->__id) {
   case __ITM_TYPE_PARAMETER__: {
-    append__FLS(buffer__AGPD,((__ITM_TYPE_PARAMETER *)__tmp__1GPD)->parent_itm_type__UBE.name__OVP);
+    append__ROS(buffer__OJPD,((__ITM_TYPE_PARAMETER *)__tmp__JKPD)->parent_itm_type__YEE.name__0YP);
   } break;
   case __ITM_TYPE_SIMPLE__: {
-    append__FLS(buffer__AGPD,((__ITM_TYPE_SIMPLE *)__tmp__1GPD)->name__OVP);
+    append__ROS(buffer__OJPD,((__ITM_TYPE_SIMPLE *)__tmp__JKPD)->name__0YP);
   } break;
   case __ITM_TYPE_BLOCK__: {
-    append_in__0EPD(__tmp__1GPD,buffer__AGPD);
+    append_in__IIPD(__tmp__JKPD,buffer__OJPD);
   } break;
   case __ITM_TYPE_GENERIC__: {
-    append_in__4FPD(__tmp__1GPD,buffer__AGPD);
+    append_in__MJPD(__tmp__JKPD,buffer__OJPD);
   } break;
   case __ITM_TYPE_STYLE__: {
-    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,' ');
+    Self__LKPD=((__ITM_TYPE_STYLE *)__tmp__JKPD);
+    if (((void *)Self__LKPD->style__DZP != (void *)NULL)) {
+      append__ROS(buffer__OJPD,Self__LKPD->style__DZP);
+      add_last__GOT(buffer__OJPD,' ');
     };
-    append__FLS(buffer__AGPD,Self__3GPD->parent_itm_type_simple__FPN.name__OVP);
+    append__ROS(buffer__OJPD,Self__LKPD->parent_itm_type_simple__RSN.name__0YP);
   } break;
   };
-  add_last__3IT(buffer__AGPD,')');
+  add_last__GOT(buffer__OJPD,')');
 }
 
-static void put__to__like__IGBG(void *tok__KGBG,void *buf__LGBG,void *key__MGBG)
+static void put__to__like__PLBG(void *tok__RLBG,void *buf__SLBG,void *key__TLBG)
 // ({NULLxSTRING_CONSTANTxSTRING},{NULLxSTRING},{STRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER __tmp__EMBG,Self__QNHG;
+  void *lst__ULBG;
+  lst__ULBG=NULL;
+  if (((void *)key__TLBG != (void *)NULL)) {
+    lst__ULBG=fast_reference_at__TLNE(short_dico__QD,key__TLBG);
+    if (((void *)lst__ULBG != (void *)NULL)) {
+      __tmp__EMBG=((__LINKED_LISToSTRING_CONSTANTo *)lst__ULBG)->parent_linked_collection__LD.upper__MED;
+      Self__QNHG= 1;
+      while ((Self__QNHG <= __tmp__EMBG)) {
+        if (((void *)item__Q2ND(lst__ULBG,Self__QNHG) == (void *)NULL)) {
+          append__ROS(buf__SLBG,tok__RLBG);
         } else {
-          append__FLS(buf__LGBG,item__CZND(lst__NGBG,Self__JIHG));
+          append__ROS(buf__SLBG,item__Q2ND(lst__ULBG,Self__QNHG));
         };
-        Self__JIHG=(__INTEGER)(Self__JIHG +  1);
+        Self__QNHG=(__INTEGER)(Self__QNHG +  1);
       };
     };
   };
 }
 
-static void shorter_in__JDBG(__ITM_ARG *Self__KDBG,void *buf__LDBG)
+static void shorter_in__QIBG(__ITM_ARG *Self__RIBG,void *buf__SIBG)
 // ({ITM_ARG},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  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));
+  void *__tmp__GJBG;
+  __ITM_TYPE_STYLE *Self__CRGH;
+  if (((void *)Self__RIBG->name__U3HC == (void *)(&__string_58))) {
+    put__to__like__0PGG(Self__RIBG->name__U3HC,buf__SIBG,(&__string_119));
   } else {
-    put__to__like__TKGG(Self__KDBG->name__G0HC,buf__LDBG,(&__string_134));
+    put__to__like__0PGG(Self__RIBG->name__U3HC,buf__SIBG,(&__string_134));
   };
-  add_last__3IT(buf__LDBG,':');
-  __tmp__5DBG=Self__KDBG->type__H0HC;
-  switch (((struct ___OBJ *)__tmp__5DBG)->__id) {
+  add_last__GOT(buf__SIBG,':');
+  __tmp__GJBG=Self__RIBG->type__V3HC;
+  switch (((struct ___OBJ *)__tmp__GJBG)->__id) {
   case __ITM_TYPE_PARAMETER__: {
-    shorter_in__ZMDG(__tmp__5DBG,buf__LDBG);
+    shorter_in__ASDG(__tmp__GJBG,buf__SIBG);
   } break;
   case __ITM_TYPE_SIMPLE__: {
-    shorter_in__KNDG(__tmp__5DBG,buf__LDBG);
+    shorter_in__RSDG(__tmp__GJBG,buf__SIBG);
   } break;
   case __ITM_TYPE_BLOCK__: {
-    shorter_in__1NDG(__tmp__5DBG,buf__LDBG);
+    shorter_in__CTDG(__tmp__GJBG,buf__SIBG);
   } break;
   case __ITM_TYPE_GENERIC__: {
-    shorter_in__DPDG(__tmp__5DBG,buf__LDBG);
+    shorter_in__KUDG(__tmp__GJBG,buf__SIBG);
   } break;
   case __ITM_TYPE_STYLE__: {
-    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,' ');
+    Self__CRGH=((__ITM_TYPE_STYLE *)__tmp__GJBG);
+    if (((void *)Self__CRGH->style__DZP != (void *)NULL)) {
+      put__to__like__OYFG(Self__CRGH->style__DZP,buf__SIBG,(&__string_119));
+      add_last__GOT(buf__SIBG,' ');
     };
-    put__to__like__HTFG(Self__HKGH->parent_itm_type_simple__FPN.name__OVP,buf__LDBG,(&__string_125));
+    put__to__like__OYFG(Self__CRGH->parent_itm_type_simple__RSN.name__0YP,buf__SIBG,(&__string_125));
   } break;
   };
 }
 
-static void shorter_in__AEBG(__ITM_ARGS *Self__BEBG,void *buf__CEBG)
+static void shorter_in__HJBG(__ITM_ARGS *Self__IJBG,void *buf__JJBG)
 // ({ITM_ARGS},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __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) {
+  __INTEGER __tmp__QJBG,Self__BWDG;
+  void *__tmp__PKBG,*__tmp__XKBG;
+  __ITM_TYPE_STYLE *Self__WRGH,*Self__0RGH;
+  __FAST_ARRAYoSTRING_CONSTANTo *Self__YXHH;
+  __FAST_ARRAYoITM_TYPE_MONOo *Self__YRGH;
+  add_last__GOT(buf__JJBG,'(');
+  __tmp__QJBG=(__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)Self__IJBG->name__3BQF)->parent_arrayed_collection__ABJ.upper__VBPD -  1);
+  Self__BWDG= 0;
+  while ((Self__BWDG <= __tmp__QJBG)) {
+    if (((void *)((void **)((__FAST_ARRAYoSTRING_CONSTANTo *)Self__IJBG->name__3BQF)->parent_arrayed_collection__ABJ.storage__LEPD)[Self__BWDG] == (void *)(&__string_58))) {
+      put__to__like__TWDG(((void **)((__FAST_ARRAYoSTRING_CONSTANTo *)Self__IJBG->name__3BQF)->parent_arrayed_collection__ABJ.storage__LEPD)[Self__BWDG],buf__JJBG,(&__string_119));
+    } else {
+      put__to__like__TWDG(((void **)((__FAST_ARRAYoSTRING_CONSTANTo *)Self__IJBG->name__3BQF)->parent_arrayed_collection__ABJ.storage__LEPD)[Self__BWDG],buf__JJBG,(&__string_134));
+    };
+    add_last__GOT(buf__JJBG,':');
+    __tmp__PKBG=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)((__ITM_TYPE_MULTI *)Self__IJBG->type__4BQF)->list_type__QKP)->parent_arrayed_collection__EYC.storage__ZMV)[Self__BWDG];
+    switch (((struct ___OBJ *)__tmp__PKBG)->__id) {
     case __ITM_TYPE_PARAMETER__: {
-      shorter_in__ZMDG(__tmp__IFBG,buf__CEBG);
+      shorter_in__ASDG(__tmp__PKBG,buf__JJBG);
     } break;
     case __ITM_TYPE_SIMPLE__: {
-      shorter_in__KNDG(__tmp__IFBG,buf__CEBG);
+      shorter_in__RSDG(__tmp__PKBG,buf__JJBG);
     } break;
     case __ITM_TYPE_BLOCK__: {
-      shorter_in__1NDG(__tmp__IFBG,buf__CEBG);
+      shorter_in__CTDG(__tmp__PKBG,buf__JJBG);
     } break;
     case __ITM_TYPE_GENERIC__: {
-      shorter_in__DPDG(__tmp__IFBG,buf__CEBG);
+      shorter_in__KUDG(__tmp__PKBG,buf__JJBG);
     } break;
     case __ITM_TYPE_STYLE__: {
-      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,' ');
+      Self__WRGH=((__ITM_TYPE_STYLE *)__tmp__PKBG);
+      if (((void *)Self__WRGH->style__DZP != (void *)NULL)) {
+        put__to__like__OYFG(Self__WRGH->style__DZP,buf__JJBG,(&__string_119));
+        add_last__GOT(buf__JJBG,' ');
       };
-      put__to__like__HTFG(Self__1KGH->parent_itm_type_simple__FPN.name__OVP,buf__CEBG,(&__string_125));
+      put__to__like__OYFG(Self__WRGH->parent_itm_type_simple__RSN.name__0YP,buf__JJBG,(&__string_125));
     } break;
     };
-    add_last__3IT(buf__CEBG,',');
-    Self__0QDG=(__INTEGER)(Self__0QDG +  1);
+    add_last__GOT(buf__JJBG,',');
+    Self__BWDG=(__INTEGER)(Self__BWDG +  1);
   };
-  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) {
+  Self__YXHH=((__FAST_ARRAYoSTRING_CONSTANTo *)Self__IJBG->name__3BQF);
+  put__to__like__TWDG(((void **)Self__YXHH->parent_arrayed_collection__ABJ.storage__LEPD)[Self__YXHH->parent_arrayed_collection__ABJ.upper__VBPD],buf__JJBG,(&__string_134));
+  add_last__GOT(buf__JJBG,':');
+  Self__YRGH=((__FAST_ARRAYoITM_TYPE_MONOo *)((__ITM_TYPE_MULTI *)Self__IJBG->type__4BQF)->list_type__QKP);
+  __tmp__XKBG=((void **)Self__YRGH->parent_arrayed_collection__EYC.storage__ZMV)[Self__YRGH->parent_arrayed_collection__EYC.upper__SIV];
+  switch (((struct ___OBJ *)__tmp__XKBG)->__id) {
   case __ITM_TYPE_PARAMETER__: {
-    shorter_in__ZMDG(__tmp__QFBG,buf__CEBG);
+    shorter_in__ASDG(__tmp__XKBG,buf__JJBG);
   } break;
   case __ITM_TYPE_SIMPLE__: {
-    shorter_in__KNDG(__tmp__QFBG,buf__CEBG);
+    shorter_in__RSDG(__tmp__XKBG,buf__JJBG);
   } break;
   case __ITM_TYPE_BLOCK__: {
-    shorter_in__1NDG(__tmp__QFBG,buf__CEBG);
+    shorter_in__CTDG(__tmp__XKBG,buf__JJBG);
   } break;
   case __ITM_TYPE_GENERIC__: {
-    shorter_in__DPDG(__tmp__QFBG,buf__CEBG);
+    shorter_in__KUDG(__tmp__XKBG,buf__JJBG);
   } break;
   case __ITM_TYPE_STYLE__: {
-    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,' ');
+    Self__0RGH=((__ITM_TYPE_STYLE *)__tmp__XKBG);
+    if (((void *)Self__0RGH->style__DZP != (void *)NULL)) {
+      put__to__like__OYFG(Self__0RGH->style__DZP,buf__JJBG,(&__string_119));
+      add_last__GOT(buf__JJBG,' ');
     };
-    put__to__like__HTFG(Self__5KGH->parent_itm_type_simple__FPN.name__OVP,buf__CEBG,(&__string_125));
+    put__to__like__OYFG(Self__0RGH->parent_itm_type_simple__RSN.name__0YP,buf__JJBG,(&__string_125));
   } break;
   };
-  add_last__3IT(buf__CEBG,')');
+  add_last__GOT(buf__JJBG,')');
 }
 
-static void shorter_in__ZMDG(__ITM_TYPE_PARAMETER *Self__0MDG,void *buf__1MDG)
+static void shorter_in__ASDG(__ITM_TYPE_PARAMETER *Self__BSDG,void *buf__CSDG)
 // ({ITM_TYPE_PARAMETER},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  void *tok__1KFG;
-  __INTEGER __tmp__OLFG,Self__HYHG;
-  void *lst__4KFG;
-  tok__1KFG=Self__0MDG->parent_itm_type__UBE.name__OVP;
-  lst__4KFG=NULL;
+  void *tok__CQFG;
+  __INTEGER __tmp__VQFG,Self__O3HG;
+  void *lst__FQFG;
+  tok__CQFG=Self__BSDG->parent_itm_type__YEE.name__0YP;
+  lst__FQFG=NULL;
   if (((void *)(&__string_126) != (void *)NULL)) {
-    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);
+    lst__FQFG=fast_reference_at__TLNE(short_dico__QD,(&__string_126));
+    if (((void *)lst__FQFG != (void *)NULL)) {
+      __tmp__VQFG=((__LINKED_LISToSTRING_CONSTANTo *)lst__FQFG)->parent_linked_collection__LD.upper__MED;
+      Self__O3HG= 1;
+      while ((Self__O3HG <= __tmp__VQFG)) {
+        if (((void *)item__Q2ND(lst__FQFG,Self__O3HG) == (void *)NULL)) {
+          append__ROS(buf__CSDG,tok__CQFG);
         } else {
-          append__FLS(buf__1MDG,item__CZND(lst__4KFG,Self__HYHG));
+          append__ROS(buf__CSDG,item__Q2ND(lst__FQFG,Self__O3HG));
         };
-        Self__HYHG=(__INTEGER)(Self__HYHG +  1);
+        Self__O3HG=(__INTEGER)(Self__O3HG +  1);
       };
     };
   };
 }
 
-static void shorter_in__KNDG(__ITM_TYPE_SIMPLE *Self__LNDG,void *buf__MNDG)
+static void shorter_in__RSDG(__ITM_TYPE_SIMPLE *Self__SSDG,void *buf__TSDG)
 // ({ITM_TYPE_SIMPLE},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  void *tok__VMFG;
-  __INTEGER __tmp__INFG,Self__YYHG;
-  void *lst__YMFG;
-  tok__VMFG=Self__LNDG->name__OVP;
-  lst__YMFG=NULL;
+  void *tok__2RFG;
+  __INTEGER __tmp__PSFG,Self__53HG;
+  void *lst__5RFG;
+  tok__2RFG=Self__SSDG->name__0YP;
+  lst__5RFG=NULL;
   if (((void *)(&__string_125) != (void *)NULL)) {
-    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);
+    lst__5RFG=fast_reference_at__TLNE(short_dico__QD,(&__string_125));
+    if (((void *)lst__5RFG != (void *)NULL)) {
+      __tmp__PSFG=((__LINKED_LISToSTRING_CONSTANTo *)lst__5RFG)->parent_linked_collection__LD.upper__MED;
+      Self__53HG= 1;
+      while ((Self__53HG <= __tmp__PSFG)) {
+        if (((void *)item__Q2ND(lst__5RFG,Self__53HG) == (void *)NULL)) {
+          append__ROS(buf__TSDG,tok__2RFG);
         } else {
-          append__FLS(buf__MNDG,item__CZND(lst__YMFG,Self__YYHG));
+          append__ROS(buf__TSDG,item__Q2ND(lst__5RFG,Self__53HG));
         };
-        Self__YYHG=(__INTEGER)(Self__YYHG +  1);
+        Self__53HG=(__INTEGER)(Self__53HG +  1);
       };
     };
   };
 }
 
-static void shorter_raw_in__LVFG(__ITM_TYPE_MULTI *Self__MVFG,void *buf__NVFG)
+static void shorter_raw_in__S0FG(__ITM_TYPE_MULTI *Self__T0FG,void *buf__U0FG)
 // ({ITM_TYPE_MULTI},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __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) {
+  __INTEGER __tmp__10FG,Self__JTGG;
+  void *__tmp__C1FG,*__tmp__F1FG;
+  __ITM_TYPE_STYLE *Self__5RGH,*Self__DSGH;
+  __FAST_ARRAYoITM_TYPE_MONOo *Self__BSGH;
+  __tmp__10FG=(__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)Self__T0FG->list_type__QKP)->parent_arrayed_collection__EYC.upper__SIV -  1);
+  Self__JTGG= 0;
+  while ((Self__JTGG <= __tmp__10FG)) {
+    __tmp__C1FG=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)Self__T0FG->list_type__QKP)->parent_arrayed_collection__EYC.storage__ZMV)[Self__JTGG];
+    switch (((struct ___OBJ *)__tmp__C1FG)->__id) {
     case __ITM_TYPE_PARAMETER__: {
-      shorter_in__ZMDG(__tmp__1VFG,buf__NVFG);
+      shorter_in__ASDG(__tmp__C1FG,buf__U0FG);
     } break;
     case __ITM_TYPE_SIMPLE__: {
-      shorter_in__KNDG(__tmp__1VFG,buf__NVFG);
+      shorter_in__RSDG(__tmp__C1FG,buf__U0FG);
     } break;
     case __ITM_TYPE_BLOCK__: {
-      shorter_in__1NDG(__tmp__1VFG,buf__NVFG);
+      shorter_in__CTDG(__tmp__C1FG,buf__U0FG);
     } break;
     case __ITM_TYPE_GENERIC__: {
-      shorter_in__DPDG(__tmp__1VFG,buf__NVFG);
+      shorter_in__KUDG(__tmp__C1FG,buf__U0FG);
     } break;
     case __ITM_TYPE_STYLE__: {
-      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,' ');
+      Self__5RGH=((__ITM_TYPE_STYLE *)__tmp__C1FG);
+      if (((void *)Self__5RGH->style__DZP != (void *)NULL)) {
+        put__to__like__OYFG(Self__5RGH->style__DZP,buf__U0FG,(&__string_119));
+        add_last__GOT(buf__U0FG,' ');
       };
-      put__to__like__HTFG(Self__ELGH->parent_itm_type_simple__FPN.name__OVP,buf__NVFG,(&__string_125));
+      put__to__like__OYFG(Self__5RGH->parent_itm_type_simple__RSN.name__0YP,buf__U0FG,(&__string_125));
     } break;
     };
-    add_last__3IT(buf__NVFG,',');
-    Self__COGG=(__INTEGER)(Self__COGG +  1);
+    add_last__GOT(buf__U0FG,',');
+    Self__JTGG=(__INTEGER)(Self__JTGG +  1);
   };
-  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) {
+  Self__BSGH=((__FAST_ARRAYoITM_TYPE_MONOo *)Self__T0FG->list_type__QKP);
+  __tmp__F1FG=((void **)Self__BSGH->parent_arrayed_collection__EYC.storage__ZMV)[Self__BSGH->parent_arrayed_collection__EYC.upper__SIV];
+  switch (((struct ___OBJ *)__tmp__F1FG)->__id) {
   case __ITM_TYPE_PARAMETER__: {
-    shorter_in__ZMDG(__tmp__4VFG,buf__NVFG);
+    shorter_in__ASDG(__tmp__F1FG,buf__U0FG);
   } break;
   case __ITM_TYPE_SIMPLE__: {
-    shorter_in__KNDG(__tmp__4VFG,buf__NVFG);
+    shorter_in__RSDG(__tmp__F1FG,buf__U0FG);
   } break;
   case __ITM_TYPE_BLOCK__: {
-    shorter_in__1NDG(__tmp__4VFG,buf__NVFG);
+    shorter_in__CTDG(__tmp__F1FG,buf__U0FG);
   } break;
   case __ITM_TYPE_GENERIC__: {
-    shorter_in__DPDG(__tmp__4VFG,buf__NVFG);
+    shorter_in__KUDG(__tmp__F1FG,buf__U0FG);
   } break;
   case __ITM_TYPE_STYLE__: {
-    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,' ');
+    Self__DSGH=((__ITM_TYPE_STYLE *)__tmp__F1FG);
+    if (((void *)Self__DSGH->style__DZP != (void *)NULL)) {
+      put__to__like__OYFG(Self__DSGH->style__DZP,buf__U0FG,(&__string_119));
+      add_last__GOT(buf__U0FG,' ');
     };
-    put__to__like__HTFG(Self__ILGH->parent_itm_type_simple__FPN.name__OVP,buf__NVFG,(&__string_125));
+    put__to__like__OYFG(Self__DSGH->parent_itm_type_simple__RSN.name__0YP,buf__U0FG,(&__string_125));
   } break;
   };
 }
 
-static void shorter_in__1NDG(__ITM_TYPE_BLOCK *Self__2NDG,void *buf__3NDG)
+static void shorter_in__CTDG(__ITM_TYPE_BLOCK *Self__DTDG,void *buf__ETDG)
 // ({ITM_TYPE_BLOCK},{NULLxSTRING}) VoidRecursive, No inlinable.
 {
-  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) {
+  void *typ_mul__FTDG,*__tmp__ZTDG;
+  void *__tmp__OTDG,*__tmp__YTDG,*__tmp__5TDG;
+  __ITM_TYPE_MULTI *Self__ORYG,*Self__QRYG;
+  __ITM_TYPE_STYLE *Self__FSGH,*Self__HSGH;
+  typ_mul__FTDG=NULL;
+  put__to__like__MTFG((&__string_299),buf__ETDG);
+  if (((void *)Self__DTDG->type_argument__GNN != (void *)NULL)) {
+    __tmp__OTDG=Self__DTDG->type_argument__GNN;
+    switch (((struct ___OBJ *)__tmp__OTDG)->__id) {
     case __ITM_TYPE_PARAMETER__: {
-      shorter_in__ZMDG(__tmp__HODG,buf__3NDG);
+      shorter_in__ASDG(__tmp__OTDG,buf__ETDG);
     } break;
     case __ITM_TYPE_SIMPLE__: {
-      shorter_in__KNDG(__tmp__HODG,buf__3NDG);
+      shorter_in__RSDG(__tmp__OTDG,buf__ETDG);
     } break;
     case __ITM_TYPE_MULTI__: {
-      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,')');
+      Self__ORYG=((__ITM_TYPE_MULTI *)__tmp__OTDG);
+      add_last__GOT(buf__ETDG,'(');
+      shorter_raw_in__S0FG(Self__ORYG,buf__ETDG);
+      add_last__GOT(buf__ETDG,')');
     } break;
     case __ITM_TYPE_BLOCK__: {
-      shorter_in__1NDG(__tmp__HODG,buf__3NDG);
+      shorter_in__CTDG(__tmp__OTDG,buf__ETDG);
     } break;
     case __ITM_TYPE_GENERIC__: {
-      shorter_in__DPDG(__tmp__HODG,buf__3NDG);
+      shorter_in__KUDG(__tmp__OTDG,buf__ETDG);
     } break;
     case __ITM_TYPE_STYLE__: {
-      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,' ');
+      Self__FSGH=((__ITM_TYPE_STYLE *)__tmp__OTDG);
+      if (((void *)Self__FSGH->style__DZP != (void *)NULL)) {
+        put__to__like__OYFG(Self__FSGH->style__DZP,buf__ETDG,(&__string_119));
+        add_last__GOT(buf__ETDG,' ');
       };
-      put__to__like__HTFG(Self__KLGH->parent_itm_type_simple__FPN.name__OVP,buf__3NDG,(&__string_125));
+      put__to__like__OYFG(Self__FSGH->parent_itm_type_simple__RSN.name__0YP,buf__ETDG,(&__string_125));
     } break;
     };
-    add_last__3IT(buf__3NDG,';');
-    add_last__3IT(buf__3NDG,' ');
+    add_last__GOT(buf__ETDG,';');
+    add_last__GOT(buf__ETDG,' ');
   };
-  if (((void *)Self__2NDG->type_result__EKN != (void *)NULL)) {
-    __tmp__RODG=Self__2NDG->type_result__EKN;
-    if (__tmp__RODG==NULL) {
-      __tmp__SODG=NULL;
+  if (((void *)Self__DTDG->type_result__QNN != (void *)NULL)) {
+    __tmp__YTDG=Self__DTDG->type_result__QNN;
+    if (__tmp__YTDG==NULL) {
+      __tmp__ZTDG=NULL;
     } else {
-      switch (((struct ___OBJ *)__tmp__RODG)->__id) {
+      switch (((struct ___OBJ *)__tmp__YTDG)->__id) {
       case __ITM_TYPE_PARAMETER__: {
-        __tmp__SODG=NULL;
+        __tmp__ZTDG=NULL;
       } break;
       case __ITM_TYPE_SIMPLE__: {
-        __tmp__SODG=NULL;
+        __tmp__ZTDG=NULL;
       } break;
       case __ITM_TYPE_MULTI__: {
-        __tmp__SODG=((void *)__tmp__RODG);
+        __tmp__ZTDG=((void *)__tmp__YTDG);
       } break;
       case __ITM_TYPE_BLOCK__: {
-        __tmp__SODG=NULL;
+        __tmp__ZTDG=NULL;
       } break;
       case __ITM_TYPE_GENERIC__: {
-        __tmp__SODG=NULL;
+        __tmp__ZTDG=NULL;
       } break;
       case __ITM_TYPE_STYLE__: {
-        __tmp__SODG=NULL;
+        __tmp__ZTDG=NULL;
       } break;
       }
     };
-    typ_mul__4NDG=__tmp__SODG;
-    if (((void *)__tmp__SODG == (void *)NULL)) {
-      __tmp__YODG=Self__2NDG->type_result__EKN;
-      switch (((struct ___OBJ *)__tmp__YODG)->__id) {
+    typ_mul__FTDG=__tmp__ZTDG;
+    if (((void *)__tmp__ZTDG == (void *)NULL)) {
+      __tmp__5TDG=Self__DTDG->type_result__QNN;
+      switch (((struct ___OBJ *)__tmp__5TDG)->__id) {
       case __ITM_TYPE_PARAMETER__: {
-        shorter_in__ZMDG(__tmp__YODG,buf__3NDG);
+        shorter_in__ASDG(__tmp__5TDG,buf__ETDG);
       } break;
       case __ITM_TYPE_SIMPLE__: {
-        shorter_in__KNDG(__tmp__YODG,buf__3NDG);
+        shorter_in__RSDG(__tmp__5TDG,buf__ETDG);
       } break;
       case __ITM_TYPE_MULTI__: {
-        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,')');
+        Self__QRYG=((__ITM_TYPE_MULTI *)__tmp__5TDG);
+        add_last__GOT(buf__ETDG,'(');
+        shorter_raw_in__S0FG(Self__QRYG,buf__ETDG);
+        add_last__GOT(buf__ETDG,')');
       } break;
       case __ITM_TYPE_BLOCK__: {
-        shorter_in__1NDG(__tmp__YODG,buf__3NDG);
+        shorter_in__CTDG(__tmp__5TDG,buf__ETDG);
       } break;
       case __ITM_TYPE_GENERIC__: {
-        shorter_in__DPDG(__tmp__YODG,buf__3NDG);
+        shorter_in__KUDG(__tmp__5TDG,buf__ETDG);
       } break;
       case __ITM_TYPE_STYLE__: {
-        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,' ');
+        Self__HSGH=((__ITM_TYPE_STYLE *)__tmp__5TDG);
+        if (((void *)Self__HSGH->style__DZP != (void *)NULL)) {
+          put__to__like__OYFG(Self__HSGH->style__DZP,buf__ETDG,(&__string_119));
+          add_last__GOT(buf__ETDG,' ');
         };
-        put__to__like__HTFG(Self__MLGH->parent_itm_type_simple__FPN.name__OVP,buf__3NDG,(&__string_125));
+        put__to__like__OYFG(Self__HSGH->parent_itm_type_simple__RSN.name__0YP,buf__ETDG,(&__string_125));
       } break;
       };
     } else {
-      shorter_raw_in__LVFG(__tmp__SODG,buf__3NDG);
+      shorter_raw_in__S0FG(__tmp__ZTDG,buf__ETDG);
     };
   };
-  put__to__like__FOFG((&__string_300),buf__3NDG);
+  put__to__like__MTFG((&__string_300),buf__ETDG);
 }
 
-static void shorter_in__DPDG(__ITM_TYPE_GENERIC *Self__EPDG,void *buf__FPDG)
+static void shorter_in__KUDG(__ITM_TYPE_GENERIC *Self__LUDG,void *buf__MUDG)
 // ({ITM_TYPE_GENERIC},{NULLxSTRING}) VoidRecursive, No inlinable.
 {
-  __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) {
+  __INTEGER __tmp__BVDG,Self__RXFG;
+  void *__tmp__IVDG,*__tmp__LVDG;
+  __ITM_TYPE_STYLE *Self__MSGH,*Self__NVDG;
+  __FAST_ARRAYoITM_TYPE_MONOo *Self__OSGH;
+  if (((void *)Self__LUDG->parent_itm_type_style__SSN.style__DZP != (void *)NULL)) {
+    put__to__like__5VFG(Self__LUDG->parent_itm_type_style__SSN.style__DZP,buf__MUDG,(&__string_119));
+    add_last__GOT(buf__MUDG,' ');
+  };
+  put__to__like__5VFG(Self__LUDG->parent_itm_type_style__SSN.parent_itm_type_simple__RSN.name__0YP,buf__MUDG,(&__string_125));
+  add_last__GOT(buf__MUDG,'(');
+  __tmp__BVDG=(__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)Self__LUDG->list_type__NZP)->parent_arrayed_collection__EYC.upper__SIV -  1);
+  Self__RXFG= 0;
+  while ((Self__RXFG <= __tmp__BVDG)) {
+    __tmp__IVDG=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)Self__LUDG->list_type__NZP)->parent_arrayed_collection__EYC.storage__ZMV)[Self__RXFG];
+    switch (((struct ___OBJ *)__tmp__IVDG)->__id) {
     case __ITM_TYPE_PARAMETER__: {
-      shorter_in__ZMDG(__tmp__BQDG,buf__FPDG);
+      shorter_in__ASDG(__tmp__IVDG,buf__MUDG);
     } break;
     case __ITM_TYPE_SIMPLE__: {
-      shorter_in__KNDG(__tmp__BQDG,buf__FPDG);
+      shorter_in__RSDG(__tmp__IVDG,buf__MUDG);
     } break;
     case __ITM_TYPE_BLOCK__: {
-      shorter_in__1NDG(__tmp__BQDG,buf__FPDG);
+      shorter_in__CTDG(__tmp__IVDG,buf__MUDG);
     } break;
     case __ITM_TYPE_GENERIC__: {
-      shorter_in__DPDG(__tmp__BQDG,buf__FPDG);
+      shorter_in__KUDG(__tmp__IVDG,buf__MUDG);
     } break;
     case __ITM_TYPE_STYLE__: {
-      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,' ');
+      Self__MSGH=((__ITM_TYPE_STYLE *)__tmp__IVDG);
+      if (((void *)Self__MSGH->style__DZP != (void *)NULL)) {
+        put__to__like__OYFG(Self__MSGH->style__DZP,buf__MUDG,(&__string_119));
+        add_last__GOT(buf__MUDG,' ');
       };
-      put__to__like__HTFG(Self__RLGH->parent_itm_type_simple__FPN.name__OVP,buf__FPDG,(&__string_125));
+      put__to__like__OYFG(Self__MSGH->parent_itm_type_simple__RSN.name__0YP,buf__MUDG,(&__string_125));
     } break;
     };
-    add_last__3IT(buf__FPDG,',');
-    Self__KSFG=(__INTEGER)(Self__KSFG +  1);
+    add_last__GOT(buf__MUDG,',');
+    Self__RXFG=(__INTEGER)(Self__RXFG +  1);
   };
-  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) {
+  Self__OSGH=((__FAST_ARRAYoITM_TYPE_MONOo *)Self__LUDG->list_type__NZP);
+  __tmp__LVDG=((void **)Self__OSGH->parent_arrayed_collection__EYC.storage__ZMV)[Self__OSGH->parent_arrayed_collection__EYC.upper__SIV];
+  switch (((struct ___OBJ *)__tmp__LVDG)->__id) {
   case __ITM_TYPE_PARAMETER__: {
-    shorter_in__ZMDG(__tmp__EQDG,buf__FPDG);
+    shorter_in__ASDG(__tmp__LVDG,buf__MUDG);
   } break;
   case __ITM_TYPE_SIMPLE__: {
-    shorter_in__KNDG(__tmp__EQDG,buf__FPDG);
+    shorter_in__RSDG(__tmp__LVDG,buf__MUDG);
   } break;
   case __ITM_TYPE_BLOCK__: {
-    shorter_in__1NDG(__tmp__EQDG,buf__FPDG);
+    shorter_in__CTDG(__tmp__LVDG,buf__MUDG);
   } break;
   case __ITM_TYPE_GENERIC__: {
-    shorter_in__DPDG(__tmp__EQDG,buf__FPDG);
+    shorter_in__KUDG(__tmp__LVDG,buf__MUDG);
   } break;
   case __ITM_TYPE_STYLE__: {
-    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,' ');
+    Self__NVDG=((__ITM_TYPE_STYLE *)__tmp__LVDG);
+    if (((void *)Self__NVDG->style__DZP != (void *)NULL)) {
+      put__to__like__OYFG(Self__NVDG->style__DZP,buf__MUDG,(&__string_119));
+      add_last__GOT(buf__MUDG,' ');
     };
-    put__to__like__HTFG(Self__GQDG->parent_itm_type_simple__FPN.name__OVP,buf__FPDG,(&__string_125));
+    put__to__like__OYFG(Self__NVDG->parent_itm_type_simple__RSN.name__0YP,buf__MUDG,(&__string_125));
   } break;
   };
-  add_last__3IT(buf__FPDG,')');
+  add_last__GOT(buf__MUDG,')');
 }
 
-static void put__to__like__HTFG(void *tok__JTFG,void *buf__KTFG,void *key__LTFG)
+static void put__to__like__OYFG(void *tok__QYFG,void *buf__RYFG,void *key__SYFG)
 // ({NULLxSTRING_CONSTANT},{NULLxSTRING},{STRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER __tmp__DZFG,Self__S5HG;
+  void *lst__TYFG;
+  lst__TYFG=NULL;
+  if (((void *)key__SYFG != (void *)NULL)) {
+    lst__TYFG=fast_reference_at__TLNE(short_dico__QD,key__SYFG);
+    if (((void *)lst__TYFG != (void *)NULL)) {
+      __tmp__DZFG=((__LINKED_LISToSTRING_CONSTANTo *)lst__TYFG)->parent_linked_collection__LD.upper__MED;
+      Self__S5HG= 1;
+      while ((Self__S5HG <= __tmp__DZFG)) {
+        if (((void *)item__Q2ND(lst__TYFG,Self__S5HG) == (void *)NULL)) {
+          append__ROS(buf__RYFG,tok__QYFG);
         } else {
-          append__FLS(buf__KTFG,item__CZND(lst__MTFG,Self__L0HG));
+          append__ROS(buf__RYFG,item__Q2ND(lst__TYFG,Self__S5HG));
         };
-        Self__L0HG=(__INTEGER)(Self__L0HG +  1);
+        Self__S5HG=(__INTEGER)(Self__S5HG +  1);
       };
     };
   };
 }
 
-static void put__to__like__RTDG(void *tok__TTDG,void *buf__UTDG,void *key__VTDG)
+static void put__to__like__YYDG(void *tok__0YDG,void *buf__1YDG,void *key__2YDG)
 // ({NULLxSTRING_CONSTANTxSTRING},{NULLxSTRING},{STRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER __tmp__NZDG,Self__Z0HG;
+  void *lst__3YDG;
+  lst__3YDG=NULL;
+  if (((void *)key__2YDG != (void *)NULL)) {
+    lst__3YDG=fast_reference_at__TLNE(short_dico__QD,key__2YDG);
+    if (((void *)lst__3YDG != (void *)NULL)) {
+      __tmp__NZDG=((__LINKED_LISToSTRING_CONSTANTo *)lst__3YDG)->parent_linked_collection__LD.upper__MED;
+      Self__Z0HG= 1;
+      while ((Self__Z0HG <= __tmp__NZDG)) {
+        if (((void *)item__Q2ND(lst__3YDG,Self__Z0HG) == (void *)NULL)) {
+          append__ROS(buf__1YDG,tok__0YDG);
         } else {
-          append__FLS(buf__UTDG,item__CZND(lst__WTDG,Self__SVHG));
+          append__ROS(buf__1YDG,item__Q2ND(lst__3YDG,Self__Z0HG));
         };
-        Self__SVHG=(__INTEGER)(Self__SVHG +  1);
+        Self__Z0HG=(__INTEGER)(Self__Z0HG +  1);
       };
     };
   };
 }
 
-static void set_path__SKT(__DIRECTORY_UNIX *Self__TKT,void *n__UKT)
+static void set_path__1PT(__DIRECTORY_UNIX *Self__2PT,void *n__3PT)
 // ({DIRECTORY_UNIX},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __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__;
+  __STRING_CONSTANT *result__3IIH,*Self__QLEH,*Self__TLEH,*result__FJIH;
+  __STRING_CONSTANT *Self__OXSG;
+  __POINTER ptr__4IIH,ptr_table__F0JH,next__E0JH,result__G0JH;
+  __POINTER ptr_table__K0JH,next__J0JH,result__L0JH,ptr__GJIH;
+  __POINTER ptr_table__P0JH,next__O0JH,result__Q0JH,ptr_table__U0JH;
+  __POINTER next__T0JH,result__V0JH,ptr__3NAH;
+  __INTEGER typ_id__5IIH,c__SLEH,Self__HTGH,idx__1XHH,idx__4PT;
+  __INTEGER typ_id__HJIH,__tmp__UQT;
+  __UINTEGER_32 sz__AJIH,a__BJIH,new_size__CJIH,t__DJIH,a__EJIH;
+  __UINTEGER_32 new_size__N0JH,lab_type__M0JH,sz__IJIH,a__JJIH;
+  __UINTEGER_32 new_size__KJIH,t__LJIH,a__MJIH,new_size__X0JH;
+  __UINTEGER_32 lab_type__W0JH;
+  void *__tmp__MQT;
+  __CHARACTER *Self__ITGH,*model__JTGH,*Self__3XHH,*__tmp__QQT;
+  result__3IIH=NULL;
+  ptr__4IIH=((__POINTER )(NULL));
+  typ_id__5IIH= 0;
+  sz__AJIH=((__UINTEGER_32 )sizeof(__STRING_CONSTANT));
+  if ((sz__AJIH ==  0)) {
+    result__3IIH=STRING_CONSTANT__;
   } else {
-    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)));
+    typ_id__5IIH=-1;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__AJIH);
+    if ((typ_id__5IIH == (__INTEGER)(-  1))) {
+      a__BJIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__CJIH=(__UINTEGER_32)((__UINTEGER_32)(sz__AJIH + a__BJIH) & (__UINTEGER_32)(~ a__BJIH));
+      ptr_table__F0JH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__CJIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__E0JH=((__POINTER )(NULL));
+      result__G0JH=((__POINTER *)ptr_table__F0JH)[ 0];
+      if ((result__G0JH == (void *)NULL)) {
+        result__G0JH=new_lab__FTJ(new_size__CJIH);
+        next__E0JH=(void *)((unsigned long)result__G0JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CJIH)));
+        ((__POINTER *)next__E0JH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__F0JH)[ 0]=next__E0JH;
+      } else {
+        next__E0JH=((__POINTER *)result__G0JH)[ 0];
+        if ((next__E0JH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__G0JH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__CJIH <<  1)) <=  4096)) {
+            next__E0JH=(void *)((unsigned long)result__G0JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CJIH)));
+          } else {
+            next__E0JH=new_lab__FTJ(new_size__CJIH);
+          };
+          ((__POINTER *)next__E0JH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__F0JH)[ 0]=next__E0JH;
+        } else {
+          ((__POINTER *)result__G0JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__E0JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__G0JH=next__E0JH;
+        };
+      };
+      ptr__4IIH=result__G0JH;
+    } else {
+      t__DJIH=((__UINTEGER_32 )typ_id__5IIH);
+      a__EJIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__N0JH=(__UINTEGER_32)((__UINTEGER_32)(sz__AJIH + a__EJIH) & (__UINTEGER_32)(~ a__EJIH));
+      ptr_table__K0JH=((__POINTER )(&(table_type[(t__DJIH)])));
+      lab_type__M0JH=(__UINTEGER_32)(t__DJIH |  1);
+      next__J0JH=((__POINTER )(NULL));
+      result__L0JH=((__POINTER *)ptr_table__K0JH)[ 0];
+      if ((result__L0JH == (void *)NULL)) {
+        result__L0JH=new_lab__FTJ(lab_type__M0JH);
+        next__J0JH=(void *)((unsigned long)result__L0JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__N0JH)));
+        ((__POINTER *)next__J0JH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__K0JH)[ 0]=next__J0JH;
+      } else {
+        next__J0JH=((__POINTER *)result__L0JH)[ 0];
+        if ((next__J0JH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__L0JH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__N0JH <<  1)) <=  4096)) {
+            next__J0JH=(void *)((unsigned long)result__L0JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__N0JH)));
+          } else {
+            next__J0JH=new_lab__FTJ(lab_type__M0JH);
+          };
+          ((__POINTER *)next__J0JH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__K0JH)[ 0]=next__J0JH;
+        } else {
+          ((__POINTER *)result__L0JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__J0JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__L0JH=next__J0JH;
+        };
+      };
+      ptr__4IIH=result__L0JH;
+    };
+    result__3IIH=((__STRING_CONSTANT *)ptr__4IIH);
+    *(result__3IIH) = *(STRING_CONSTANT__);
+  };
+  Self__QLEH=((__STRING_CONSTANT *)result__3IIH);
+  c__SLEH=((__STRING *)n__3PT)->count__EGC;
+  if ((c__SLEH !=  0)) {
+    Self__QLEH->storage__FRO=create__JMEB((__INTEGER)(c__SLEH +  1));
+    Self__ITGH=((__CHARACTER *)Self__QLEH->storage__FRO);
+    model__JTGH=((__STRING *)n__3PT)->storage__RCS;
+    Self__HTGH=(__INTEGER)(c__SLEH -  1);
+    while ((Self__HTGH >=  0)) {
+      Self__ITGH[Self__HTGH]=((__CHARACTER *)model__JTGH)[Self__HTGH];
+      Self__HTGH=(__INTEGER)(Self__HTGH -  1);
+    };
+    ((__CHARACTER *)Self__QLEH->storage__FRO)[c__SLEH]='\0';
+    Self__QLEH->count__DD=c__SLEH;
+  };
+  Self__2PT->parent_entry_unix__GGD.parent_entry__FGD.path__BD=result__3IIH;
+  Self__TLEH=((__STRING_CONSTANT *)Self__2PT->parent_entry_unix__GGD.parent_entry__FGD.path__BD);
+  Self__3XHH=((__CHARACTER *)Self__TLEH->storage__FRO);
+  idx__1XHH=(__INTEGER)(Self__TLEH->count__DD -  1);
+  while ((! ((idx__1XHH <  0) || ('/' == Self__3XHH[idx__1XHH])))) {
+    idx__1XHH=(__INTEGER)(idx__1XHH -  1);
+  };
+  idx__4PT=(__INTEGER)( 1 + idx__1XHH);
+  if (((void *)Self__2PT->parent_entry_unix__GGD.parent_entry__FGD.name__CQT == (void *)NULL)) {
+    result__FJIH=NULL;
+    ptr__GJIH=((__POINTER )(NULL));
+    typ_id__HJIH= 0;
+    sz__IJIH=((__UINTEGER_32 )sizeof(__STRING_CONSTANT));
+    if ((sz__IJIH ==  0)) {
+      result__FJIH=STRING_CONSTANT__;
+    } else {
+      typ_id__HJIH=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__IJIH);
+      if ((typ_id__HJIH == (__INTEGER)(-  1))) {
+        a__JJIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__KJIH=(__UINTEGER_32)((__UINTEGER_32)(sz__IJIH + a__JJIH) & (__UINTEGER_32)(~ a__JJIH));
+        ptr_table__P0JH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__KJIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__O0JH=((__POINTER )(NULL));
+        result__Q0JH=((__POINTER *)ptr_table__P0JH)[ 0];
+        if ((result__Q0JH == (void *)NULL)) {
+          result__Q0JH=new_lab__FTJ(new_size__KJIH);
+          next__O0JH=(void *)((unsigned long)result__Q0JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KJIH)));
+          ((__POINTER *)next__O0JH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__P0JH)[ 0]=next__O0JH;
+        } else {
+          next__O0JH=((__POINTER *)result__Q0JH)[ 0];
+          if ((next__O0JH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__Q0JH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__KJIH <<  1)) <=  4096)) {
+              next__O0JH=(void *)((unsigned long)result__Q0JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KJIH)));
             } else {
-              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)));
+              next__O0JH=new_lab__FTJ(new_size__KJIH);
+            };
+            ((__POINTER *)next__O0JH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__P0JH)[ 0]=next__O0JH;
+          } else {
+            ((__POINTER *)result__Q0JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__O0JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__Q0JH=next__O0JH;
+          };
+        };
+        ptr__GJIH=result__Q0JH;
+      } else {
+        t__LJIH=((__UINTEGER_32 )typ_id__HJIH);
+        a__MJIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__X0JH=(__UINTEGER_32)((__UINTEGER_32)(sz__IJIH + a__MJIH) & (__UINTEGER_32)(~ a__MJIH));
+        ptr_table__U0JH=((__POINTER )(&(table_type[(t__LJIH)])));
+        lab_type__W0JH=(__UINTEGER_32)(t__LJIH |  1);
+        next__T0JH=((__POINTER )(NULL));
+        result__V0JH=((__POINTER *)ptr_table__U0JH)[ 0];
+        if ((result__V0JH == (void *)NULL)) {
+          result__V0JH=new_lab__FTJ(lab_type__W0JH);
+          next__T0JH=(void *)((unsigned long)result__V0JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__X0JH)));
+          ((__POINTER *)next__T0JH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__U0JH)[ 0]=next__T0JH;
+        } else {
+          next__T0JH=((__POINTER *)result__V0JH)[ 0];
+          if ((next__T0JH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__V0JH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__X0JH <<  1)) <=  4096)) {
+              next__T0JH=(void *)((unsigned long)result__V0JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__X0JH)));
             } else {
-              next__USJH=new_lab__ZPJ(lab_type__XSJH);
+              next__T0JH=new_lab__FTJ(lab_type__W0JH);
             };
-            ((__POINTER *)next__USJH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__VSJH)[ 0]=next__USJH;
+            ((__POINTER *)next__T0JH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__U0JH)[ 0]=next__T0JH;
           } else {
-            ((__POINTER *)result__WSJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__USJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__WSJH=next__USJH;
+            ((__POINTER *)result__V0JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__T0JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__V0JH=next__T0JH;
           };
         };
-        ptr__TBIH=result__WSJH;
+        ptr__GJIH=result__V0JH;
       };
-      result__SBIH=((__STRING_CONSTANT *)ptr__TBIH);
-      *(result__SBIH) = *(STRING_CONSTANT__);
+      result__FJIH=((__STRING_CONSTANT *)ptr__GJIH);
+      *(result__FJIH) = *(STRING_CONSTANT__);
     };
-    Self__TKT->parent_entry_unix__GFD.parent_entry__FFD.name__ZKT=result__SBIH;
+    Self__2PT->parent_entry_unix__GGD.parent_entry__FGD.name__CQT=result__FJIH;
   };
-  __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;
+  __tmp__MQT=Self__2PT->parent_entry_unix__GGD.parent_entry__FGD.name__CQT;
+  ptr__3NAH=((__POINTER )((__CHARACTER *)((__STRING_CONSTANT *)Self__2PT->parent_entry_unix__GGD.parent_entry__FGD.path__BD)->storage__FRO));
+  ptr__3NAH=(void *)((unsigned long)ptr__3NAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )idx__4PT)));
+  __tmp__QQT=((__CHARACTER *)ptr__3NAH);
+  __tmp__UQT=(__INTEGER)(((__STRING_CONSTANT *)Self__2PT->parent_entry_unix__GGD.parent_entry__FGD.path__BD)->count__DD - idx__4PT);
+  Self__OXSG=((__STRING_CONSTANT *)__tmp__MQT);
+  Self__OXSG->storage__FRO=__tmp__QQT;
+  Self__OXSG->count__DD=__tmp__UQT;
 }
 
-static void set_path__NLT(__FILE_UNIX *Self__OLT,void *n__PLT)
+static void set_path__WQT(__FILE_UNIX *Self__XQT,void *n__YQT)
 // ({FILE_UNIX},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __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__;
+  __STRING_CONSTANT *result__NJIH,*Self__YLEH,*Self__1LEH,*result__VJIH;
+  __STRING_CONSTANT *Self__TXSG;
+  __POINTER ptr__OJIH,ptr_table__Z0JH,next__Y0JH,result__00JH;
+  __POINTER ptr_table__40JH,next__30JH,result__50JH,ptr__WJIH;
+  __POINTER ptr_table__D1JH,next__C1JH,result__E1JH,ptr_table__I1JH;
+  __POINTER next__H1JH,result__J1JH,ptr__IRY;
+  __INTEGER typ_id__PJIH,c__0LEH,Self__STGH,idx__AYHH,idx__ZQT;
+  __INTEGER typ_id__XJIH,__tmp__ORT;
+  __UINTEGER_32 sz__QJIH,a__RJIH,new_size__SJIH,t__TJIH,a__UJIH;
+  __UINTEGER_32 new_size__B1JH,lab_type__A1JH,sz__YJIH,a__ZJIH;
+  __UINTEGER_32 new_size__0JIH,t__1JIH,a__2JIH,new_size__L1JH;
+  __UINTEGER_32 lab_type__K1JH;
+  void *__tmp__GRT;
+  __CHARACTER *Self__TTGH,*model__UTGH,*Self__CYHH,*__tmp__KRT;
+  result__NJIH=NULL;
+  ptr__OJIH=((__POINTER )(NULL));
+  typ_id__PJIH= 0;
+  sz__QJIH=((__UINTEGER_32 )sizeof(__STRING_CONSTANT));
+  if ((sz__QJIH ==  0)) {
+    result__NJIH=STRING_CONSTANT__;
   } else {
-    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)));
+    typ_id__PJIH=-1;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__QJIH);
+    if ((typ_id__PJIH == (__INTEGER)(-  1))) {
+      a__RJIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__SJIH=(__UINTEGER_32)((__UINTEGER_32)(sz__QJIH + a__RJIH) & (__UINTEGER_32)(~ a__RJIH));
+      ptr_table__Z0JH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__SJIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__Y0JH=((__POINTER )(NULL));
+      result__00JH=((__POINTER *)ptr_table__Z0JH)[ 0];
+      if ((result__00JH == (void *)NULL)) {
+        result__00JH=new_lab__FTJ(new_size__SJIH);
+        next__Y0JH=(void *)((unsigned long)result__00JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SJIH)));
+        ((__POINTER *)next__Y0JH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__Z0JH)[ 0]=next__Y0JH;
+      } else {
+        next__Y0JH=((__POINTER *)result__00JH)[ 0];
+        if ((next__Y0JH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__00JH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__SJIH <<  1)) <=  4096)) {
+            next__Y0JH=(void *)((unsigned long)result__00JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SJIH)));
+          } else {
+            next__Y0JH=new_lab__FTJ(new_size__SJIH);
+          };
+          ((__POINTER *)next__Y0JH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__Z0JH)[ 0]=next__Y0JH;
+        } else {
+          ((__POINTER *)result__00JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__Y0JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__00JH=next__Y0JH;
+        };
+      };
+      ptr__OJIH=result__00JH;
+    } else {
+      t__TJIH=((__UINTEGER_32 )typ_id__PJIH);
+      a__UJIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__B1JH=(__UINTEGER_32)((__UINTEGER_32)(sz__QJIH + a__UJIH) & (__UINTEGER_32)(~ a__UJIH));
+      ptr_table__40JH=((__POINTER )(&(table_type[(t__TJIH)])));
+      lab_type__A1JH=(__UINTEGER_32)(t__TJIH |  1);
+      next__30JH=((__POINTER )(NULL));
+      result__50JH=((__POINTER *)ptr_table__40JH)[ 0];
+      if ((result__50JH == (void *)NULL)) {
+        result__50JH=new_lab__FTJ(lab_type__A1JH);
+        next__30JH=(void *)((unsigned long)result__50JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__B1JH)));
+        ((__POINTER *)next__30JH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__40JH)[ 0]=next__30JH;
+      } else {
+        next__30JH=((__POINTER *)result__50JH)[ 0];
+        if ((next__30JH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__50JH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__B1JH <<  1)) <=  4096)) {
+            next__30JH=(void *)((unsigned long)result__50JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__B1JH)));
+          } else {
+            next__30JH=new_lab__FTJ(lab_type__A1JH);
+          };
+          ((__POINTER *)next__30JH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__40JH)[ 0]=next__30JH;
+        } else {
+          ((__POINTER *)result__50JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__30JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__50JH=next__30JH;
+        };
+      };
+      ptr__OJIH=result__50JH;
+    };
+    result__NJIH=((__STRING_CONSTANT *)ptr__OJIH);
+    *(result__NJIH) = *(STRING_CONSTANT__);
+  };
+  Self__YLEH=((__STRING_CONSTANT *)result__NJIH);
+  c__0LEH=((__STRING *)n__YQT)->count__EGC;
+  if ((c__0LEH !=  0)) {
+    Self__YLEH->storage__FRO=create__JMEB((__INTEGER)(c__0LEH +  1));
+    Self__TTGH=((__CHARACTER *)Self__YLEH->storage__FRO);
+    model__UTGH=((__STRING *)n__YQT)->storage__RCS;
+    Self__STGH=(__INTEGER)(c__0LEH -  1);
+    while ((Self__STGH >=  0)) {
+      Self__TTGH[Self__STGH]=((__CHARACTER *)model__UTGH)[Self__STGH];
+      Self__STGH=(__INTEGER)(Self__STGH -  1);
+    };
+    ((__CHARACTER *)Self__YLEH->storage__FRO)[c__0LEH]='\0';
+    Self__YLEH->count__DD=c__0LEH;
+  };
+  Self__XQT->parent_entry_unix__HEF.parent_entry__FGD.path__BD=result__NJIH;
+  Self__1LEH=((__STRING_CONSTANT *)Self__XQT->parent_entry_unix__HEF.parent_entry__FGD.path__BD);
+  Self__CYHH=((__CHARACTER *)Self__1LEH->storage__FRO);
+  idx__AYHH=(__INTEGER)(Self__1LEH->count__DD -  1);
+  while ((! ((idx__AYHH <  0) || ('/' == Self__CYHH[idx__AYHH])))) {
+    idx__AYHH=(__INTEGER)(idx__AYHH -  1);
+  };
+  idx__ZQT=(__INTEGER)( 1 + idx__AYHH);
+  if (((void *)Self__XQT->parent_entry_unix__HEF.parent_entry__FGD.name__CQT == (void *)NULL)) {
+    result__VJIH=NULL;
+    ptr__WJIH=((__POINTER )(NULL));
+    typ_id__XJIH= 0;
+    sz__YJIH=((__UINTEGER_32 )sizeof(__STRING_CONSTANT));
+    if ((sz__YJIH ==  0)) {
+      result__VJIH=STRING_CONSTANT__;
+    } else {
+      typ_id__XJIH=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__YJIH);
+      if ((typ_id__XJIH == (__INTEGER)(-  1))) {
+        a__ZJIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__0JIH=(__UINTEGER_32)((__UINTEGER_32)(sz__YJIH + a__ZJIH) & (__UINTEGER_32)(~ a__ZJIH));
+        ptr_table__D1JH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__0JIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__C1JH=((__POINTER )(NULL));
+        result__E1JH=((__POINTER *)ptr_table__D1JH)[ 0];
+        if ((result__E1JH == (void *)NULL)) {
+          result__E1JH=new_lab__FTJ(new_size__0JIH);
+          next__C1JH=(void *)((unsigned long)result__E1JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0JIH)));
+          ((__POINTER *)next__C1JH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__D1JH)[ 0]=next__C1JH;
+        } else {
+          next__C1JH=((__POINTER *)result__E1JH)[ 0];
+          if ((next__C1JH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__E1JH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__0JIH <<  1)) <=  4096)) {
+              next__C1JH=(void *)((unsigned long)result__E1JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0JIH)));
             } else {
-              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)));
+              next__C1JH=new_lab__FTJ(new_size__0JIH);
+            };
+            ((__POINTER *)next__C1JH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__D1JH)[ 0]=next__C1JH;
+          } else {
+            ((__POINTER *)result__E1JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__C1JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__E1JH=next__C1JH;
+          };
+        };
+        ptr__WJIH=result__E1JH;
+      } else {
+        t__1JIH=((__UINTEGER_32 )typ_id__XJIH);
+        a__2JIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__L1JH=(__UINTEGER_32)((__UINTEGER_32)(sz__YJIH + a__2JIH) & (__UINTEGER_32)(~ a__2JIH));
+        ptr_table__I1JH=((__POINTER )(&(table_type[(t__1JIH)])));
+        lab_type__K1JH=(__UINTEGER_32)(t__1JIH |  1);
+        next__H1JH=((__POINTER )(NULL));
+        result__J1JH=((__POINTER *)ptr_table__I1JH)[ 0];
+        if ((result__J1JH == (void *)NULL)) {
+          result__J1JH=new_lab__FTJ(lab_type__K1JH);
+          next__H1JH=(void *)((unsigned long)result__J1JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__L1JH)));
+          ((__POINTER *)next__H1JH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__I1JH)[ 0]=next__H1JH;
+        } else {
+          next__H1JH=((__POINTER *)result__J1JH)[ 0];
+          if ((next__H1JH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__J1JH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__L1JH <<  1)) <=  4096)) {
+              next__H1JH=(void *)((unsigned long)result__J1JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__L1JH)));
             } else {
-              next__ITJH=new_lab__ZPJ(lab_type__LTJH);
+              next__H1JH=new_lab__FTJ(lab_type__K1JH);
             };
-            ((__POINTER *)next__ITJH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__JTJH)[ 0]=next__ITJH;
+            ((__POINTER *)next__H1JH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__I1JH)[ 0]=next__H1JH;
           } else {
-            ((__POINTER *)result__KTJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ITJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__KTJH=next__ITJH;
+            ((__POINTER *)result__J1JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__H1JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__J1JH=next__H1JH;
           };
         };
-        ptr__DCIH=result__KTJH;
+        ptr__WJIH=result__J1JH;
       };
-      result__CCIH=((__STRING_CONSTANT *)ptr__DCIH);
-      *(result__CCIH) = *(STRING_CONSTANT__);
+      result__VJIH=((__STRING_CONSTANT *)ptr__WJIH);
+      *(result__VJIH) = *(STRING_CONSTANT__);
     };
-    Self__OLT->parent_entry_unix__DBF.parent_entry__FFD.name__ZKT=result__CCIH;
+    Self__XQT->parent_entry_unix__HEF.parent_entry__FGD.name__CQT=result__VJIH;
   };
-  __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;
+  __tmp__GRT=Self__XQT->parent_entry_unix__HEF.parent_entry__FGD.name__CQT;
+  ptr__IRY=((__POINTER )((__CHARACTER *)((__STRING_CONSTANT *)Self__XQT->parent_entry_unix__HEF.parent_entry__FGD.path__BD)->storage__FRO));
+  ptr__IRY=(void *)((unsigned long)ptr__IRY - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )idx__ZQT)));
+  __tmp__KRT=((__CHARACTER *)ptr__IRY);
+  __tmp__ORT=(__INTEGER)(((__STRING_CONSTANT *)Self__XQT->parent_entry_unix__HEF.parent_entry__FGD.path__BD)->count__DD - idx__ZQT);
+  Self__TXSG=((__STRING_CONSTANT *)__tmp__GRT);
+  Self__TXSG->storage__FRO=__tmp__KRT;
+  Self__TXSG->count__DD=__tmp__ORT;
 }
 
-static void insert_string__to__WUU(__STRING *Self__XUU,void *s__YUU,__INTEGER i__ZUU)
+static void insert_string__to__CYU(__STRING *Self__DYU,void *s__EYU,__INTEGER i__FYU)
 // ({STRING},{NULLxSTRING_CONSTANTxSTRING},{INTEGER}) VoidNo recursive, No inlinable.
 {
-  __INTEGER j__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;
+  __INTEGER j__GYU,__tmp__ZYU,dest__HYHH,src_capacity__LYHH,i2__GYHH;
+  __INTEGER i1__IYHH;
+  __CHARACTER *__tmp__JZU,*__tmp__KZU,*Self__JYHH,*src__KYHH;
+  j__GYU=Self__DYU->count__EGC;
+  if (((struct ___OBJ *)s__EYU)->__id==__STRING_CONSTANT__) {
+    __tmp__ZYU=((__STRING_CONSTANT *)s__EYU)->count__DD;
   } else {
-    __tmp__NVU=((__STRING *)s__YUU)->count__EGC;
+    __tmp__ZYU=((__STRING *)s__EYU)->count__EGC;
   };
-  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);
+  resize__AYZ(Self__DYU,(__INTEGER)(j__GYU + __tmp__ZYU));
+  if ((i__FYU <= j__GYU)) {
+    move__to__by__0YCC(Self__DYU->storage__RCS,(__INTEGER)(i__FYU -  1),(__INTEGER)(j__GYU -  1),__tmp__ZYU);
   };
-  __tmp__3VU=Self__XUU->storage__F5R;
-  if (((struct ___OBJ *)s__YUU)->__id==__STRING_CONSTANT__) {
-    __tmp__4VU=((__STRING_CONSTANT *)s__YUU)->storage__ZNO;
+  __tmp__JZU=Self__DYU->storage__RCS;
+  if (((struct ___OBJ *)s__EYU)->__id==__STRING_CONSTANT__) {
+    __tmp__KZU=((__STRING_CONSTANT *)s__EYU)->storage__FRO;
   } else {
-    __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);
+    __tmp__KZU=((__STRING *)s__EYU)->storage__RCS;
+  };
+  Self__JYHH=((__CHARACTER *)__tmp__JZU);
+  src__KYHH=__tmp__KZU;
+  dest__HYHH=(__INTEGER)(i__FYU -  1);
+  src_capacity__LYHH=__tmp__ZYU;
+  i2__GYHH= 0;
+  i1__IYHH=dest__HYHH;
+  while ((i2__GYHH != src_capacity__LYHH)) {
+    Self__JYHH[i1__IYHH]=((__CHARACTER *)src__KYHH)[i2__GYHH];
+    i2__GYHH=(__INTEGER)(i2__GYHH +  1);
+    i1__IYHH=(__INTEGER)(i1__IYHH +  1);
   };
 }
 
-static void read_escape_character__AZKF()
+static void read_escape_character__G4KF()
 // () VoidNo recursive, No inlinable.
 {
-  __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';
+  __INTEGER val__J4KF;
+  __STRING *Self__2TGH;
+  __POSITION pos__N0YG,pos__00YG,pos__H1YG,pos__J1YG;
+  __CHARACTER result__BRAH,result__GRAH,result__QRAH,result__VRAH;
+  __CHARACTER result__0RAH,result__DSAH,result__MSAH,result__RSAH;
+  __CHARACTER result__WSAH,result__1SAH,result__ATAH,result__FTAH;
+  __CHARACTER result__KTAH,result__PTAH,result__UTAH,result__ZTAH;
+  __CHARACTER result__4TAH,result__DUAH,result__IUAH,result__NUAH;
+  __CHARACTER result__VUAH,result__0UAH;
+  __BOOLEAN __tmp__C5KF,__tmp__W5KF,__tmp__JALF,__tmp__4CLF,__tmp__5CLF;
+  __BOOLEAN __tmp__ADLF,__tmp__BDLF,__tmp__CDLF,__tmp__DDLF,__tmp__EDLF;
+  __BOOLEAN __tmp__FDLF,__tmp__GDLF,__tmp__HDLF,__tmp__SDLF;
+  val__J4KF= 0;
+  result__BRAH='\0';
   if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-    result__NKAH=((__CHARACTER )(( 0)));
+    result__BRAH=((__CHARACTER )(( 0)));
   } else {
-    result__NKAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+    result__BRAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
   };
-  if ((((((((result__NKAH == ' ') || (result__NKAH == '\t')) || (result__NKAH == '\n')) || (result__NKAH == '\r')) || (result__NKAH == '\0')) || (result__NKAH == '\f')) || (result__NKAH == '\v'))) {
+  if ((((((((result__BRAH == ' ') || (result__BRAH == '\t')) || (result__BRAH == '\n')) || (result__BRAH == '\r')) || (result__BRAH == '\0')) || (result__BRAH == '\f')) || (result__BRAH == '\v'))) {
     position__CCC=(__INTEGER)(position__CCC +  1);
-    until_do__PGNF:
+    until_do__WLNF:
     {
-      result__SKAH='\0';
+      result__GRAH='\0';
       if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__SKAH=((__CHARACTER )(( 0)));
+        result__GRAH=((__CHARACTER )(( 0)));
       } else {
-        result__SKAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+        result__GRAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__SKAH == ((__CHARACTER )(( 0))))) {
-        __tmp__2ZKF=TRUE__;
+      if ((result__GRAH == ((__CHARACTER )(( 0))))) {
+        __tmp__C5KF=TRUE__;
       } else {
-        result__2KAH='\0';
+        result__QRAH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__2KAH=((__CHARACTER )(( 0)));
+          result__QRAH=((__CHARACTER )(( 0)));
         } else {
-          result__2KAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+          result__QRAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
         };
-        __tmp__2ZKF=(! (((((((result__2KAH == ' ') || (result__2KAH == '\t')) || (result__2KAH == '\n')) || (result__2KAH == '\r')) || (result__2KAH == '\0')) || (result__2KAH == '\f')) || (result__2KAH == '\v')));
+        __tmp__C5KF=(! (((((((result__QRAH == ' ') || (result__QRAH == '\t')) || (result__QRAH == '\n')) || (result__QRAH == '\r')) || (result__QRAH == '\0')) || (result__QRAH == '\f')) || (result__QRAH == '\v')));
       };
-      if ((! __tmp__2ZKF)) {
+      if ((! __tmp__C5KF)) {
         position__CCC=(__INTEGER)(position__CCC +  1);
-        goto until_do__PGNF;
+        goto until_do__WLNF;
       };
     };
-    result__BLAH='\0';
+    result__VRAH='\0';
     if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-      result__BLAH=((__CHARACTER )(( 0)));
+      result__VRAH=((__CHARACTER )(( 0)));
     } else {
-      result__BLAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+      result__VRAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
     };
-    if ((result__BLAH == '\\')) {
-      Self__BNGH=((__STRING *)string_tmp__VH);
-      if (( 1 > Self__BNGH->count__EGC)) {
-        Self__BNGH->count__EGC= 0;
+    if ((result__VRAH == '\\')) {
+      Self__2TGH=((__STRING *)string_tmp__VH);
+      if (( 1 > Self__2TGH->count__EGC)) {
+        Self__2TGH->count__EGC= 0;
       } else {
-        Self__BNGH->count__EGC=(__INTEGER)(Self__BNGH->count__EGC -  1);
+        Self__2TGH->count__EGC=(__INTEGER)(Self__2TGH->count__EGC -  1);
       };
       position__CCC=(__INTEGER)(position__CCC +  1);
-      __tmp__Q0KF=TRUE__;
+      __tmp__W5KF=TRUE__;
     } else {
-      __tmp__Q0KF=FALSE__;
+      __tmp__W5KF=FALSE__;
     };
-    if ((! __tmp__Q0KF)) {
-      result__GLAH='\0';
+    if ((! __tmp__W5KF)) {
+      result__0RAH='\0';
       if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__GLAH=((__CHARACTER )(( 0)));
+        result__0RAH=((__CHARACTER )(( 0)));
       } else {
-        result__GLAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+        result__0RAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
       };
-      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)) {
+      if ((result__0RAH != ((__CHARACTER )(( 0))))) {
+        pos__N0YG=current_position__EZF();
+        put_error__text__NPG( 0,(&__string_301));
+        put_position__XQG(pos__N0YG);
+        put_string__P3F(msg_err__SPG);
+        if ((type_error__RPG !=  2)) {
           exit(( 1));
         };
       };
     };
-    __tmp__D1KF=TRUE__;
+    __tmp__JALF=TRUE__;
   } else {
-    __tmp__D1KF=FALSE__;
+    __tmp__JALF=FALSE__;
   };
-  if ((! __tmp__D1KF)) {
-    result__PLAH='\0';
+  if ((! __tmp__JALF)) {
+    result__DSAH='\0';
     if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-      result__PLAH=((__CHARACTER )(( 0)));
+      result__DSAH=((__CHARACTER )(( 0)));
     } else {
-      result__PLAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+      result__DSAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
     };
-    if ((result__PLAH != ((__CHARACTER )(( 0))))) {
-      result__YLAH='\0';
+    if ((result__DSAH != ((__CHARACTER )(( 0))))) {
+      result__MSAH='\0';
       if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__YLAH=((__CHARACTER )(( 0)));
+        result__MSAH=((__CHARACTER )(( 0)));
       } else {
-        result__YLAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+        result__MSAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__YLAH == 'a')) {
-        __tmp__Y3KF=TRUE__;
+      if ((result__MSAH == 'a')) {
+        __tmp__4CLF=TRUE__;
       } else {
-        result__3LAH='\0';
+        result__RSAH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__3LAH=((__CHARACTER )(( 0)));
+          result__RSAH=((__CHARACTER )(( 0)));
         } else {
-          result__3LAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+          result__RSAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
         };
-        __tmp__Y3KF=(result__3LAH == 'b');
+        __tmp__4CLF=(result__RSAH == 'b');
       };
-      if (__tmp__Y3KF) {
-        __tmp__Z3KF=TRUE__;
+      if (__tmp__4CLF) {
+        __tmp__5CLF=TRUE__;
       } else {
-        result__CMAH='\0';
+        result__WSAH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__CMAH=((__CHARACTER )(( 0)));
+          result__WSAH=((__CHARACTER )(( 0)));
         } else {
-          result__CMAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+          result__WSAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
         };
-        __tmp__Z3KF=(result__CMAH == 'f');
+        __tmp__5CLF=(result__WSAH == 'f');
       };
-      if (__tmp__Z3KF) {
-        __tmp__03KF=TRUE__;
+      if (__tmp__5CLF) {
+        __tmp__ADLF=TRUE__;
       } else {
-        result__HMAH='\0';
+        result__1SAH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__HMAH=((__CHARACTER )(( 0)));
+          result__1SAH=((__CHARACTER )(( 0)));
         } else {
-          result__HMAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+          result__1SAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
         };
-        __tmp__03KF=(result__HMAH == 'n');
+        __tmp__ADLF=(result__1SAH == 'n');
       };
-      if (__tmp__03KF) {
-        __tmp__13KF=TRUE__;
+      if (__tmp__ADLF) {
+        __tmp__BDLF=TRUE__;
       } else {
-        result__MMAH='\0';
+        result__ATAH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__MMAH=((__CHARACTER )(( 0)));
+          result__ATAH=((__CHARACTER )(( 0)));
         } else {
-          result__MMAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+          result__ATAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
         };
-        __tmp__13KF=(result__MMAH == 'r');
+        __tmp__BDLF=(result__ATAH == 'r');
       };
-      if (__tmp__13KF) {
-        __tmp__23KF=TRUE__;
+      if (__tmp__BDLF) {
+        __tmp__CDLF=TRUE__;
       } else {
-        result__RMAH='\0';
+        result__FTAH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__RMAH=((__CHARACTER )(( 0)));
+          result__FTAH=((__CHARACTER )(( 0)));
         } else {
-          result__RMAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+          result__FTAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
         };
-        __tmp__23KF=(result__RMAH == 't');
+        __tmp__CDLF=(result__FTAH == 't');
       };
-      if (__tmp__23KF) {
-        __tmp__33KF=TRUE__;
+      if (__tmp__CDLF) {
+        __tmp__DDLF=TRUE__;
       } else {
-        result__WMAH='\0';
+        result__KTAH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__WMAH=((__CHARACTER )(( 0)));
+          result__KTAH=((__CHARACTER )(( 0)));
         } else {
-          result__WMAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+          result__KTAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
         };
-        __tmp__33KF=(result__WMAH == 'v');
+        __tmp__DDLF=(result__KTAH == 'v');
       };
-      if (__tmp__33KF) {
-        __tmp__43KF=TRUE__;
+      if (__tmp__DDLF) {
+        __tmp__EDLF=TRUE__;
       } else {
-        result__1MAH='\0';
+        result__PTAH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__1MAH=((__CHARACTER )(( 0)));
+          result__PTAH=((__CHARACTER )(( 0)));
         } else {
-          result__1MAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+          result__PTAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
         };
-        __tmp__43KF=(result__1MAH == '\\');
+        __tmp__EDLF=(result__PTAH == '\\');
       };
-      if (__tmp__43KF) {
-        __tmp__53KF=TRUE__;
+      if (__tmp__EDLF) {
+        __tmp__FDLF=TRUE__;
       } else {
-        result__ANAH='\0';
+        result__UTAH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__ANAH=((__CHARACTER )(( 0)));
+          result__UTAH=((__CHARACTER )(( 0)));
         } else {
-          result__ANAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+          result__UTAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
         };
-        __tmp__53KF=(result__ANAH == '?');
+        __tmp__FDLF=(result__UTAH == '?');
       };
-      if (__tmp__53KF) {
-        __tmp__A4KF=TRUE__;
+      if (__tmp__FDLF) {
+        __tmp__GDLF=TRUE__;
       } else {
-        result__FNAH='\0';
+        result__ZTAH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__FNAH=((__CHARACTER )(( 0)));
+          result__ZTAH=((__CHARACTER )(( 0)));
         } else {
-          result__FNAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+          result__ZTAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
         };
-        __tmp__A4KF=(result__FNAH == '\'');
+        __tmp__GDLF=(result__ZTAH == '\'');
       };
-      if (__tmp__A4KF) {
-        __tmp__B4KF=TRUE__;
+      if (__tmp__GDLF) {
+        __tmp__HDLF=TRUE__;
       } else {
-        result__KNAH='\0';
+        result__4TAH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__KNAH=((__CHARACTER )(( 0)));
+          result__4TAH=((__CHARACTER )(( 0)));
         } else {
-          result__KNAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+          result__4TAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
         };
-        __tmp__B4KF=(result__KNAH == '\"');
+        __tmp__HDLF=(result__4TAH == '\"');
       };
-      if (__tmp__B4KF) {
-        result__PNAH='\0';
+      if (__tmp__HDLF) {
+        result__DUAH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__PNAH=((__CHARACTER )(( 0)));
+          result__DUAH=((__CHARACTER )(( 0)));
         } else {
-          result__PNAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+          result__DUAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
         };
-        add_last__3IT(string_tmp__VH,result__PNAH);
+        add_last__GOT(string_tmp__VH,result__DUAH);
         position__CCC=(__INTEGER)(position__CCC +  1);
-        __tmp__M4KF=TRUE__;
+        __tmp__SDLF=TRUE__;
       } else {
-        __tmp__M4KF=FALSE__;
+        __tmp__SDLF=FALSE__;
       };
-      if ((! __tmp__M4KF)) {
-        result__UNAH='\0';
+      if ((! __tmp__SDLF)) {
+        result__IUAH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__UNAH=((__CHARACTER )(( 0)));
+          result__IUAH=((__CHARACTER )(( 0)));
         } else {
-          result__UNAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+          result__IUAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
         };
-        if (((((__INTEGER_8 )result__UNAH) >= ((__INTEGER_8 )'0')) && (((__INTEGER_8 )result__UNAH) <= ((__INTEGER_8 )'9')))) {
-          result__ZNAH='\0';
+        if (((((__INTEGER_8 )result__IUAH) >= ((__INTEGER_8 )'0')) && (((__INTEGER_8 )result__IUAH) <= ((__INTEGER_8 )'9')))) {
+          result__NUAH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__ZNAH=((__CHARACTER )(( 0)));
+            result__NUAH=((__CHARACTER )(( 0)));
           } else {
-            result__ZNAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+            result__NUAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
           };
-          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 ((((result__NUAH == '0') && (position__CCC < ((__STRING *)source__5BC)->count__EGC)) && (! is_hexadecimal_digit__UPJE(((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)((__INTEGER)(position__CCC +  1) -  1)])))) {
+            result__VUAH='\0';
             if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-              result__BOAH=((__CHARACTER )(( 0)));
+              result__VUAH=((__CHARACTER )(( 0)));
             } else {
-              result__BOAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+              result__VUAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
             };
-            add_last__3IT(string_tmp__VH,result__BOAH);
+            add_last__GOT(string_tmp__VH,result__VUAH);
             position__CCC=(__INTEGER)(position__CCC +  1);
           } else {
-            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)) {
+            copy__JDS(string_tmp2__0BJ,string_tmp__VH);
+            read_integer__Q2P();
+            copy__JDS(string_tmp__VH,string_tmp2__0BJ);
+            if ((last_integer__JSO >  255)) {
+              pos__00YG=current_position__EZF();
+              put_error__text__NPG( 0,(&__string_302));
+              put_position__XQG(pos__00YG);
+              put_string__P3F(msg_err__SPG);
+              if ((type_error__RPG !=  2)) {
                 exit(( 1));
               };
             };
-            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';
+            val__J4KF=((__INTEGER )last_integer__JSO);
+            add_last__GOT(string_tmp__VH,((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )(__INTEGER)(val__J4KF >>  6)) + ((__INTEGER_8 )'0'))))));
+            add_last__GOT(string_tmp__VH,((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )(__INTEGER)((__INTEGER)(val__J4KF &  63) >>  3)) + ((__INTEGER_8 )'0'))))));
+            add_last__GOT(string_tmp__VH,((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )(__INTEGER)(val__J4KF &  7)) + ((__INTEGER_8 )'0'))))));
+            result__0UAH='\0';
             if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-              result__GOAH=((__CHARACTER )(( 0)));
+              result__0UAH=((__CHARACTER )(( 0)));
             } else {
-              result__GOAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+              result__0UAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
             };
-            if ((result__GOAH == '\\')) {
+            if ((result__0UAH == '\\')) {
               position__CCC=(__INTEGER)(position__CCC +  1);
             } else {
-              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)) {
+              pos__H1YG=current_position__EZF();
+              put_error__text__NPG( 0,(&__string_303));
+              put_position__XQG(pos__H1YG);
+              put_string__P3F(msg_err__SPG);
+              if ((type_error__RPG !=  2)) {
                 exit(( 1));
               };
             };
           };
         } else {
-          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)) {
+          pos__J1YG=current_position__EZF();
+          put_error__text__NPG( 0,(&__string_301));
+          put_position__XQG(pos__J1YG);
+          put_string__P3F(msg_err__SPG);
+          if ((type_error__RPG !=  2)) {
             exit(( 1));
           };
         };
@@ -27109,10056 +27156,10056 @@ static void read_escape_character__AZKF()
   };
 }
 
-static __BOOLEAN read_cap_identifier__VXJ()
+static __BOOLEAN read_cap_identifier__B1J()
 // () With resultNo recursive, No inlinable.
 {
-  __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__IYJ=TRUE__;
+  __INTEGER posold__E1J,idx__F1J;
+  __POSITION pos__22YG;
+  __BOOLEAN result__G1J,__tmp__U1J,result__SPEH,__tmp__I3J,result__BQEH;
+  __BOOLEAN result__IQEH,__tmp__E3J,__tmp__F3J,result__UQEH,__tmp__Y3J;
+  __CHARACTER result__2VAH,result__GWAH,result__LWAH,result__UWAH;
+  __CHARACTER result__ZWAH,result__4WAH,result__DXAH;
+  posold__E1J= 0;
+  idx__F1J= 0;
+  result__G1J=FALSE__;
+  if ((! read_space__MTD())) {
+    __tmp__U1J=TRUE__;
   } else {
-    result__IPAH='\0';
+    result__2VAH='\0';
     if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-      result__IPAH=((__CHARACTER )(( 0)));
+      result__2VAH=((__CHARACTER )(( 0)));
     } else {
-      result__IPAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+      result__2VAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
     };
-    result__2IEH=FALSE__;
-    if ((((__INTEGER_8 )result__IPAH) >= ((__INTEGER_8 )'A'))) {
-      result__2IEH=(((__INTEGER_8 )result__IPAH) <= ((__INTEGER_8 )'Z'));
+    result__SPEH=FALSE__;
+    if ((((__INTEGER_8 )result__2VAH) >= ((__INTEGER_8 )'A'))) {
+      result__SPEH=(((__INTEGER_8 )result__2VAH) <= ((__INTEGER_8 )'Z'));
     };
-    __tmp__IYJ=(! result__2IEH);
+    __tmp__U1J=(! result__SPEH);
   };
-  if (__tmp__IYJ) {
-    result__0XJ=FALSE__;
+  if (__tmp__U1J) {
+    result__G1J=FALSE__;
   } else {
-    posold__YXJ=position__CCC;
+    posold__E1J=position__CCC;
     ((__STRING *)string_tmp__VH)->count__EGC= 0;
-    result__SPAH='\0';
+    result__GWAH='\0';
     if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-      result__SPAH=((__CHARACTER )(( 0)));
+      result__GWAH=((__CHARACTER )(( 0)));
     } else {
-      result__SPAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+      result__GWAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
     };
-    add_last__3IT(string_tmp__VH,result__SPAH);
+    add_last__GOT(string_tmp__VH,result__GWAH);
     position__CCC=(__INTEGER)(position__CCC +  1);
-    is_parameter_type__5HE=TRUE__;
-    until_do__TUZE:
+    is_parameter_type__DLE=TRUE__;
+    until_do__PZZE:
     {
-      result__XPAH='\0';
+      result__LWAH='\0';
       if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__XPAH=((__CHARACTER )(( 0)));
+        result__LWAH=((__CHARACTER )(( 0)));
       } else {
-        result__XPAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+        result__LWAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__XPAH == ((__CHARACTER )(( 0))))) {
-        __tmp__2ZJ=TRUE__;
+      if ((result__LWAH == ((__CHARACTER )(( 0))))) {
+        __tmp__I3J=TRUE__;
       } else {
-        result__AQAH='\0';
+        result__UWAH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__AQAH=((__CHARACTER )(( 0)));
+          result__UWAH=((__CHARACTER )(( 0)));
         } else {
-          result__AQAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+          result__UWAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
         };
-        result__LJEH=FALSE__;
-        if ((((__INTEGER_8 )result__AQAH) >= ((__INTEGER_8 )'A'))) {
-          result__LJEH=(((__INTEGER_8 )result__AQAH) <= ((__INTEGER_8 )'Z'));
+        result__BQEH=FALSE__;
+        if ((((__INTEGER_8 )result__UWAH) >= ((__INTEGER_8 )'A'))) {
+          result__BQEH=(((__INTEGER_8 )result__UWAH) <= ((__INTEGER_8 )'Z'));
         };
-        if ((! result__LJEH)) {
-          result__FQAH='\0';
+        if ((! result__BQEH)) {
+          result__ZWAH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__FQAH=((__CHARACTER )(( 0)));
+            result__ZWAH=((__CHARACTER )(( 0)));
           } else {
-            result__FQAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+            result__ZWAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
           };
-          result__SJEH=FALSE__;
-          if ((((__INTEGER_8 )result__FQAH) >= ((__INTEGER_8 )'0'))) {
-            result__SJEH=(((__INTEGER_8 )result__FQAH) <= ((__INTEGER_8 )'9'));
+          result__IQEH=FALSE__;
+          if ((((__INTEGER_8 )result__ZWAH) >= ((__INTEGER_8 )'0'))) {
+            result__IQEH=(((__INTEGER_8 )result__ZWAH) <= ((__INTEGER_8 )'9'));
           };
-          __tmp__YZJ=(! result__SJEH);
+          __tmp__E3J=(! result__IQEH);
         } else {
-          __tmp__YZJ=FALSE__;
+          __tmp__E3J=FALSE__;
         };
-        if (__tmp__YZJ) {
-          result__KQAH='\0';
+        if (__tmp__E3J) {
+          result__4WAH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__KQAH=((__CHARACTER )(( 0)));
+            result__4WAH=((__CHARACTER )(( 0)));
           } else {
-            result__KQAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+            result__4WAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
           };
-          __tmp__ZZJ=(result__KQAH != '_');
+          __tmp__F3J=(result__4WAH != '_');
         } else {
-          __tmp__ZZJ=FALSE__;
+          __tmp__F3J=FALSE__;
         };
-        __tmp__2ZJ=__tmp__ZZJ;
+        __tmp__I3J=__tmp__F3J;
       };
-      if ((! __tmp__2ZJ)) {
-        result__PQAH='\0';
+      if ((! __tmp__I3J)) {
+        result__DXAH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__PQAH=((__CHARACTER )(( 0)));
+          result__DXAH=((__CHARACTER )(( 0)));
         } else {
-          result__PQAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+          result__DXAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
         };
-        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'));
+        if (is_parameter_type__DLE) {
+          result__UQEH=FALSE__;
+          if ((((__INTEGER_8 )result__DXAH) >= ((__INTEGER_8 )'0'))) {
+            result__UQEH=(((__INTEGER_8 )result__DXAH) <= ((__INTEGER_8 )'9'));
           };
-          __tmp__M0J=result__4JEH;
+          __tmp__Y3J=result__UQEH;
         } else {
-          __tmp__M0J=FALSE__;
+          __tmp__Y3J=FALSE__;
         };
-        is_parameter_type__5HE=__tmp__M0J;
-        add_last__3IT(string_tmp__VH,result__PQAH);
+        is_parameter_type__DLE=__tmp__Y3J;
+        add_last__GOT(string_tmp__VH,result__DXAH);
         position__CCC=(__INTEGER)(position__CCC +  1);
-        goto until_do__TUZE;
+        goto until_do__PZZE;
       };
     };
-    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)) {
+    idx__F1J=first_substring_index__3ZZE(string_tmp__VH);
+    if ((idx__F1J !=  0)) {
+      position__CCC=(__INTEGER)(posold__E1J + idx__F1J);
+      pos__22YG=current_position__EZF();
+      put_error__text__NPG( 0,(&__string_207));
+      put_position__XQG(pos__22YG);
+      put_string__P3F(msg_err__SPG);
+      if ((type_error__RPG !=  2)) {
         exit(( 1));
       };
     };
-    last_string__V0C=get__YWB(string_tmp__VH);
-    result__0XJ=TRUE__;
+    last_string__V1C=get__YWB(string_tmp__VH);
+    result__G1J=TRUE__;
   };
-  return(result__0XJ);
+  return(result__G1J);
 }
 
-static void add_last__OABC(__FAST_ARRAYoITM_TYPE_PARAMETERo *Self__PABC,void *element__QABC)
+static void add_last__2DBC(__FAST_ARRAYoITM_TYPE_PARAMETERo *Self__3DBC,void *element__4DBC)
 // ({FAST_ARRAYoITM_TYPE_PARAMETERo},{NULLxITM_TYPE_PARAMETER}) VoidNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER new_capacity__5DBC,__tmp__IFBC,__tmp__C2SD,Self__GCYE;
+  __BOOLEAN __tmp__PEBC;
+  void **__tmp__HFBC,**new__O1SD;
+  new_capacity__5DBC= 0;
+  if (((__INTEGER)(Self__3DBC->parent_arrayed_collection__ONE.upper__AEBC +  1) <= (__INTEGER)(Self__3DBC->parent_arrayed_collection__ONE.capacity__CEBC -  1))) {
+    Self__3DBC->parent_arrayed_collection__ONE.upper__AEBC=(__INTEGER)(Self__3DBC->parent_arrayed_collection__ONE.upper__AEBC +  1);
+    __tmp__PEBC=TRUE__;
   } else {
-    __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;
+    __tmp__PEBC=FALSE__;
+  };
+  if ((! __tmp__PEBC)) {
+    if ((Self__3DBC->parent_arrayed_collection__ONE.capacity__CEBC ==  0)) {
+      Self__3DBC->parent_arrayed_collection__ONE.storage__4EBC=create__M31C( 2);
+      Self__3DBC->parent_arrayed_collection__ONE.capacity__CEBC= 2;
+      Self__3DBC->parent_arrayed_collection__ONE.upper__AEBC= 0;
+    } else {
+      new_capacity__5DBC=(__INTEGER)(Self__3DBC->parent_arrayed_collection__ONE.capacity__CEBC <<  1);
+      __tmp__HFBC=Self__3DBC->parent_arrayed_collection__ONE.storage__4EBC;
+      __tmp__IFBC=Self__3DBC->parent_arrayed_collection__ONE.capacity__CEBC;
+      new__O1SD=((void **)realloc_dynamic__old_size__new_size__ZHLC(((__POINTER )((void **)__tmp__HFBC)),((__UINTEGER_32 )(__INTEGER)(__tmp__IFBC * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__5DBC * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__C2SD=(__INTEGER)(new_capacity__5DBC -  1);
+      Self__GCYE=__tmp__IFBC;
+      while ((Self__GCYE <= __tmp__C2SD)) {
+        new__O1SD[Self__GCYE]=NULL;
+        Self__GCYE=(__INTEGER)(Self__GCYE +  1);
+      };
+      Self__3DBC->parent_arrayed_collection__ONE.storage__4EBC=new__O1SD;
+      Self__3DBC->parent_arrayed_collection__ONE.capacity__CEBC=new_capacity__5DBC;
+      Self__3DBC->parent_arrayed_collection__ONE.upper__AEBC=(__INTEGER)(Self__3DBC->parent_arrayed_collection__ONE.upper__AEBC +  1);
+    };
+  };
+  ((void **)Self__3DBC->parent_arrayed_collection__ONE.storage__4EBC)[Self__3DBC->parent_arrayed_collection__ONE.upper__AEBC]=element__4DBC;
 }
 
-static __BOOLEAN read_external__EQO()
+static __BOOLEAN read_external__QTO()
 // () With resultNo recursive, No inlinable.
 {
-  __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__TQO=TRUE__;
+  __INTEGER pos_old__UTO;
+  __BOOLEAN result__TTO,__tmp__5TO;
+  __CHARACTER result__YYAH,result__CZAH,result__LZAH,result__QZAH;
+  __CHARACTER result__VZAH,result__0ZAH,result__5ZAH,result__I0AH;
+  result__TTO=FALSE__;
+  pos_old__UTO= 0;
+  if ((! read_space__MTD())) {
+    __tmp__5TO=TRUE__;
   } else {
-    result__ESAH='\0';
+    result__YYAH='\0';
     if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-      result__ESAH=((__CHARACTER )(( 0)));
+      result__YYAH=((__CHARACTER )(( 0)));
     } else {
-      result__ESAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+      result__YYAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
     };
-    __tmp__TQO=(result__ESAH != '`');
+    __tmp__5TO=(result__YYAH != '`');
   };
-  if (__tmp__TQO) {
-    result__HQO=FALSE__;
+  if (__tmp__5TO) {
+    result__TTO=FALSE__;
   } else {
-    pos_old__IQO=position__CCC;
+    pos_old__UTO=position__CCC;
     position__CCC=(__INTEGER)(position__CCC +  1);
     ((__STRING *)string_tmp__VH)->count__EGC= 0;
-    until_do__EIRC:
+    until_do__SLRC:
     {
-      result__OSAH='\0';
+      result__CZAH='\0';
       if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__OSAH=((__CHARACTER )(( 0)));
+        result__CZAH=((__CHARACTER )(( 0)));
       } else {
-        result__OSAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+        result__CZAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
       };
-      result__XSAH='\0';
+      result__LZAH='\0';
       if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__XSAH=((__CHARACTER )(( 0)));
+        result__LZAH=((__CHARACTER )(( 0)));
       } else {
-        result__XSAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+        result__LZAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((! ((result__OSAH == ((__CHARACTER )(( 0)))) | (result__XSAH == '`')))) {
-        result__2SAH='\0';
+      if ((! ((result__CZAH == ((__CHARACTER )(( 0)))) | (result__LZAH == '`')))) {
+        result__QZAH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__2SAH=((__CHARACTER )(( 0)));
+          result__QZAH=((__CHARACTER )(( 0)));
         } else {
-          result__2SAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+          result__QZAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
         };
-        add_last__3IT(string_tmp__VH,result__2SAH);
-        result__BTAH='\0';
+        add_last__GOT(string_tmp__VH,result__QZAH);
+        result__VZAH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__BTAH=((__CHARACTER )(( 0)));
+          result__VZAH=((__CHARACTER )(( 0)));
         } else {
-          result__BTAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+          result__VZAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__BTAH == '\\')) {
+        if ((result__VZAH == '\\')) {
           position__CCC=(__INTEGER)(position__CCC +  1);
-          result__GTAH='\0';
+          result__0ZAH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__GTAH=((__CHARACTER )(( 0)));
+            result__0ZAH=((__CHARACTER )(( 0)));
           } else {
-            result__GTAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+            result__0ZAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
           };
-          add_last__3IT(string_tmp__VH,result__GTAH);
-          result__LTAH='\0';
+          add_last__GOT(string_tmp__VH,result__0ZAH);
+          result__5ZAH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__LTAH=((__CHARACTER )(( 0)));
+            result__5ZAH=((__CHARACTER )(( 0)));
           } else {
-            result__LTAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+            result__5ZAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__LTAH != ((__CHARACTER )(( 0))))) {
+          if ((result__5ZAH != ((__CHARACTER )(( 0))))) {
             position__CCC=(__INTEGER)(position__CCC +  1);
           };
         } else {
           position__CCC=(__INTEGER)(position__CCC +  1);
         };
-        goto until_do__EIRC;
+        goto until_do__SLRC;
       };
     };
-    result__UTAH='\0';
+    result__I0AH='\0';
     if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-      result__UTAH=((__CHARACTER )(( 0)));
+      result__I0AH=((__CHARACTER )(( 0)));
     } else {
-      result__UTAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+      result__I0AH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
     };
-    if ((result__UTAH != ((__CHARACTER )(( 0))))) {
+    if ((result__I0AH != ((__CHARACTER )(( 0))))) {
       position__CCC=(__INTEGER)(position__CCC +  1);
-      last_string__V0C=get__YWB(string_tmp__VH);
-      result__HQO=TRUE__;
-      short__token__to__YBD((&__string_65),pos_old__IQO,position__CCC);
+      last_string__V1C=get__YWB(string_tmp__VH);
+      result__TTO=TRUE__;
+      short__token__to__YCD((&__string_65),pos_old__UTO,position__CCC);
     } else {
-      result__HQO=FALSE__;
+      result__TTO=FALSE__;
     };
   };
-  return(result__HQO);
+  return(result__TTO);
 }
 
-static void* read_expr_primary__M1M(__PARSER *Self__N1M)
+static void* read_expr_primary__Y4M(__PARSER *Self__Z4M)
 // ({PARSER}) With resultNo recursive, No inlinable.
 {
-  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));
+  void *result__14M;
+  void *type__24M;
+  void *group_sav__B5M,*lst__TKHB;
+  __POSITION p__W1JH,pos__G5YG,p__FMAB,p__FKIH,p__C3JH,pos__I5YG,p__22H;
+  __POSITION pos__K5YG,pos__S5YG,__tmp__FGN,__tmp__NGN,pos__AAZG;
+  __POSITION pos__CAZG,pos__EAZG,pos__GAZG;
+  __ITM_READ *result__O1JH,*result__CZGB;
+  __POINTER ptr__P1JH,ptr_table__Y1JH,next__X1JH,result__Z1JH;
+  __POINTER ptr_table__31JH,next__21JH,result__41JH,ptr__DZGB;
+  __POINTER ptr_table__E2JH,next__D2JH,result__F2JH,ptr_table__J2JH;
+  __POINTER next__I2JH,result__K2JH,ptr__4JIH,ptr_table__O2JH;
+  __POINTER next__N2JH,result__P2JH,ptr_table__T2JH,next__S2JH;
+  __POINTER result__U2JH,ptr__12JH,ptr_table__E3JH,next__D3JH;
+  __POINTER result__F3JH,ptr_table__J3JH,next__I3JH,result__K3JH;
+  __POINTER ptr__QRI,ptr_table__U3JH,next__T3JH,result__V3JH;
+  __POINTER ptr_table__Z3JH,next__Y3JH,result__03JH,ptr__LIMB;
+  __POINTER ptr_table__B4JH,next__A4JH,result__C4JH,ptr_table__G4JH;
+  __POINTER next__F4JH,result__H4JH,ptr__QXTB,ptr_table__R4JH;
+  __POINTER next__Q4JH,result__S4JH,ptr_table__W4JH,next__V4JH;
+  __POINTER result__X4JH,ptr__EZTB,ptr_table__44JH,next__34JH;
+  __POINTER result__54JH,ptr_table__D5JH,next__C5JH,result__E5JH;
+  __INTEGER typ_id__Q1JH,typ_id__IZGB,typ_id__5JIH,typ_id__22JH;
+  __INTEGER typ_id__VRI,typ_id__QIMB,typ_id__VXTB,typ_id__JZTB;
+  __UINTEGER_32 sz__R1JH,a__S1JH,new_size__T1JH,t__U1JH,a__V1JH;
+  __UINTEGER_32 new_size__A2JH,lab_type__51JH,sz__FZGB,a__E2GH;
+  __UINTEGER_32 new_size__F2GH,t__J2GH,a__I2GH,new_size__M2JH;
+  __UINTEGER_32 lab_type__L2JH,sz__AKIH,a__BKIH,new_size__CKIH,t__DKIH;
+  __UINTEGER_32 a__EKIH,new_size__W2JH,lab_type__V2JH,sz__32JH,a__42JH;
+  __UINTEGER_32 new_size__52JH,t__A3JH,a__B3JH,new_size__M3JH;
+  __UINTEGER_32 lab_type__L3JH,sz__SRI,a__M0GH,new_size__N0GH,t__R0GH;
+  __UINTEGER_32 a__Q0GH,new_size__23JH,lab_type__13JH,sz__NIMB,a__GUGH;
+  __UINTEGER_32 new_size__HUGH,t__LUGH,a__KUGH,new_size__J4JH;
+  __UINTEGER_32 lab_type__I4JH,sz__SXTB,a__OUGH,new_size__PUGH,t__TUGH;
+  __UINTEGER_32 a__SUGH,new_size__Z4JH,lab_type__Y4JH,sz__GZTB,a__WUGH;
+  __UINTEGER_32 new_size__XUGH,t__1UGH,a__0UGH,new_size__G5JH;
+  __UINTEGER_32 lab_type__F5JH;
+  __ITM_PROTOTYPE *result__3JIH;
+  __ITM_LIST *result__02JH,*result__PRI;
+  __ITM_BLOCK *result__KIMB;
+  __ITM_EXTERNAL *result__PXTB;
+  __ITM_EXTERNAL_TYPE *result__DZTB,*Self__Y2EC;
+  __BOOLEAN result__N1JH,__tmp__R5M,__tmp__UBN,result__C2JH;
+  __BOOLEAN result__ASEH,__tmp__DCN,result__R0N,__tmp__RCN,__tmp__ODN;
+  __BOOLEAN result__X2JH,result__N3JH,__tmp__RFN,result__Q3JH;
+  __BOOLEAN result__33JH,result__K4JH,result__N4JH,result__04JH;
+  __BOOLEAN result__H5JH,result__K5JH,result__N5JH,__tmp__HIN;
+  __CHARACTER result__R0AH,result__W0AH,result__10AH,result__Y2JH;
+  __CHARACTER result__O3JH,result__R3JH,result__43JH,result__L4JH;
+  __CHARACTER result__O4JH,result__14JH,result__I5JH,result__L5JH;
+  __CHARACTER result__O5JH;
+  result__14M=NULL;
+  type__24M=NULL;
+  group_sav__B5M=NULL;
+  result__N1JH=read_word__LRF((&__string_58));
   if (is_shorter__LZ) {
-    if (result__OTJH) {
+    if (result__N1JH) {
       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 {
-        short__token__to__YBD((&__string_119),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD),position__CCC);
-      };
-    };
-  };
-  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)));
+        short__token__to__YCD((&__string_120),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V1C)->count__DD),position__CCC);
+      } else {
+        short__token__to__YCD((&__string_119),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V1C)->count__DD),position__CCC);
+      };
+    };
+  };
+  if (result__N1JH) {
+    p__W1JH=current_position__EZF();
+    result__O1JH=NULL;
+    ptr__P1JH=((__POINTER )(NULL));
+    typ_id__Q1JH= 0;
+    sz__R1JH=((__UINTEGER_32 )sizeof(__ITM_READ));
+    if ((sz__R1JH ==  0)) {
+      result__O1JH=ITM_READ__;
+    } else {
+      typ_id__Q1JH=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__R1JH);
+      if ((typ_id__Q1JH == (__INTEGER)(-  1))) {
+        a__S1JH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__T1JH=(__UINTEGER_32)((__UINTEGER_32)(sz__R1JH + a__S1JH) & (__UINTEGER_32)(~ a__S1JH));
+        ptr_table__Y1JH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__T1JH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__X1JH=((__POINTER )(NULL));
+        result__Z1JH=((__POINTER *)ptr_table__Y1JH)[ 0];
+        if ((result__Z1JH == (void *)NULL)) {
+          result__Z1JH=new_lab__FTJ(new_size__T1JH);
+          next__X1JH=(void *)((unsigned long)result__Z1JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__T1JH)));
+          ((__POINTER *)next__X1JH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__Y1JH)[ 0]=next__X1JH;
+        } else {
+          next__X1JH=((__POINTER *)result__Z1JH)[ 0];
+          if ((next__X1JH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__Z1JH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__T1JH <<  1)) <=  4096)) {
+              next__X1JH=(void *)((unsigned long)result__Z1JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__T1JH)));
             } else {
-              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)));
+              next__X1JH=new_lab__FTJ(new_size__T1JH);
+            };
+            ((__POINTER *)next__X1JH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__Y1JH)[ 0]=next__X1JH;
+          } else {
+            ((__POINTER *)result__Z1JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__X1JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__Z1JH=next__X1JH;
+          };
+        };
+        ptr__P1JH=result__Z1JH;
+      } else {
+        t__U1JH=((__UINTEGER_32 )typ_id__Q1JH);
+        a__V1JH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__A2JH=(__UINTEGER_32)((__UINTEGER_32)(sz__R1JH + a__V1JH) & (__UINTEGER_32)(~ a__V1JH));
+        ptr_table__31JH=((__POINTER )(&(table_type[(t__U1JH)])));
+        lab_type__51JH=(__UINTEGER_32)(t__U1JH |  1);
+        next__21JH=((__POINTER )(NULL));
+        result__41JH=((__POINTER *)ptr_table__31JH)[ 0];
+        if ((result__41JH == (void *)NULL)) {
+          result__41JH=new_lab__FTJ(lab_type__51JH);
+          next__21JH=(void *)((unsigned long)result__41JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__A2JH)));
+          ((__POINTER *)next__21JH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__31JH)[ 0]=next__21JH;
+        } else {
+          next__21JH=((__POINTER *)result__41JH)[ 0];
+          if ((next__21JH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__41JH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__A2JH <<  1)) <=  4096)) {
+              next__21JH=(void *)((unsigned long)result__41JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__A2JH)));
             } else {
-              next__3TJH=new_lab__ZPJ(lab_type__AUJH);
+              next__21JH=new_lab__FTJ(lab_type__51JH);
             };
-            ((__POINTER *)next__3TJH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__4TJH)[ 0]=next__3TJH;
+            ((__POINTER *)next__21JH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__31JH)[ 0]=next__21JH;
           } else {
-            ((__POINTER *)result__5TJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3TJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__5TJH=next__3TJH;
+            ((__POINTER *)result__41JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__21JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__41JH=next__21JH;
           };
         };
-        ptr__QTJH=result__5TJH;
+        ptr__P1JH=result__41JH;
       };
-      result__PTJH=((__ITM_READ *)ptr__QTJH);
-      *(result__PTJH) = *(ITM_READ__);
+      result__O1JH=((__ITM_READ *)ptr__P1JH);
+      *(result__O1JH) = *(ITM_READ__);
     };
-    ((__ITM_READ *)result__PTJH)->parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ=p__XTJH;
-    result__P1M=result__PTJH;
-    __tmp__F2M=TRUE__;
+    ((__ITM_READ *)result__O1JH)->parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ=p__W1JH;
+    result__14M=result__O1JH;
+    __tmp__R5M=TRUE__;
   } else {
-    __tmp__F2M=FALSE__;
+    __tmp__R5M=FALSE__;
   };
-  if (__tmp__F2M) {
-    __tmp__I4M=TRUE__;
+  if (__tmp__R5M) {
+    __tmp__UBN=TRUE__;
   } else {
-    result__DUJH=read_word__HOF((&__string_11));
+    result__C2JH=read_word__LRF((&__string_11));
     if (is_shorter__LZ) {
-      if (result__DUJH) {
+      if (result__C2JH) {
         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);
+          short__token__to__YCD((&__string_120),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V1C)->count__DD),position__CCC);
         } else {
-          short__token__to__YBD((&__string_119),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD),position__CCC);
+          short__token__to__YCD((&__string_119),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V1C)->count__DD),position__CCC);
         };
       };
     };
-    if (result__DUJH) {
-      result__3TAH='\0';
+    if (result__C2JH) {
+      result__R0AH='\0';
       if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__3TAH=((__CHARACTER )(( 0)));
+        result__R0AH=((__CHARACTER )(( 0)));
       } else {
-        result__3TAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+        result__R0AH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__3TAH == '_')) {
+      if ((result__R0AH == '_')) {
         position__CCC=(__INTEGER)(position__CCC +  1);
-        copy__35R(string_tmp__VH,(&__string_11));
-        add_last__3IT(string_tmp__VH,'_');
-        while_do__OUQB:
+        copy__JDS(string_tmp__VH,(&__string_11));
+        add_last__GOT(string_tmp__VH,'_');
+        while_do__0XQB:
         {
-          result__CUAH='\0';
+          result__W0AH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__CUAH=((__CHARACTER )(( 0)));
+            result__W0AH=((__CHARACTER )(( 0)));
           } else {
-            result__CUAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+            result__W0AH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
           };
-          result__KLEH=FALSE__;
-          if ((((__INTEGER_8 )result__CUAH) >= ((__INTEGER_8 )'0'))) {
-            result__KLEH=(((__INTEGER_8 )result__CUAH) <= ((__INTEGER_8 )'9'));
+          result__ASEH=FALSE__;
+          if ((((__INTEGER_8 )result__W0AH) >= ((__INTEGER_8 )'0'))) {
+            result__ASEH=(((__INTEGER_8 )result__W0AH) <= ((__INTEGER_8 )'9'));
           };
-          if (result__KLEH) {
-            result__HUAH='\0';
+          if (result__ASEH) {
+            result__10AH='\0';
             if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-              result__HUAH=((__CHARACTER )(( 0)));
+              result__10AH=((__CHARACTER )(( 0)));
             } else {
-              result__HUAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+              result__10AH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
             };
-            add_last__3IT(string_tmp__VH,result__HUAH);
+            add_last__GOT(string_tmp__VH,result__10AH);
             position__CCC=(__INTEGER)(position__CCC +  1);
-            goto while_do__OUQB;
+            goto while_do__0XQB;
           };
         };
         if ((((__STRING *)string_tmp__VH)->count__EGC ==  0)) {
-          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)) {
+          pos__G5YG=current_position__EZF();
+          put_error__text__NPG( 0,(&__string_304));
+          put_position__XQG(pos__G5YG);
+          put_string__P3F(msg_err__SPG);
+          if ((type_error__RPG !=  2)) {
             exit(( 1));
           };
         };
         get__YWB(string_tmp__VH);
       };
-      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)));
+      p__FMAB=current_position__EZF();
+      result__CZGB=NULL;
+      ptr__DZGB=((__POINTER )(NULL));
+      typ_id__IZGB= 0;
+      sz__FZGB=((__UINTEGER_32 )sizeof(__ITM_READ));
+      if ((sz__FZGB ==  0)) {
+        result__CZGB=ITM_READ__;
+      } else {
+        typ_id__IZGB=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__FZGB);
+        if ((typ_id__IZGB == (__INTEGER)(-  1))) {
+          a__E2GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__F2GH=(__UINTEGER_32)((__UINTEGER_32)(sz__FZGB + a__E2GH) & (__UINTEGER_32)(~ a__E2GH));
+          ptr_table__E2JH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__F2GH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__D2JH=((__POINTER )(NULL));
+          result__F2JH=((__POINTER *)ptr_table__E2JH)[ 0];
+          if ((result__F2JH == (void *)NULL)) {
+            result__F2JH=new_lab__FTJ(new_size__F2GH);
+            next__D2JH=(void *)((unsigned long)result__F2JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__F2GH)));
+            ((__POINTER *)next__D2JH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__E2JH)[ 0]=next__D2JH;
+          } else {
+            next__D2JH=((__POINTER *)result__F2JH)[ 0];
+            if ((next__D2JH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__F2JH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__F2GH <<  1)) <=  4096)) {
+                next__D2JH=(void *)((unsigned long)result__F2JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__F2GH)));
               } else {
-                next__EUJH=new_lab__ZPJ(new_size__KVGH);
+                next__D2JH=new_lab__FTJ(new_size__F2GH);
               };
-              ((__POINTER *)next__EUJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__FUJH)[ 0]=next__EUJH;
+              ((__POINTER *)next__D2JH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__E2JH)[ 0]=next__D2JH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__F2JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__D2JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__F2JH=next__D2JH;
+            };
+          };
+          ptr__DZGB=result__F2JH;
+        } else {
+          t__J2GH=((__UINTEGER_32 )typ_id__IZGB);
+          a__I2GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__M2JH=(__UINTEGER_32)((__UINTEGER_32)(sz__FZGB + a__I2GH) & (__UINTEGER_32)(~ a__I2GH));
+          ptr_table__J2JH=((__POINTER )(&(table_type[(t__J2GH)])));
+          lab_type__L2JH=(__UINTEGER_32)(t__J2GH |  1);
+          next__I2JH=((__POINTER )(NULL));
+          result__K2JH=((__POINTER *)ptr_table__J2JH)[ 0];
+          if ((result__K2JH == (void *)NULL)) {
+            result__K2JH=new_lab__FTJ(lab_type__L2JH);
+            next__I2JH=(void *)((unsigned long)result__K2JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__M2JH)));
+            ((__POINTER *)next__I2JH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__J2JH)[ 0]=next__I2JH;
+          } else {
+            next__I2JH=((__POINTER *)result__K2JH)[ 0];
+            if ((next__I2JH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__K2JH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__M2JH <<  1)) <=  4096)) {
+                next__I2JH=(void *)((unsigned long)result__K2JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__M2JH)));
               } else {
-                next__JUJH=new_lab__ZPJ(lab_type__MUJH);
+                next__I2JH=new_lab__FTJ(lab_type__L2JH);
               };
-              ((__POINTER *)next__JUJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__KUJH)[ 0]=next__JUJH;
+              ((__POINTER *)next__I2JH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__J2JH)[ 0]=next__I2JH;
             } else {
-              ((__POINTER *)result__LUJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JUJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__LUJH=next__JUJH;
+              ((__POINTER *)result__K2JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__I2JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__K2JH=next__I2JH;
             };
           };
-          ptr__XVGB=result__LUJH;
+          ptr__DZGB=result__K2JH;
         };
-        result__WVGB=((__ITM_READ *)ptr__XVGB);
-        *(result__WVGB) = *(ITM_READ__);
+        result__CZGB=((__ITM_READ *)ptr__DZGB);
+        *(result__CZGB) = *(ITM_READ__);
       };
-      ((__ITM_READ *)result__WVGB)->parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ=p__ZIAB;
-      result__P1M=result__WVGB;
+      ((__ITM_READ *)result__CZGB)->parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ=p__FMAB;
+      result__14M=result__CZGB;
     };
-    __tmp__I4M=result__DUJH;
+    __tmp__UBN=result__C2JH;
   };
-  if (__tmp__I4M) {
-    __tmp__X4M=TRUE__;
+  if (__tmp__UBN) {
+    __tmp__DCN=TRUE__;
   } else {
-    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)));
+    type__24M=read_prototype__XON(Self__Z4M,NULL);
+    result__R0N=((void *)type__24M != (void *)NULL);
+    if (result__R0N) {
+      p__FKIH=current_position__EZF();
+      result__3JIH=NULL;
+      ptr__4JIH=((__POINTER )(NULL));
+      typ_id__5JIH= 0;
+      sz__AKIH=((__UINTEGER_32 )sizeof(__ITM_PROTOTYPE));
+      if ((sz__AKIH ==  0)) {
+        result__3JIH=ITM_PROTOTYPE__;
+      } else {
+        typ_id__5JIH=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__AKIH);
+        if ((typ_id__5JIH == (__INTEGER)(-  1))) {
+          a__BKIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__CKIH=(__UINTEGER_32)((__UINTEGER_32)(sz__AKIH + a__BKIH) & (__UINTEGER_32)(~ a__BKIH));
+          ptr_table__O2JH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__CKIH / ((__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__FTJ(new_size__CKIH);
+            next__N2JH=(void *)((unsigned long)result__P2JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CKIH)));
+            ((__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__SXH)))) &  4095) + (__UINTEGER_32)(new_size__CKIH <<  1)) <=  4096)) {
+                next__N2JH=(void *)((unsigned long)result__P2JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CKIH)));
               } else {
-                next__OUJH=new_lab__ZPJ(new_size__PCIH);
+                next__N2JH=new_lab__FTJ(new_size__CKIH);
               };
-              ((__POINTER *)next__OUJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__PUJH)[ 0]=next__OUJH;
+              ((__POINTER *)next__N2JH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__O2JH)[ 0]=next__N2JH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__P2JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__N2JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__P2JH=next__N2JH;
+            };
+          };
+          ptr__4JIH=result__P2JH;
+        } else {
+          t__DKIH=((__UINTEGER_32 )typ_id__5JIH);
+          a__EKIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__W2JH=(__UINTEGER_32)((__UINTEGER_32)(sz__AKIH + a__EKIH) & (__UINTEGER_32)(~ a__EKIH));
+          ptr_table__T2JH=((__POINTER )(&(table_type[(t__DKIH)])));
+          lab_type__V2JH=(__UINTEGER_32)(t__DKIH |  1);
+          next__S2JH=((__POINTER )(NULL));
+          result__U2JH=((__POINTER *)ptr_table__T2JH)[ 0];
+          if ((result__U2JH == (void *)NULL)) {
+            result__U2JH=new_lab__FTJ(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__SXH)))) &  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__TUJH=new_lab__ZPJ(lab_type__WUJH);
+                next__S2JH=new_lab__FTJ(lab_type__V2JH);
               };
-              ((__POINTER *)next__TUJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__UUJH)[ 0]=next__TUJH;
+              ((__POINTER *)next__S2JH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__T2JH)[ 0]=next__S2JH;
             } else {
-              ((__POINTER *)result__VUJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TUJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__VUJH=next__TUJH;
+              ((__POINTER *)result__U2JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__S2JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__U2JH=next__S2JH;
             };
           };
-          ptr__LCIH=result__VUJH;
+          ptr__4JIH=result__U2JH;
         };
-        result__KCIH=((__ITM_PROTOTYPE *)ptr__LCIH);
-        *(result__KCIH) = *(ITM_PROTOTYPE__);
+        result__3JIH=((__ITM_PROTOTYPE *)ptr__4JIH);
+        *(result__3JIH) = *(ITM_PROTOTYPE__);
       };
-      ((__ITM_PROTOTYPE *)result__KCIH)->parent_itm_constant__TUF.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ=p__SCIH;
-      result__P1M=result__KCIH;
+      ((__ITM_PROTOTYPE *)result__3JIH)->parent_itm_constant__XXF.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ=p__FKIH;
+      result__14M=result__3JIH;
     };
-    __tmp__X4M=result__FXN;
+    __tmp__DCN=result__R0N;
   };
-  if (__tmp__X4M) {
-    __tmp__F5M=TRUE__;
+  if (__tmp__DCN) {
+    __tmp__RCN=TRUE__;
   } else {
-    result__P1M=read_constant__5NO();
-    __tmp__F5M=((void *)result__P1M != (void *)NULL);
+    result__14M=read_constant__LRO();
+    __tmp__RCN=((void *)result__14M != (void *)NULL);
   };
-  if (__tmp__F5M) {
-    __tmp__CAN=TRUE__;
+  if (__tmp__RCN) {
+    __tmp__ODN=TRUE__;
   } else {
-    result__YUJH=FALSE__;
-    if ((! read_space__KSD())) {
-      result__YUJH=FALSE__;
+    result__X2JH=FALSE__;
+    if ((! read_space__MTD())) {
+      result__X2JH=FALSE__;
     } else {
-      result__ZUJH='\0';
+      result__Y2JH='\0';
       if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__ZUJH=((__CHARACTER )(( 0)));
+        result__Y2JH=((__CHARACTER )(( 0)));
       } else {
-        result__ZUJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+        result__Y2JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__ZUJH == '(')) {
+      if ((result__Y2JH == '(')) {
         position__CCC=(__INTEGER)(position__CCC +  1);
-        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)));
+        result__X2JH=TRUE__;
+      };
+    };
+    if (result__X2JH) {
+      group_sav__B5M=last_group__WVF;
+      p__C3JH=current_position__EZF();
+      result__02JH=NULL;
+      ptr__12JH=((__POINTER )(NULL));
+      typ_id__22JH= 0;
+      sz__32JH=((__UINTEGER_32 )sizeof(__ITM_LIST));
+      if ((sz__32JH ==  0)) {
+        result__02JH=ITM_LIST__;
+      } else {
+        typ_id__22JH=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__32JH);
+        if ((typ_id__22JH == (__INTEGER)(-  1))) {
+          a__42JH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__52JH=(__UINTEGER_32)((__UINTEGER_32)(sz__32JH + a__42JH) & (__UINTEGER_32)(~ a__42JH));
+          ptr_table__E3JH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__52JH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__D3JH=((__POINTER )(NULL));
+          result__F3JH=((__POINTER *)ptr_table__E3JH)[ 0];
+          if ((result__F3JH == (void *)NULL)) {
+            result__F3JH=new_lab__FTJ(new_size__52JH);
+            next__D3JH=(void *)((unsigned long)result__F3JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__52JH)));
+            ((__POINTER *)next__D3JH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__E3JH)[ 0]=next__D3JH;
+          } else {
+            next__D3JH=((__POINTER *)result__F3JH)[ 0];
+            if ((next__D3JH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__F3JH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__52JH <<  1)) <=  4096)) {
+                next__D3JH=(void *)((unsigned long)result__F3JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__52JH)));
               } else {
-                next__EVJH=new_lab__ZPJ(new_size__AVJH);
+                next__D3JH=new_lab__FTJ(new_size__52JH);
               };
-              ((__POINTER *)next__EVJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__FVJH)[ 0]=next__EVJH;
+              ((__POINTER *)next__D3JH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__E3JH)[ 0]=next__D3JH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__F3JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__D3JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__F3JH=next__D3JH;
+            };
+          };
+          ptr__12JH=result__F3JH;
+        } else {
+          t__A3JH=((__UINTEGER_32 )typ_id__22JH);
+          a__B3JH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__M3JH=(__UINTEGER_32)((__UINTEGER_32)(sz__32JH + a__B3JH) & (__UINTEGER_32)(~ a__B3JH));
+          ptr_table__J3JH=((__POINTER )(&(table_type[(t__A3JH)])));
+          lab_type__L3JH=(__UINTEGER_32)(t__A3JH |  1);
+          next__I3JH=((__POINTER )(NULL));
+          result__K3JH=((__POINTER *)ptr_table__J3JH)[ 0];
+          if ((result__K3JH == (void *)NULL)) {
+            result__K3JH=new_lab__FTJ(lab_type__L3JH);
+            next__I3JH=(void *)((unsigned long)result__K3JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__M3JH)));
+            ((__POINTER *)next__I3JH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__J3JH)[ 0]=next__I3JH;
+          } else {
+            next__I3JH=((__POINTER *)result__K3JH)[ 0];
+            if ((next__I3JH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__K3JH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__M3JH <<  1)) <=  4096)) {
+                next__I3JH=(void *)((unsigned long)result__K3JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__M3JH)));
               } else {
-                next__JVJH=new_lab__ZPJ(lab_type__MVJH);
+                next__I3JH=new_lab__FTJ(lab_type__L3JH);
               };
-              ((__POINTER *)next__JVJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__KVJH)[ 0]=next__JVJH;
+              ((__POINTER *)next__I3JH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__J3JH)[ 0]=next__I3JH;
             } else {
-              ((__POINTER *)result__LVJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JVJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__LVJH=next__JVJH;
+              ((__POINTER *)result__K3JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__I3JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__K3JH=next__I3JH;
             };
           };
-          ptr__2UJH=result__LVJH;
+          ptr__12JH=result__K3JH;
         };
-        result__1UJH=((__ITM_LIST *)ptr__2UJH);
-        *(result__1UJH) = *(ITM_LIST__);
+        result__02JH=((__ITM_LIST *)ptr__12JH);
+        *(result__02JH) = *(ITM_LIST__);
       };
-      ((__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__OVJH=FALSE__;
+      ((__ITM_LIST *)result__02JH)->parent_itm_code__VAF.parent_itm_object__SEE.position__GFJ=p__C3JH;
+      last_group__WVF=result__02JH;
+      result__14M=result__02JH;
+      read_group__TBHB(Self__Z4M);
+      result__N3JH=FALSE__;
+      if ((! read_space__MTD())) {
+        result__N3JH=FALSE__;
       } else {
-        result__PVJH='\0';
+        result__O3JH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__PVJH=((__CHARACTER )(( 0)));
+          result__O3JH=((__CHARACTER )(( 0)));
         } else {
-          result__PVJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+          result__O3JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__PVJH == ')')) {
+        if ((result__O3JH == ')')) {
           position__CCC=(__INTEGER)(position__CCC +  1);
-          result__OVJH=TRUE__;
+          result__N3JH=TRUE__;
         };
       };
-      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)) {
+      if ((! result__N3JH)) {
+        pos__I5YG=current_position__EZF();
+        put_error__text__NPG( 2,(&__string_262));
+        put_position__XQG(pos__I5YG);
+        put_string__P3F(msg_err__SPG);
+        if ((type_error__RPG !=  2)) {
           exit(( 1));
         };
       };
-      last_group__SSF=group_sav__V1M;
+      last_group__WVF=group_sav__B5M;
     };
-    __tmp__CAN=result__YUJH;
+    __tmp__ODN=result__X2JH;
   };
-  if (__tmp__CAN) {
-    __tmp__FCN=TRUE__;
+  if (__tmp__ODN) {
+    __tmp__RFN=TRUE__;
   } else {
-    result__RVJH=FALSE__;
-    if ((! read_space__KSD())) {
-      result__RVJH=FALSE__;
+    result__Q3JH=FALSE__;
+    if ((! read_space__MTD())) {
+      result__Q3JH=FALSE__;
     } else {
-      result__SVJH='\0';
+      result__R3JH='\0';
       if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__SVJH=((__CHARACTER )(( 0)));
+        result__R3JH=((__CHARACTER )(( 0)));
       } else {
-        result__SVJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+        result__R3JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__SVJH == '{')) {
+      if ((result__R3JH == '{')) {
         position__CCC=(__INTEGER)(position__CCC +  1);
-        result__RVJH=TRUE__;
-      };
-    };
-    if (result__RVJH) {
-      short__token__to__YBD((&__string_133),(__INTEGER)(position__CCC -  1),position__CCC);
-      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)));
+        result__Q3JH=TRUE__;
+      };
+    };
+    if (result__Q3JH) {
+      short__token__to__YCD((&__string_133),(__INTEGER)(position__CCC -  1),position__CCC);
+      group_sav__B5M=last_group__WVF;
+      p__22H=current_position__EZF();
+      result__PRI=NULL;
+      ptr__QRI=((__POINTER )(NULL));
+      typ_id__VRI= 0;
+      sz__SRI=((__UINTEGER_32 )sizeof(__ITM_LIST));
+      if ((sz__SRI ==  0)) {
+        result__PRI=ITM_LIST__;
+      } else {
+        typ_id__VRI=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__SRI);
+        if ((typ_id__VRI == (__INTEGER)(-  1))) {
+          a__M0GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__N0GH=(__UINTEGER_32)((__UINTEGER_32)(sz__SRI + a__M0GH) & (__UINTEGER_32)(~ a__M0GH));
+          ptr_table__U3JH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__N0GH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__T3JH=((__POINTER )(NULL));
+          result__V3JH=((__POINTER *)ptr_table__U3JH)[ 0];
+          if ((result__V3JH == (void *)NULL)) {
+            result__V3JH=new_lab__FTJ(new_size__N0GH);
+            next__T3JH=(void *)((unsigned long)result__V3JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__N0GH)));
+            ((__POINTER *)next__T3JH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__U3JH)[ 0]=next__T3JH;
+          } else {
+            next__T3JH=((__POINTER *)result__V3JH)[ 0];
+            if ((next__T3JH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__V3JH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__N0GH <<  1)) <=  4096)) {
+                next__T3JH=(void *)((unsigned long)result__V3JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__N0GH)));
               } else {
-                next__UVJH=new_lab__ZPJ(new_size__STGH);
+                next__T3JH=new_lab__FTJ(new_size__N0GH);
               };
-              ((__POINTER *)next__UVJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__VVJH)[ 0]=next__UVJH;
+              ((__POINTER *)next__T3JH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__U3JH)[ 0]=next__T3JH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__V3JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__T3JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__V3JH=next__T3JH;
+            };
+          };
+          ptr__QRI=result__V3JH;
+        } else {
+          t__R0GH=((__UINTEGER_32 )typ_id__VRI);
+          a__Q0GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__23JH=(__UINTEGER_32)((__UINTEGER_32)(sz__SRI + a__Q0GH) & (__UINTEGER_32)(~ a__Q0GH));
+          ptr_table__Z3JH=((__POINTER )(&(table_type[(t__R0GH)])));
+          lab_type__13JH=(__UINTEGER_32)(t__R0GH |  1);
+          next__Y3JH=((__POINTER )(NULL));
+          result__03JH=((__POINTER *)ptr_table__Z3JH)[ 0];
+          if ((result__03JH == (void *)NULL)) {
+            result__03JH=new_lab__FTJ(lab_type__13JH);
+            next__Y3JH=(void *)((unsigned long)result__03JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__23JH)));
+            ((__POINTER *)next__Y3JH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__Z3JH)[ 0]=next__Y3JH;
+          } else {
+            next__Y3JH=((__POINTER *)result__03JH)[ 0];
+            if ((next__Y3JH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__03JH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__23JH <<  1)) <=  4096)) {
+                next__Y3JH=(void *)((unsigned long)result__03JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__23JH)));
               } else {
-                next__ZVJH=new_lab__ZPJ(lab_type__2VJH);
+                next__Y3JH=new_lab__FTJ(lab_type__13JH);
               };
-              ((__POINTER *)next__ZVJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__0VJH)[ 0]=next__ZVJH;
+              ((__POINTER *)next__Y3JH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__Z3JH)[ 0]=next__Y3JH;
             } else {
-              ((__POINTER *)result__1VJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZVJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__1VJH=next__ZVJH;
+              ((__POINTER *)result__03JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__Y3JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__03JH=next__Y3JH;
             };
           };
-          ptr__EOI=result__1VJH;
+          ptr__QRI=result__03JH;
         };
-        result__DOI=((__ITM_LIST *)ptr__EOI);
-        *(result__DOI) = *(ITM_LIST__);
+        result__PRI=((__ITM_LIST *)ptr__QRI);
+        *(result__PRI) = *(ITM_LIST__);
       };
-      ((__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__4VJH=FALSE__;
+      ((__ITM_LIST *)result__PRI)->parent_itm_code__VAF.parent_itm_object__SEE.position__GFJ=p__22H;
+      last_group__WVF=result__PRI;
+      old_position__2SI=position__CCC;
+      old_pos_cur__4SI=pos_cur__FCC;
+      old_pos_line__ATI=pos_line__GCC;
+      old_pos_col__CTI=pos_col__HCC;
+      old_short_derive__ETI=short_derive__PCC;
+      if (((void *)read_loc_arg__with_self__SEHB(Self__Z4M,TRUE__,FALSE__) != (void *)NULL)) {
+        result__33JH=FALSE__;
+        if ((! read_space__MTD())) {
+          result__33JH=FALSE__;
         } else {
-          result__5VJH='\0';
+          result__43JH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__5VJH=((__CHARACTER )(( 0)));
+            result__43JH=((__CHARACTER )(( 0)));
           } else {
-            result__5VJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+            result__43JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__5VJH == ';')) {
+          if ((result__43JH == ';')) {
             position__CCC=(__INTEGER)(position__CCC +  1);
-            result__4VJH=TRUE__;
+            result__33JH=TRUE__;
           };
         };
-        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)) {
+        if ((! result__33JH)) {
+          pos__K5YG=current_position__EZF();
+          put_error__text__NPG( 2,(&__string_242));
+          put_position__XQG(pos__K5YG);
+          put_string__P3F(msg_err__SPG);
+          if ((type_error__RPG !=  2)) {
             exit(( 1));
           };
         };
       } else {
-        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)));
+        restore_context__YEL();
+      };
+      lst__TKHB=last_group__WVF;
+      result__KIMB=NULL;
+      ptr__LIMB=((__POINTER )(NULL));
+      typ_id__QIMB= 0;
+      sz__NIMB=((__UINTEGER_32 )sizeof(__ITM_BLOCK));
+      if ((sz__NIMB ==  0)) {
+        result__KIMB=ITM_BLOCK__;
+      } else {
+        typ_id__QIMB=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__NIMB);
+        if ((typ_id__QIMB == (__INTEGER)(-  1))) {
+          a__GUGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__HUGH=(__UINTEGER_32)((__UINTEGER_32)(sz__NIMB + a__GUGH) & (__UINTEGER_32)(~ a__GUGH));
+          ptr_table__B4JH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__HUGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__A4JH=((__POINTER )(NULL));
+          result__C4JH=((__POINTER *)ptr_table__B4JH)[ 0];
+          if ((result__C4JH == (void *)NULL)) {
+            result__C4JH=new_lab__FTJ(new_size__HUGH);
+            next__A4JH=(void *)((unsigned long)result__C4JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HUGH)));
+            ((__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__SXH)))) &  4095) + (__UINTEGER_32)(new_size__HUGH <<  1)) <=  4096)) {
+                next__A4JH=(void *)((unsigned long)result__C4JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HUGH)));
               } else {
-                next__BWJH=new_lab__ZPJ(new_size__MNGH);
+                next__A4JH=new_lab__FTJ(new_size__HUGH);
               };
-              ((__POINTER *)next__BWJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__CWJH)[ 0]=next__BWJH;
+              ((__POINTER *)next__A4JH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__B4JH)[ 0]=next__A4JH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__C4JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__A4JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__C4JH=next__A4JH;
+            };
+          };
+          ptr__LIMB=result__C4JH;
+        } else {
+          t__LUGH=((__UINTEGER_32 )typ_id__QIMB);
+          a__KUGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__J4JH=(__UINTEGER_32)((__UINTEGER_32)(sz__NIMB + a__KUGH) & (__UINTEGER_32)(~ a__KUGH));
+          ptr_table__G4JH=((__POINTER )(&(table_type[(t__LUGH)])));
+          lab_type__I4JH=(__UINTEGER_32)(t__LUGH |  1);
+          next__F4JH=((__POINTER )(NULL));
+          result__H4JH=((__POINTER *)ptr_table__G4JH)[ 0];
+          if ((result__H4JH == (void *)NULL)) {
+            result__H4JH=new_lab__FTJ(lab_type__I4JH);
+            next__F4JH=(void *)((unsigned long)result__H4JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__J4JH)));
+            ((__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__SXH)))) &  4095) + (__UINTEGER_32)(new_size__J4JH <<  1)) <=  4096)) {
+                next__F4JH=(void *)((unsigned long)result__H4JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__J4JH)));
               } else {
-                next__GWJH=new_lab__ZPJ(lab_type__JWJH);
+                next__F4JH=new_lab__FTJ(lab_type__I4JH);
               };
-              ((__POINTER *)next__GWJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__HWJH)[ 0]=next__GWJH;
+              ((__POINTER *)next__F4JH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__G4JH)[ 0]=next__F4JH;
             } else {
-              ((__POINTER *)result__IWJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GWJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__IWJH=next__GWJH;
+              ((__POINTER *)result__H4JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__F4JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__H4JH=next__F4JH;
             };
           };
-          ptr__5EMB=result__IWJH;
+          ptr__LIMB=result__H4JH;
         };
-        result__4EMB=((__ITM_BLOCK *)ptr__5EMB);
-        *(result__4EMB) = *(ITM_BLOCK__);
+        result__KIMB=((__ITM_BLOCK *)ptr__LIMB);
+        *(result__KIMB) = *(ITM_BLOCK__);
       };
-      ((__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__LWJH=FALSE__;
+      ((__ITM_BLOCK *)result__KIMB)->list__ZPDC=lst__TKHB;
+      result__14M=result__KIMB;
+      read_group__TBHB(Self__Z4M);
+      result__K4JH=FALSE__;
+      if ((! read_space__MTD())) {
+        result__K4JH=FALSE__;
       } else {
-        result__MWJH='\0';
+        result__L4JH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__MWJH=((__CHARACTER )(( 0)));
+          result__L4JH=((__CHARACTER )(( 0)));
         } else {
-          result__MWJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+          result__L4JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__MWJH == '}')) {
+        if ((result__L4JH == '}')) {
           position__CCC=(__INTEGER)(position__CCC +  1);
-          result__LWJH=TRUE__;
+          result__K4JH=TRUE__;
         };
       };
-      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)) {
+      if ((! result__K4JH)) {
+        pos__S5YG=current_position__EZF();
+        put_error__text__NPG( 2,(&__string_294));
+        put_position__XQG(pos__S5YG);
+        put_string__P3F(msg_err__SPG);
+        if ((type_error__RPG !=  2)) {
           exit(( 1));
         };
       };
-      short__token__to__YBD((&__string_133),(__INTEGER)(position__CCC -  1),position__CCC);
-      last_group__SSF=group_sav__V1M;
+      short__token__to__YCD((&__string_133),(__INTEGER)(position__CCC -  1),position__CCC);
+      last_group__WVF=group_sav__B5M;
     };
-    __tmp__FCN=result__RVJH;
+    __tmp__RFN=result__Q3JH;
   };
-  if ((! __tmp__FCN)) {
-    if (read_external__EQO()) {
-      result__OWJH=FALSE__;
-      if ((! read_space__KSD())) {
-        result__OWJH=FALSE__;
+  if ((! __tmp__RFN)) {
+    if (read_external__QTO()) {
+      result__N4JH=FALSE__;
+      if ((! read_space__MTD())) {
+        result__N4JH=FALSE__;
       } else {
-        result__PWJH='\0';
+        result__O4JH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__PWJH=((__CHARACTER )(( 0)));
+          result__O4JH=((__CHARACTER )(( 0)));
         } else {
-          result__PWJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+          result__O4JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__PWJH == ':')) {
+        if ((result__O4JH == ':')) {
           position__CCC=(__INTEGER)(position__CCC +  1);
-          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;
+          result__N4JH=TRUE__;
+        };
+      };
+      if ((! result__N4JH)) {
+        __tmp__FGN=current_position__EZF();
+        result__PXTB=NULL;
+        ptr__QXTB=((__POINTER )(NULL));
+        typ_id__VXTB= 0;
+        sz__SXTB=((__UINTEGER_32 )sizeof(__ITM_EXTERNAL));
+        if ((sz__SXTB ==  0)) {
+          result__PXTB=ITM_EXTERNAL__;
+        } else {
+          typ_id__VXTB=-1;
+          clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__SXTB);
+          if ((typ_id__VXTB == (__INTEGER)(-  1))) {
+            a__OUGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__PUGH=(__UINTEGER_32)((__UINTEGER_32)(sz__SXTB + a__OUGH) & (__UINTEGER_32)(~ a__OUGH));
+            ptr_table__R4JH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__PUGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__Q4JH=((__POINTER )(NULL));
+            result__S4JH=((__POINTER *)ptr_table__R4JH)[ 0];
+            if ((result__S4JH == (void *)NULL)) {
+              result__S4JH=new_lab__FTJ(new_size__PUGH);
+              next__Q4JH=(void *)((unsigned long)result__S4JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PUGH)));
+              ((__POINTER *)next__Q4JH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__R4JH)[ 0]=next__Q4JH;
             } else {
-              next__RWJH=((__POINTER *)result__TWJH)[ 0];
-              if ((next__RWJH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TWJH - (unsigned long)begin_memory__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)));
+              next__Q4JH=((__POINTER *)result__S4JH)[ 0];
+              if ((next__Q4JH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__S4JH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__PUGH <<  1)) <=  4096)) {
+                  next__Q4JH=(void *)((unsigned long)result__S4JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PUGH)));
                 } else {
-                  next__RWJH=new_lab__ZPJ(new_size__UNGH);
+                  next__Q4JH=new_lab__FTJ(new_size__PUGH);
                 };
-                ((__POINTER *)next__RWJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__SWJH)[ 0]=next__RWJH;
+                ((__POINTER *)next__Q4JH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__R4JH)[ 0]=next__Q4JH;
               } else {
-                ((__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;
+                ((__POINTER *)result__S4JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__Q4JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__S4JH=next__Q4JH;
+              };
+            };
+            ptr__QXTB=result__S4JH;
+          } else {
+            t__TUGH=((__UINTEGER_32 )typ_id__VXTB);
+            a__SUGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__Z4JH=(__UINTEGER_32)((__UINTEGER_32)(sz__SXTB + a__SUGH) & (__UINTEGER_32)(~ a__SUGH));
+            ptr_table__W4JH=((__POINTER )(&(table_type[(t__TUGH)])));
+            lab_type__Y4JH=(__UINTEGER_32)(t__TUGH |  1);
+            next__V4JH=((__POINTER )(NULL));
+            result__X4JH=((__POINTER *)ptr_table__W4JH)[ 0];
+            if ((result__X4JH == (void *)NULL)) {
+              result__X4JH=new_lab__FTJ(lab_type__Y4JH);
+              next__V4JH=(void *)((unsigned long)result__X4JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Z4JH)));
+              ((__POINTER *)next__V4JH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__W4JH)[ 0]=next__V4JH;
             } else {
-              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)));
+              next__V4JH=((__POINTER *)result__X4JH)[ 0];
+              if ((next__V4JH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__X4JH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__Z4JH <<  1)) <=  4096)) {
+                  next__V4JH=(void *)((unsigned long)result__X4JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Z4JH)));
                 } else {
-                  next__WWJH=new_lab__ZPJ(lab_type__ZWJH);
+                  next__V4JH=new_lab__FTJ(lab_type__Y4JH);
                 };
-                ((__POINTER *)next__WWJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__XWJH)[ 0]=next__WWJH;
+                ((__POINTER *)next__V4JH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__W4JH)[ 0]=next__V4JH;
               } else {
-                ((__POINTER *)result__YWJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WWJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__YWJH=next__WWJH;
+                ((__POINTER *)result__X4JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__V4JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__X4JH=next__V4JH;
               };
             };
-            ptr__EUTB=result__YWJH;
+            ptr__QXTB=result__X4JH;
           };
-          result__DUTB=((__ITM_EXTERNAL *)ptr__EUTB);
-          *(result__DUTB) = *(ITM_EXTERNAL__);
+          result__PXTB=((__ITM_EXTERNAL *)ptr__QXTB);
+          *(result__PXTB) = *(ITM_EXTERNAL__);
         };
-        ((__ITM_EXTERNAL *)result__DUTB)->parent_itm_extern__YCN.parent_itm_code__S1M.parent_itm_object__OBE.position__0BJ=__tmp__ZCN;
-        result__P1M=result__DUTB;
+        ((__ITM_EXTERNAL *)result__PXTB)->parent_itm_extern__EGN.parent_itm_code__44M.parent_itm_object__SEE.position__GFJ=__tmp__FGN;
+        result__14M=result__PXTB;
       } else {
-        __tmp__BDN=current_position__AWF();
-        result__1WJH=FALSE__;
-        if ((! read_space__KSD())) {
-          result__1WJH=FALSE__;
+        __tmp__NGN=current_position__EZF();
+        result__04JH=FALSE__;
+        if ((! read_space__MTD())) {
+          result__04JH=FALSE__;
         } else {
-          result__2WJH='\0';
+          result__14JH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__2WJH=((__CHARACTER )(( 0)));
+            result__14JH=((__CHARACTER )(( 0)));
           } else {
-            result__2WJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+            result__14JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__2WJH == '(')) {
+          if ((result__14JH == '(')) {
             position__CCC=(__INTEGER)(position__CCC +  1);
-            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;
+            result__04JH=TRUE__;
+          };
+        };
+        result__DZTB=NULL;
+        ptr__EZTB=((__POINTER )(NULL));
+        typ_id__JZTB= 0;
+        sz__GZTB=((__UINTEGER_32 )sizeof(__ITM_EXTERNAL_TYPE));
+        if ((sz__GZTB ==  0)) {
+          result__DZTB=ITM_EXTERNAL_TYPE__;
+        } else {
+          typ_id__JZTB=-1;
+          clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__GZTB);
+          if ((typ_id__JZTB == (__INTEGER)(-  1))) {
+            a__WUGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__XUGH=(__UINTEGER_32)((__UINTEGER_32)(sz__GZTB + a__WUGH) & (__UINTEGER_32)(~ a__WUGH));
+            ptr_table__44JH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__XUGH / ((__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__FTJ(new_size__XUGH);
+              next__34JH=(void *)((unsigned long)result__54JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XUGH)));
+              ((__POINTER *)next__34JH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__44JH)[ 0]=next__34JH;
             } else {
-              next__4WJH=((__POINTER *)result__AXJH)[ 0];
-              if ((next__4WJH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__AXJH - (unsigned long)begin_memory__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)));
+              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__SXH)))) &  4095) + (__UINTEGER_32)(new_size__XUGH <<  1)) <=  4096)) {
+                  next__34JH=(void *)((unsigned long)result__54JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XUGH)));
                 } else {
-                  next__4WJH=new_lab__ZPJ(new_size__2NGH);
+                  next__34JH=new_lab__FTJ(new_size__XUGH);
                 };
-                ((__POINTER *)next__4WJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__5WJH)[ 0]=next__4WJH;
+                ((__POINTER *)next__34JH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__44JH)[ 0]=next__34JH;
               } else {
-                ((__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;
+                ((__POINTER *)result__54JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__34JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__54JH=next__34JH;
+              };
+            };
+            ptr__EZTB=result__54JH;
+          } else {
+            t__1UGH=((__UINTEGER_32 )typ_id__JZTB);
+            a__0UGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__G5JH=(__UINTEGER_32)((__UINTEGER_32)(sz__GZTB + a__0UGH) & (__UINTEGER_32)(~ a__0UGH));
+            ptr_table__D5JH=((__POINTER )(&(table_type[(t__1UGH)])));
+            lab_type__F5JH=(__UINTEGER_32)(t__1UGH |  1);
+            next__C5JH=((__POINTER )(NULL));
+            result__E5JH=((__POINTER *)ptr_table__D5JH)[ 0];
+            if ((result__E5JH == (void *)NULL)) {
+              result__E5JH=new_lab__FTJ(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__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)));
+              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__SXH)))) &  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__DXJH=new_lab__ZPJ(lab_type__GXJH);
+                  next__C5JH=new_lab__FTJ(lab_type__F5JH);
                 };
-                ((__POINTER *)next__DXJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__EXJH)[ 0]=next__DXJH;
+                ((__POINTER *)next__C5JH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__D5JH)[ 0]=next__C5JH;
               } else {
-                ((__POINTER *)result__FXJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DXJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__FXJH=next__DXJH;
+                ((__POINTER *)result__E5JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__C5JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__E5JH=next__C5JH;
               };
             };
-            ptr__YVTB=result__FXJH;
+            ptr__EZTB=result__E5JH;
           };
-          result__XVTB=((__ITM_EXTERNAL_TYPE *)ptr__YVTB);
-          *(result__XVTB) = *(ITM_EXTERNAL_TYPE__);
+          result__DZTB=((__ITM_EXTERNAL_TYPE *)ptr__EZTB);
+          *(result__DZTB) = *(ITM_EXTERNAL_TYPE__);
         };
-        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)) {
+        Self__Y2EC=((__ITM_EXTERNAL_TYPE *)result__DZTB);
+        Self__Y2EC->parent_itm_extern__54M.parent_itm_code__44M.parent_itm_object__SEE.position__GFJ=__tmp__NGN;
+        Self__Y2EC->is_persistant__2HN=result__04JH;
+        type__24M=read_type__WCM(Self__Z4M,FALSE__);
+        if (((void *)type__24M == (void *)NULL)) {
+          pos__AAZG=current_position__EZF();
+          put_error__text__NPG( 0,(&__string_279));
+          put_position__XQG(pos__AAZG);
+          put_string__P3F(msg_err__SPG);
+          if ((type_error__RPG !=  2)) {
             exit(( 1));
           };
         };
-        result__IXJH=FALSE__;
-        if ((! read_space__KSD())) {
-          result__IXJH=FALSE__;
+        result__H5JH=FALSE__;
+        if ((! read_space__MTD())) {
+          result__H5JH=FALSE__;
         } else {
-          result__JXJH='\0';
+          result__I5JH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__JXJH=((__CHARACTER )(( 0)));
+            result__I5JH=((__CHARACTER )(( 0)));
           } else {
-            result__JXJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+            result__I5JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__JXJH == '{')) {
+          if ((result__I5JH == '{')) {
             position__CCC=(__INTEGER)(position__CCC +  1);
-            result__IXJH=TRUE__;
+            result__H5JH=TRUE__;
           };
         };
-        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)) {
+        if (result__H5JH) {
+          if (((void *)read_type_list__YMO(Self__Z4M,FALSE__) == (void *)NULL)) {
+            pos__CAZG=current_position__EZF();
+            put_error__text__NPG( 0,(&__string_305));
+            put_position__XQG(pos__CAZG);
+            put_string__P3F(msg_err__SPG);
+            if ((type_error__RPG !=  2)) {
               exit(( 1));
             };
           };
-          result__LXJH=FALSE__;
-          if ((! read_space__KSD())) {
-            result__LXJH=FALSE__;
+          result__K5JH=FALSE__;
+          if ((! read_space__MTD())) {
+            result__K5JH=FALSE__;
           } else {
-            result__MXJH='\0';
+            result__L5JH='\0';
             if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-              result__MXJH=((__CHARACTER )(( 0)));
+              result__L5JH=((__CHARACTER )(( 0)));
             } else {
-              result__MXJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+              result__L5JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
             };
-            if ((result__MXJH == '}')) {
+            if ((result__L5JH == '}')) {
               position__CCC=(__INTEGER)(position__CCC +  1);
-              result__LXJH=TRUE__;
+              result__K5JH=TRUE__;
             };
           };
-          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)) {
+          if ((! result__K5JH)) {
+            pos__EAZG=current_position__EZF();
+            put_error__text__NPG( 2,(&__string_294));
+            put_position__XQG(pos__EAZG);
+            put_string__P3F(msg_err__SPG);
+            if ((type_error__RPG !=  2)) {
               exit(( 1));
             };
           };
         };
-        if (result__XVTB->is_persistant__QEN) {
-          result__OXJH=FALSE__;
-          if ((! read_space__KSD())) {
-            result__OXJH=FALSE__;
+        if (result__DZTB->is_persistant__2HN) {
+          result__N5JH=FALSE__;
+          if ((! read_space__MTD())) {
+            result__N5JH=FALSE__;
           } else {
-            result__PXJH='\0';
+            result__O5JH='\0';
             if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-              result__PXJH=((__CHARACTER )(( 0)));
+              result__O5JH=((__CHARACTER )(( 0)));
             } else {
-              result__PXJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+              result__O5JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
             };
-            if ((result__PXJH == ')')) {
+            if ((result__O5JH == ')')) {
               position__CCC=(__INTEGER)(position__CCC +  1);
-              result__OXJH=TRUE__;
+              result__N5JH=TRUE__;
             };
           };
-          __tmp__1EN=(! result__OXJH);
+          __tmp__HIN=(! result__N5JH);
         } else {
-          __tmp__1EN=FALSE__;
+          __tmp__HIN=FALSE__;
         };
-        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)) {
+        if (__tmp__HIN) {
+          pos__GAZG=current_position__EZF();
+          put_error__text__NPG( 2,(&__string_262));
+          put_position__XQG(pos__GAZG);
+          put_string__P3F(msg_err__SPG);
+          if ((type_error__RPG !=  2)) {
             exit(( 1));
           };
         };
-        result__P1M=result__XVTB;
+        result__14M=result__DZTB;
       };
     };
   };
-  return(result__P1M);
+  return(result__14M);
 }
 
-static __BOOLEAN read_integer__EZP()
+static __BOOLEAN read_integer__Q2P()
 // () With resultNo recursive, No inlinable.
 {
-  __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__MUAH='\0';
+  __INTEGER_64 result__WRJE,__tmp__ISJE,result__DXPE,result__ERRE;
+  __INTEGER pos_old__U2P,__tmp__BSJE,Self__0KOE,result__YPSE,j__UVPE;
+  __INTEGER __tmp__OXPE,Self__PTQE,i__OPRE,__tmp__PRRE,Self__UUSE;
+  __INTEGER state__RSRE,value__SSRE,i__QSRE,state__M0RE,result__P0RE;
+  __INTEGER i__L0RE;
+  __STRING *Self__URJE,*Self__MTEH,*Self__2UGH,*Self__RVPE,*Self__BXPE;
+  __STRING *Self__MPRE,*Self__CRRE,*Self__OSRE,*Self__J0RE;
+  __POSITION pos__NBZG,pos__ACZG,pos__PCZG;
+  __BOOLEAN result__T2P,result__MSEH,__tmp__52P,__tmp__Z3P,__tmp__PQSE;
+  __BOOLEAN result__TVPE,__tmp__MWPE,result__H2TE,__tmp__BAQ;
+  __BOOLEAN result__PPRE,negative__TSRE,result__USRE,__tmp__CURE;
+  __BOOLEAN result__EBQG,__tmp__OURE,result__RBQG,result__U1EH;
+  __BOOLEAN __tmp__CVRE,__tmp__BWRE,result__MCGF,result__Y1EH;
+  __BOOLEAN __tmp__VYRE,result__4CGF,result__21EH,__tmp__CYRE;
+  __BOOLEAN negative__O0RE,__tmp__11RE,result__TCQG,__tmp__O2RE;
+  __BOOLEAN __tmp__D3RE,result__MEGF,__tmp__K4RE,result__4EGF;
+  __BOOLEAN result__IUEH;
+  __CHARACTER result__A1AH,result__K1AH,result__P1AH,result__U1AH;
+  __CHARACTER result__Z1AH,result__41AH,result__D2AH,Self__WPSE;
+  __CHARACTER result__G3AH,Self__F2TE,result__B4AH,Self__2AGF;
+  __CHARACTER result__L4AH,cc__VSRE,cc__N0RE;
+  result__T2P=FALSE__;
+  pos_old__U2P= 0;
+  if (read_space__MTD()) {
+    result__A1AH='\0';
     if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-      result__MUAH=((__CHARACTER )(( 0)));
+      result__A1AH=((__CHARACTER )(( 0)));
     } else {
-      result__MUAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+      result__A1AH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
     };
-    result__WLEH=FALSE__;
-    if ((((__INTEGER_8 )result__MUAH) >= ((__INTEGER_8 )'0'))) {
-      result__WLEH=(((__INTEGER_8 )result__MUAH) <= ((__INTEGER_8 )'9'));
+    result__MSEH=FALSE__;
+    if ((((__INTEGER_8 )result__A1AH) >= ((__INTEGER_8 )'0'))) {
+      result__MSEH=(((__INTEGER_8 )result__A1AH) <= ((__INTEGER_8 )'9'));
     };
-    __tmp__TZP=result__WLEH;
+    __tmp__52P=result__MSEH;
   } else {
-    __tmp__TZP=FALSE__;
+    __tmp__52P=FALSE__;
   };
-  if (__tmp__TZP) {
-    result__HZP=TRUE__;
+  if (__tmp__52P) {
+    result__T2P=TRUE__;
     ((__STRING *)string_tmp__VH)->count__EGC= 0;
-    result__WUAH='\0';
+    result__K1AH='\0';
     if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-      result__WUAH=((__CHARACTER )(( 0)));
+      result__K1AH=((__CHARACTER )(( 0)));
     } else {
-      result__WUAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+      result__K1AH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
     };
-    add_last__3IT(string_tmp__VH,result__WUAH);
-    pos_old__IZP=position__CCC;
+    add_last__GOT(string_tmp__VH,result__K1AH);
+    pos_old__U2P=position__CCC;
     position__CCC=(__INTEGER)(position__CCC +  1);
-    while_do__UA0D:
+    while_do__CE0D:
     {
-      result__1UAH='\0';
+      result__P1AH='\0';
       if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__1UAH=((__CHARACTER )(( 0)));
+        result__P1AH=((__CHARACTER )(( 0)));
       } else {
-        result__1UAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+        result__P1AH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
       };
-      if (is_hexadecimal_digit__GMJE(result__1UAH)) {
-        __tmp__N0P=TRUE__;
+      if (is_hexadecimal_digit__UPJE(result__P1AH)) {
+        __tmp__Z3P=TRUE__;
       } else {
-        result__AVAH='\0';
+        result__U1AH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__AVAH=((__CHARACTER )(( 0)));
+          result__U1AH=((__CHARACTER )(( 0)));
         } else {
-          result__AVAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+          result__U1AH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
         };
-        __tmp__N0P=(result__AVAH == '_');
+        __tmp__Z3P=(result__U1AH == '_');
       };
-      if (__tmp__N0P) {
-        result__FVAH='\0';
+      if (__tmp__Z3P) {
+        result__Z1AH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__FVAH=((__CHARACTER )(( 0)));
+          result__Z1AH=((__CHARACTER )(( 0)));
         } else {
-          result__FVAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+          result__Z1AH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__FVAH != '_')) {
-          result__KVAH='\0';
+        if ((result__Z1AH != '_')) {
+          result__41AH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__KVAH=((__CHARACTER )(( 0)));
+            result__41AH=((__CHARACTER )(( 0)));
           } else {
-            result__KVAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+            result__41AH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
           };
-          add_last__3IT(string_tmp__VH,result__KVAH);
+          add_last__GOT(string_tmp__VH,result__41AH);
         };
         position__CCC=(__INTEGER)(position__CCC +  1);
-        goto while_do__UA0D;
+        goto while_do__CE0D;
       };
     };
-    result__PVAH='\0';
+    result__D2AH='\0';
     if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-      result__PVAH=((__CHARACTER )(( 0)));
+      result__D2AH=((__CHARACTER )(( 0)));
     } else {
-      result__PVAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+      result__D2AH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
     };
-    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__;
+    if ((result__D2AH == 'h')) {
+      Self__URJE=((__STRING *)string_tmp__VH);
+      result__WRJE= 0;
+      __tmp__BSJE=Self__URJE->count__EGC;
+      Self__0KOE= 1;
+      while ((Self__0KOE <= __tmp__BSJE)) {
+        __tmp__ISJE=(__INTEGER_64)(result__WRJE <<  4);
+        Self__WPSE=((__CHARACTER *)Self__URJE->storage__RCS)[(__INTEGER)(Self__0KOE -  1)];
+        result__YPSE= 0;
+        if ((((__INTEGER_8 )Self__WPSE) < ((__INTEGER_8 )'A'))) {
+          result__YPSE=((__INTEGER )(__INTEGER_8)(((__INTEGER_8 )Self__WPSE) -  48));
+          __tmp__PQSE=TRUE__;
         } else {
-          __tmp__1LSE=FALSE__;
+          __tmp__PQSE=FALSE__;
         };
-        if ((! __tmp__1LSE)) {
-          if ((((__INTEGER_8 )Self__CLSE) < ((__INTEGER_8 )'a'))) {
-            result__ELSE=((__INTEGER )(__INTEGER_8)(((__INTEGER_8 )Self__CLSE) -  55));
+        if ((! __tmp__PQSE)) {
+          if ((((__INTEGER_8 )Self__WPSE) < ((__INTEGER_8 )'a'))) {
+            result__YPSE=((__INTEGER )(__INTEGER_8)(((__INTEGER_8 )Self__WPSE) -  55));
           } else {
-            result__ELSE=((__INTEGER )(__INTEGER_8)(((__INTEGER_8 )Self__CLSE) -  87));
+            result__YPSE=((__INTEGER )(__INTEGER_8)(((__INTEGER_8 )Self__WPSE) -  87));
           };
         };
-        result__IOJE=(__INTEGER_64)(__tmp__0OJE | ((__INTEGER_64 )result__ELSE));
-        Self__SGOE=(__INTEGER)(Self__SGOE +  1);
+        result__WRJE=(__INTEGER_64)(__tmp__ISJE | ((__INTEGER_64 )result__YPSE));
+        Self__0KOE=(__INTEGER)(Self__0KOE +  1);
       };
-      last_integer__3OO=result__IOJE;
+      last_integer__JSO=result__WRJE;
       position__CCC=(__INTEGER)(position__CCC +  1);
     } else {
-      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;
+      Self__MTEH=((__STRING *)string_tmp__VH);
+      if ((((__INTEGER_8 )((__CHARACTER *)Self__MTEH->storage__RCS)[(__INTEGER)(Self__MTEH->count__EGC -  1)]) > ((__INTEGER_8 )'9'))) {
+        Self__2UGH=((__STRING *)string_tmp__VH);
+        if (( 1 > Self__2UGH->count__EGC)) {
+          Self__2UGH->count__EGC= 0;
         } else {
-          Self__BOGH->count__EGC=(__INTEGER)(Self__BOGH->count__EGC -  1);
+          Self__2UGH->count__EGC=(__INTEGER)(Self__2UGH->count__EGC -  1);
         };
         position__CCC=(__INTEGER)(position__CCC -  1);
       };
-      result__SWAH='\0';
+      result__G3AH='\0';
       if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__SWAH=((__CHARACTER )(( 0)));
+        result__G3AH=((__CHARACTER )(( 0)));
       } else {
-        result__SWAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+        result__G3AH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
       };
-      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 ((result__G3AH == 'o')) {
+        Self__RVPE=((__STRING *)string_tmp__VH);
+        result__TVPE=FALSE__;
+        j__UVPE= 0;
+        if ((Self__RVPE->count__EGC !=  0)) {
+          j__UVPE= 1;
+          until_do__DSSE:
           {
-            if ((j__MRPE > Self__JRPE->count__EGC)) {
-              __tmp__ESPE=TRUE__;
+            if ((j__UVPE > Self__RVPE->count__EGC)) {
+              __tmp__MWPE=TRUE__;
             } else {
-              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'));
+              Self__F2TE=((__CHARACTER *)Self__RVPE->storage__RCS)[(__INTEGER)(j__UVPE -  1)];
+              result__H2TE=FALSE__;
+              if ((((__INTEGER_8 )Self__F2TE) >= ((__INTEGER_8 )'0'))) {
+                result__H2TE=(((__INTEGER_8 )Self__F2TE) <= ((__INTEGER_8 )'7'));
               };
-              __tmp__ESPE=(! result__TXTE);
+              __tmp__MWPE=(! result__H2TE);
             };
-            if ((! __tmp__ESPE)) {
-              j__MRPE=(__INTEGER)(j__MRPE +  1);
-              goto until_do__PNSE;
+            if ((! __tmp__MWPE)) {
+              j__UVPE=(__INTEGER)(j__UVPE +  1);
+              goto until_do__DSSE;
             };
           };
-          result__LRPE=(j__MRPE > Self__JRPE->count__EGC);
+          result__TVPE=(j__UVPE > Self__RVPE->count__EGC);
         };
-        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)) {
+        if ((! result__TVPE)) {
+          pos__NBZG=current_position__EZF();
+          put_error__text__NPG( 0,(&__string_306));
+          put_position__XQG(pos__NBZG);
+          put_string__P3F(msg_err__SPG);
+          if ((type_error__RPG !=  2)) {
             exit(( 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);
+        Self__BXPE=((__STRING *)string_tmp__VH);
+        result__DXPE= 0;
+        __tmp__OXPE=Self__BXPE->count__EGC;
+        Self__PTQE= 1;
+        while ((Self__PTQE <= __tmp__OXPE)) {
+          result__DXPE=(__INTEGER_64)((__INTEGER_64)(result__DXPE <<  3) | ((__INTEGER_64 )((__INTEGER )(__INTEGER_8)(((__INTEGER_8 )((__CHARACTER *)Self__BXPE->storage__RCS)[(__INTEGER)(Self__PTQE -  1)]) -  48))));
+          Self__PTQE=(__INTEGER)(Self__PTQE +  1);
         };
-        last_integer__3OO=result__1SPE;
+        last_integer__JSO=result__DXPE;
         position__CCC=(__INTEGER)(position__CCC +  1);
-        __tmp__V2P=TRUE__;
+        __tmp__BAQ=TRUE__;
       } else {
-        __tmp__V2P=FALSE__;
+        __tmp__BAQ=FALSE__;
       };
-      if ((! __tmp__V2P)) {
-        result__NXAH='\0';
+      if ((! __tmp__BAQ)) {
+        result__B4AH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          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)) {
+          result__B4AH=((__CHARACTER )(( 0)));
+        } else {
+          result__B4AH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+        };
+        if ((result__B4AH == 'b')) {
+          Self__MPRE=((__STRING *)string_tmp__VH);
+          i__OPRE=Self__MPRE->count__EGC;
+          result__PPRE=TRUE__;
+          while ((! ((! result__PPRE) || (i__OPRE ==  0)))) {
+            Self__2AGF=((__CHARACTER *)Self__MPRE->storage__RCS)[(__INTEGER)(i__OPRE -  1)];
+            result__PPRE=((Self__2AGF == '0') || (Self__2AGF == '1'));
+            i__OPRE=(__INTEGER)(i__OPRE -  1);
+          };
+          if ((! result__PPRE)) {
+            pos__ACZG=current_position__EZF();
+            put_error__text__NPG( 0,(&__string_307));
+            put_position__XQG(pos__ACZG);
+            put_string__P3F(msg_err__SPG);
+            if ((type_error__RPG !=  2)) {
               exit(( 1));
             };
           };
-          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__CRRE=((__STRING *)string_tmp__VH);
+          result__ERRE= 0;
+          __tmp__PRRE=Self__CRRE->count__EGC;
+          Self__UUSE= 1;
+          while ((Self__UUSE <= __tmp__PRRE)) {
+            result__ERRE=(__INTEGER_64)(result__ERRE <<  1);
+            if ((((__CHARACTER *)Self__CRRE->storage__RCS)[(__INTEGER)(Self__UUSE -  1)] == '1')) {
+              result__ERRE=(__INTEGER_64)(~ (__INTEGER_64)((__INTEGER_64)(~ result__ERRE) &  -2));
             };
-            Self__AQSE=(__INTEGER)(Self__AQSE +  1);
+            Self__UUSE=(__INTEGER)(Self__UUSE +  1);
           };
-          last_integer__3OO=result__RMRE;
+          last_integer__JSO=result__ERRE;
           position__CCC=(__INTEGER)(position__CCC +  1);
         } else {
-          result__XXAH='\0';
+          result__L4AH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__XXAH=((__CHARACTER )(( 0)));
+            result__L4AH=((__CHARACTER )(( 0)));
           } else {
-            result__XXAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+            result__L4AH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__XXAH == 'd')) {
+          if ((result__L4AH == 'd')) {
             position__CCC=(__INTEGER)(position__CCC +  1);
           };
-          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__;
+          Self__OSRE=((__STRING *)string_tmp__VH);
+          state__RSRE= 0;
+          value__SSRE= 0;
+          negative__TSRE=FALSE__;
+          result__USRE=FALSE__;
+          cc__VSRE='\0';
+          i__QSRE= 1;
+          while ((! ((state__RSRE ==  4) || (i__QSRE > Self__OSRE->count__EGC)))) {
+            cc__VSRE=((__CHARACTER *)Self__OSRE->storage__RCS)[(__INTEGER)(i__QSRE -  1)];
+            if ((state__RSRE ==  0)) {
+              if ((((((((cc__VSRE == ' ') || (cc__VSRE == '\t')) || (cc__VSRE == '\n')) || (cc__VSRE == '\r')) || (cc__VSRE == '\0')) || (cc__VSRE == '\f')) || (cc__VSRE == '\v'))) {
+                __tmp__CURE=TRUE__;
               } else {
-                result__31PG=(cc__CORE == '+');
-                if (result__31PG) {
-                  state__4NRE= 1;
+                result__EBQG=(cc__VSRE == '+');
+                if (result__EBQG) {
+                  state__RSRE= 1;
                 };
-                __tmp__PPRE=result__31PG;
+                __tmp__CURE=result__EBQG;
               };
-              if (__tmp__PPRE) {
-                __tmp__1PRE=TRUE__;
+              if (__tmp__CURE) {
+                __tmp__OURE=TRUE__;
               } else {
-                result__K2PG=(cc__CORE == '-');
-                if (result__K2PG) {
-                  negative__AORE=TRUE__;
-                  state__4NRE= 1;
+                result__RBQG=(cc__VSRE == '-');
+                if (result__RBQG) {
+                  negative__TSRE=TRUE__;
+                  state__RSRE= 1;
                 };
-                __tmp__1PRE=result__K2PG;
+                __tmp__OURE=result__RBQG;
               };
-              if ((! __tmp__1PRE)) {
-                result__4UEH=FALSE__;
-                if ((((__INTEGER_8 )cc__CORE) >= ((__INTEGER_8 )'0'))) {
-                  result__4UEH=(((__INTEGER_8 )cc__CORE) <= ((__INTEGER_8 )'9'));
+              if ((! __tmp__OURE)) {
+                result__U1EH=FALSE__;
+                if ((((__INTEGER_8 )cc__VSRE) >= ((__INTEGER_8 )'0'))) {
+                  result__U1EH=(((__INTEGER_8 )cc__VSRE) <= ((__INTEGER_8 )'9'));
                 };
-                if (result__4UEH) {
-                  value__5NRE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__CORE)) -  48);
-                  state__4NRE= 2;
+                if (result__U1EH) {
+                  value__SSRE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__VSRE)) -  48);
+                  state__RSRE= 2;
                 } else {
-                  state__4NRE= 4;
+                  state__RSRE= 4;
                 };
               };
-              __tmp__PQRE=TRUE__;
+              __tmp__CVRE=TRUE__;
             } else {
-              __tmp__PQRE=FALSE__;
+              __tmp__CVRE=FALSE__;
             };
-            if (__tmp__PQRE) {
-              __tmp__ORRE=TRUE__;
+            if (__tmp__CVRE) {
+              __tmp__BWRE=TRUE__;
             } else {
-              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'));
+              result__MCGF=(state__RSRE ==  1);
+              if (result__MCGF) {
+                result__Y1EH=FALSE__;
+                if ((((__INTEGER_8 )cc__VSRE) >= ((__INTEGER_8 )'0'))) {
+                  result__Y1EH=(((__INTEGER_8 )cc__VSRE) <= ((__INTEGER_8 )'9'));
                 };
-                if (result__CVEH) {
-                  value__5NRE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__CORE)) -  48);
-                  if (negative__AORE) {
-                    value__5NRE=(__INTEGER)(- value__5NRE);
+                if (result__Y1EH) {
+                  value__SSRE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__VSRE)) -  48);
+                  if (negative__TSRE) {
+                    value__SSRE=(__INTEGER)(- value__SSRE);
                   };
-                  state__4NRE= 2;
+                  state__RSRE= 2;
                 } else {
-                  state__4NRE= 4;
+                  state__RSRE= 4;
                 };
               };
-              __tmp__ORRE=result__G3FF;
+              __tmp__BWRE=result__MCGF;
             };
-            if (__tmp__ORRE) {
-              __tmp__CURE=TRUE__;
+            if (__tmp__BWRE) {
+              __tmp__VYRE=TRUE__;
             } else {
-              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'));
+              result__4CGF=(state__RSRE ==  2);
+              if (result__4CGF) {
+                result__21EH=FALSE__;
+                if ((((__INTEGER_8 )cc__VSRE) >= ((__INTEGER_8 )'0'))) {
+                  result__21EH=(((__INTEGER_8 )cc__VSRE) <= ((__INTEGER_8 )'9'));
                 };
-                if (result__GVEH) {
-                  if (negative__AORE) {
-                    value__5NRE=(__INTEGER)((__INTEGER)( 10 * value__5NRE) - (__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__CORE)) -  48));
+                if (result__21EH) {
+                  if (negative__TSRE) {
+                    value__SSRE=(__INTEGER)((__INTEGER)( 10 * value__SSRE) - (__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__VSRE)) -  48));
                   } else {
-                    value__5NRE=(__INTEGER)((__INTEGER)( 10 * value__5NRE) + (__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__CORE)) -  48));
+                    value__SSRE=(__INTEGER)((__INTEGER)( 10 * value__SSRE) + (__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__VSRE)) -  48));
                   };
-                  if (((negative__AORE && (value__5NRE >  0)) || ((! negative__AORE) && (value__5NRE <  0)))) {
-                    state__4NRE= 4;
+                  if (((negative__TSRE && (value__SSRE >  0)) || ((! negative__TSRE) && (value__SSRE <  0)))) {
+                    state__RSRE= 4;
                   };
-                  __tmp__PTRE=TRUE__;
+                  __tmp__CYRE=TRUE__;
                 } else {
-                  __tmp__PTRE=FALSE__;
+                  __tmp__CYRE=FALSE__;
                 };
-                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;
+                if ((! __tmp__CYRE)) {
+                  if ((((((((cc__VSRE == ' ') || (cc__VSRE == '\t')) || (cc__VSRE == '\n')) || (cc__VSRE == '\r')) || (cc__VSRE == '\0')) || (cc__VSRE == '\f')) || (cc__VSRE == '\v'))) {
+                    state__RSRE= 3;
                   } else {
-                    state__4NRE= 4;
+                    state__RSRE= 4;
                   };
                 };
               };
-              __tmp__CURE=result__Y3FF;
+              __tmp__VYRE=result__4CGF;
             };
-            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;
+            if ((! __tmp__VYRE)) {
+              if ((state__RSRE ==  3)) {
+                if ((! (((((((cc__VSRE == ' ') || (cc__VSRE == '\t')) || (cc__VSRE == '\n')) || (cc__VSRE == '\r')) || (cc__VSRE == '\0')) || (cc__VSRE == '\f')) || (cc__VSRE == '\v')))) {
+                  state__RSRE= 4;
                 };
               };
             };
-            i__3NRE=(__INTEGER)(i__3NRE +  1);
+            i__QSRE=(__INTEGER)(i__QSRE +  1);
           };
-          if (((state__4NRE !=  0) && (state__4NRE !=  4))) {
-            result__BORE=TRUE__;
+          if (((state__RSRE !=  0) && (state__RSRE !=  4))) {
+            result__USRE=TRUE__;
           };
-          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)) {
+          if ((! result__USRE)) {
+            pos__PCZG=current_position__EZF();
+            put_error__text__NPG( 0,(&__string_308));
+            put_position__XQG(pos__PCZG);
+            put_string__P3F(msg_err__SPG);
+            if ((type_error__RPG !=  2)) {
               exit(( 1));
             };
           };
-          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__;
+          Self__J0RE=((__STRING *)string_tmp__VH);
+          state__M0RE= 0;
+          cc__N0RE='\0';
+          negative__O0RE=FALSE__;
+          result__P0RE= 0;
+          i__L0RE= 1;
+          while ((i__L0RE <= Self__J0RE->count__EGC)) {
+            cc__N0RE=((__CHARACTER *)Self__J0RE->storage__RCS)[(__INTEGER)(i__L0RE -  1)];
+            if ((state__M0RE ==  0)) {
+              if ((((((((cc__N0RE == ' ') || (cc__N0RE == '\t')) || (cc__N0RE == '\n')) || (cc__N0RE == '\r')) || (cc__N0RE == '\0')) || (cc__N0RE == '\f')) || (cc__N0RE == '\v'))) {
+                __tmp__11RE=TRUE__;
               } else {
-                result__M3PG=(cc__0VRE == '+');
-                if (result__M3PG) {
-                  state__ZVRE= 1;
+                result__TCQG=(cc__N0RE == '+');
+                if (result__TCQG) {
+                  state__M0RE= 1;
                 };
-                __tmp__IXRE=result__M3PG;
+                __tmp__11RE=result__TCQG;
               };
-              if ((! __tmp__IXRE)) {
-                if ((cc__0VRE == '-')) {
-                  negative__1VRE=TRUE__;
-                  state__ZVRE= 1;
+              if ((! __tmp__11RE)) {
+                if ((cc__N0RE == '-')) {
+                  negative__O0RE=TRUE__;
+                  state__M0RE= 1;
                 } else {
-                  result__2VRE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__0VRE)) -  48);
-                  state__ZVRE= 2;
+                  result__P0RE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__N0RE)) -  48);
+                  state__M0RE= 2;
                 };
               };
-              __tmp__1XRE=TRUE__;
+              __tmp__O2RE=TRUE__;
             } else {
-              __tmp__1XRE=FALSE__;
+              __tmp__O2RE=FALSE__;
             };
-            if (__tmp__1XRE) {
-              __tmp__QYRE=TRUE__;
+            if (__tmp__O2RE) {
+              __tmp__D3RE=TRUE__;
             } else {
-              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);
+              result__MEGF=(state__M0RE ==  1);
+              if (result__MEGF) {
+                result__P0RE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__N0RE)) -  48);
+                if (negative__O0RE) {
+                  result__P0RE=(__INTEGER)(- result__P0RE);
                 };
-                state__ZVRE= 2;
+                state__M0RE= 2;
               };
-              __tmp__QYRE=result__G5FF;
+              __tmp__D3RE=result__MEGF;
             };
-            if (__tmp__QYRE) {
-              __tmp__XZRE=TRUE__;
+            if (__tmp__D3RE) {
+              __tmp__K4RE=TRUE__;
             } else {
-              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'));
+              result__4EGF=(state__M0RE ==  2);
+              if (result__4EGF) {
+                result__IUEH=FALSE__;
+                if ((((__INTEGER_8 )cc__N0RE) >= ((__INTEGER_8 )'0'))) {
+                  result__IUEH=(((__INTEGER_8 )cc__N0RE) <= ((__INTEGER_8 )'9'));
                 };
-                if (result__SNEH) {
-                  if (negative__1VRE) {
-                    result__2VRE=(__INTEGER)((__INTEGER)( 10 * result__2VRE) - (__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__0VRE)) -  48));
+                if (result__IUEH) {
+                  if (negative__O0RE) {
+                    result__P0RE=(__INTEGER)((__INTEGER)( 10 * result__P0RE) - (__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__N0RE)) -  48));
                   } else {
-                    result__2VRE=(__INTEGER)((__INTEGER)( 10 * result__2VRE) + (__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__0VRE)) -  48));
+                    result__P0RE=(__INTEGER)((__INTEGER)( 10 * result__P0RE) + (__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__N0RE)) -  48));
                   };
                 } else {
-                  state__ZVRE= 3;
+                  state__M0RE= 3;
                 };
               };
-              __tmp__XZRE=result__Y5FF;
+              __tmp__K4RE=result__4EGF;
             };
-            if ((! __tmp__XZRE)) {
-              if ((state__ZVRE ==  3)) {
-                i__YVRE=Self__WVRE->count__EGC;
+            if ((! __tmp__K4RE)) {
+              if ((state__M0RE ==  3)) {
+                i__L0RE=Self__J0RE->count__EGC;
               };
             };
-            i__YVRE=(__INTEGER)(i__YVRE +  1);
+            i__L0RE=(__INTEGER)(i__L0RE +  1);
           };
-          last_integer__3OO=((__INTEGER_64 )result__2VRE);
+          last_integer__JSO=((__INTEGER_64 )result__P0RE);
         };
       };
     };
   };
-  if (result__HZP) {
-    short__token__to__YBD((&__string_121),pos_old__IZP,position__CCC);
+  if (result__T2P) {
+    short__token__to__YCD((&__string_121),pos_old__U2P,position__CCC);
   };
-  return(result__HZP);
+  return(result__T2P);
 }
 
-static void* readlip_expr__ZRPB()
+static void* readlip_expr__LVPB()
 // () With resultRecursive, No inlinable.
 {
-  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)) {
+  void *result__OVPB,*val__PVPB,*result__5PYC,*val__HQYC;
+  void *nam__QVPB;
+  __POSITION pos__0CZG,p__EP3B,pos__CDZG,pos__EDZG,pos__GDZG,pos__IDZG;
+  __POSITION pos__KDZG,pos__MDZG,p__VQID,p__FZHE,pos__0DZG;
+  __LIP_AFFECT *result__B04B,*Self__CLHC;
+  __POINTER ptr__C04B,ptr_table__R5JH,next__Q5JH,result__S5JH;
+  __POINTER ptr_table__W5JH,next__V5JH,result__X5JH,ptr__SVKD;
+  __POINTER ptr_table__QAKH,next__PAKH,result__RAKH,ptr_table__VAKH;
+  __POINTER next__UAKH,result__WAKH,ptr__5FNE,ptr_table__0AKH;
+  __POINTER next__ZAKH,result__1AKH,ptr_table__5AKH,next__4AKH;
+  __POINTER result__ABKH;
+  __INTEGER typ_id__H04B,typ_id__XVKD,typ_id__EGNE;
+  __UINTEGER_32 sz__E04B,a__AVGH,new_size__BVGH,t__FVGH,a__EVGH;
+  __UINTEGER_32 new_size__Z5JH,lab_type__Y5JH,sz__UVKD,a__IVGH;
+  __UINTEGER_32 new_size__JVGH,t__NVGH,a__MVGH,new_size__YAKH;
+  __UINTEGER_32 lab_type__XAKH,sz__BGNE,a__QVGH,new_size__RVGH,t__VVGH;
+  __UINTEGER_32 a__UVGH,new_size__CBKH,lab_type__BBKH;
+  __LIP_IF *result__RVKD,*Self__IUTD;
+  __LIP_PRINT *result__4FNE,*Self__VSWE;
+  __BOOLEAN result__05JH,__tmp__EXPB,result__35JH,result__AAKH;
+  __BOOLEAN result__DAKH,result__GAKH,result__JAKH,result__MAKH;
+  __BOOLEAN __tmp__ZTYC;
+  __CHARACTER result__15JH,result__45JH,result__BAKH,result__EAKH;
+  __CHARACTER result__HAKH,result__KAKH,result__NAKH;
+  void *the__FQYC,*els__GQYC,*result__GKIH,*result__1OID;
+  __FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *Self__HKIH,*Self__IKIH,*Self__PK5D;
+  __FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *Self__FL5D;
+  result__OVPB=NULL;
+  val__PVPB=NULL;
+  nam__QVPB=NULL;
+  old_position__2SI=position__CCC;
+  old_pos_cur__4SI=pos_cur__FCC;
+  old_pos_line__ATI=pos_line__GCC;
+  old_pos_col__CTI=pos_col__HCC;
+  old_short_derive__ETI=short_derive__PCC;
+  if (read_identifier__QBL()) {
+    nam__QVPB=last_string__V1C;
+    if (read_symbol__SYJ((&__string_12))) {
+      val__PVPB=readlip_expr_operator__ZPZB(PARSER__);
+      if (((void *)val__PVPB == (void *)NULL)) {
+        pos__0CZG=current_position__EZF();
+        put_error__text__NPG( 0,(&__string_240));
+        put_position__XQG(pos__0CZG);
+        put_string__P3F(msg_err__SPG);
+        if ((type_error__RPG !=  2)) {
           exit(( 1));
         };
       };
-      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)));
+      p__EP3B=current_position__EZF();
+      result__B04B=NULL;
+      ptr__C04B=((__POINTER )(NULL));
+      typ_id__H04B= 0;
+      sz__E04B=((__UINTEGER_32 )sizeof(__LIP_AFFECT));
+      if ((sz__E04B ==  0)) {
+        result__B04B=LIP_AFFECT__;
+      } else {
+        typ_id__H04B=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__E04B);
+        if ((typ_id__H04B == (__INTEGER)(-  1))) {
+          a__AVGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__BVGH=(__UINTEGER_32)((__UINTEGER_32)(sz__E04B + a__AVGH) & (__UINTEGER_32)(~ a__AVGH));
+          ptr_table__R5JH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__BVGH / ((__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__FTJ(new_size__BVGH);
+            next__Q5JH=(void *)((unsigned long)result__S5JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BVGH)));
+            ((__POINTER *)next__Q5JH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__R5JH)[ 0]=next__Q5JH;
+          } 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__SXH)))) &  4095) + (__UINTEGER_32)(new_size__BVGH <<  1)) <=  4096)) {
+                next__Q5JH=(void *)((unsigned long)result__S5JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BVGH)));
               } else {
-                next__RXJH=new_lab__ZPJ(new_size__GOGH);
+                next__Q5JH=new_lab__FTJ(new_size__BVGH);
               };
-              ((__POINTER *)next__RXJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__SXJH)[ 0]=next__RXJH;
+              ((__POINTER *)next__Q5JH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__R5JH)[ 0]=next__Q5JH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__S5JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__Q5JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__S5JH=next__Q5JH;
+            };
+          };
+          ptr__C04B=result__S5JH;
+        } else {
+          t__FVGH=((__UINTEGER_32 )typ_id__H04B);
+          a__EVGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__Z5JH=(__UINTEGER_32)((__UINTEGER_32)(sz__E04B + a__EVGH) & (__UINTEGER_32)(~ a__EVGH));
+          ptr_table__W5JH=((__POINTER )(&(table_type[(t__FVGH)])));
+          lab_type__Y5JH=(__UINTEGER_32)(t__FVGH |  1);
+          next__V5JH=((__POINTER )(NULL));
+          result__X5JH=((__POINTER *)ptr_table__W5JH)[ 0];
+          if ((result__X5JH == (void *)NULL)) {
+            result__X5JH=new_lab__FTJ(lab_type__Y5JH);
+            next__V5JH=(void *)((unsigned long)result__X5JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Z5JH)));
+            ((__POINTER *)next__V5JH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__W5JH)[ 0]=next__V5JH;
+          } else {
+            next__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__SXH)))) &  4095) + (__UINTEGER_32)(new_size__Z5JH <<  1)) <=  4096)) {
+                next__V5JH=(void *)((unsigned long)result__X5JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Z5JH)));
               } else {
-                next__WXJH=new_lab__ZPJ(lab_type__ZXJH);
+                next__V5JH=new_lab__FTJ(lab_type__Y5JH);
               };
-              ((__POINTER *)next__WXJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__XXJH)[ 0]=next__WXJH;
+              ((__POINTER *)next__V5JH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__W5JH)[ 0]=next__V5JH;
             } else {
-              ((__POINTER *)result__YXJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WXJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__YXJH=next__WXJH;
+              ((__POINTER *)result__X5JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__V5JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__X5JH=next__V5JH;
             };
           };
-          ptr__WW4B=result__YXJH;
+          ptr__C04B=result__X5JH;
         };
-        result__VW4B=((__LIP_AFFECT *)ptr__WW4B);
-        *(result__VW4B) = *(LIP_AFFECT__);
+        result__B04B=((__LIP_AFFECT *)ptr__C04B);
+        *(result__B04B) = *(LIP_AFFECT__);
       };
-      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;
+      Self__CLHC=((__LIP_AFFECT *)result__B04B);
+      Self__CLHC->parent_lip_code__LWPB.parent_itm_object__0EE.position__GFJ=p__EP3B;
+      Self__CLHC->name__PJFC=nam__QVPB;
+      Self__CLHC->value__BKFC=val__PVPB;
+      result__OVPB=result__B04B;
     } else {
-      restore_context__MBL();
+      restore_context__YEL();
     };
   };
-  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__1XJH=FALSE__;
+  if (((void *)result__OVPB == (void *)NULL)) {
+    result__OVPB=readlip_expr_operator__ZPZB(PARSER__);
+    if (((void *)result__OVPB != (void *)NULL)) {
+      result__05JH=FALSE__;
+      if ((! read_space__MTD())) {
+        result__05JH=FALSE__;
       } else {
-        result__2XJH='\0';
+        result__15JH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__2XJH=((__CHARACTER )(( 0)));
+          result__15JH=((__CHARACTER )(( 0)));
         } else {
-          result__2XJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+          result__15JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__2XJH == '.')) {
+        if ((result__15JH == '.')) {
           position__CCC=(__INTEGER)(position__CCC +  1);
-          result__1XJH=TRUE__;
+          result__05JH=TRUE__;
         };
       };
-      __tmp__STPB=result__1XJH;
+      __tmp__EXPB=result__05JH;
     } else {
-      __tmp__STPB=FALSE__;
+      __tmp__EXPB=FALSE__;
     };
-    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);
+    if (__tmp__EXPB) {
+      result__5PYC=NULL;
+      the__FQYC=NULL;
+      els__GQYC=NULL;
+      val__HQYC=NULL;
+      if (read_word__LRF((&__string_89))) {
+        result__GKIH=NULL;
+        if ((((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)free_list__BPID)->parent_arrayed_collection__APID.upper__ISTD <  0)) {
+          result__GKIH=create_with_capacity__4UKD( 16);
         } else {
-          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);
+          Self__HKIH=((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)free_list__BPID);
+          result__GKIH=((void **)Self__HKIH->parent_arrayed_collection__APID.storage__FFUD)[Self__HKIH->parent_arrayed_collection__APID.upper__ISTD];
+          Self__IKIH=((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)free_list__BPID);
+          Self__IKIH->parent_arrayed_collection__APID.upper__ISTD=(__INTEGER)(Self__IKIH->parent_arrayed_collection__APID.upper__ISTD -  1);
         };
-        the__XMYC=result__TCIH;
-        result__4XJH=FALSE__;
-        if ((! read_space__KSD())) {
-          result__4XJH=FALSE__;
+        the__FQYC=result__GKIH;
+        result__35JH=FALSE__;
+        if ((! read_space__MTD())) {
+          result__35JH=FALSE__;
         } else {
-          result__5XJH='\0';
+          result__45JH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__5XJH=((__CHARACTER )(( 0)));
+            result__45JH=((__CHARACTER )(( 0)));
           } else {
-            result__5XJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+            result__45JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__5XJH == '{')) {
+          if ((result__45JH == '{')) {
             position__CCC=(__INTEGER)(position__CCC +  1);
-            result__4XJH=TRUE__;
+            result__35JH=TRUE__;
           };
         };
-        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)) {
+        if ((! result__35JH)) {
+          pos__CDZG=current_position__EZF();
+          put_error__text__NPG( 2,(&__string_273));
+          put_position__XQG(pos__CDZG);
+          put_string__P3F(msg_err__SPG);
+          if ((type_error__RPG !=  2)) {
             exit(( 1));
           };
         };
-        while_do__IMID:
+        while_do__WPID:
         {
-          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__BYJH=FALSE__;
+          val__HQYC=readlip_expr__LVPB();
+          if (((void *)val__HQYC != (void *)NULL)) {
+            add_last__CNUD(the__FQYC,val__HQYC);
+            result__AAKH=FALSE__;
+            if ((! read_space__MTD())) {
+              result__AAKH=FALSE__;
             } else {
-              result__CYJH='\0';
+              result__BAKH='\0';
               if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                result__CYJH=((__CHARACTER )(( 0)));
+                result__BAKH=((__CHARACTER )(( 0)));
               } else {
-                result__CYJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+                result__BAKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
               };
-              if ((result__CYJH == ';')) {
+              if ((result__BAKH == ';')) {
                 position__CCC=(__INTEGER)(position__CCC +  1);
-                result__BYJH=TRUE__;
+                result__AAKH=TRUE__;
               };
             };
-            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)) {
+            if ((! result__AAKH)) {
+              pos__EDZG=current_position__EZF();
+              put_error__text__NPG( 2,(&__string_167));
+              put_position__XQG(pos__EDZG);
+              put_string__P3F(msg_err__SPG);
+              if ((type_error__RPG !=  2)) {
                 exit(( 1));
               };
             };
-            goto while_do__IMID;
+            goto while_do__WPID;
           };
         };
-        result__EYJH=FALSE__;
-        if ((! read_space__KSD())) {
-          result__EYJH=FALSE__;
+        result__DAKH=FALSE__;
+        if ((! read_space__MTD())) {
+          result__DAKH=FALSE__;
         } else {
-          result__FYJH='\0';
+          result__EAKH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__FYJH=((__CHARACTER )(( 0)));
+            result__EAKH=((__CHARACTER )(( 0)));
           } else {
-            result__FYJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+            result__EAKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__FYJH == '}')) {
+          if ((result__EAKH == '}')) {
             position__CCC=(__INTEGER)(position__CCC +  1);
-            result__EYJH=TRUE__;
+            result__DAKH=TRUE__;
           };
         };
-        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)) {
+        if ((! result__DAKH)) {
+          pos__GDZG=current_position__EZF();
+          put_error__text__NPG( 2,(&__string_273));
+          put_position__XQG(pos__GDZG);
+          put_string__P3F(msg_err__SPG);
+          if ((type_error__RPG !=  2)) {
             exit(( 1));
           };
         };
-        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);
+        the__FQYC=copy__DQID(result__GKIH);
+        if (read_word__LRF((&__string_90))) {
+          result__1OID=NULL;
+          if ((((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)free_list__BPID)->parent_arrayed_collection__APID.upper__ISTD <  0)) {
+            result__1OID=create_with_capacity__4UKD( 16);
           } else {
-            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);
+            Self__PK5D=((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)free_list__BPID);
+            result__1OID=((void **)Self__PK5D->parent_arrayed_collection__APID.storage__FFUD)[Self__PK5D->parent_arrayed_collection__APID.upper__ISTD];
+            Self__FL5D=((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)free_list__BPID);
+            Self__FL5D->parent_arrayed_collection__APID.upper__ISTD=(__INTEGER)(Self__FL5D->parent_arrayed_collection__APID.upper__ISTD -  1);
           };
-          els__YMYC=result__NLID;
-          result__HYJH=FALSE__;
-          if ((! read_space__KSD())) {
-            result__HYJH=FALSE__;
+          els__GQYC=result__1OID;
+          result__GAKH=FALSE__;
+          if ((! read_space__MTD())) {
+            result__GAKH=FALSE__;
           } else {
-            result__IYJH='\0';
+            result__HAKH='\0';
             if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-              result__IYJH=((__CHARACTER )(( 0)));
+              result__HAKH=((__CHARACTER )(( 0)));
             } else {
-              result__IYJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+              result__HAKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
             };
-            if ((result__IYJH == '{')) {
+            if ((result__HAKH == '{')) {
               position__CCC=(__INTEGER)(position__CCC +  1);
-              result__HYJH=TRUE__;
+              result__GAKH=TRUE__;
             };
           };
-          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)) {
+          if ((! result__GAKH)) {
+            pos__IDZG=current_position__EZF();
+            put_error__text__NPG( 2,(&__string_273));
+            put_position__XQG(pos__IDZG);
+            put_string__P3F(msg_err__SPG);
+            if ((type_error__RPG !=  2)) {
               exit(( 1));
             };
           };
-          while_do__R3LD:
+          while_do__5AMD:
           {
-            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__KYJH=FALSE__;
+            val__HQYC=readlip_expr__LVPB();
+            if (((void *)val__HQYC != (void *)NULL)) {
+              add_last__CNUD(els__GQYC,val__HQYC);
+              result__JAKH=FALSE__;
+              if ((! read_space__MTD())) {
+                result__JAKH=FALSE__;
               } else {
-                result__LYJH='\0';
+                result__KAKH='\0';
                 if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                  result__LYJH=((__CHARACTER )(( 0)));
+                  result__KAKH=((__CHARACTER )(( 0)));
                 } else {
-                  result__LYJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+                  result__KAKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
                 };
-                if ((result__LYJH == ';')) {
+                if ((result__KAKH == ';')) {
                   position__CCC=(__INTEGER)(position__CCC +  1);
-                  result__KYJH=TRUE__;
+                  result__JAKH=TRUE__;
                 };
               };
-              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)) {
+              if ((! result__JAKH)) {
+                pos__KDZG=current_position__EZF();
+                put_error__text__NPG( 2,(&__string_167));
+                put_position__XQG(pos__KDZG);
+                put_string__P3F(msg_err__SPG);
+                if ((type_error__RPG !=  2)) {
                   exit(( 1));
                 };
               };
-              goto while_do__R3LD;
+              goto while_do__5AMD;
             };
           };
-          result__NYJH=FALSE__;
-          if ((! read_space__KSD())) {
-            result__NYJH=FALSE__;
+          result__MAKH=FALSE__;
+          if ((! read_space__MTD())) {
+            result__MAKH=FALSE__;
           } else {
-            result__OYJH='\0';
+            result__NAKH='\0';
             if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-              result__OYJH=((__CHARACTER )(( 0)));
+              result__NAKH=((__CHARACTER )(( 0)));
             } else {
-              result__OYJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+              result__NAKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
             };
-            if ((result__OYJH == '}')) {
+            if ((result__NAKH == '}')) {
               position__CCC=(__INTEGER)(position__CCC +  1);
-              result__NYJH=TRUE__;
+              result__MAKH=TRUE__;
             };
           };
-          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)) {
+          if ((! result__MAKH)) {
+            pos__MDZG=current_position__EZF();
+            put_error__text__NPG( 2,(&__string_273));
+            put_position__XQG(pos__MDZG);
+            put_string__P3F(msg_err__SPG);
+            if ((type_error__RPG !=  2)) {
               exit(( 1));
             };
           };
-          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;
+          els__GQYC=copy__DQID(result__1OID);
+        };
+        p__VQID=current_position__EZF();
+        result__RVKD=NULL;
+        ptr__SVKD=((__POINTER )(NULL));
+        typ_id__XVKD= 0;
+        sz__UVKD=((__UINTEGER_32 )sizeof(__LIP_IF));
+        if ((sz__UVKD ==  0)) {
+          result__RVKD=LIP_IF__;
+        } else {
+          typ_id__XVKD=-1;
+          clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__UVKD);
+          if ((typ_id__XVKD == (__INTEGER)(-  1))) {
+            a__IVGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__JVGH=(__UINTEGER_32)((__UINTEGER_32)(sz__UVKD + a__IVGH) & (__UINTEGER_32)(~ a__IVGH));
+            ptr_table__QAKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__JVGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__PAKH=((__POINTER )(NULL));
+            result__RAKH=((__POINTER *)ptr_table__QAKH)[ 0];
+            if ((result__RAKH == (void *)NULL)) {
+              result__RAKH=new_lab__FTJ(new_size__JVGH);
+              next__PAKH=(void *)((unsigned long)result__RAKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JVGH)));
+              ((__POINTER *)next__PAKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__QAKH)[ 0]=next__PAKH;
             } 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__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)));
+              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__SXH)))) &  4095) + (__UINTEGER_32)(new_size__JVGH <<  1)) <=  4096)) {
+                  next__PAKH=(void *)((unsigned long)result__RAKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JVGH)));
                 } else {
-                  next__QYJH=new_lab__ZPJ(new_size__OOGH);
+                  next__PAKH=new_lab__FTJ(new_size__JVGH);
                 };
-                ((__POINTER *)next__QYJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__RYJH)[ 0]=next__QYJH;
+                ((__POINTER *)next__PAKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__QAKH)[ 0]=next__PAKH;
               } else {
-                ((__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;
+                ((__POINTER *)result__RAKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PAKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__RAKH=next__PAKH;
+              };
+            };
+            ptr__SVKD=result__RAKH;
+          } else {
+            t__NVGH=((__UINTEGER_32 )typ_id__XVKD);
+            a__MVGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__YAKH=(__UINTEGER_32)((__UINTEGER_32)(sz__UVKD + a__MVGH) & (__UINTEGER_32)(~ a__MVGH));
+            ptr_table__VAKH=((__POINTER )(&(table_type[(t__NVGH)])));
+            lab_type__XAKH=(__UINTEGER_32)(t__NVGH |  1);
+            next__UAKH=((__POINTER )(NULL));
+            result__WAKH=((__POINTER *)ptr_table__VAKH)[ 0];
+            if ((result__WAKH == (void *)NULL)) {
+              result__WAKH=new_lab__FTJ(lab_type__XAKH);
+              next__UAKH=(void *)((unsigned long)result__WAKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YAKH)));
+              ((__POINTER *)next__UAKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__VAKH)[ 0]=next__UAKH;
             } else {
-              next__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)));
+              next__UAKH=((__POINTER *)result__WAKH)[ 0];
+              if ((next__UAKH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__WAKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__YAKH <<  1)) <=  4096)) {
+                  next__UAKH=(void *)((unsigned long)result__WAKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YAKH)));
                 } else {
-                  next__VYJH=new_lab__ZPJ(lab_type__YYJH);
+                  next__UAKH=new_lab__FTJ(lab_type__XAKH);
                 };
-                ((__POINTER *)next__VYJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__WYJH)[ 0]=next__VYJH;
+                ((__POINTER *)next__UAKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__VAKH)[ 0]=next__UAKH;
               } else {
-                ((__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;
+                ((__POINTER *)result__WAKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UAKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__WAKH=next__UAKH;
+              };
+            };
+            ptr__SVKD=result__WAKH;
+          };
+          result__RVKD=((__LIP_IF *)ptr__SVKD);
+          *(result__RVKD) = *(LIP_IF__);
+        };
+        Self__IUTD=((__LIP_IF *)result__RVKD);
+        Self__IUTD->parent_lip_code__VTYC.parent_itm_object__0EE.position__GFJ=p__VQID;
+        Self__IUTD->condition__0EQD=result__OVPB;
+        Self__IUTD->then__QFQD=the__FQYC;
+        Self__IUTD->else__HGQD=els__GQYC;
+        result__5PYC=result__RVKD;
+        __tmp__ZTYC=TRUE__;
+      } else {
+        __tmp__ZTYC=FALSE__;
+      };
+      if ((! __tmp__ZTYC)) {
+        if (read_word__LRF((&__string_91))) {
+          p__FZHE=current_position__EZF();
+          result__4FNE=NULL;
+          ptr__5FNE=((__POINTER )(NULL));
+          typ_id__EGNE= 0;
+          sz__BGNE=((__UINTEGER_32 )sizeof(__LIP_PRINT));
+          if ((sz__BGNE ==  0)) {
+            result__4FNE=LIP_PRINT__;
+          } else {
+            typ_id__EGNE=-1;
+            clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__BGNE);
+            if ((typ_id__EGNE == (__INTEGER)(-  1))) {
+              a__QVGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__RVGH=(__UINTEGER_32)((__UINTEGER_32)(sz__BGNE + a__QVGH) & (__UINTEGER_32)(~ a__QVGH));
+              ptr_table__0AKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__RVGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__ZAKH=((__POINTER )(NULL));
+              result__1AKH=((__POINTER *)ptr_table__0AKH)[ 0];
+              if ((result__1AKH == (void *)NULL)) {
+                result__1AKH=new_lab__FTJ(new_size__RVGH);
+                next__ZAKH=(void *)((unsigned long)result__1AKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RVGH)));
+                ((__POINTER *)next__ZAKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__0AKH)[ 0]=next__ZAKH;
               } else {
-                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)));
+                next__ZAKH=((__POINTER *)result__1AKH)[ 0];
+                if ((next__ZAKH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1AKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__RVGH <<  1)) <=  4096)) {
+                    next__ZAKH=(void *)((unsigned long)result__1AKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RVGH)));
                   } else {
-                    next__0YJH=new_lab__ZPJ(new_size__WOGH);
+                    next__ZAKH=new_lab__FTJ(new_size__RVGH);
                   };
-                  ((__POINTER *)next__0YJH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__1YJH)[ 0]=next__0YJH;
+                  ((__POINTER *)next__ZAKH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__0AKH)[ 0]=next__ZAKH;
                 } else {
-                  ((__POINTER *)result__2YJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0YJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__2YJH=next__0YJH;
+                  ((__POINTER *)result__1AKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZAKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__1AKH=next__ZAKH;
                 };
               };
-              ptr__XBNE=result__2YJH;
+              ptr__5FNE=result__1AKH;
             } else {
-              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;
+              t__VVGH=((__UINTEGER_32 )typ_id__EGNE);
+              a__UVGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__CBKH=(__UINTEGER_32)((__UINTEGER_32)(sz__BGNE + a__UVGH) & (__UINTEGER_32)(~ a__UVGH));
+              ptr_table__5AKH=((__POINTER )(&(table_type[(t__VVGH)])));
+              lab_type__BBKH=(__UINTEGER_32)(t__VVGH |  1);
+              next__4AKH=((__POINTER )(NULL));
+              result__ABKH=((__POINTER *)ptr_table__5AKH)[ 0];
+              if ((result__ABKH == (void *)NULL)) {
+                result__ABKH=new_lab__FTJ(lab_type__BBKH);
+                next__4AKH=(void *)((unsigned long)result__ABKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CBKH)));
+                ((__POINTER *)next__4AKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__5AKH)[ 0]=next__4AKH;
               } else {
-                next__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)));
+                next__4AKH=((__POINTER *)result__ABKH)[ 0];
+                if ((next__4AKH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ABKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__CBKH <<  1)) <=  4096)) {
+                    next__4AKH=(void *)((unsigned long)result__ABKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CBKH)));
                   } else {
-                    next__5YJH=new_lab__ZPJ(lab_type__CZJH);
+                    next__4AKH=new_lab__FTJ(lab_type__BBKH);
                   };
-                  ((__POINTER *)next__5YJH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__AZJH)[ 0]=next__5YJH;
+                  ((__POINTER *)next__4AKH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__5AKH)[ 0]=next__4AKH;
                 } else {
-                  ((__POINTER *)result__BZJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5YJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__BZJH=next__5YJH;
+                  ((__POINTER *)result__ABKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4AKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__ABKH=next__4AKH;
                 };
               };
-              ptr__XBNE=result__BZJH;
+              ptr__5FNE=result__ABKH;
             };
-            result__WBNE=((__LIP_PRINT *)ptr__XBNE);
-            *(result__WBNE) = *(LIP_PRINT__);
+            result__4FNE=((__LIP_PRINT *)ptr__5FNE);
+            *(result__4FNE) = *(LIP_PRINT__);
           };
-          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;
+          Self__VSWE=((__LIP_PRINT *)result__4FNE);
+          Self__VSWE->parent_lip_code__HUYC.parent_itm_object__0EE.position__GFJ=p__FZHE;
+          Self__VSWE->message__2UUE=result__OVPB;
+          result__5PYC=result__4FNE;
         };
       };
-      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)) {
+      result__OVPB=result__5PYC;
+      if (((void *)result__5PYC == (void *)NULL)) {
+        pos__0DZG=current_position__EZF();
+        put_error__text__NPG( 0,(&__string_276));
+        put_position__XQG(pos__0DZG);
+        put_string__P3F(msg_err__SPG);
+        if ((type_error__RPG !=  2)) {
           exit(( 1));
         };
       };
     };
   };
-  return(result__2RPB);
+  return(result__OVPB);
 }
 
-static void run__1FFC(__LIP_AFFECT *Self__2FFC)
+static void run__JJFC(__LIP_AFFECT *Self__KJFC)
 // ({LIP_AFFECT}) VoidNo recursive, No inlinable.
 {
-  __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)) {
+  __POSITION pos__1F2G,pos__UN5C;
+  void *__tmp__CKFC;
+  void *__tmp__DKFC,*__tmp__EBKH,*__tmp__FBKH;
+  __LIP_INTEGER *Self__GBKH;
+  __LIP_STRING *Self__HBKH;
+  if (((void *)fast_reference_at__MWRD(list_data__WRNC,Self__KJFC->name__PJFC) == (void *)NULL)) {
+    copy__JDS(string_tmp__VH,(&__string_309));
+    append__ROS(string_tmp__VH,Self__KJFC->name__PJFC);
+    append__ROS(string_tmp__VH,(&__string_310));
+    pos__1F2G=Self__KJFC->parent_lip_code__LWPB.parent_itm_object__0EE.position__GFJ;
+    put_error__text__NPG( 1,string_tmp__VH);
+    put_position__XQG(pos__1F2G);
+    put_string__P3F(msg_err__SPG);
+    if ((type_error__RPG !=  2)) {
       exit(( 1));
     };
   };
-  __tmp__UGFC=Self__2FFC->value__TGFC;
-  switch (((struct ___OBJ *)__tmp__UGFC)->__id) {
+  __tmp__CKFC=Self__KJFC->value__BKFC;
+  switch (((struct ___OBJ *)__tmp__CKFC)->__id) {
   case __LIP_BINARY__: {
-    __tmp__VGFC=run_expr__SXQD(__tmp__UGFC);
+    __tmp__DKFC=run_expr__A1QD(__tmp__CKFC);
   } break;
   case __LIP_UNARY__: {
-    __tmp__VGFC=run_expr__R0QD(__tmp__UGFC);
+    __tmp__DKFC=run_expr__53QD(__tmp__CKFC);
   } break;
   case __LIP_CALL__: {
-    __tmp__VGFC=run_expr__DSUE(__tmp__UGFC);
+    __tmp__DKFC=run_expr__XWUE(__tmp__CKFC);
   } break;
   case __LIP_VALUE__: {
-    __tmp__FZJH=((__LIP_VALUE *)__tmp__UGFC)->value__DWUE;
-    switch (((struct ___OBJ *)__tmp__FZJH)->__id) {
+    __tmp__EBKH=((__LIP_VALUE *)__tmp__CKFC)->value__X0UE;
+    switch (((struct ___OBJ *)__tmp__EBKH)->__id) {
     case __LIP_BOOLEAN__: {
-      __tmp__GZJH=((__LIP_BOOLEAN *)__tmp__FZJH);
+      __tmp__FBKH=((__LIP_BOOLEAN *)__tmp__EBKH);
     } break;
     case __LIP_INTEGER__: {
-      Self__HZJH=((__LIP_INTEGER *)__tmp__FZJH);
-      __tmp__GZJH=get__LTSE(Self__HZJH,Self__HZJH->value__EI4F);
+      Self__GBKH=((__LIP_INTEGER *)__tmp__EBKH);
+      __tmp__FBKH=get__5XSE(Self__GBKH,Self__GBKH->value__LN4F);
     } break;
     case __LIP_STRING__: {
-      Self__IZJH=((__LIP_STRING *)__tmp__FZJH);
-      __tmp__GZJH=get__GYFF(Self__IZJH,Self__IZJH->value__RNUE);
+      Self__HBKH=((__LIP_STRING *)__tmp__EBKH);
+      __tmp__FBKH=get__M3FF(Self__HBKH,Self__HBKH->value__FSUE);
     } break;
     };
-    __tmp__VGFC=__tmp__GZJH;
+    __tmp__DKFC=__tmp__FBKH;
   } break;
   };
   print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
-  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)) {
+  pos__UN5C=Self__KJFC->parent_lip_code__LWPB.parent_itm_object__0EE.position__GFJ;
+  put_error__text__NPG( 1,(&__string_279));
+  put_position__XQG(pos__UN5C);
+  put_string__P3F(msg_err__SPG);
+  if ((type_error__RPG !=  2)) {
     exit(( 1));
   };
-  switch (((struct ___OBJ *)__tmp__VGFC)->__id) {
+  switch (((struct ___OBJ *)__tmp__DKFC)->__id) {
   case __LIP_BOOLEAN__: {
   } break;
   case __LIP_INTEGER__: {
-    free__223F(__tmp__VGFC);
+    free__DC4F(__tmp__DKFC);
   } break;
   case __LIP_STRING__: {
-    free__KBIG(__tmp__VGFC);
+    free__RGIG(__tmp__DKFC);
   } break;
   };
 }
 
-static void run__RLUE(__LIP_CALL *Self__SLUE)
+static void run__FQUE(__LIP_CALL *Self__GQUE)
 // ({LIP_CALL}) VoidNo recursive, No inlinable.
 {
-  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) {
+  void *val__JQUE,*__tmp__VQUE,*__tmp__JBKH,*__tmp__KBKH;
+  void *str__KQUE,*__tmp__0RUE,*__tmp__CTUE;
+  void *path__LQUE,*n__A0KF;
+  void *__tmp__UQUE;
+  __LIP_INTEGER *Self__LBKH;
+  __LIP_STRING *Self__MBKH;
+  __POSITION pos__HZKF,pos__4F2G,pos__BG2G,pos__EG2G,pos__HG2G;
+  __STRING_CONSTANT *Self__WVGH;
+  __STRING *Self__XVGH,*Self__ZVGH;
+  void *result__D0KF;
+  __INTEGER j__C0KF;
+  __BOOLEAN is_rec__MQUE,__tmp__MRUE,__tmp__USUE,result__PUXE;
+  __BOOLEAN __tmp__A1KF;
+  val__JQUE=NULL;
+  str__KQUE=NULL;
+  path__LQUE=NULL;
+  is_rec__MQUE=FALSE__;
+  if (((void *)Self__GQUE->argument__NQUE != (void *)NULL)) {
+    __tmp__UQUE=Self__GQUE->argument__NQUE;
+    switch (((struct ___OBJ *)__tmp__UQUE)->__id) {
     case __LIP_BINARY__: {
-      __tmp__BMUE=run_expr__SXQD(__tmp__AMUE);
+      __tmp__VQUE=run_expr__A1QD(__tmp__UQUE);
     } break;
     case __LIP_UNARY__: {
-      __tmp__BMUE=run_expr__R0QD(__tmp__AMUE);
+      __tmp__VQUE=run_expr__53QD(__tmp__UQUE);
     } break;
     case __LIP_CALL__: {
-      __tmp__BMUE=run_expr__DSUE(__tmp__AMUE);
+      __tmp__VQUE=run_expr__XWUE(__tmp__UQUE);
     } break;
     case __LIP_VALUE__: {
-      __tmp__KZJH=((__LIP_VALUE *)__tmp__AMUE)->value__DWUE;
-      switch (((struct ___OBJ *)__tmp__KZJH)->__id) {
+      __tmp__JBKH=((__LIP_VALUE *)__tmp__UQUE)->value__X0UE;
+      switch (((struct ___OBJ *)__tmp__JBKH)->__id) {
       case __LIP_BOOLEAN__: {
-        __tmp__LZJH=((__LIP_BOOLEAN *)__tmp__KZJH);
+        __tmp__KBKH=((__LIP_BOOLEAN *)__tmp__JBKH);
       } break;
       case __LIP_INTEGER__: {
-        Self__MZJH=((__LIP_INTEGER *)__tmp__KZJH);
-        __tmp__LZJH=get__LTSE(Self__MZJH,Self__MZJH->value__EI4F);
+        Self__LBKH=((__LIP_INTEGER *)__tmp__JBKH);
+        __tmp__KBKH=get__5XSE(Self__LBKH,Self__LBKH->value__LN4F);
       } break;
       case __LIP_STRING__: {
-        Self__NZJH=((__LIP_STRING *)__tmp__KZJH);
-        __tmp__LZJH=get__GYFF(Self__NZJH,Self__NZJH->value__RNUE);
+        Self__MBKH=((__LIP_STRING *)__tmp__JBKH);
+        __tmp__KBKH=get__M3FF(Self__MBKH,Self__MBKH->value__FSUE);
       } break;
       };
-      __tmp__BMUE=__tmp__LZJH;
+      __tmp__VQUE=__tmp__KBKH;
     } break;
     };
-    val__VLUE=__tmp__BMUE;
+    val__JQUE=__tmp__VQUE;
   };
-  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)) {
+  if (((void *)Self__GQUE->name__YQUE == (void *)(&__string_92))) {
+    if (((void *)val__JQUE != (void *)NULL)) {
+      pos__HZKF=Self__GQUE->parent_lip_code__K34B.parent_itm_object__0EE.position__GFJ;
+      put_error__text__NPG( 2,(&__string_311));
+      put_position__XQG(pos__HZKF);
+      put_string__P3F(msg_err__SPG);
+      if ((type_error__RPG !=  2)) {
         exit(( 1));
       };
     };
     exit(( 1));
-    __tmp__YMUE=TRUE__;
+    __tmp__MRUE=TRUE__;
   } else {
-    __tmp__YMUE=FALSE__;
+    __tmp__MRUE=FALSE__;
   };
-  if (__tmp__YMUE) {
-    __tmp__AOUE=TRUE__;
+  if (__tmp__MRUE) {
+    __tmp__USUE=TRUE__;
   } else {
-    result__TPXE=((void *)Self__SLUE->name__EMUE == (void *)(&__string_94));
-    if (result__TPXE) {
-      if (val__VLUE==NULL) {
-        __tmp__GNUE=NULL;
+    result__PUXE=((void *)Self__GQUE->name__YQUE == (void *)(&__string_94));
+    if (result__PUXE) {
+      if (val__JQUE==NULL) {
+        __tmp__0RUE=NULL;
       } else {
-        switch (((struct ___OBJ *)val__VLUE)->__id) {
+        switch (((struct ___OBJ *)val__JQUE)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__GNUE=NULL;
+          __tmp__0RUE=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__GNUE=NULL;
+          __tmp__0RUE=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__GNUE=((void *)val__VLUE);
+          __tmp__0RUE=((void *)val__JQUE);
         } break;
         }
       };
-      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)) {
+      str__KQUE=__tmp__0RUE;
+      if (((void *)__tmp__0RUE == (void *)NULL)) {
+        pos__4F2G=Self__GQUE->parent_lip_code__K34B.parent_itm_object__0EE.position__GFJ;
+        put_error__text__NPG( 1,(&__string_312));
+        put_position__XQG(pos__4F2G);
+        put_string__P3F(msg_err__SPG);
+        if ((type_error__RPG !=  2)) {
           exit(( 1));
         };
       };
-      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;
+      path__LQUE=((__LIP_STRING *)__tmp__0RUE)->value__FSUE;
+      Self__WVGH=((__STRING_CONSTANT *)path__LQUE);
+      if ((((__CHARACTER *)Self__WVGH->storage__FRO)[(__INTEGER)(Self__WVGH->count__DD -  1)] == '*')) {
+        copy__JDS(string_tmp__VH,path__LQUE);
+        Self__XVGH=((__STRING *)string_tmp__VH);
+        if (( 1 > Self__XVGH->count__EGC)) {
+          Self__XVGH->count__EGC= 0;
         } else {
-          Self__2OGH->count__EGC=(__INTEGER)(Self__2OGH->count__EGC -  1);
+          Self__XVGH->count__EGC=(__INTEGER)(Self__XVGH->count__EGC -  1);
         };
-        path__XLUE=get__YWB(string_tmp__VH);
-        is_rec__YLUE=TRUE__;
+        path__LQUE=get__YWB(string_tmp__VH);
+        is_rec__MQUE=TRUE__;
       };
-      load_directory__is_recursive__K3WF(Self__SLUE,path__XLUE,is_rec__YLUE);
+      load_directory__is_recursive__RCXF(Self__GQUE,path__LQUE,is_rec__MQUE);
     };
-    __tmp__AOUE=result__TPXE;
+    __tmp__USUE=result__PUXE;
   };
-  if ((! __tmp__AOUE)) {
-    if (((void *)Self__SLUE->name__EMUE == (void *)(&__string_93))) {
-      if (val__VLUE==NULL) {
-        __tmp__OOUE=NULL;
+  if ((! __tmp__USUE)) {
+    if (((void *)Self__GQUE->name__YQUE == (void *)(&__string_93))) {
+      if (val__JQUE==NULL) {
+        __tmp__CTUE=NULL;
       } else {
-        switch (((struct ___OBJ *)val__VLUE)->__id) {
+        switch (((struct ___OBJ *)val__JQUE)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__OOUE=NULL;
+          __tmp__CTUE=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__OOUE=NULL;
+          __tmp__CTUE=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__OOUE=((void *)val__VLUE);
+          __tmp__CTUE=((void *)val__JQUE);
         } break;
         }
       };
-      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)) {
+      str__KQUE=__tmp__CTUE;
+      if (((void *)__tmp__CTUE == (void *)NULL)) {
+        pos__BG2G=Self__GQUE->parent_lip_code__K34B.parent_itm_object__0EE.position__GFJ;
+        put_error__text__NPG( 1,(&__string_312));
+        put_position__XQG(pos__BG2G);
+        put_string__P3F(msg_err__SPG);
+        if ((type_error__RPG !=  2)) {
           exit(( 1));
         };
       };
       ((__STRING *)string_tmp__VH)->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';
+      append_in__LNIG(__tmp__CTUE,string_tmp__VH);
+      Self__ZVGH=((__STRING *)string_tmp__VH);
+      if ((Self__ZVGH->capacity__ICS > Self__ZVGH->count__EGC)) {
+        ((__CHARACTER *)Self__ZVGH->storage__RCS)[Self__ZVGH->count__EGC]='\0';
       } else {
-        add_last__3IT(Self__4OGH,'\0');
-        Self__4OGH->count__EGC=(__INTEGER)(Self__4OGH->count__EGC -  1);
+        add_last__GOT(Self__ZVGH,'\0');
+        Self__ZVGH->count__EGC=(__INTEGER)(Self__ZVGH->count__EGC -  1);
       };
-      system(((char*)((Self__4OGH->storage__F5R))));
+      system(((char*)((Self__ZVGH->storage__RCS))));
     } else {
-      n__0UKF=Self__SLUE->name__EMUE;
-      result__3UKF=NULL;
-      j__2UKF= 0;
-      while_do__O3LF:
+      n__A0KF=Self__GQUE->name__YQUE;
+      result__D0KF=NULL;
+      j__C0KF= 0;
+      while_do__VCMF:
       {
-        if ((j__2UKF <= ((__FAST_ARRAYoLIP_SLOT_CODEo *)list_method__DVKF)->parent_arrayed_collection__CVKF.upper__MVKF)) {
+        if ((j__C0KF <= ((__FAST_ARRAYoLIP_SLOT_CODEo *)list_method__J0KF)->parent_arrayed_collection__I0KF.upper__S0KF)) {
           print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
-          __tmp__0VKF=((void *)NULL != (void *)n__0UKF);
+          __tmp__A1KF=((void *)NULL != (void *)n__A0KF);
         } else {
-          __tmp__0VKF=FALSE__;
+          __tmp__A1KF=FALSE__;
         };
-        if (__tmp__0VKF) {
-          j__2UKF=(__INTEGER)(j__2UKF +  1);
-          goto while_do__O3LF;
+        if (__tmp__A1KF) {
+          j__C0KF=(__INTEGER)(j__C0KF +  1);
+          goto while_do__VCMF;
         };
       };
-      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 ((j__C0KF <= ((__FAST_ARRAYoLIP_SLOT_CODEo *)list_method__J0KF)->parent_arrayed_collection__I0KF.upper__S0KF)) {
+        result__D0KF=((void **)((__FAST_ARRAYoLIP_SLOT_CODEo *)list_method__J0KF)->parent_arrayed_collection__I0KF.storage__ZCQF)[j__C0KF];
       };
-      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)) {
+      if (((void *)result__D0KF == (void *)NULL)) {
+        copy__JDS(string_tmp__VH,(&__string_309));
+        append__ROS(string_tmp__VH,Self__GQUE->name__YQUE);
+        append__ROS(string_tmp__VH,(&__string_310));
+        pos__EG2G=Self__GQUE->parent_lip_code__K34B.parent_itm_object__0EE.position__GFJ;
+        put_error__text__NPG( 1,string_tmp__VH);
+        put_position__XQG(pos__EG2G);
+        put_string__P3F(msg_err__SPG);
+        if ((type_error__RPG !=  2)) {
           exit(( 1));
         };
       };
       print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
-      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)) {
+      pos__HG2G=Self__GQUE->parent_lip_code__K34B.parent_itm_object__0EE.position__GFJ;
+      put_error__text__NPG( 1,(&__string_313));
+      put_position__XQG(pos__HG2G);
+      put_string__P3F(msg_err__SPG);
+      if ((type_error__RPG !=  2)) {
         exit(( 1));
       };
     };
   };
-  if (((void *)val__VLUE != (void *)NULL)) {
-    switch (((struct ___OBJ *)val__VLUE)->__id) {
+  if (((void *)val__JQUE != (void *)NULL)) {
+    switch (((struct ___OBJ *)val__JQUE)->__id) {
     case __LIP_BOOLEAN__: {
     } break;
     case __LIP_INTEGER__: {
-      free__223F(val__VLUE);
+      free__DC4F(val__JQUE);
     } break;
     case __LIP_STRING__: {
-      free__KBIG(val__VLUE);
+      free__RGIG(val__JQUE);
     } break;
     };
   };
 }
 
-static void run__IBQD(__LIP_IF *Self__JBQD)
+static void run__WEQD(__LIP_IF *Self__XEQD)
 // ({LIP_IF}) VoidRecursive, No inlinable.
 {
-  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) {
+  void *__tmp__1EQD,*__tmp__5FQD,*__tmp__1GQD;
+  __POSITION __tmp__04AH,pos__LG2G,pos__PG2G,pos__SG2G,__tmp__GEZG;
+  __POSITION __tmp__IEZG,__tmp__VG2G,__tmp__PEZG,__tmp__REZG;
+  __POSITION __tmp__MVUE;
+  void *__tmp__2EQD,*__tmp__OBKH,*__tmp__PBKH;
+  __LIP_INTEGER *Self__QBKH;
+  __LIP_STRING *Self__RBKH;
+  void *__tmp__4EQD,*val__ZEQD;
+  __INTEGER __tmp__YFQD,Self__M2AG,__tmp__UGQD,Self__QJEF;
+  __BOOLEAN __tmp__CGQD;
+  __tmp__1EQD=Self__XEQD->condition__0EQD;
+  switch (((struct ___OBJ *)__tmp__1EQD)->__id) {
   case __LIP_AFFECT__: {
-    __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)) {
+    __tmp__04AH=((__LIP_AFFECT *)__tmp__1EQD)->parent_lip_code__LWPB.parent_itm_object__0EE.position__GFJ;
+    put_error__text__NPG( 1,(&__string_314));
+    put_position__XQG(__tmp__04AH);
+    put_string__P3F(msg_err__SPG);
+    if ((type_error__RPG !=  2)) {
       exit(( 1));
     };
-    __tmp__OBQD=NULL;
+    __tmp__2EQD=NULL;
   } break;
   case __LIP_BINARY__: {
-    __tmp__OBQD=run_expr__SXQD(__tmp__NBQD);
+    __tmp__2EQD=run_expr__A1QD(__tmp__1EQD);
   } break;
   case __LIP_UNARY__: {
-    __tmp__OBQD=run_expr__R0QD(__tmp__NBQD);
+    __tmp__2EQD=run_expr__53QD(__tmp__1EQD);
   } break;
   case __LIP_CALL__: {
-    __tmp__OBQD=run_expr__DSUE(__tmp__NBQD);
+    __tmp__2EQD=run_expr__XWUE(__tmp__1EQD);
   } break;
   case __LIP_IF__: {
-    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)) {
+    pos__LG2G=((__LIP_IF *)__tmp__1EQD)->parent_lip_code__VTYC.parent_itm_object__0EE.position__GFJ;
+    put_error__text__NPG( 1,(&__string_314));
+    put_position__XQG(pos__LG2G);
+    put_string__P3F(msg_err__SPG);
+    if ((type_error__RPG !=  2)) {
       exit(( 1));
     };
-    __tmp__OBQD=NULL;
+    __tmp__2EQD=NULL;
   } break;
   case __LIP_PRINT__: {
-    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)) {
+    pos__PG2G=((__LIP_PRINT *)__tmp__1EQD)->parent_lip_code__HUYC.parent_itm_object__0EE.position__GFJ;
+    put_error__text__NPG( 1,(&__string_314));
+    put_position__XQG(pos__PG2G);
+    put_string__P3F(msg_err__SPG);
+    if ((type_error__RPG !=  2)) {
       exit(( 1));
     };
-    __tmp__OBQD=NULL;
+    __tmp__2EQD=NULL;
   } break;
   case __LIP_VALUE__: {
-    __tmp__PZJH=((__LIP_VALUE *)__tmp__NBQD)->value__DWUE;
-    switch (((struct ___OBJ *)__tmp__PZJH)->__id) {
+    __tmp__OBKH=((__LIP_VALUE *)__tmp__1EQD)->value__X0UE;
+    switch (((struct ___OBJ *)__tmp__OBKH)->__id) {
     case __LIP_BOOLEAN__: {
-      __tmp__QZJH=((__LIP_BOOLEAN *)__tmp__PZJH);
+      __tmp__PBKH=((__LIP_BOOLEAN *)__tmp__OBKH);
     } break;
     case __LIP_INTEGER__: {
-      Self__RZJH=((__LIP_INTEGER *)__tmp__PZJH);
-      __tmp__QZJH=get__LTSE(Self__RZJH,Self__RZJH->value__EI4F);
+      Self__QBKH=((__LIP_INTEGER *)__tmp__OBKH);
+      __tmp__PBKH=get__5XSE(Self__QBKH,Self__QBKH->value__LN4F);
     } break;
     case __LIP_STRING__: {
-      Self__SZJH=((__LIP_STRING *)__tmp__PZJH);
-      __tmp__QZJH=get__GYFF(Self__SZJH,Self__SZJH->value__RNUE);
+      Self__RBKH=((__LIP_STRING *)__tmp__OBKH);
+      __tmp__PBKH=get__M3FF(Self__RBKH,Self__RBKH->value__FSUE);
     } break;
     };
-    __tmp__OBQD=__tmp__QZJH;
+    __tmp__2EQD=__tmp__PBKH;
   } break;
   };
-  if (__tmp__OBQD==NULL) {
-    __tmp__QBQD=NULL;
+  if (__tmp__2EQD==NULL) {
+    __tmp__4EQD=NULL;
   } else {
-    switch (((struct ___OBJ *)__tmp__OBQD)->__id) {
+    switch (((struct ___OBJ *)__tmp__2EQD)->__id) {
     case __LIP_BOOLEAN__: {
-      __tmp__QBQD=((void *)__tmp__OBQD);
+      __tmp__4EQD=((void *)__tmp__2EQD);
     } break;
     case __LIP_INTEGER__: {
-      __tmp__QBQD=NULL;
+      __tmp__4EQD=NULL;
     } break;
     case __LIP_STRING__: {
-      __tmp__QBQD=NULL;
+      __tmp__4EQD=NULL;
     } break;
     }
   };
-  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)) {
+  val__ZEQD=__tmp__4EQD;
+  if (((void *)__tmp__4EQD == (void *)NULL)) {
+    pos__SG2G=Self__XEQD->parent_lip_code__VTYC.parent_itm_object__0EE.position__GFJ;
+    put_error__text__NPG( 1,(&__string_315));
+    put_position__XQG(pos__SG2G);
+    put_string__P3F(msg_err__SPG);
+    if ((type_error__RPG !=  2)) {
       exit(( 1));
     };
   };
-  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) {
+  if (((__LIP_BOOLEAN *)__tmp__4EQD)->value__JFQD) {
+    __tmp__YFQD=((__FAST_ARRAYoLIP_CODEo *)Self__XEQD->then__QFQD)->parent_arrayed_collection__EQYC.upper__WFQD;
+    Self__M2AG= 0;
+    while ((Self__M2AG <= __tmp__YFQD)) {
+      __tmp__5FQD=((void **)((__FAST_ARRAYoLIP_CODEo *)Self__XEQD->then__QFQD)->parent_arrayed_collection__EQYC.storage__5TTD)[Self__M2AG];
+      switch (((struct ___OBJ *)__tmp__5FQD)->__id) {
       case __LIP_AFFECT__: {
-        run__1FFC(__tmp__RCQD);
+        run__JJFC(__tmp__5FQD);
       } break;
       case __LIP_BINARY__: {
-        __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)) {
+        __tmp__GEZG=((__LIP_BINARY *)__tmp__5FQD)->parent_lip_code__JRZB.parent_itm_object__0EE.position__GFJ;
+        put_error__text__NPG( 2,(&__string_274));
+        put_position__XQG(__tmp__GEZG);
+        put_string__P3F(msg_err__SPG);
+        if ((type_error__RPG !=  2)) {
           exit(( 1));
         };
       } break;
       case __LIP_UNARY__: {
-        __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)) {
+        __tmp__IEZG=((__LIP_UNARY *)__tmp__5FQD)->parent_lip_code__Y24B.parent_itm_object__0EE.position__GFJ;
+        put_error__text__NPG( 2,(&__string_274));
+        put_position__XQG(__tmp__IEZG);
+        put_string__P3F(msg_err__SPG);
+        if ((type_error__RPG !=  2)) {
           exit(( 1));
         };
       } break;
       case __LIP_CALL__: {
-        run__RLUE(__tmp__RCQD);
+        run__FQUE(__tmp__5FQD);
       } break;
       case __LIP_IF__: {
-        run__IBQD(__tmp__RCQD);
+        run__WEQD(__tmp__5FQD);
       } break;
       case __LIP_PRINT__: {
-        run__FQUE(__tmp__RCQD);
+        run__ZUUE(__tmp__5FQD);
       } break;
       case __LIP_VALUE__: {
-        __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)) {
+        __tmp__VG2G=((__LIP_VALUE *)__tmp__5FQD)->parent_lip_code__MIFE.parent_itm_object__0EE.position__GFJ;
+        put_error__text__NPG( 2,(&__string_274));
+        put_position__XQG(__tmp__VG2G);
+        put_string__P3F(msg_err__SPG);
+        if ((type_error__RPG !=  2)) {
           exit(( 1));
         };
       } break;
       };
-      Self__FXAG=(__INTEGER)(Self__FXAG +  1);
+      Self__M2AG=(__INTEGER)(Self__M2AG +  1);
     };
-    __tmp__UCQD=TRUE__;
+    __tmp__CGQD=TRUE__;
   } else {
-    __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) {
+    __tmp__CGQD=FALSE__;
+  };
+  if ((! __tmp__CGQD)) {
+    if (((void *)Self__XEQD->else__HGQD != (void *)NULL)) {
+      __tmp__UGQD=((__FAST_ARRAYoLIP_CODEo *)Self__XEQD->else__HGQD)->parent_arrayed_collection__EQYC.upper__WFQD;
+      Self__QJEF= 0;
+      while ((Self__QJEF <= __tmp__UGQD)) {
+        __tmp__1GQD=((void **)((__FAST_ARRAYoLIP_CODEo *)Self__XEQD->else__HGQD)->parent_arrayed_collection__EQYC.storage__5TTD)[Self__QJEF];
+        switch (((struct ___OBJ *)__tmp__1GQD)->__id) {
         case __LIP_AFFECT__: {
-          run__1FFC(__tmp__NDQD);
+          run__JJFC(__tmp__1GQD);
         } break;
         case __LIP_BINARY__: {
-          __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)) {
+          __tmp__PEZG=((__LIP_BINARY *)__tmp__1GQD)->parent_lip_code__JRZB.parent_itm_object__0EE.position__GFJ;
+          put_error__text__NPG( 2,(&__string_274));
+          put_position__XQG(__tmp__PEZG);
+          put_string__P3F(msg_err__SPG);
+          if ((type_error__RPG !=  2)) {
             exit(( 1));
           };
         } break;
         case __LIP_UNARY__: {
-          __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)) {
+          __tmp__REZG=((__LIP_UNARY *)__tmp__1GQD)->parent_lip_code__Y24B.parent_itm_object__0EE.position__GFJ;
+          put_error__text__NPG( 2,(&__string_274));
+          put_position__XQG(__tmp__REZG);
+          put_string__P3F(msg_err__SPG);
+          if ((type_error__RPG !=  2)) {
             exit(( 1));
           };
         } break;
         case __LIP_CALL__: {
-          run__RLUE(__tmp__NDQD);
+          run__FQUE(__tmp__1GQD);
         } break;
         case __LIP_IF__: {
-          run__IBQD(__tmp__NDQD);
+          run__WEQD(__tmp__1GQD);
         } break;
         case __LIP_PRINT__: {
-          run__FQUE(__tmp__NDQD);
+          run__ZUUE(__tmp__1GQD);
         } break;
         case __LIP_VALUE__: {
-          __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)) {
+          __tmp__MVUE=((__LIP_VALUE *)__tmp__1GQD)->parent_lip_code__MIFE.parent_itm_object__0EE.position__GFJ;
+          put_error__text__NPG( 2,(&__string_274));
+          put_position__XQG(__tmp__MVUE);
+          put_string__P3F(msg_err__SPG);
+          if ((type_error__RPG !=  2)) {
             exit(( 1));
           };
         } break;
         };
-        Self__UEEF=(__INTEGER)(Self__UEEF +  1);
+        Self__QJEF=(__INTEGER)(Self__QJEF +  1);
       };
     };
   };
 }
 
-static void run__FQUE(__LIP_PRINT *Self__GQUE)
+static void run__ZUUE(__LIP_PRINT *Self__0UUE)
 // ({LIP_PRINT}) VoidNo recursive, No inlinable.
 {
-  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) {
+  void *__tmp__3UUE;
+  __POSITION __tmp__F4VE,pos__E1DE,pos__XG2G,pos__X5XE;
+  void *__tmp__4UUE,*__tmp__TBKH,*__tmp__UBKH;
+  __LIP_INTEGER *Self__VBKH;
+  __LIP_STRING *Self__WBKH,*Self__CNIG;
+  __INTEGER Self__005F;
+  __BOOLEAN __tmp__B15F;
+  __tmp__3UUE=Self__0UUE->message__2UUE;
+  switch (((struct ___OBJ *)__tmp__3UUE)->__id) {
   case __LIP_AFFECT__: {
-    __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)) {
+    __tmp__F4VE=((__LIP_AFFECT *)__tmp__3UUE)->parent_lip_code__LWPB.parent_itm_object__0EE.position__GFJ;
+    put_error__text__NPG( 1,(&__string_314));
+    put_position__XQG(__tmp__F4VE);
+    put_string__P3F(msg_err__SPG);
+    if ((type_error__RPG !=  2)) {
       exit(( 1));
     };
-    __tmp__KQUE=NULL;
+    __tmp__4UUE=NULL;
   } break;
   case __LIP_BINARY__: {
-    __tmp__KQUE=run_expr__SXQD(__tmp__JQUE);
+    __tmp__4UUE=run_expr__A1QD(__tmp__3UUE);
   } break;
   case __LIP_UNARY__: {
-    __tmp__KQUE=run_expr__R0QD(__tmp__JQUE);
+    __tmp__4UUE=run_expr__53QD(__tmp__3UUE);
   } break;
   case __LIP_CALL__: {
-    __tmp__KQUE=run_expr__DSUE(__tmp__JQUE);
+    __tmp__4UUE=run_expr__XWUE(__tmp__3UUE);
   } break;
   case __LIP_IF__: {
-    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)) {
+    pos__E1DE=((__LIP_IF *)__tmp__3UUE)->parent_lip_code__VTYC.parent_itm_object__0EE.position__GFJ;
+    put_error__text__NPG( 1,(&__string_314));
+    put_position__XQG(pos__E1DE);
+    put_string__P3F(msg_err__SPG);
+    if ((type_error__RPG !=  2)) {
       exit(( 1));
     };
-    __tmp__KQUE=NULL;
+    __tmp__4UUE=NULL;
   } break;
   case __LIP_PRINT__: {
-    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)) {
+    pos__XG2G=((__LIP_PRINT *)__tmp__3UUE)->parent_lip_code__HUYC.parent_itm_object__0EE.position__GFJ;
+    put_error__text__NPG( 1,(&__string_314));
+    put_position__XQG(pos__XG2G);
+    put_string__P3F(msg_err__SPG);
+    if ((type_error__RPG !=  2)) {
       exit(( 1));
     };
-    __tmp__KQUE=NULL;
+    __tmp__4UUE=NULL;
   } break;
   case __LIP_VALUE__: {
-    __tmp__UZJH=((__LIP_VALUE *)__tmp__JQUE)->value__DWUE;
-    switch (((struct ___OBJ *)__tmp__UZJH)->__id) {
+    __tmp__TBKH=((__LIP_VALUE *)__tmp__3UUE)->value__X0UE;
+    switch (((struct ___OBJ *)__tmp__TBKH)->__id) {
     case __LIP_BOOLEAN__: {
-      __tmp__VZJH=((__LIP_BOOLEAN *)__tmp__UZJH);
+      __tmp__UBKH=((__LIP_BOOLEAN *)__tmp__TBKH);
     } break;
     case __LIP_INTEGER__: {
-      Self__WZJH=((__LIP_INTEGER *)__tmp__UZJH);
-      __tmp__VZJH=get__LTSE(Self__WZJH,Self__WZJH->value__EI4F);
+      Self__VBKH=((__LIP_INTEGER *)__tmp__TBKH);
+      __tmp__UBKH=get__5XSE(Self__VBKH,Self__VBKH->value__LN4F);
     } break;
     case __LIP_STRING__: {
-      Self__XZJH=((__LIP_STRING *)__tmp__UZJH);
-      __tmp__VZJH=get__GYFF(Self__XZJH,Self__XZJH->value__RNUE);
+      Self__WBKH=((__LIP_STRING *)__tmp__TBKH);
+      __tmp__UBKH=get__M3FF(Self__WBKH,Self__WBKH->value__FSUE);
     } break;
     };
-    __tmp__KQUE=__tmp__VZJH;
+    __tmp__4UUE=__tmp__UBKH;
   } break;
   };
-  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)) {
+  if (((void *)__tmp__4UUE == (void *)NULL)) {
+    pos__X5XE=Self__0UUE->parent_lip_code__HUYC.parent_itm_object__0EE.position__GFJ;
+    put_error__text__NPG( 1,(&__string_279));
+    put_position__XQG(pos__X5XE);
+    put_string__P3F(msg_err__SPG);
+    if ((type_error__RPG !=  2)) {
       exit(( 1));
     };
   };
-  switch (((struct ___OBJ *)__tmp__KQUE)->__id) {
+  switch (((struct ___OBJ *)__tmp__4UUE)->__id) {
   case __LIP_BOOLEAN__: {
-    if (((__LIP_BOOLEAN *)__tmp__KQUE)->value__1BQD) {
-      print__DID((&__string_42));
+    if (((__LIP_BOOLEAN *)__tmp__4UUE)->value__JFQD) {
+      print__DJD((&__string_42));
     } else {
-      print__DID((&__string_43));
+      print__DJD((&__string_43));
     };
   } break;
   case __LIP_INTEGER__: {
-    Self__TV5F=((__LIP_INTEGER *)__tmp__KQUE)->value__EI4F;
-    if ((Self__TV5F ==  0)) {
+    Self__005F=((__LIP_INTEGER *)__tmp__4UUE)->value__LN4F;
+    if ((Self__005F ==  0)) {
       fputc((int)('0'),stdout);
-      __tmp__0V5F=TRUE__;
+      __tmp__B15F=TRUE__;
     } else {
-      __tmp__0V5F=FALSE__;
+      __tmp__B15F=FALSE__;
     };
-    if ((! __tmp__0V5F)) {
-      if ((Self__TV5F <  0)) {
+    if ((! __tmp__B15F)) {
+      if ((Self__005F <  0)) {
         fputc((int)('-'),stdout);
-        print_positif__UALG((__INTEGER)(- Self__TV5F));
+        print_positif__1FLG((__INTEGER)(- Self__005F));
       } else {
-        print_positif__UALG(Self__TV5F);
+        print_positif__1FLG(Self__005F);
       };
     };
   } break;
   case __LIP_STRING__: {
-    Self__1HIG=((__LIP_STRING *)__tmp__KQUE);
+    Self__CNIG=((__LIP_STRING *)__tmp__4UUE);
     ((__STRING *)string_tmp__VH)->count__EGC= 0;
-    append_in__EIIG(Self__1HIG,string_tmp__VH);
-    put_string__5FF(((__STRING *)string_tmp__VH));
+    append_in__LNIG(Self__CNIG,string_tmp__VH);
+    put_string__DJF(((__STRING *)string_tmp__VH));
   } break;
   };
-  switch (((struct ___OBJ *)__tmp__KQUE)->__id) {
+  switch (((struct ___OBJ *)__tmp__4UUE)->__id) {
   case __LIP_BOOLEAN__: {
   } break;
   case __LIP_INTEGER__: {
-    free__223F(__tmp__KQUE);
+    free__DC4F(__tmp__4UUE);
   } break;
   case __LIP_STRING__: {
-    free__KBIG(__tmp__KQUE);
+    free__RGIG(__tmp__4UUE);
   } break;
   };
 }
 
-static void add_last__WKV(__FAST_ARRAYoITM_TYPE_MONOo *Self__XKV,void *element__YKV)
+static void add_last__COV(__FAST_ARRAYoITM_TYPE_MONOo *Self__DOV,void *element__EOV)
 // ({FAST_ARRAYoITM_TYPE_MONOo},{NULLxITM_TYPE_PARAMETERxITM_TYPE_SIMPLExITM_TYPE_BLOCKxITM_TYPE_GENERICxITM_TYPE_STYLE}) VoidNo recursive, No inlinable.
 {
-  __INTEGER new_capacity__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__;
+  __INTEGER new_capacity__FOV,__tmp__KPV,__tmp__OJEC,Self__BNVD;
+  __BOOLEAN __tmp__UOV;
+  void **__tmp__JPV,**new__0IEC;
+  new_capacity__FOV= 0;
+  if (((__INTEGER)(Self__DOV->parent_arrayed_collection__EYC.upper__SIV +  1) <= (__INTEGER)(Self__DOV->parent_arrayed_collection__EYC.capacity__HOV -  1))) {
+    Self__DOV->parent_arrayed_collection__EYC.upper__SIV=(__INTEGER)(Self__DOV->parent_arrayed_collection__EYC.upper__SIV +  1);
+    __tmp__UOV=TRUE__;
   } else {
-    __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;
+    __tmp__UOV=FALSE__;
+  };
+  if ((! __tmp__UOV)) {
+    if ((Self__DOV->parent_arrayed_collection__EYC.capacity__HOV ==  0)) {
+      Self__DOV->parent_arrayed_collection__EYC.storage__ZMV=create__JDRB( 2);
+      Self__DOV->parent_arrayed_collection__EYC.capacity__HOV= 2;
+      Self__DOV->parent_arrayed_collection__EYC.upper__SIV= 0;
+    } else {
+      new_capacity__FOV=(__INTEGER)(Self__DOV->parent_arrayed_collection__EYC.capacity__HOV <<  1);
+      __tmp__JPV=Self__DOV->parent_arrayed_collection__EYC.storage__ZMV;
+      __tmp__KPV=Self__DOV->parent_arrayed_collection__EYC.capacity__HOV;
+      new__0IEC=((void **)realloc_dynamic__old_size__new_size__ZHLC(((__POINTER )((void **)__tmp__JPV)),((__UINTEGER_32 )(__INTEGER)(__tmp__KPV * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__FOV * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__OJEC=(__INTEGER)(new_capacity__FOV -  1);
+      Self__BNVD=__tmp__KPV;
+      while ((Self__BNVD <= __tmp__OJEC)) {
+        new__0IEC[Self__BNVD]=NULL;
+        Self__BNVD=(__INTEGER)(Self__BNVD +  1);
+      };
+      Self__DOV->parent_arrayed_collection__EYC.storage__ZMV=new__0IEC;
+      Self__DOV->parent_arrayed_collection__EYC.capacity__HOV=new_capacity__FOV;
+      Self__DOV->parent_arrayed_collection__EYC.upper__SIV=(__INTEGER)(Self__DOV->parent_arrayed_collection__EYC.upper__SIV +  1);
+    };
+  };
+  ((void **)Self__DOV->parent_arrayed_collection__EYC.storage__ZMV)[Self__DOV->parent_arrayed_collection__EYC.upper__SIV]=element__EOV;
 }
 
-static void* alias__KSP(void *tmp__MSP)
+static void* alias__WVP(void *tmp__YVP)
 // ({NULLxFAST_ARRAYoITM_TYPE_MONOo}) With resultNo recursive, No inlinable.
 {
-  __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;
+  __INTEGER __tmp__OAQD,i__OS2E,new_capacity__HGW,other_upper__GGW;
+  __INTEGER Self__TQKC,h__IHW,idx__JHW,idx__PWRB,new_capacity__QWRB;
+  __INTEGER i__OWRB,typ_id__LMNB;
+  __POINTER ptr__GMNB,ptr_table__2BKH,next__1BKH,result__3BKH;
+  __POINTER ptr_table__BCKH,next__ACKH,result__CCKH;
+  __UINTEGER_32 sz__IMNB,a__KXGH,new_size__LXGH,t__PXGH,a__OXGH;
+  __UINTEGER_32 new_size__ECKH,lab_type__DCKH;
+  void *result__0VP,*result__X5V,*e__BHW,*e__YBKH,*e__CN1;
+  __HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo *Self__D5V,*Self__AHW;
+  void *node__W5V,*node__ZBKH,*node__LN1,*node__KHW,*node1__SWRB;
+  void *node2__TWRB,*__tmp__0IW;
+  __BOOLEAN __tmp__PAW,result__M5PD;
+  __FAST_ARRAYoITM_TYPE_MONOo *Self__J5PD,*o__N5PD,*__tmp__Z5PD;
+  __FAST_ARRAYoITM_TYPE_MONOo *Self__EGW;
+  void **__tmp__JAQD,**__tmp__LAQD,**Self__0R2E,**__tmp__0GW,**__tmp__2GW;
+  void **Self__RADC;
+  void **old_buckets__RWRB;
+  __HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *result__FMNB,*Self__MVDC;
+  result__0VP=NULL;
+  if ((((__FAST_ARRAYoITM_TYPE_MONOo *)tmp__YVP)->parent_arrayed_collection__EYC.upper__SIV <  0)) {
+    result__0VP=empty_list__BWP;
   } else {
-    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:
+    Self__D5V=((__HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo *)bucket__MWP);
+    result__X5V=NULL;
+    node__W5V=((void **)Self__D5V->buckets__45V)[(__INTEGER)(hash_code__X50(tmp__YVP) % Self__D5V->capacity__Z5V)];
+    until_do__5A1:
     {
-      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;
+      if (((void *)node__W5V == (void *)NULL)) {
+        __tmp__PAW=TRUE__;
+      } else {
+        Self__J5PD=((__FAST_ARRAYoITM_TYPE_MONOo *)((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__W5V)->item__KAW);
+        result__M5PD=FALSE__;
+        o__N5PD=NULL;
+        if (((void *)Self__J5PD == (void *)tmp__YVP)) {
+          result__M5PD=TRUE__;
+        } else {
+          if (tmp__YVP==NULL) {
+            __tmp__Z5PD=NULL;
+          } else {
+            __tmp__Z5PD=((__FAST_ARRAYoITM_TYPE_MONOo *)tmp__YVP);
+          };
+          o__N5PD=__tmp__Z5PD;
+          if ((((void *)__tmp__Z5PD != (void *)NULL) && (Self__J5PD->parent_arrayed_collection__EYC.upper__SIV == __tmp__Z5PD->parent_arrayed_collection__EYC.upper__SIV))) {
+            __tmp__JAQD=Self__J5PD->parent_arrayed_collection__EYC.storage__ZMV;
+            __tmp__LAQD=__tmp__Z5PD->parent_arrayed_collection__EYC.storage__ZMV;
+            __tmp__OAQD=(__INTEGER)(Self__J5PD->parent_arrayed_collection__EYC.upper__SIV +  1);
+            Self__0R2E=((void **)__tmp__JAQD);
+            i__OS2E=(__INTEGER)(__tmp__OAQD -  1);
+            while (((i__OS2E >=  0) && ((void *)Self__0R2E[i__OS2E] == (void *)((void **)__tmp__LAQD)[i__OS2E]))) {
+              i__OS2E=(__INTEGER)(i__OS2E -  1);
+            };
+            result__M5PD=(i__OS2E <  0);
+          };
+        };
+        __tmp__PAW=result__M5PD;
+      };
+      if ((! __tmp__PAW)) {
+        node__W5V=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__W5V)->next__WAW;
+        goto until_do__5A1;
+      };
+    };
+    if (((void *)node__W5V != (void *)NULL)) {
+      result__X5V=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__W5V)->item__KAW;
+    };
+    result__0VP=result__X5V;
+    if (((void *)result__X5V == (void *)NULL)) {
+      result__0VP=create_with_capacity__YFR((__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)tmp__YVP)->parent_arrayed_collection__EYC.upper__SIV +  1));
+      Self__EGW=((__FAST_ARRAYoITM_TYPE_MONOo *)result__0VP);
+      new_capacity__HGW= 0;
+      other_upper__GGW=((__FAST_ARRAYoITM_TYPE_MONOo *)tmp__YVP)->parent_arrayed_collection__EYC.upper__SIV;
+      if ((other_upper__GGW >=  0)) {
+        new_capacity__HGW=(__INTEGER)(other_upper__GGW +  1);
+        if ((Self__EGW->parent_arrayed_collection__EYC.capacity__HOV < new_capacity__HGW)) {
+          Self__EGW->parent_arrayed_collection__EYC.storage__ZMV=create__JDRB(new_capacity__HGW);
+          Self__EGW->parent_arrayed_collection__EYC.capacity__HOV=new_capacity__HGW;
+        };
+        __tmp__0GW=Self__EGW->parent_arrayed_collection__EYC.storage__ZMV;
+        __tmp__2GW=((__FAST_ARRAYoITM_TYPE_MONOo *)tmp__YVP)->parent_arrayed_collection__EYC.storage__ZMV;
+        Self__RADC=((void **)__tmp__0GW);
+        Self__TQKC=other_upper__GGW;
+        while ((Self__TQKC >=  0)) {
+          Self__RADC[Self__TQKC]=((void **)__tmp__2GW)[Self__TQKC];
+          Self__TQKC=(__INTEGER)(Self__TQKC -  1);
+        };
+      };
+      Self__EGW->parent_arrayed_collection__EYC.upper__SIV=other_upper__GGW;
+      Self__AHW=((__HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo *)bucket__MWP);
+      e__BHW=result__0VP;
+      e__YBKH=result__0VP;
+      node__ZBKH=((void **)Self__AHW->buckets__45V)[(__INTEGER)(hash_code__X50(result__0VP) % Self__AHW->capacity__Z5V)];
+      while ((! (((void *)node__ZBKH == (void *)NULL) || ((void *)((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__ZBKH)->item__KAW == (void *)e__YBKH)))) {
+        node__ZBKH=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__ZBKH)->next__WAW;
+      };
+      e__CN1=result__0VP;
+      node__LN1=((void **)Self__AHW->buckets__45V)[(__INTEGER)(hash_code__X50(result__0VP) % Self__AHW->capacity__Z5V)];
+      while ((! (((void *)node__LN1 == (void *)NULL) || ((void *)((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__LN1)->item__KAW == (void *)e__CN1)))) {
+        node__LN1=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__LN1)->next__WAW;
+      };
+      h__IHW=hash_code__X50(result__0VP);
+      idx__JHW=(__INTEGER)(h__IHW % Self__AHW->capacity__Z5V);
+      node__KHW=((void **)Self__AHW->buckets__45V)[idx__JHW];
+      while ((! (((void *)node__KHW == (void *)NULL) || ((void *)((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__KHW)->item__KAW == (void *)e__BHW)))) {
+        node__KHW=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__KHW)->next__WAW;
+      };
+      if (((void *)node__KHW == (void *)NULL)) {
+        if ((Self__AHW->capacity__Z5V == Self__AHW->count__NIW)) {
+          idx__PWRB= 0;
+          node1__SWRB=NULL;
+          node2__TWRB=NULL;
+          new_capacity__QWRB=prime_number_ceiling__541((__INTEGER)(Self__AHW->capacity__Z5V +  1));
+          old_buckets__RWRB=Self__AHW->buckets__45V;
+          Self__AHW->buckets__45V=create__D0BB(new_capacity__QWRB);
+          i__OWRB=(__INTEGER)(Self__AHW->capacity__Z5V -  1);
+          Self__AHW->capacity__Z5V=new_capacity__QWRB;
+          while ((i__OWRB >=  0)) {
+            node1__SWRB=((void **)old_buckets__RWRB)[i__OWRB];
+            while (((void *)node1__SWRB != (void *)NULL)) {
+              node2__TWRB=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node1__SWRB)->next__WAW;
+              idx__PWRB=(__INTEGER)(hash_code__X50(((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node1__SWRB)->item__KAW) % Self__AHW->capacity__Z5V);
+              ((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node1__SWRB)->next__WAW=((void **)Self__AHW->buckets__45V)[idx__PWRB];
+              ((void **)Self__AHW->buckets__45V)[idx__PWRB]=node1__SWRB;
+              node1__SWRB=node2__TWRB;
+            };
+            i__OWRB=(__INTEGER)(i__OWRB -  1);
+          };
+          idx__JHW=(__INTEGER)(h__IHW % Self__AHW->capacity__Z5V);
+        };
+        __tmp__0IW=((void **)Self__AHW->buckets__45V)[idx__JHW];
+        result__FMNB=NULL;
+        ptr__GMNB=((__POINTER )(NULL));
+        typ_id__LMNB= 0;
+        sz__IMNB=((__UINTEGER_32 )sizeof(__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo));
+        if ((sz__IMNB ==  0)) {
+          result__FMNB=HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo__;
+        } else {
+          typ_id__LMNB=__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo__;
+          clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__IMNB);
+          if ((typ_id__LMNB == (__INTEGER)(-  1))) {
+            a__KXGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__LXGH=(__UINTEGER_32)((__UINTEGER_32)(sz__IMNB + a__KXGH) & (__UINTEGER_32)(~ a__KXGH));
+            ptr_table__2BKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__LXGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__1BKH=((__POINTER )(NULL));
+            result__3BKH=((__POINTER *)ptr_table__2BKH)[ 0];
+            if ((result__3BKH == (void *)NULL)) {
+              result__3BKH=new_lab__FTJ(new_size__LXGH);
+              next__1BKH=(void *)((unsigned long)result__3BKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LXGH)));
+              ((__POINTER *)next__1BKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__2BKH)[ 0]=next__1BKH;
             } else {
-              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)));
+              next__1BKH=((__POINTER *)result__3BKH)[ 0];
+              if ((next__1BKH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__3BKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__LXGH <<  1)) <=  4096)) {
+                  next__1BKH=(void *)((unsigned long)result__3BKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LXGH)));
                 } else {
-                  next__2ZJH=new_lab__ZPJ(new_size__QQGH);
+                  next__1BKH=new_lab__FTJ(new_size__LXGH);
                 };
-                ((__POINTER *)next__2ZJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__3ZJH)[ 0]=next__2ZJH;
+                ((__POINTER *)next__1BKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__2BKH)[ 0]=next__1BKH;
               } else {
-                ((__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;
+                ((__POINTER *)result__3BKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1BKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__3BKH=next__1BKH;
+              };
+            };
+            ptr__GMNB=result__3BKH;
+          } else {
+            t__PXGH=((__UINTEGER_32 )typ_id__LMNB);
+            a__OXGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__ECKH=(__UINTEGER_32)((__UINTEGER_32)(sz__IMNB + a__OXGH) & (__UINTEGER_32)(~ a__OXGH));
+            ptr_table__BCKH=((__POINTER )(&(table_type[(t__PXGH)])));
+            lab_type__DCKH=(__UINTEGER_32)(t__PXGH |  1);
+            next__ACKH=((__POINTER )(NULL));
+            result__CCKH=((__POINTER *)ptr_table__BCKH)[ 0];
+            if ((result__CCKH == (void *)NULL)) {
+              result__CCKH=new_lab__FTJ(lab_type__DCKH);
+              next__ACKH=(void *)((unsigned long)result__CCKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ECKH)));
+              ((__POINTER *)next__ACKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__BCKH)[ 0]=next__ACKH;
             } else {
-              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)));
+              next__ACKH=((__POINTER *)result__CCKH)[ 0];
+              if ((next__ACKH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__CCKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__ECKH <<  1)) <=  4096)) {
+                  next__ACKH=(void *)((unsigned long)result__CCKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ECKH)));
                 } else {
-                  next__B0JH=new_lab__ZPJ(lab_type__E0JH);
+                  next__ACKH=new_lab__FTJ(lab_type__DCKH);
                 };
-                ((__POINTER *)next__B0JH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__C0JH)[ 0]=next__B0JH;
+                ((__POINTER *)next__ACKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__BCKH)[ 0]=next__ACKH;
               } else {
-                ((__POINTER *)result__D0JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__B0JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__D0JH=next__B0JH;
+                ((__POINTER *)result__CCKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ACKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__CCKH=next__ACKH;
               };
             };
-            ptr__0INB=result__D0JH;
+            ptr__GMNB=result__CCKH;
           };
-          result__ZINB=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)ptr__0INB);
-          *(result__ZINB) = *(HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo__);
+          result__FMNB=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)ptr__GMNB);
+          *(result__FMNB) = *(HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo__);
         };
-        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);
+        Self__MVDC=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)result__FMNB);
+        Self__MVDC->item__KAW=result__0VP;
+        Self__MVDC->next__WAW=__tmp__0IW;
+        node__KHW=result__FMNB;
+        ((void **)Self__AHW->buckets__45V)[idx__JHW]=result__FMNB;
+        Self__AHW->count__NIW=(__INTEGER)(Self__AHW->count__NIW +  1);
       };
     };
   };
-  free__AKQ(tmp__MSP);
-  return(result__OSP);
+  free__MNQ(tmp__YVP);
+  return(result__0VP);
 }
 
-static void add__AJHB(__HASHED_SEToSTRING_CONSTANTo *Self__BJHB,void *e__CJHB)
+static void add__MMHB(__HASHED_SEToSTRING_CONSTANTo *Self__NMHB,void *e__OMHB)
 // ({HASHED_SEToSTRING_CONSTANTo},{NULLxSTRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __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)));
+  __STRING_CONSTANT *Self__KKIH,*Self__PKIH;
+  __INTEGER result__JKIH,__tmp__LKIH,Self__MKIH,idx__WMHB,idx__SR0B;
+  __INTEGER new_capacity__TR0B,i__RR0B,result__OKIH,__tmp__QKIH;
+  __INTEGER Self__RKIH,typ_id__D5WB;
+  __POINTER ptr__44WB,ptr_table__GCKH,next__FCKH,result__HCKH;
+  __POINTER ptr_table__LCKH,next__KCKH,result__MCKH;
+  __UINTEGER_32 sz__A5WB,a__EYGH,new_size__FYGH,t__JYGH,a__IYGH;
+  __UINTEGER_32 new_size__OCKH,lab_type__NCKH;
+  void *node__XMHB,*node1__VR0B,*node2__WR0B,*__tmp__GOHB;
+  void **old_buckets__UR0B;
+  __HASHED_SET_NODEoSTRING_CONSTANTo *result__34WB,*Self__LOFC;
+  has__3LMB(Self__NMHB,e__OMHB);
+  has__3LMB(Self__NMHB,e__OMHB);
+  Self__KKIH=((__STRING_CONSTANT *)e__OMHB);
+  result__JKIH= 0;
+  __tmp__LKIH=Self__KKIH->count__DD;
+  Self__MKIH= 1;
+  while ((Self__MKIH <= __tmp__LKIH)) {
+    result__JKIH=(__INTEGER)((__INTEGER)( 5 * result__JKIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__KKIH->storage__FRO)[(__INTEGER)(Self__MKIH -  1)])));
+    Self__MKIH=(__INTEGER)(Self__MKIH +  1);
+  };
+  if ((result__JKIH <  0)) {
+    result__JKIH=(__INTEGER)(~ result__JKIH);
+  };
+  idx__WMHB=(__INTEGER)(result__JKIH % Self__NMHB->capacity__0IT);
+  node__XMHB=((void **)Self__NMHB->buckets__XEV)[idx__WMHB];
+  while ((! (((void *)node__XMHB == (void *)NULL) || __infix_equal_equal__GAEB(((__HASHED_SET_NODEoSTRING_CONSTANTo *)node__XMHB)->item__DFV,e__OMHB)))) {
+    node__XMHB=((__HASHED_SET_NODEoSTRING_CONSTANTo *)node__XMHB)->next__OFV;
+  };
+  if (((void *)node__XMHB == (void *)NULL)) {
+    if ((Self__NMHB->capacity__0IT == Self__NMHB->count__AIY)) {
+      idx__SR0B= 0;
+      node1__VR0B=NULL;
+      node2__WR0B=NULL;
+      new_capacity__TR0B=prime_number_ceiling__541((__INTEGER)(Self__NMHB->capacity__0IT +  1));
+      old_buckets__UR0B=Self__NMHB->buckets__XEV;
+      Self__NMHB->buckets__XEV=create__123(new_capacity__TR0B);
+      i__RR0B=(__INTEGER)(Self__NMHB->capacity__0IT -  1);
+      Self__NMHB->capacity__0IT=new_capacity__TR0B;
+      while ((i__RR0B >=  0)) {
+        node1__VR0B=((void **)old_buckets__UR0B)[i__RR0B];
+        while (((void *)node1__VR0B != (void *)NULL)) {
+          node2__WR0B=((__HASHED_SET_NODEoSTRING_CONSTANTo *)node1__VR0B)->next__OFV;
+          Self__PKIH=((__STRING_CONSTANT *)((__HASHED_SET_NODEoSTRING_CONSTANTo *)node1__VR0B)->item__DFV);
+          result__OKIH= 0;
+          __tmp__QKIH=Self__PKIH->count__DD;
+          Self__RKIH= 1;
+          while ((Self__RKIH <= __tmp__QKIH)) {
+            result__OKIH=(__INTEGER)((__INTEGER)( 5 * result__OKIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__PKIH->storage__FRO)[(__INTEGER)(Self__RKIH -  1)])));
+            Self__RKIH=(__INTEGER)(Self__RKIH +  1);
+          };
+          if ((result__OKIH <  0)) {
+            result__OKIH=(__INTEGER)(~ result__OKIH);
+          };
+          idx__SR0B=(__INTEGER)(result__OKIH % Self__NMHB->capacity__0IT);
+          ((__HASHED_SET_NODEoSTRING_CONSTANTo *)node1__VR0B)->next__OFV=((void **)Self__NMHB->buckets__XEV)[idx__SR0B];
+          ((void **)Self__NMHB->buckets__XEV)[idx__SR0B]=node1__VR0B;
+          node1__VR0B=node2__WR0B;
+        };
+        i__RR0B=(__INTEGER)(i__RR0B -  1);
+      };
+      idx__WMHB=(__INTEGER)(result__JKIH % new_capacity__TR0B);
+    };
+    __tmp__GOHB=((void **)Self__NMHB->buckets__XEV)[idx__WMHB];
+    result__34WB=NULL;
+    ptr__44WB=((__POINTER )(NULL));
+    typ_id__D5WB= 0;
+    sz__A5WB=((__UINTEGER_32 )sizeof(__HASHED_SET_NODEoSTRING_CONSTANTo));
+    if ((sz__A5WB ==  0)) {
+      result__34WB=HASHED_SET_NODEoSTRING_CONSTANTo__;
+    } else {
+      typ_id__D5WB=__HASHED_SET_NODEoSTRING_CONSTANTo__;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__A5WB);
+      if ((typ_id__D5WB == (__INTEGER)(-  1))) {
+        a__EYGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__FYGH=(__UINTEGER_32)((__UINTEGER_32)(sz__A5WB + a__EYGH) & (__UINTEGER_32)(~ a__EYGH));
+        ptr_table__GCKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__FYGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__FCKH=((__POINTER )(NULL));
+        result__HCKH=((__POINTER *)ptr_table__GCKH)[ 0];
+        if ((result__HCKH == (void *)NULL)) {
+          result__HCKH=new_lab__FTJ(new_size__FYGH);
+          next__FCKH=(void *)((unsigned long)result__HCKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FYGH)));
+          ((__POINTER *)next__FCKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__GCKH)[ 0]=next__FCKH;
+        } else {
+          next__FCKH=((__POINTER *)result__HCKH)[ 0];
+          if ((next__FCKH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HCKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__FYGH <<  1)) <=  4096)) {
+              next__FCKH=(void *)((unsigned long)result__HCKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FYGH)));
             } else {
-              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)));
+              next__FCKH=new_lab__FTJ(new_size__FYGH);
+            };
+            ((__POINTER *)next__FCKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__GCKH)[ 0]=next__FCKH;
+          } else {
+            ((__POINTER *)result__HCKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FCKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__HCKH=next__FCKH;
+          };
+        };
+        ptr__44WB=result__HCKH;
+      } else {
+        t__JYGH=((__UINTEGER_32 )typ_id__D5WB);
+        a__IYGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__OCKH=(__UINTEGER_32)((__UINTEGER_32)(sz__A5WB + a__IYGH) & (__UINTEGER_32)(~ a__IYGH));
+        ptr_table__LCKH=((__POINTER )(&(table_type[(t__JYGH)])));
+        lab_type__NCKH=(__UINTEGER_32)(t__JYGH |  1);
+        next__KCKH=((__POINTER )(NULL));
+        result__MCKH=((__POINTER *)ptr_table__LCKH)[ 0];
+        if ((result__MCKH == (void *)NULL)) {
+          result__MCKH=new_lab__FTJ(lab_type__NCKH);
+          next__KCKH=(void *)((unsigned long)result__MCKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OCKH)));
+          ((__POINTER *)next__KCKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__LCKH)[ 0]=next__KCKH;
+        } else {
+          next__KCKH=((__POINTER *)result__MCKH)[ 0];
+          if ((next__KCKH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MCKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__OCKH <<  1)) <=  4096)) {
+              next__KCKH=(void *)((unsigned long)result__MCKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OCKH)));
             } else {
-              next__L0JH=new_lab__ZPJ(lab_type__O0JH);
+              next__KCKH=new_lab__FTJ(lab_type__NCKH);
             };
-            ((__POINTER *)next__L0JH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__M0JH)[ 0]=next__L0JH;
+            ((__POINTER *)next__KCKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__LCKH)[ 0]=next__KCKH;
           } else {
-            ((__POINTER *)result__N0JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__L0JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__N0JH=next__L0JH;
+            ((__POINTER *)result__MCKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KCKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__MCKH=next__KCKH;
           };
         };
-        ptr__S1WB=result__N0JH;
+        ptr__44WB=result__MCKH;
       };
-      result__R1WB=((__HASHED_SET_NODEoSTRING_CONSTANTo *)ptr__S1WB);
-      *(result__R1WB) = *(HASHED_SET_NODEoSTRING_CONSTANTo__);
+      result__34WB=((__HASHED_SET_NODEoSTRING_CONSTANTo *)ptr__44WB);
+      *(result__34WB) = *(HASHED_SET_NODEoSTRING_CONSTANTo__);
     };
-    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);
+    Self__LOFC=((__HASHED_SET_NODEoSTRING_CONSTANTo *)result__34WB);
+    Self__LOFC->item__DFV=e__OMHB;
+    Self__LOFC->next__OFV=__tmp__GOHB;
+    node__XMHB=result__34WB;
+    ((void **)Self__NMHB->buckets__XEV)[idx__WMHB]=result__34WB;
+    Self__NMHB->count__AIY=(__INTEGER)(Self__NMHB->count__AIY +  1);
   };
 }
 
-static void add_last__35OD(__FAST_ARRAYoSTRING_CONSTANTo *Self__45OD,void *element__55OD)
+static void add_last__LDPD(__FAST_ARRAYoSTRING_CONSTANTo *Self__MDPD,void *element__NDPD)
 // ({FAST_ARRAYoSTRING_CONSTANTo},{NULLxSTRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER new_capacity__ODPD,__tmp__VEPD,__tmp__AWWE,Self__NWQF;
+  __BOOLEAN __tmp__3DPD;
+  void **__tmp__UEPD,**new__MVWE;
+  new_capacity__ODPD= 0;
+  if (((__INTEGER)(Self__MDPD->parent_arrayed_collection__ABJ.upper__VBPD +  1) <= (__INTEGER)(Self__MDPD->parent_arrayed_collection__ABJ.capacity__QDPD -  1))) {
+    Self__MDPD->parent_arrayed_collection__ABJ.upper__VBPD=(__INTEGER)(Self__MDPD->parent_arrayed_collection__ABJ.upper__VBPD +  1);
+    __tmp__3DPD=TRUE__;
   } else {
-    __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;
+    __tmp__3DPD=FALSE__;
+  };
+  if ((! __tmp__3DPD)) {
+    if ((Self__MDPD->parent_arrayed_collection__ABJ.capacity__QDPD ==  0)) {
+      Self__MDPD->parent_arrayed_collection__ABJ.storage__LEPD=create__BMHE( 2);
+      Self__MDPD->parent_arrayed_collection__ABJ.capacity__QDPD= 2;
+      Self__MDPD->parent_arrayed_collection__ABJ.upper__VBPD= 0;
+    } else {
+      new_capacity__ODPD=(__INTEGER)(Self__MDPD->parent_arrayed_collection__ABJ.capacity__QDPD <<  1);
+      __tmp__UEPD=Self__MDPD->parent_arrayed_collection__ABJ.storage__LEPD;
+      __tmp__VEPD=Self__MDPD->parent_arrayed_collection__ABJ.capacity__QDPD;
+      new__MVWE=((void **)realloc_dynamic__old_size__new_size__ZHLC(((__POINTER )((void **)__tmp__UEPD)),((__UINTEGER_32 )(__INTEGER)(__tmp__VEPD * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__ODPD * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__AWWE=(__INTEGER)(new_capacity__ODPD -  1);
+      Self__NWQF=__tmp__VEPD;
+      while ((Self__NWQF <= __tmp__AWWE)) {
+        new__MVWE[Self__NWQF]=NULL;
+        Self__NWQF=(__INTEGER)(Self__NWQF +  1);
+      };
+      Self__MDPD->parent_arrayed_collection__ABJ.storage__LEPD=new__MVWE;
+      Self__MDPD->parent_arrayed_collection__ABJ.capacity__QDPD=new_capacity__ODPD;
+      Self__MDPD->parent_arrayed_collection__ABJ.upper__VBPD=(__INTEGER)(Self__MDPD->parent_arrayed_collection__ABJ.upper__VBPD +  1);
+    };
+  };
+  ((void **)Self__MDPD->parent_arrayed_collection__ABJ.storage__LEPD)[Self__MDPD->parent_arrayed_collection__ABJ.upper__VBPD]=element__NDPD;
 }
 
-static void free__WP5(void *tmp__YP5)
+static void free__EV5(void *tmp__GV5)
 // ({NULLxFAST_ARRAYoSTRING_CONSTANTo}) VoidNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER new_capacity__PHGB,__tmp__TIGB,__tmp__CKGC,Self__KCWD;
+  __FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *Self__NHGB;
+  __BOOLEAN __tmp__3HGB;
+  void **__tmp__SIGB,**new__OJGC;
+  ((__FAST_ARRAYoSTRING_CONSTANTo *)tmp__GV5)->parent_arrayed_collection__ABJ.upper__VBPD=(__INTEGER)(-  1);
+  Self__NHGB=((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)free_list__PAL);
+  new_capacity__PHGB= 0;
+  if (((__INTEGER)(Self__NHGB->parent_arrayed_collection__OAL.upper__5UU +  1) <= (__INTEGER)(Self__NHGB->parent_arrayed_collection__OAL.capacity__EXU -  1))) {
+    Self__NHGB->parent_arrayed_collection__OAL.upper__5UU=(__INTEGER)(Self__NHGB->parent_arrayed_collection__OAL.upper__5UU +  1);
+    __tmp__3HGB=TRUE__;
   } else {
-    __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;
+    __tmp__3HGB=FALSE__;
+  };
+  if ((! __tmp__3HGB)) {
+    if ((Self__NHGB->parent_arrayed_collection__OAL.capacity__EXU ==  0)) {
+      Self__NHGB->parent_arrayed_collection__OAL.storage__PXU=create__M5ZB( 2);
+      Self__NHGB->parent_arrayed_collection__OAL.capacity__EXU= 2;
+      Self__NHGB->parent_arrayed_collection__OAL.upper__5UU= 0;
+    } else {
+      new_capacity__PHGB=(__INTEGER)(Self__NHGB->parent_arrayed_collection__OAL.capacity__EXU <<  1);
+      __tmp__SIGB=Self__NHGB->parent_arrayed_collection__OAL.storage__PXU;
+      __tmp__TIGB=Self__NHGB->parent_arrayed_collection__OAL.capacity__EXU;
+      new__OJGC=((void **)realloc_dynamic__old_size__new_size__ZHLC(((__POINTER )((void **)__tmp__SIGB)),((__UINTEGER_32 )(__INTEGER)(__tmp__TIGB * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__PHGB * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__CKGC=(__INTEGER)(new_capacity__PHGB -  1);
+      Self__KCWD=__tmp__TIGB;
+      while ((Self__KCWD <= __tmp__CKGC)) {
+        new__OJGC[Self__KCWD]=NULL;
+        Self__KCWD=(__INTEGER)(Self__KCWD +  1);
+      };
+      Self__NHGB->parent_arrayed_collection__OAL.storage__PXU=new__OJGC;
+      Self__NHGB->parent_arrayed_collection__OAL.capacity__EXU=new_capacity__PHGB;
+      Self__NHGB->parent_arrayed_collection__OAL.upper__5UU=(__INTEGER)(Self__NHGB->parent_arrayed_collection__OAL.upper__5UU +  1);
+    };
+  };
+  ((void **)Self__NHGB->parent_arrayed_collection__OAL.storage__PXU)[Self__NHGB->parent_arrayed_collection__OAL.upper__5UU]=tmp__GV5;
 }
 
-static void free__AKQ(void *tmp__CKQ)
+static void free__MNQ(void *tmp__ONQ)
 // ({NULLxFAST_ARRAYoITM_TYPE_MONOo}) VoidNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER new_capacity__GZV,__tmp__N0V,__tmp__4MEC,Self__5QVD;
+  __FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *Self__EZV;
+  __BOOLEAN __tmp__VZV;
+  void **__tmp__M0V,**new__KMEC;
+  ((__FAST_ARRAYoITM_TYPE_MONOo *)tmp__ONQ)->parent_arrayed_collection__EYC.upper__SIV=(__INTEGER)(-  1);
+  Self__EZV=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__0UP);
+  new_capacity__GZV= 0;
+  if (((__INTEGER)(Self__EZV->parent_arrayed_collection__ZUP.upper__NVV +  1) <= (__INTEGER)(Self__EZV->parent_arrayed_collection__ZUP.capacity__IZV -  1))) {
+    Self__EZV->parent_arrayed_collection__ZUP.upper__NVV=(__INTEGER)(Self__EZV->parent_arrayed_collection__ZUP.upper__NVV +  1);
+    __tmp__VZV=TRUE__;
   } else {
-    __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;
+    __tmp__VZV=FALSE__;
+  };
+  if ((! __tmp__VZV)) {
+    if ((Self__EZV->parent_arrayed_collection__ZUP.capacity__IZV ==  0)) {
+      Self__EZV->parent_arrayed_collection__ZUP.storage__D0V=create__CLRB( 2);
+      Self__EZV->parent_arrayed_collection__ZUP.capacity__IZV= 2;
+      Self__EZV->parent_arrayed_collection__ZUP.upper__NVV= 0;
+    } else {
+      new_capacity__GZV=(__INTEGER)(Self__EZV->parent_arrayed_collection__ZUP.capacity__IZV <<  1);
+      __tmp__M0V=Self__EZV->parent_arrayed_collection__ZUP.storage__D0V;
+      __tmp__N0V=Self__EZV->parent_arrayed_collection__ZUP.capacity__IZV;
+      new__KMEC=((void **)realloc_dynamic__old_size__new_size__ZHLC(((__POINTER )((void **)__tmp__M0V)),((__UINTEGER_32 )(__INTEGER)(__tmp__N0V * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__GZV * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__4MEC=(__INTEGER)(new_capacity__GZV -  1);
+      Self__5QVD=__tmp__N0V;
+      while ((Self__5QVD <= __tmp__4MEC)) {
+        new__KMEC[Self__5QVD]=NULL;
+        Self__5QVD=(__INTEGER)(Self__5QVD +  1);
+      };
+      Self__EZV->parent_arrayed_collection__ZUP.storage__D0V=new__KMEC;
+      Self__EZV->parent_arrayed_collection__ZUP.capacity__IZV=new_capacity__GZV;
+      Self__EZV->parent_arrayed_collection__ZUP.upper__NVV=(__INTEGER)(Self__EZV->parent_arrayed_collection__ZUP.upper__NVV +  1);
+    };
+  };
+  ((void **)Self__EZV->parent_arrayed_collection__ZUP.storage__D0V)[Self__EZV->parent_arrayed_collection__ZUP.upper__NVV]=tmp__ONQ;
 }
 
-static __INTEGER hash_code__MORF(__FAST_ARRAYoSTRING_CONSTANTo *Self__NORF)
+static __INTEGER hash_code__TTRF(__FAST_ARRAYoSTRING_CONSTANTo *Self__UTRF)
 // ({FAST_ARRAYoSTRING_CONSTANTo}) With resultNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER result__WTRF,result__TKIH,__tmp__VKIH,Self__WKIH;
+  __INTEGER result__YKIH,__tmp__0KIH,Self__1KIH;
+  __STRING_CONSTANT *Self__UKIH,*Self__ZKIH;
+  __BOOLEAN __tmp__HURF;
+  result__WTRF= 0;
+  if ((! (Self__UTRF->parent_arrayed_collection__ABJ.upper__VBPD <  0))) {
+    if (((void *)((void **)Self__UTRF->parent_arrayed_collection__ABJ.storage__LEPD)[Self__UTRF->parent_arrayed_collection__ABJ.upper__VBPD] != (void *)NULL)) {
+      Self__UKIH=((__STRING_CONSTANT *)((void **)Self__UTRF->parent_arrayed_collection__ABJ.storage__LEPD)[Self__UTRF->parent_arrayed_collection__ABJ.upper__VBPD]);
+      result__TKIH= 0;
+      __tmp__VKIH=Self__UKIH->count__DD;
+      Self__WKIH= 1;
+      while ((Self__WKIH <= __tmp__VKIH)) {
+        result__TKIH=(__INTEGER)((__INTEGER)( 5 * result__TKIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__UKIH->storage__FRO)[(__INTEGER)(Self__WKIH -  1)])));
+        Self__WKIH=(__INTEGER)(Self__WKIH +  1);
+      };
+      if ((result__TKIH <  0)) {
+        result__TKIH=(__INTEGER)(~ result__TKIH);
+      };
+      result__WTRF=result__TKIH;
+      __tmp__HURF=TRUE__;
+    } else {
+      __tmp__HURF=FALSE__;
+    };
+    if ((! __tmp__HURF)) {
+      if (((void *)((void **)Self__UTRF->parent_arrayed_collection__ABJ.storage__LEPD)[ 0] != (void *)NULL)) {
+        Self__ZKIH=((__STRING_CONSTANT *)((void **)Self__UTRF->parent_arrayed_collection__ABJ.storage__LEPD)[ 0]);
+        result__YKIH= 0;
+        __tmp__0KIH=Self__ZKIH->count__DD;
+        Self__1KIH= 1;
+        while ((Self__1KIH <= __tmp__0KIH)) {
+          result__YKIH=(__INTEGER)((__INTEGER)( 5 * result__YKIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__ZKIH->storage__FRO)[(__INTEGER)(Self__1KIH -  1)])));
+          Self__1KIH=(__INTEGER)(Self__1KIH +  1);
+        };
+        if ((result__YKIH <  0)) {
+          result__YKIH=(__INTEGER)(~ result__YKIH);
+        };
+        result__WTRF=result__YKIH;
+      };
+    };
+  };
+  return(result__WTRF);
 }
 
-static void copy__Q1RD(__FAST_ARRAYoSTRING_CONSTANTo *Self__R1RD,void *other__S1RD)
+static void copy__44RD(__FAST_ARRAYoSTRING_CONSTANTo *Self__54RD,void *other__A5RD)
 // ({FAST_ARRAYoSTRING_CONSTANTo},{NULLxFAST_ARRAYoSTRING_CONSTANTo}) VoidNo recursive, No inlinable.
 {
-  __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;
+  __INTEGER new_capacity__C5RD,other_upper__B5RD,Self__ENYE;
+  void **__tmp__V5RD,**__tmp__X5RD,**Self__CNWE;
+  new_capacity__C5RD= 0;
+  other_upper__B5RD=((__FAST_ARRAYoSTRING_CONSTANTo *)other__A5RD)->parent_arrayed_collection__ABJ.upper__VBPD;
+  if ((other_upper__B5RD >=  0)) {
+    new_capacity__C5RD=(__INTEGER)(other_upper__B5RD +  1);
+    if ((Self__54RD->parent_arrayed_collection__ABJ.capacity__QDPD < new_capacity__C5RD)) {
+      Self__54RD->parent_arrayed_collection__ABJ.storage__LEPD=create__BMHE(new_capacity__C5RD);
+      Self__54RD->parent_arrayed_collection__ABJ.capacity__QDPD=new_capacity__C5RD;
+    };
+    __tmp__V5RD=Self__54RD->parent_arrayed_collection__ABJ.storage__LEPD;
+    __tmp__X5RD=((__FAST_ARRAYoSTRING_CONSTANTo *)other__A5RD)->parent_arrayed_collection__ABJ.storage__LEPD;
+    Self__CNWE=((void **)__tmp__V5RD);
+    Self__ENYE=other_upper__B5RD;
+    while ((Self__ENYE >=  0)) {
+      Self__CNWE[Self__ENYE]=((void **)__tmp__X5RD)[Self__ENYE];
+      Self__ENYE=(__INTEGER)(Self__ENYE -  1);
+    };
+  };
+  Self__54RD->parent_arrayed_collection__ABJ.upper__VBPD=other_upper__B5RD;
 }
 
-static __BOOLEAN read_operator__OKM()
+static __BOOLEAN read_operator__0NM()
 // () With resultNo recursive, No inlinable.
 {
-  __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__SKM=position__CCC;
+  __INTEGER old_pos__4NM,__tmp__JRO,i__D5O;
+  __POSITION pos__3QZG;
+  __BOOLEAN result__3NM,__tmp__ZOM;
+  __CHARACTER result__VJBH,result__4JBH,ch__DRO,result__DKBH;
+  __CHARACTER *__tmp__GRO,*Self__X4O;
+  result__3NM=FALSE__;
+  read_space__MTD();
+  old_pos__4NM=position__CCC;
   ((__STRING *)string_tmp__VH)->count__EGC= 0;
-  until_do__5VM:
+  until_do__LZM:
   {
-    result__BDBH='\0';
+    result__VJBH='\0';
     if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-      result__BDBH=((__CHARACTER )(( 0)));
+      result__VJBH=((__CHARACTER )(( 0)));
     } else {
-      result__BDBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+      result__VJBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
     };
-    if ((result__BDBH == ((__CHARACTER )(( 0))))) {
-      __tmp__NLM=TRUE__;
+    if ((result__VJBH == ((__CHARACTER )(( 0))))) {
+      __tmp__ZOM=TRUE__;
     } else {
-      result__KDBH='\0';
+      result__4JBH='\0';
       if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__KDBH=((__CHARACTER )(( 0)));
+        result__4JBH=((__CHARACTER )(( 0)));
       } else {
-        result__KDBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+        result__4JBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  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);
+      ch__DRO=result__4JBH;
+      __tmp__GRO=((__STRING_CONSTANT *)(&__string_316))->storage__FRO;
+      __tmp__JRO=(__INTEGER)(((__STRING_CONSTANT *)(&__string_316))->count__DD -  1);
+      Self__X4O=((__CHARACTER *)__tmp__GRO);
+      i__D5O=__tmp__JRO;
+      while ((! ((i__D5O <  0) || (ch__DRO == Self__X4O[i__D5O])))) {
+        i__D5O=(__INTEGER)(i__D5O -  1);
       };
-      __tmp__NLM=(i__X1O <  0);
+      __tmp__ZOM=(i__D5O <  0);
     };
-    if ((! __tmp__NLM)) {
-      result__PDBH='\0';
+    if ((! __tmp__ZOM)) {
+      result__DKBH='\0';
       if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__PDBH=((__CHARACTER )(( 0)));
+        result__DKBH=((__CHARACTER )(( 0)));
       } else {
-        result__PDBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+        result__DKBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
       };
-      add_last__3IT(string_tmp__VH,result__PDBH);
+      add_last__GOT(string_tmp__VH,result__DKBH);
       position__CCC=(__INTEGER)(position__CCC +  1);
-      goto until_do__5VM;
+      goto until_do__LZM;
     };
   };
   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__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)) {
+    last_string__V1C=get__YWB(string_tmp__VH);
+    if (((((void *)last_string__V1C == (void *)(&__string_12)) || ((void *)last_string__V1C == (void *)(&__string_14))) || ((void *)last_string__V1C == (void *)(&__string_13)))) {
+      pos__3QZG=current_position__EZF();
+      put_error__text__NPG( 0,(&__string_286));
+      put_position__XQG(pos__3QZG);
+      put_string__P3F(msg_err__SPG);
+      if ((type_error__RPG !=  2)) {
         exit(( 1));
       };
     };
-    short__token__to__YBD((&__string_124),old_pos__SKM,position__CCC);
-    result__RKM=TRUE__;
+    short__token__to__YCD((&__string_124),old_pos__4NM,position__CCC);
+    result__3NM=TRUE__;
   };
-  return(result__RKM);
+  return(result__3NM);
 }
 
-static void* operator__name__BBO(void *typ__DBO,void *op__EBO)
+static void* operator__name__NEO(void *typ__PEO,void *op__QEO)
 // ({STRING_CONSTANT},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __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__ZBO=FALSE__;
-    };
-    if (__tmp__ZBO) {
-      __tmp__GCO=TRUE__;
-    } else {
-      result__BNHB=(c__GBO == '-');
-      if (result__BNHB) {
-        append__FLS(string_tmp__VH,(&__string_189));
+  __INTEGER __tmp__XEO,Self__4WO;
+  __CHARACTER c__SEO;
+  __BOOLEAN __tmp__FFO,__tmp__SFO,result__NQHB,__tmp__5FO,result__5QHB;
+  __BOOLEAN __tmp__MGO,result__RRHB,__tmp__ZGO,result__DSHB,__tmp__GHO;
+  __BOOLEAN result__VSHB,__tmp__THO,result__HTHB,__tmp__AIO;
+  __BOOLEAN result__ZTHB,__tmp__NIO,result__LUHB,__tmp__0IO;
+  __BOOLEAN result__3UHB,__tmp__HJO,result__PVHB,__tmp__UJO;
+  __BOOLEAN result__BWHB,__tmp__BKO,result__TWHB,__tmp__OKO;
+  __BOOLEAN result__FXHB,__tmp__1KO,result__XXHB,__tmp__ILO;
+  __BOOLEAN result__JYHB,__tmp__VLO,result__1YHB;
+  c__SEO='\0';
+  copy__JDS(string_tmp__VH,typ__PEO);
+  __tmp__XEO=((__STRING_CONSTANT *)op__QEO)->count__DD;
+  Self__4WO= 1;
+  while ((Self__4WO <= __tmp__XEO)) {
+    c__SEO=((__CHARACTER *)((__STRING_CONSTANT *)op__QEO)->storage__FRO)[(__INTEGER)(Self__4WO -  1)];
+    if ((c__SEO == '+')) {
+      append__ROS(string_tmp__VH,(&__string_188));
+      __tmp__FFO=TRUE__;
+    } else {
+      __tmp__FFO=FALSE__;
+    };
+    if (__tmp__FFO) {
+      __tmp__SFO=TRUE__;
+    } else {
+      result__NQHB=(c__SEO == '-');
+      if (result__NQHB) {
+        append__ROS(string_tmp__VH,(&__string_189));
       };
-      __tmp__GCO=result__BNHB;
+      __tmp__SFO=result__NQHB;
     };
-    if (__tmp__GCO) {
-      __tmp__TCO=TRUE__;
+    if (__tmp__SFO) {
+      __tmp__5FO=TRUE__;
     } else {
-      result__TNHB=(c__GBO == '~');
-      if (result__TNHB) {
-        append__FLS(string_tmp__VH,(&__string_190));
+      result__5QHB=(c__SEO == '~');
+      if (result__5QHB) {
+        append__ROS(string_tmp__VH,(&__string_190));
       };
-      __tmp__TCO=result__TNHB;
+      __tmp__5FO=result__5QHB;
     };
-    if (__tmp__TCO) {
-      __tmp__ADO=TRUE__;
+    if (__tmp__5FO) {
+      __tmp__MGO=TRUE__;
     } else {
-      result__FOHB=(c__GBO == '!');
-      if (result__FOHB) {
-        append__FLS(string_tmp__VH,(&__string_191));
+      result__RRHB=(c__SEO == '!');
+      if (result__RRHB) {
+        append__ROS(string_tmp__VH,(&__string_191));
       };
-      __tmp__ADO=result__FOHB;
+      __tmp__MGO=result__RRHB;
     };
-    if (__tmp__ADO) {
-      __tmp__NDO=TRUE__;
+    if (__tmp__MGO) {
+      __tmp__ZGO=TRUE__;
     } else {
-      result__XOHB=(c__GBO == '/');
-      if (result__XOHB) {
-        append__FLS(string_tmp__VH,(&__string_192));
+      result__DSHB=(c__SEO == '/');
+      if (result__DSHB) {
+        append__ROS(string_tmp__VH,(&__string_192));
       };
-      __tmp__NDO=result__XOHB;
+      __tmp__ZGO=result__DSHB;
     };
-    if (__tmp__NDO) {
-      __tmp__0DO=TRUE__;
+    if (__tmp__ZGO) {
+      __tmp__GHO=TRUE__;
     } else {
-      result__JPHB=(c__GBO == '*');
-      if (result__JPHB) {
-        append__FLS(string_tmp__VH,(&__string_193));
+      result__VSHB=(c__SEO == '*');
+      if (result__VSHB) {
+        append__ROS(string_tmp__VH,(&__string_193));
       };
-      __tmp__0DO=result__JPHB;
+      __tmp__GHO=result__VSHB;
     };
-    if (__tmp__0DO) {
-      __tmp__HEO=TRUE__;
+    if (__tmp__GHO) {
+      __tmp__THO=TRUE__;
     } else {
-      result__1PHB=(c__GBO == '^');
-      if (result__1PHB) {
-        append__FLS(string_tmp__VH,(&__string_194));
+      result__HTHB=(c__SEO == '^');
+      if (result__HTHB) {
+        append__ROS(string_tmp__VH,(&__string_194));
       };
-      __tmp__HEO=result__1PHB;
+      __tmp__THO=result__HTHB;
     };
-    if (__tmp__HEO) {
-      __tmp__UEO=TRUE__;
+    if (__tmp__THO) {
+      __tmp__AIO=TRUE__;
     } else {
-      result__NQHB=(c__GBO == '%');
-      if (result__NQHB) {
-        append__FLS(string_tmp__VH,(&__string_195));
+      result__ZTHB=(c__SEO == '%');
+      if (result__ZTHB) {
+        append__ROS(string_tmp__VH,(&__string_195));
       };
-      __tmp__UEO=result__NQHB;
+      __tmp__AIO=result__ZTHB;
     };
-    if (__tmp__UEO) {
-      __tmp__BFO=TRUE__;
+    if (__tmp__AIO) {
+      __tmp__NIO=TRUE__;
     } else {
-      result__5QHB=(c__GBO == '>');
-      if (result__5QHB) {
-        append__FLS(string_tmp__VH,(&__string_196));
+      result__LUHB=(c__SEO == '>');
+      if (result__LUHB) {
+        append__ROS(string_tmp__VH,(&__string_196));
       };
-      __tmp__BFO=result__5QHB;
+      __tmp__NIO=result__LUHB;
     };
-    if (__tmp__BFO) {
-      __tmp__OFO=TRUE__;
+    if (__tmp__NIO) {
+      __tmp__0IO=TRUE__;
     } else {
-      result__RRHB=(c__GBO == '<');
-      if (result__RRHB) {
-        append__FLS(string_tmp__VH,(&__string_197));
+      result__3UHB=(c__SEO == '<');
+      if (result__3UHB) {
+        append__ROS(string_tmp__VH,(&__string_197));
       };
-      __tmp__OFO=result__RRHB;
+      __tmp__0IO=result__3UHB;
     };
-    if (__tmp__OFO) {
-      __tmp__1FO=TRUE__;
+    if (__tmp__0IO) {
+      __tmp__HJO=TRUE__;
     } else {
-      result__DSHB=(c__GBO == '=');
-      if (result__DSHB) {
-        append__FLS(string_tmp__VH,(&__string_198));
+      result__PVHB=(c__SEO == '=');
+      if (result__PVHB) {
+        append__ROS(string_tmp__VH,(&__string_198));
       };
-      __tmp__1FO=result__DSHB;
+      __tmp__HJO=result__PVHB;
     };
-    if (__tmp__1FO) {
-      __tmp__IGO=TRUE__;
+    if (__tmp__HJO) {
+      __tmp__UJO=TRUE__;
     } else {
-      result__VSHB=(c__GBO == '\\');
-      if (result__VSHB) {
-        append__FLS(string_tmp__VH,(&__string_199));
+      result__BWHB=(c__SEO == '\\');
+      if (result__BWHB) {
+        append__ROS(string_tmp__VH,(&__string_199));
       };
-      __tmp__IGO=result__VSHB;
+      __tmp__UJO=result__BWHB;
     };
-    if (__tmp__IGO) {
-      __tmp__VGO=TRUE__;
+    if (__tmp__UJO) {
+      __tmp__BKO=TRUE__;
     } else {
-      result__HTHB=(c__GBO == '|');
-      if (result__HTHB) {
-        append__FLS(string_tmp__VH,(&__string_200));
+      result__TWHB=(c__SEO == '|');
+      if (result__TWHB) {
+        append__ROS(string_tmp__VH,(&__string_200));
       };
-      __tmp__VGO=result__HTHB;
+      __tmp__BKO=result__TWHB;
     };
-    if (__tmp__VGO) {
-      __tmp__CHO=TRUE__;
+    if (__tmp__BKO) {
+      __tmp__OKO=TRUE__;
     } else {
-      result__ZTHB=(c__GBO == '&');
-      if (result__ZTHB) {
-        append__FLS(string_tmp__VH,(&__string_201));
+      result__FXHB=(c__SEO == '&');
+      if (result__FXHB) {
+        append__ROS(string_tmp__VH,(&__string_201));
       };
-      __tmp__CHO=result__ZTHB;
+      __tmp__OKO=result__FXHB;
     };
-    if (__tmp__CHO) {
-      __tmp__PHO=TRUE__;
+    if (__tmp__OKO) {
+      __tmp__1KO=TRUE__;
     } else {
-      result__LUHB=(c__GBO == '$');
-      if (result__LUHB) {
-        append__FLS(string_tmp__VH,(&__string_202));
+      result__XXHB=(c__SEO == '$');
+      if (result__XXHB) {
+        append__ROS(string_tmp__VH,(&__string_202));
       };
-      __tmp__PHO=result__LUHB;
+      __tmp__1KO=result__XXHB;
     };
-    if (__tmp__PHO) {
-      __tmp__2HO=TRUE__;
+    if (__tmp__1KO) {
+      __tmp__ILO=TRUE__;
     } else {
-      result__3UHB=(c__GBO == '#');
-      if (result__3UHB) {
-        append__FLS(string_tmp__VH,(&__string_203));
+      result__JYHB=(c__SEO == '#');
+      if (result__JYHB) {
+        append__ROS(string_tmp__VH,(&__string_203));
       };
-      __tmp__2HO=result__3UHB;
+      __tmp__ILO=result__JYHB;
     };
-    if (__tmp__2HO) {
-      __tmp__JIO=TRUE__;
+    if (__tmp__ILO) {
+      __tmp__VLO=TRUE__;
     } else {
-      result__PVHB=(c__GBO == '@');
-      if (result__PVHB) {
-        append__FLS(string_tmp__VH,(&__string_204));
+      result__1YHB=(c__SEO == '@');
+      if (result__1YHB) {
+        append__ROS(string_tmp__VH,(&__string_204));
       };
-      __tmp__JIO=result__PVHB;
+      __tmp__VLO=result__1YHB;
     };
-    if ((! __tmp__JIO)) {
-      if ((c__GBO == '?')) {
-        append__FLS(string_tmp__VH,(&__string_205));
+    if ((! __tmp__VLO)) {
+      if ((c__SEO == '?')) {
+        append__ROS(string_tmp__VH,(&__string_205));
       };
     };
-    Self__STO=(__INTEGER)(Self__STO +  1);
+    Self__4WO=(__INTEGER)(Self__4WO +  1);
   };
   return(get__YWB(string_tmp__VH));
 }
 
-static void append_in__NHBC(__ITM_TYPE_MULTI *Self__OHBC,void *buffer__PHBC)
+static void append_in__1KBC(__ITM_TYPE_MULTI *Self__2KBC,void *buffer__3KBC)
 // ({ITM_TYPE_MULTI},{NULLxSTRING}) VoidRecursive, No inlinable.
 {
-  add_last__3IT(buffer__PHBC,'(');
-  display_raw__NLIC(Self__OHBC,buffer__PHBC);
-  add_last__3IT(buffer__PHBC,')');
+  add_last__GOT(buffer__3KBC,'(');
+  display_raw__1OIC(Self__2KBC,buffer__3KBC);
+  add_last__GOT(buffer__3KBC,')');
 }
 
-static void* read_prototype__LLN(__PARSER *Self__MLN,void *styl__NLN)
+static void* read_prototype__XON(__PARSER *Self__YON,void *styl__ZON)
 // ({PARSER},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  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);
+  void *nam__1ON,*n__2XP,*n__MOR;
+  void *result__3ON,*result__4UQ;
+  __INTEGER old_pos__5ON,old_derive__APN,sav_derive__BPN;
+  __INTEGER pos_before__CPN,idx__BYP,typ_id__EPIB,new_capacity__PGBB;
+  __INTEGER __tmp__THBB,__tmp__3RFC,Self__U3VD,typ_id__5KIH,idx__QOR;
+  __INTEGER typ_id__PAJB,new_capacity__WECB,__tmp__0FCB,__tmp__ZVFC;
+  __INTEGER Self__T5VD;
+  __POSITION pos__CSZG,pos__ESZG,pos__GSZG,pos__ISZG,pos__HUZG;
+  __POSITION __tmp__STN,__tmp__UUN;
+  __ITM_TYPE_GENERIC *result__AYP,*__tmp__J0P,*result__4OIB,*Self__24CC;
+  void *__tmp__I0P;
+  __POINTER ptr__5OIB,ptr_table__ZCKH,next__YCKH,result__0CKH;
+  __POINTER ptr_table__4CKH,next__3CKH,result__5CKH,ptr__4KIH;
+  __POINTER ptr_table__GDKH,next__FDKH,result__HDKH,ptr_table__LDKH;
+  __POINTER next__KDKH,result__MDKH,ptr__KAJB,ptr_table__QDKH;
+  __POINTER next__PDKH,result__RDKH,ptr_table__VDKH,next__UDKH;
+  __POINTER result__WDKH;
+  __UINTEGER_32 sz__BPIB,a__QZGH,new_size__RZGH,t__VZGH,a__UZGH;
+  __UINTEGER_32 new_size__BDKH,lab_type__ADKH,sz__ALIH,a__BLIH;
+  __UINTEGER_32 new_size__CLIH,t__DLIH,a__ELIH,new_size__ODKH;
+  __UINTEGER_32 lab_type__NDKH,sz__MAJB,a__4ZGH,new_size__5ZGH,t__D0GH;
+  __UINTEGER_32 a__C0GH,new_size__YDKH,lab_type__XDKH;
+  void *result__FWEH;
+  __ITM_TYPE_PARAMETER *result__3KIH,*Self__FLIH;
+  __ITM_TYPE_STYLE *result__POR,*__tmp__LQR,*result__JAJB,*Self__OCDC;
+  void *__tmp__KQR;
+  void *genericity__2ON,*result__WYHH,*lt__4XP;
+  __BOOLEAN continue__DPN,result__PCKH,result__SCKH,__tmp__QVQ;
+  __BOOLEAN result__VCKH,__tmp__3GBB,result__CDKH,__tmp__ZTN;
+  __BOOLEAN __tmp__EFCB;
+  __CHARACTER result__QCKH,result__TCKH,result__WCKH,result__DDKH;
+  __FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *Self__XYHH,*Self__YYHH;
+  __FAST_ARRAYoITM_TYPE_GENERICo *Self__NGBB;
+  void **__tmp__SHBB,**new__JRFC;
+  __FAST_ARRAYoITM_TYPE_STYLEo *Self__UECB;
+  void **__tmp__ZFCB,**new__FVFC;
+  nam__1ON=NULL;
+  genericity__2ON=NULL;
+  result__3ON=NULL;
+  old_pos__5ON= 0;
+  old_derive__APN= 0;
+  sav_derive__BPN= 0;
+  pos_before__CPN= 0;
+  continue__DPN=FALSE__;
+  if (read_cap_identifier__B1J()) {
+    old_pos__5ON=position__CCC;
+    old_derive__APN=short_derive__PCC;
+    copy__JDS(string_tmp2__0BJ,last_string__V1C);
     do {
-      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)) {
+      continue__DPN=read_word__LRF((&__string_7));
+      if (continue__DPN) {
+        if ((! read_cap_identifier__B1J())) {
+          pos__CSZG=current_position__EZF();
+          put_error__text__NPG( 0,(&__string_317));
+          put_position__XQG(pos__CSZG);
+          put_string__P3F(msg_err__SPG);
+          if ((type_error__RPG !=  2)) {
             exit(( 1));
           };
         };
-        append__FLS(string_tmp2__O4I,(&__string_7));
-        append__FLS(string_tmp2__O4I,last_string__V0C);
+        append__ROS(string_tmp2__0BJ,(&__string_7));
+        append__ROS(string_tmp2__0BJ,last_string__V1C);
       } else {
-        pos_before__WLN=position__CCC;
-        result__Q0JH=FALSE__;
-        if ((! read_space__KSD())) {
-          result__Q0JH=FALSE__;
+        pos_before__CPN=position__CCC;
+        result__PCKH=FALSE__;
+        if ((! read_space__MTD())) {
+          result__PCKH=FALSE__;
         } else {
-          result__R0JH='\0';
+          result__QCKH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__R0JH=((__CHARACTER )(( 0)));
+            result__QCKH=((__CHARACTER )(( 0)));
           } else {
-            result__R0JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+            result__QCKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__R0JH == '.')) {
+          if ((result__QCKH == '.')) {
             position__CCC=(__INTEGER)(position__CCC +  1);
-            result__Q0JH=TRUE__;
+            result__PCKH=TRUE__;
           };
         };
-        if ((result__Q0JH && read_cap_identifier__VXJ())) {
-          continue__XLN=TRUE__;
-          add_last__3IT(string_tmp2__O4I,'.');
-          append__FLS(string_tmp2__O4I,last_string__V0C);
+        if ((result__PCKH && read_cap_identifier__B1J())) {
+          continue__DPN=TRUE__;
+          add_last__GOT(string_tmp2__0BJ,'.');
+          append__ROS(string_tmp2__0BJ,last_string__V1C);
         } else {
-          position__CCC=pos_before__WLN;
+          position__CCC=pos_before__CPN;
         };
       };
-    } while (continue__XLN);
-    nam__PLN=get__YWB(string_tmp2__O4I);
-    result__T0JH=FALSE__;
-    if ((! read_space__KSD())) {
-      result__T0JH=FALSE__;
+    } while (continue__DPN);
+    nam__1ON=get__YWB(string_tmp2__0BJ);
+    result__SCKH=FALSE__;
+    if ((! read_space__MTD())) {
+      result__SCKH=FALSE__;
     } else {
-      result__U0JH='\0';
+      result__TCKH='\0';
       if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__U0JH=((__CHARACTER )(( 0)));
+        result__TCKH=((__CHARACTER )(( 0)));
       } else {
-        result__U0JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+        result__TCKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__U0JH == '(')) {
+      if ((result__TCKH == '(')) {
         position__CCC=(__INTEGER)(position__CCC +  1);
-        result__T0JH=TRUE__;
+        result__SCKH=TRUE__;
       };
     };
-    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);
+    if (result__SCKH) {
+      result__WYHH=NULL;
+      if ((((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__0UP)->parent_arrayed_collection__ZUP.upper__NVV <  0)) {
+        result__WYHH=create_with_capacity__YFR( 16);
       } else {
-        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);
+        Self__XYHH=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__0UP);
+        result__WYHH=((void **)Self__XYHH->parent_arrayed_collection__ZUP.storage__D0V)[Self__XYHH->parent_arrayed_collection__ZUP.upper__NVV];
+        Self__YYHH=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__0UP);
+        Self__YYHH->parent_arrayed_collection__ZUP.upper__NVV=(__INTEGER)(Self__YYHH->parent_arrayed_collection__ZUP.upper__NVV -  1);
       };
-      genericity__QLN=result__1RHH;
+      genericity__2ON=result__WYHH;
       do {
-        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)) {
+        result__4UQ=read_type__WCM(Self__YON,FALSE__);
+        if (((void *)result__4UQ == (void *)NULL)) {
+          if (((void *)read_constant__LRO() != (void *)NULL)) {
+            pos__ESZG=current_position__EZF();
+            put_error__text__NPG( 0,(&__string_318));
+            put_position__XQG(pos__ESZG);
+            put_string__P3F(msg_err__SPG);
+            if ((type_error__RPG !=  2)) {
               exit(( 1));
             };
-            __tmp__ESQ=TRUE__;
+            __tmp__QVQ=TRUE__;
           } else {
-            __tmp__ESQ=FALSE__;
+            __tmp__QVQ=FALSE__;
           };
-          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)) {
+          if ((! __tmp__QVQ)) {
+            if (read_identifier__QBL()) {
+              pos__GSZG=current_position__EZF();
+              put_error__text__NPG( 0,(&__string_319));
+              put_position__XQG(pos__GSZG);
+              put_string__P3F(msg_err__SPG);
+              if ((type_error__RPG !=  2)) {
                 exit(( 1));
               };
             };
           };
         };
-        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)) {
+        if (((void *)result__4UQ == (void *)NULL)) {
+          pos__ISZG=current_position__EZF();
+          put_error__text__NPG( 0,(&__string_259));
+          put_position__XQG(pos__ISZG);
+          put_string__P3F(msg_err__SPG);
+          if ((type_error__RPG !=  2)) {
             exit(( 1));
           };
         };
-        add_last__WKV(genericity__QLN,result__SRQ);
-        result__W0JH=FALSE__;
-        if ((! read_space__KSD())) {
-          result__W0JH=FALSE__;
+        add_last__COV(genericity__2ON,result__4UQ);
+        result__VCKH=FALSE__;
+        if ((! read_space__MTD())) {
+          result__VCKH=FALSE__;
         } else {
-          result__X0JH='\0';
+          result__WCKH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__X0JH=((__CHARACTER )(( 0)));
+            result__WCKH=((__CHARACTER )(( 0)));
           } else {
-            result__X0JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+            result__WCKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__X0JH == ',')) {
+          if ((result__WCKH == ',')) {
             position__CCC=(__INTEGER)(position__CCC +  1);
-            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;
+            result__VCKH=TRUE__;
+          };
+        };
+      } while (result__VCKH);
+      genericity__2ON=alias__WVP(result__WYHH);
+      n__2XP=nam__1ON;
+      lt__4XP=genericity__2ON;
+      result__AYP=NULL;
+      idx__BYP= 0;
+      while (((idx__BYP <= ((__FAST_ARRAYoITM_TYPE_GENERICo *)dico__HYP)->parent_arrayed_collection__GYP.upper__QYP) && ((((void *)((__ITM_TYPE_GENERIC *)((void **)((__FAST_ARRAYoITM_TYPE_GENERICo *)dico__HYP)->parent_arrayed_collection__GYP.storage__GCW)[idx__BYP])->parent_itm_type_style__SSN.parent_itm_type_simple__RSN.name__0YP != (void *)n__2XP) || ((void *)((__ITM_TYPE_GENERIC *)((void **)((__FAST_ARRAYoITM_TYPE_GENERICo *)dico__HYP)->parent_arrayed_collection__GYP.storage__GCW)[idx__BYP])->parent_itm_type_style__SSN.style__DZP != (void *)styl__ZON)) || ((void *)((__ITM_TYPE_GENERIC *)((void **)((__FAST_ARRAYoITM_TYPE_GENERICo *)dico__HYP)->parent_arrayed_collection__GYP.storage__GCW)[idx__BYP])->list_type__NZP != (void *)lt__4XP)))) {
+        idx__BYP=(__INTEGER)(idx__BYP +  1);
+      };
+      if ((idx__BYP <= ((__FAST_ARRAYoITM_TYPE_GENERICo *)dico__HYP)->parent_arrayed_collection__GYP.upper__QYP)) {
+        __tmp__I0P=((void **)((__FAST_ARRAYoITM_TYPE_GENERICo *)dico__HYP)->parent_arrayed_collection__GYP.storage__GCW)[idx__BYP];
+        if (__tmp__I0P==NULL) {
+          __tmp__J0P=NULL;
+        } else {
+          __tmp__J0P=((__ITM_TYPE_GENERIC *)__tmp__I0P);
+        };
+        result__AYP=__tmp__J0P;
+      } else {
+        result__4OIB=NULL;
+        ptr__5OIB=((__POINTER )(NULL));
+        typ_id__EPIB= 0;
+        sz__BPIB=((__UINTEGER_32 )sizeof(__ITM_TYPE_GENERIC));
+        if ((sz__BPIB ==  0)) {
+          result__4OIB=ITM_TYPE_GENERIC__;
+        } else {
+          typ_id__EPIB=-1;
+          clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__BPIB);
+          if ((typ_id__EPIB == (__INTEGER)(-  1))) {
+            a__QZGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__RZGH=(__UINTEGER_32)((__UINTEGER_32)(sz__BPIB + a__QZGH) & (__UINTEGER_32)(~ a__QZGH));
+            ptr_table__ZCKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__RZGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__YCKH=((__POINTER )(NULL));
+            result__0CKH=((__POINTER *)ptr_table__ZCKH)[ 0];
+            if ((result__0CKH == (void *)NULL)) {
+              result__0CKH=new_lab__FTJ(new_size__RZGH);
+              next__YCKH=(void *)((unsigned long)result__0CKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RZGH)));
+              ((__POINTER *)next__YCKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__ZCKH)[ 0]=next__YCKH;
             } 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__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)));
+              next__YCKH=((__POINTER *)result__0CKH)[ 0];
+              if ((next__YCKH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__0CKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__RZGH <<  1)) <=  4096)) {
+                  next__YCKH=(void *)((unsigned long)result__0CKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RZGH)));
                 } else {
-                  next__Z0JH=new_lab__ZPJ(new_size__WSGH);
+                  next__YCKH=new_lab__FTJ(new_size__RZGH);
                 };
-                ((__POINTER *)next__Z0JH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__00JH)[ 0]=next__Z0JH;
+                ((__POINTER *)next__YCKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__ZCKH)[ 0]=next__YCKH;
               } else {
-                ((__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;
+                ((__POINTER *)result__0CKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YCKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__0CKH=next__YCKH;
+              };
+            };
+            ptr__5OIB=result__0CKH;
+          } else {
+            t__VZGH=((__UINTEGER_32 )typ_id__EPIB);
+            a__UZGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__BDKH=(__UINTEGER_32)((__UINTEGER_32)(sz__BPIB + a__UZGH) & (__UINTEGER_32)(~ a__UZGH));
+            ptr_table__4CKH=((__POINTER )(&(table_type[(t__VZGH)])));
+            lab_type__ADKH=(__UINTEGER_32)(t__VZGH |  1);
+            next__3CKH=((__POINTER )(NULL));
+            result__5CKH=((__POINTER *)ptr_table__4CKH)[ 0];
+            if ((result__5CKH == (void *)NULL)) {
+              result__5CKH=new_lab__FTJ(lab_type__ADKH);
+              next__3CKH=(void *)((unsigned long)result__5CKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BDKH)));
+              ((__POINTER *)next__3CKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__4CKH)[ 0]=next__3CKH;
             } else {
-              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)));
+              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__SXH)))) &  4095) + (__UINTEGER_32)(new_size__BDKH <<  1)) <=  4096)) {
+                  next__3CKH=(void *)((unsigned long)result__5CKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BDKH)));
                 } else {
-                  next__40JH=new_lab__ZPJ(lab_type__B1JH);
+                  next__3CKH=new_lab__FTJ(lab_type__ADKH);
                 };
-                ((__POINTER *)next__40JH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__50JH)[ 0]=next__40JH;
+                ((__POINTER *)next__3CKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__4CKH)[ 0]=next__3CKH;
               } else {
-                ((__POINTER *)result__A1JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__40JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__A1JH=next__40JH;
+                ((__POINTER *)result__5CKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3CKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__5CKH=next__3CKH;
               };
             };
-            ptr__TLIB=result__A1JH;
+            ptr__5OIB=result__5CKH;
           };
-          result__SLIB=((__ITM_TYPE_GENERIC *)ptr__TLIB);
-          *(result__SLIB) = *(ITM_TYPE_GENERIC__);
+          result__4OIB=((__ITM_TYPE_GENERIC *)ptr__5OIB);
+          *(result__4OIB) = *(ITM_TYPE_GENERIC__);
         };
-        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__;
+        Self__24CC=((__ITM_TYPE_GENERIC *)result__4OIB);
+        Self__24CC->parent_itm_type_style__SSN.parent_itm_type_simple__RSN.name__0YP=nam__1ON;
+        Self__24CC->parent_itm_type_style__SSN.style__DZP=styl__ZON;
+        Self__24CC->list_type__NZP=genericity__2ON;
+        result__AYP=result__4OIB;
+        Self__NGBB=((__FAST_ARRAYoITM_TYPE_GENERICo *)dico__HYP);
+        new_capacity__PGBB= 0;
+        if (((__INTEGER)(Self__NGBB->parent_arrayed_collection__GYP.upper__QYP +  1) <= (__INTEGER)(Self__NGBB->parent_arrayed_collection__GYP.capacity__1BW -  1))) {
+          Self__NGBB->parent_arrayed_collection__GYP.upper__QYP=(__INTEGER)(Self__NGBB->parent_arrayed_collection__GYP.upper__QYP +  1);
+          __tmp__3GBB=TRUE__;
         } else {
-          __tmp__RDBB=FALSE__;
+          __tmp__3GBB=FALSE__;
         };
-        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;
+        if ((! __tmp__3GBB)) {
+          if ((Self__NGBB->parent_arrayed_collection__GYP.capacity__1BW ==  0)) {
+            Self__NGBB->parent_arrayed_collection__GYP.storage__GCW=create__2TXB( 2);
+            Self__NGBB->parent_arrayed_collection__GYP.capacity__1BW= 2;
+            Self__NGBB->parent_arrayed_collection__GYP.upper__QYP= 0;
           } else {
-            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);
+            new_capacity__PGBB=(__INTEGER)(Self__NGBB->parent_arrayed_collection__GYP.capacity__1BW <<  1);
+            __tmp__SHBB=Self__NGBB->parent_arrayed_collection__GYP.storage__GCW;
+            __tmp__THBB=Self__NGBB->parent_arrayed_collection__GYP.capacity__1BW;
+            new__JRFC=((void **)realloc_dynamic__old_size__new_size__ZHLC(((__POINTER )((void **)__tmp__SHBB)),((__UINTEGER_32 )(__INTEGER)(__tmp__THBB * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__PGBB * ((__INTEGER )(sizeof(void *)))))));
+            __tmp__3RFC=(__INTEGER)(new_capacity__PGBB -  1);
+            Self__U3VD=__tmp__THBB;
+            while ((Self__U3VD <= __tmp__3RFC)) {
+              new__JRFC[Self__U3VD]=NULL;
+              Self__U3VD=(__INTEGER)(Self__U3VD +  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);
+            Self__NGBB->parent_arrayed_collection__GYP.storage__GCW=new__JRFC;
+            Self__NGBB->parent_arrayed_collection__GYP.capacity__1BW=new_capacity__PGBB;
+            Self__NGBB->parent_arrayed_collection__GYP.upper__QYP=(__INTEGER)(Self__NGBB->parent_arrayed_collection__GYP.upper__QYP +  1);
           };
         };
-        ((void **)Self__BDBB->parent_arrayed_collection__0UP.storage__04V)[Self__BDBB->parent_arrayed_collection__0UP.upper__EVP]=result__SLIB;
+        ((void **)Self__NGBB->parent_arrayed_collection__GYP.storage__GCW)[Self__NGBB->parent_arrayed_collection__GYP.upper__QYP]=result__4OIB;
       };
-      result__RLN=result__UUP;
-      result__D1JH=FALSE__;
-      if ((! read_space__KSD())) {
-        result__D1JH=FALSE__;
+      result__3ON=result__AYP;
+      result__CDKH=FALSE__;
+      if ((! read_space__MTD())) {
+        result__CDKH=FALSE__;
       } else {
-        result__E1JH='\0';
+        result__DDKH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__E1JH=((__CHARACTER )(( 0)));
+          result__DDKH=((__CHARACTER )(( 0)));
         } else {
-          result__E1JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+          result__DDKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__E1JH == ')')) {
+        if ((result__DDKH == ')')) {
           position__CCC=(__INTEGER)(position__CCC +  1);
-          result__D1JH=TRUE__;
+          result__CDKH=TRUE__;
         };
       };
-      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)) {
+      if ((! result__CDKH)) {
+        pos__HUZG=current_position__EZF();
+        put_error__text__NPG( 2,(&__string_262));
+        put_position__XQG(pos__HUZG);
+        put_string__P3F(msg_err__SPG);
+        if ((type_error__RPG !=  2)) {
           exit(( 1));
         };
       };
     } else {
-      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)) {
+      if (is_parameter_type__DLE) {
+        if (((void *)styl__ZON != (void *)NULL)) {
+          copy__JDS(string_tmp__VH,(&__string_320));
+          append__ROS(string_tmp__VH,styl__ZON);
+          append__ROS(string_tmp__VH,(&__string_321));
+          __tmp__STN=current_position__EZF();
+          put_error__text__NPG( 2,string_tmp__VH);
+          put_position__XQG(__tmp__STN);
+          put_string__P3F(msg_err__SPG);
+          if ((type_error__RPG !=  2)) {
             exit(( 1));
           };
         };
-        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;
+        result__FWEH=fast_reference_at__F4T(dico__LVI,nam__1ON);
+        if (((void *)result__FWEH == (void *)NULL)) {
+          result__3KIH=NULL;
+          ptr__4KIH=((__POINTER )(NULL));
+          typ_id__5KIH= 0;
+          sz__ALIH=((__UINTEGER_32 )sizeof(__ITM_TYPE_PARAMETER));
+          if ((sz__ALIH ==  0)) {
+            result__3KIH=ITM_TYPE_PARAMETER__;
+          } else {
+            typ_id__5KIH=-1;
+            clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__ALIH);
+            if ((typ_id__5KIH == (__INTEGER)(-  1))) {
+              a__BLIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__CLIH=(__UINTEGER_32)((__UINTEGER_32)(sz__ALIH + a__BLIH) & (__UINTEGER_32)(~ a__BLIH));
+              ptr_table__GDKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__CLIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__FDKH=((__POINTER )(NULL));
+              result__HDKH=((__POINTER *)ptr_table__GDKH)[ 0];
+              if ((result__HDKH == (void *)NULL)) {
+                result__HDKH=new_lab__FTJ(new_size__CLIH);
+                next__FDKH=(void *)((unsigned long)result__HDKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CLIH)));
+                ((__POINTER *)next__FDKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__GDKH)[ 0]=next__FDKH;
               } else {
-                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)));
+                next__FDKH=((__POINTER *)result__HDKH)[ 0];
+                if ((next__FDKH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HDKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__CLIH <<  1)) <=  4096)) {
+                    next__FDKH=(void *)((unsigned long)result__HDKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CLIH)));
                   } else {
-                    next__G1JH=new_lab__ZPJ(new_size__PDIH);
+                    next__FDKH=new_lab__FTJ(new_size__CLIH);
                   };
-                  ((__POINTER *)next__G1JH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__H1JH)[ 0]=next__G1JH;
+                  ((__POINTER *)next__FDKH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__GDKH)[ 0]=next__FDKH;
                 } else {
-                  ((__POINTER *)result__I1JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__G1JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__I1JH=next__G1JH;
+                  ((__POINTER *)result__HDKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FDKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__HDKH=next__FDKH;
                 };
               };
-              ptr__LDIH=result__I1JH;
+              ptr__4KIH=result__HDKH;
             } else {
-              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;
+              t__DLIH=((__UINTEGER_32 )typ_id__5KIH);
+              a__ELIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__ODKH=(__UINTEGER_32)((__UINTEGER_32)(sz__ALIH + a__ELIH) & (__UINTEGER_32)(~ a__ELIH));
+              ptr_table__LDKH=((__POINTER )(&(table_type[(t__DLIH)])));
+              lab_type__NDKH=(__UINTEGER_32)(t__DLIH |  1);
+              next__KDKH=((__POINTER )(NULL));
+              result__MDKH=((__POINTER *)ptr_table__LDKH)[ 0];
+              if ((result__MDKH == (void *)NULL)) {
+                result__MDKH=new_lab__FTJ(lab_type__NDKH);
+                next__KDKH=(void *)((unsigned long)result__MDKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ODKH)));
+                ((__POINTER *)next__KDKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__LDKH)[ 0]=next__KDKH;
               } else {
-                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)));
+                next__KDKH=((__POINTER *)result__MDKH)[ 0];
+                if ((next__KDKH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MDKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__ODKH <<  1)) <=  4096)) {
+                    next__KDKH=(void *)((unsigned long)result__MDKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ODKH)));
                   } else {
-                    next__L1JH=new_lab__ZPJ(lab_type__O1JH);
+                    next__KDKH=new_lab__FTJ(lab_type__NDKH);
                   };
-                  ((__POINTER *)next__L1JH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__M1JH)[ 0]=next__L1JH;
+                  ((__POINTER *)next__KDKH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__LDKH)[ 0]=next__KDKH;
                 } else {
-                  ((__POINTER *)result__N1JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__L1JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__N1JH=next__L1JH;
+                  ((__POINTER *)result__MDKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KDKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__MDKH=next__KDKH;
                 };
               };
-              ptr__LDIH=result__N1JH;
+              ptr__4KIH=result__MDKH;
             };
-            result__KDIH=((__ITM_TYPE_PARAMETER *)ptr__LDIH);
-            *(result__KDIH) = *(ITM_TYPE_PARAMETER__);
+            result__3KIH=((__ITM_TYPE_PARAMETER *)ptr__4KIH);
+            *(result__3KIH) = *(ITM_TYPE_PARAMETER__);
           };
-          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;
+          Self__FLIH=((__ITM_TYPE_PARAMETER *)result__3KIH);
+          Self__FLIH->parent_itm_type__YEE.name__0YP=nam__1ON;
+          fast_put__to__ORZ(dico__LVI,Self__FLIH,nam__1ON);
+          result__FWEH=result__3KIH;
         };
-        result__RLN=result__PPEH;
-        __tmp__NQN=TRUE__;
+        result__3ON=result__FWEH;
+        __tmp__ZTN=TRUE__;
       } else {
-        __tmp__NQN=FALSE__;
+        __tmp__ZTN=FALSE__;
       };
-      if ((! __tmp__NQN)) {
-        if (((void *)styl__NLN == (void *)NULL)) {
-          result__RLN=get__QRI(nam__PLN);
+      if ((! __tmp__ZTN)) {
+        if (((void *)styl__ZON == (void *)NULL)) {
+          result__3ON=get__2UI(nam__1ON);
         } else {
-          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)) {
+          if (((void *)nam__1ON == (void *)(&__string_1))) {
+            copy__JDS(string_tmp__VH,(&__string_320));
+            append__ROS(string_tmp__VH,styl__ZON);
+            append__ROS(string_tmp__VH,(&__string_322));
+            __tmp__UUN=current_position__EZF();
+            put_error__text__NPG( 2,string_tmp__VH);
+            put_position__XQG(__tmp__UUN);
+            put_string__P3F(msg_err__SPG);
+            if ((type_error__RPG !=  2)) {
               exit(( 1));
             };
-            result__RLN=type_self__LRN;
+            result__3ON=type_self__XUN;
           } else {
-            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);
+            n__MOR=nam__1ON;
+            result__POR=NULL;
+            idx__QOR= 0;
+            while (((idx__QOR <= ((__FAST_ARRAYoITM_TYPE_STYLEo *)dico__WOR)->parent_arrayed_collection__VOR.upper__5OR) && (((void *)((__ITM_TYPE_STYLE *)((void **)((__FAST_ARRAYoITM_TYPE_STYLEo *)dico__WOR)->parent_arrayed_collection__VOR.storage__OMW)[idx__QOR])->parent_itm_type_simple__RSN.name__0YP != (void *)n__MOR) || ((void *)((__ITM_TYPE_STYLE *)((void **)((__FAST_ARRAYoITM_TYPE_STYLEo *)dico__WOR)->parent_arrayed_collection__VOR.storage__OMW)[idx__QOR])->style__DZP != (void *)styl__ZON)))) {
+              idx__QOR=(__INTEGER)(idx__QOR +  1);
             };
-            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;
+            if ((idx__QOR <= ((__FAST_ARRAYoITM_TYPE_STYLEo *)dico__WOR)->parent_arrayed_collection__VOR.upper__5OR)) {
+              __tmp__KQR=((void **)((__FAST_ARRAYoITM_TYPE_STYLEo *)dico__WOR)->parent_arrayed_collection__VOR.storage__OMW)[idx__QOR];
+              if (__tmp__KQR==NULL) {
+                __tmp__LQR=NULL;
               } else {
-                __tmp__5MR=((__ITM_TYPE_STYLE *)__tmp__4MR);
+                __tmp__LQR=((__ITM_TYPE_STYLE *)__tmp__KQR);
               };
-              result__DLR=__tmp__5MR;
+              result__POR=__tmp__LQR;
             } else {
-              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__;
+              result__JAJB=NULL;
+              ptr__KAJB=((__POINTER )(NULL));
+              typ_id__PAJB= 0;
+              sz__MAJB=((__UINTEGER_32 )sizeof(__ITM_TYPE_STYLE));
+              if ((sz__MAJB ==  0)) {
+                result__JAJB=ITM_TYPE_STYLE__;
               } else {
-                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;
+                typ_id__PAJB=-1;
+                clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__MAJB);
+                if ((typ_id__PAJB == (__INTEGER)(-  1))) {
+                  a__4ZGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                  new_size__5ZGH=(__UINTEGER_32)((__UINTEGER_32)(sz__MAJB + a__4ZGH) & (__UINTEGER_32)(~ a__4ZGH));
+                  ptr_table__QDKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__5ZGH / ((__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__FTJ(new_size__5ZGH);
+                    next__PDKH=(void *)((unsigned long)result__RDKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5ZGH)));
+                    ((__POINTER *)next__PDKH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__QDKH)[ 0]=next__PDKH;
                   } else {
-                    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)));
+                    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__SXH)))) &  4095) + (__UINTEGER_32)(new_size__5ZGH <<  1)) <=  4096)) {
+                        next__PDKH=(void *)((unsigned long)result__RDKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5ZGH)));
                       } else {
-                        next__Q1JH=new_lab__ZPJ(new_size__ETGH);
+                        next__PDKH=new_lab__FTJ(new_size__5ZGH);
                       };
-                      ((__POINTER *)next__Q1JH)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__R1JH)[ 0]=next__Q1JH;
+                      ((__POINTER *)next__PDKH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__QDKH)[ 0]=next__PDKH;
                     } else {
-                      ((__POINTER *)result__S1JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__Q1JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                      result__S1JH=next__Q1JH;
+                      ((__POINTER *)result__RDKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PDKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                      result__RDKH=next__PDKH;
                     };
                   };
-                  ptr__42IB=result__S1JH;
+                  ptr__KAJB=result__RDKH;
                 } else {
-                  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;
+                  t__D0GH=((__UINTEGER_32 )typ_id__PAJB);
+                  a__C0GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                  new_size__YDKH=(__UINTEGER_32)((__UINTEGER_32)(sz__MAJB + a__C0GH) & (__UINTEGER_32)(~ a__C0GH));
+                  ptr_table__VDKH=((__POINTER )(&(table_type[(t__D0GH)])));
+                  lab_type__XDKH=(__UINTEGER_32)(t__D0GH |  1);
+                  next__UDKH=((__POINTER )(NULL));
+                  result__WDKH=((__POINTER *)ptr_table__VDKH)[ 0];
+                  if ((result__WDKH == (void *)NULL)) {
+                    result__WDKH=new_lab__FTJ(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__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)));
+                    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__SXH)))) &  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__V1JH=new_lab__ZPJ(lab_type__Y1JH);
+                        next__UDKH=new_lab__FTJ(lab_type__XDKH);
                       };
-                      ((__POINTER *)next__V1JH)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__W1JH)[ 0]=next__V1JH;
+                      ((__POINTER *)next__UDKH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__VDKH)[ 0]=next__UDKH;
                     } else {
-                      ((__POINTER *)result__X1JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__V1JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                      result__X1JH=next__V1JH;
+                      ((__POINTER *)result__WDKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UDKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                      result__WDKH=next__UDKH;
                     };
                   };
-                  ptr__42IB=result__X1JH;
+                  ptr__KAJB=result__WDKH;
                 };
-                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__;
+                result__JAJB=((__ITM_TYPE_STYLE *)ptr__KAJB);
+                *(result__JAJB) = *(ITM_TYPE_STYLE__);
+              };
+              Self__OCDC=((__ITM_TYPE_STYLE *)result__JAJB);
+              Self__OCDC->parent_itm_type_simple__RSN.name__0YP=nam__1ON;
+              Self__OCDC->style__DZP=styl__ZON;
+              result__POR=result__JAJB;
+              Self__UECB=((__FAST_ARRAYoITM_TYPE_STYLEo *)dico__WOR);
+              new_capacity__WECB= 0;
+              if (((__INTEGER)(Self__UECB->parent_arrayed_collection__VOR.upper__5OR +  1) <= (__INTEGER)(Self__UECB->parent_arrayed_collection__VOR.capacity__DMW -  1))) {
+                Self__UECB->parent_arrayed_collection__VOR.upper__5OR=(__INTEGER)(Self__UECB->parent_arrayed_collection__VOR.upper__5OR +  1);
+                __tmp__EFCB=TRUE__;
               } else {
-                __tmp__YBCB=FALSE__;
+                __tmp__EFCB=FALSE__;
               };
-              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;
+              if ((! __tmp__EFCB)) {
+                if ((Self__UECB->parent_arrayed_collection__VOR.capacity__DMW ==  0)) {
+                  Self__UECB->parent_arrayed_collection__VOR.storage__OMW=create__IJYB( 2);
+                  Self__UECB->parent_arrayed_collection__VOR.capacity__DMW= 2;
+                  Self__UECB->parent_arrayed_collection__VOR.upper__5OR= 0;
                 } else {
-                  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);
+                  new_capacity__WECB=(__INTEGER)(Self__UECB->parent_arrayed_collection__VOR.capacity__DMW <<  1);
+                  __tmp__ZFCB=Self__UECB->parent_arrayed_collection__VOR.storage__OMW;
+                  __tmp__0FCB=Self__UECB->parent_arrayed_collection__VOR.capacity__DMW;
+                  new__FVFC=((void **)realloc_dynamic__old_size__new_size__ZHLC(((__POINTER )((void **)__tmp__ZFCB)),((__UINTEGER_32 )(__INTEGER)(__tmp__0FCB * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__WECB * ((__INTEGER )(sizeof(void *)))))));
+                  __tmp__ZVFC=(__INTEGER)(new_capacity__WECB -  1);
+                  Self__T5VD=__tmp__0FCB;
+                  while ((Self__T5VD <= __tmp__ZVFC)) {
+                    new__FVFC[Self__T5VD]=NULL;
+                    Self__T5VD=(__INTEGER)(Self__T5VD +  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);
+                  Self__UECB->parent_arrayed_collection__VOR.storage__OMW=new__FVFC;
+                  Self__UECB->parent_arrayed_collection__VOR.capacity__DMW=new_capacity__WECB;
+                  Self__UECB->parent_arrayed_collection__VOR.upper__5OR=(__INTEGER)(Self__UECB->parent_arrayed_collection__VOR.upper__5OR +  1);
                 };
               };
-              ((void **)Self__IBCB->parent_arrayed_collection__JLR.storage__CJW)[Self__IBCB->parent_arrayed_collection__JLR.upper__TLR]=result__32IB;
+              ((void **)Self__UECB->parent_arrayed_collection__VOR.storage__OMW)[Self__UECB->parent_arrayed_collection__VOR.upper__5OR]=result__JAJB;
             };
-            result__RLN=result__DLR;
+            result__3ON=result__POR;
           };
         };
       };
     };
     if (is_shorter__LZ) {
-      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);
+      sav_derive__BPN=short_derive__PCC;
+      short_derive__PCC=old_derive__APN;
+      if ((((void *)result__3ON == (void *)type_self__XUN) || ((void *)result__3ON == (void *)type_null__PVN))) {
+        short__token__to__YCD((&__string_126),(__INTEGER)(old_pos__5ON - ((__STRING_CONSTANT *)nam__1ON)->count__DD),old_pos__5ON);
       } else {
-        short__token__to__YBD((&__string_125),(__INTEGER)(old_pos__TLN - ((__STRING_CONSTANT *)nam__PLN)->count__DD),old_pos__TLN);
+        short__token__to__YCD((&__string_125),(__INTEGER)(old_pos__5ON - ((__STRING_CONSTANT *)nam__1ON)->count__DD),old_pos__5ON);
       };
-      short_derive__PCC=(__INTEGER)(sav_derive__VLN + (__INTEGER)(short_derive__PCC - old_derive__ULN));
+      short_derive__PCC=(__INTEGER)(sav_derive__BPN + (__INTEGER)(short_derive__PCC - old_derive__APN));
     };
   };
-  return(result__RLN);
+  return(result__3ON);
 }
 
-static void read_def_local__UZH(__PARSER *Self__VZH)
+static void read_def_local__A3H(__PARSER *Self__B3H)
 // ({PARSER}) VoidNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER beg__XZK,typ_id__HXN,Self__CGAB,limit_up__DGAB,__tmp__13K;
+  __INTEGER Self__X3N,__tmp__OLIH,Self__PLIH,__tmp__WCPD,Self__FUUD;
+  __POSITION pos__TWZG,__tmp__D1K,pos__1WZG,pos__IXZG,pos__PXZG;
+  void *__tmp__E1K;
+  __ITM_LOCAL *result__BXN,*Self__CEV;
+  __POINTER ptr__CXN,ptr_table__0DKH,next__ZDKH,result__1DKH;
+  __POINTER ptr_table__5DKH,next__4DKH,result__AEKH;
+  __UINTEGER_32 sz__EXN,a__U0GH,new_size__V0GH,t__Z0GH,a__Y0GH;
+  __UINTEGER_32 new_size__CEKH,lab_type__BEKH;
+  __CHARACTER styl__L3H,result__EEKH,result__XNBH,result__HEKH;
+  __CHARACTER result__KEKH;
+  void *result__HLIH,*local_list__J3H,*result__KLIH,*static_list__K3H;
+  void *result__WZK,*result__ITI;
+  __FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *Self__ILIH,*Self__JLIH;
+  __FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *Self__LLIH,*Self__MLIH,*Self__OT4;
+  __FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *Self__EU4;
+  __BOOLEAN mute__YZK,result__DEKH,__tmp__P1K,result__GEKH,result__JEKH;
+  __FAST_ARRAYoITM_LOCALo *Self__QLIH,*Self__LCPD;
+  void *other__NLIH,*other__MCPD;
+  old_position__2SI=position__CCC;
+  old_pos_cur__4SI=pos_cur__FCC;
+  old_pos_line__ATI=pos_line__GCC;
+  old_pos_col__CTI=pos_col__HCC;
+  old_short_derive__ETI=short_derive__PCC;
+  styl__L3H=read_style__STF();
+  result__HLIH=NULL;
+  if ((((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__OTI)->parent_arrayed_collection__NTI.upper__W3T <  0)) {
+    result__HLIH=create_with_capacity__5KK( 16);
   } else {
-    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);
+    Self__ILIH=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__OTI);
+    result__HLIH=((void **)Self__ILIH->parent_arrayed_collection__NTI.storage__MLU)[Self__ILIH->parent_arrayed_collection__NTI.upper__W3T];
+    Self__JLIH=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__OTI);
+    Self__JLIH->parent_arrayed_collection__NTI.upper__W3T=(__INTEGER)(Self__JLIH->parent_arrayed_collection__NTI.upper__W3T -  1);
+  };
+  local_list__J3H=result__HLIH;
+  result__KLIH=NULL;
+  if ((((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__OTI)->parent_arrayed_collection__NTI.upper__W3T <  0)) {
+    result__KLIH=create_with_capacity__5KK( 16);
   } else {
-    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;
+    Self__LLIH=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__OTI);
+    result__KLIH=((void **)Self__LLIH->parent_arrayed_collection__NTI.storage__MLU)[Self__LLIH->parent_arrayed_collection__NTI.upper__W3T];
+    Self__MLIH=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__OTI);
+    Self__MLIH->parent_arrayed_collection__NTI.upper__W3T=(__INTEGER)(Self__MLIH->parent_arrayed_collection__NTI.upper__W3T -  1);
+  };
+  static_list__K3H=result__KLIH;
+  while ((styl__L3H != ' ')) {
+    result__WZK=NULL;
+    beg__XZK= 0;
+    mute__YZK=TRUE__;
+    if (read_identifier__QBL()) {
+      result__ITI=NULL;
+      if ((((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__OTI)->parent_arrayed_collection__NTI.upper__W3T <  0)) {
+        result__ITI=create_with_capacity__5KK( 16);
+      } else {
+        Self__OT4=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__OTI);
+        result__ITI=((void **)Self__OT4->parent_arrayed_collection__NTI.storage__MLU)[Self__OT4->parent_arrayed_collection__NTI.upper__W3T];
+        Self__EU4=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__OTI);
+        Self__EU4->parent_arrayed_collection__NTI.upper__W3T=(__INTEGER)(Self__EU4->parent_arrayed_collection__NTI.upper__W3T -  1);
+      };
+      result__WZK=result__ITI;
+      beg__XZK= 0;
       do {
-        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)) {
+        if (((((__INTEGER)(((__FAST_ARRAYoITM_LOCALo *)result__WZK)->parent_arrayed_collection__H3H.upper__A2K +  1) !=  0) && (! read_identifier__QBL())) && (! mute__YZK))) {
+          pos__TWZG=current_position__EZF();
+          put_error__text__NPG( 0,(&__string_323));
+          put_position__XQG(pos__TWZG);
+          put_string__P3F(msg_err__SPG);
+          if ((type_error__RPG !=  2)) {
             exit(( 1));
           };
         };
-        __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;
+        __tmp__D1K=current_position__EZF();
+        __tmp__E1K=last_string__V1C;
+        result__BXN=NULL;
+        ptr__CXN=((__POINTER )(NULL));
+        typ_id__HXN= 0;
+        sz__EXN=((__UINTEGER_32 )sizeof(__ITM_LOCAL));
+        if ((sz__EXN ==  0)) {
+          result__BXN=ITM_LOCAL__;
+        } else {
+          typ_id__HXN=__ITM_LOCAL__;
+          clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__EXN);
+          if ((typ_id__HXN == (__INTEGER)(-  1))) {
+            a__U0GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__V0GH=(__UINTEGER_32)((__UINTEGER_32)(sz__EXN + a__U0GH) & (__UINTEGER_32)(~ a__U0GH));
+            ptr_table__0DKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__V0GH / ((__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__FTJ(new_size__V0GH);
+              next__ZDKH=(void *)((unsigned long)result__1DKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__V0GH)));
+              ((__POINTER *)next__ZDKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__0DKH)[ 0]=next__ZDKH;
             } else {
-              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)));
+              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__SXH)))) &  4095) + (__UINTEGER_32)(new_size__V0GH <<  1)) <=  4096)) {
+                  next__ZDKH=(void *)((unsigned long)result__1DKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__V0GH)));
                 } else {
-                  next__01JH=new_lab__ZPJ(new_size__0TGH);
+                  next__ZDKH=new_lab__FTJ(new_size__V0GH);
                 };
-                ((__POINTER *)next__01JH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__11JH)[ 0]=next__01JH;
+                ((__POINTER *)next__ZDKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__0DKH)[ 0]=next__ZDKH;
               } else {
-                ((__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;
+                ((__POINTER *)result__1DKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZDKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__1DKH=next__ZDKH;
+              };
+            };
+            ptr__CXN=result__1DKH;
+          } else {
+            t__Z0GH=((__UINTEGER_32 )typ_id__HXN);
+            a__Y0GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__CEKH=(__UINTEGER_32)((__UINTEGER_32)(sz__EXN + a__Y0GH) & (__UINTEGER_32)(~ a__Y0GH));
+            ptr_table__5DKH=((__POINTER )(&(table_type[(t__Z0GH)])));
+            lab_type__BEKH=(__UINTEGER_32)(t__Z0GH |  1);
+            next__4DKH=((__POINTER )(NULL));
+            result__AEKH=((__POINTER *)ptr_table__5DKH)[ 0];
+            if ((result__AEKH == (void *)NULL)) {
+              result__AEKH=new_lab__FTJ(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__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)));
+              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__SXH)))) &  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__51JH=new_lab__ZPJ(lab_type__C2JH);
+                  next__4DKH=new_lab__FTJ(lab_type__BEKH);
                 };
-                ((__POINTER *)next__51JH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__A2JH)[ 0]=next__51JH;
+                ((__POINTER *)next__4DKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__5DKH)[ 0]=next__4DKH;
               } else {
-                ((__POINTER *)result__B2JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__51JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__B2JH=next__51JH;
+                ((__POINTER *)result__AEKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4DKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__AEKH=next__4DKH;
               };
             };
-            ptr__WTN=result__B2JH;
+            ptr__CXN=result__AEKH;
           };
-          result__VTN=((__ITM_LOCAL *)ptr__WTN);
-          *(result__VTN) = *(ITM_LOCAL__);
+          result__BXN=((__ITM_LOCAL *)ptr__CXN);
+          *(result__BXN) = *(ITM_LOCAL__);
         };
-        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__E2JH=FALSE__;
+        Self__CEV=((__ITM_LOCAL *)result__BXN);
+        Self__CEV->name__D4K=__tmp__E1K;
+        Self__CEV->parent_itm_object__C3H.position__GFJ=__tmp__D1K;
+        add_last__N2U(result__WZK,result__BXN);
+        result__DEKH=FALSE__;
+        if ((! read_space__MTD())) {
+          result__DEKH=FALSE__;
         } else {
-          result__F2JH='\0';
+          result__EEKH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__F2JH=((__CHARACTER )(( 0)));
+            result__EEKH=((__CHARACTER )(( 0)));
           } else {
-            result__F2JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+            result__EEKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__F2JH == ':')) {
+          if ((result__EEKH == ':')) {
             position__CCC=(__INTEGER)(position__CCC +  1);
-            result__E2JH=TRUE__;
+            result__DEKH=TRUE__;
           };
         };
-        if (result__E2JH) {
-          result__DHBH='\0';
+        if (result__DEKH) {
+          result__XNBH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__DHBH=((__CHARACTER )(( 0)));
+            result__XNBH=((__CHARACTER )(( 0)));
           } else {
-            result__DHBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+            result__XNBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
           };
-          __tmp__DYK=(result__DHBH != '=');
+          __tmp__P1K=(result__XNBH != '=');
         } else {
-          __tmp__DYK=FALSE__;
+          __tmp__P1K=FALSE__;
         };
-        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)) {
+        if (__tmp__P1K) {
+          mute__YZK=FALSE__;
+          if (((void *)read_type__WCM(Self__B3H,TRUE__) == (void *)NULL)) {
+            pos__1WZG=current_position__EZF();
+            put_error__text__NPG( 0,(&__string_324));
+            put_position__XQG(pos__1WZG);
+            put_string__P3F(msg_err__SPG);
+            if ((type_error__RPG !=  2)) {
               exit(( 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);
+          Self__CGAB=beg__XZK;
+          limit_up__DGAB=((__FAST_ARRAYoITM_LOCALo *)result__WZK)->parent_arrayed_collection__H3H.upper__A2K;
+          while ((Self__CGAB <= limit_up__DGAB)) {
+            Self__CGAB=(__INTEGER)(Self__CGAB +  1);
           };
-          beg__LWK=(__INTEGER)(((__FAST_ARRAYoITM_LOCALo *)result__KWK)->parent_arrayed_collection__1ZH.upper__UYK +  1);
+          beg__XZK=(__INTEGER)(((__FAST_ARRAYoITM_LOCALo *)result__WZK)->parent_arrayed_collection__H3H.upper__A2K +  1);
         };
-        result__H2JH=FALSE__;
-        if ((! read_space__KSD())) {
-          result__H2JH=FALSE__;
+        result__GEKH=FALSE__;
+        if ((! read_space__MTD())) {
+          result__GEKH=FALSE__;
         } else {
-          result__I2JH='\0';
+          result__HEKH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__I2JH=((__CHARACTER )(( 0)));
+            result__HEKH=((__CHARACTER )(( 0)));
           } else {
-            result__I2JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+            result__HEKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__I2JH == ',')) {
+          if ((result__HEKH == ',')) {
             position__CCC=(__INTEGER)(position__CCC +  1);
-            result__H2JH=TRUE__;
+            result__GEKH=TRUE__;
           };
         };
-      } 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;
+      } while (result__GEKH);
+      if ((beg__XZK != (__INTEGER)(((__FAST_ARRAYoITM_LOCALo *)result__ITI)->parent_arrayed_collection__H3H.upper__A2K +  1))) {
+        if (mute__YZK) {
+          free__FLK(result__ITI);
+          result__WZK=NULL;
         } else {
-          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)) {
+          pos__IXZG=current_position__EZF();
+          put_error__text__NPG( 0,(&__string_324));
+          put_position__XQG(pos__IXZG);
+          put_string__P3F(msg_err__SPG);
+          if ((type_error__RPG !=  2)) {
             exit(( 1));
           };
         };
       } else {
-        result__KWK=copy__C2J(result__KWK);
+        result__WZK=copy__O5J(result__WZK);
         if (is_shorter__LZ) {
-          __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);
+          __tmp__13K=((__FAST_ARRAYoITM_LOCALo *)result__WZK)->parent_arrayed_collection__H3H.upper__A2K;
+          Self__X3N= 0;
+          while ((Self__X3N <= __tmp__13K)) {
+            add__MMHB(short_local__XCC,((__ITM_LOCAL *)((void **)((__FAST_ARRAYoITM_LOCALo *)result__WZK)->parent_arrayed_collection__H3H.storage__HNU)[Self__X3N])->name__D4K);
+            Self__X3N=(__INTEGER)(Self__X3N +  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);
+    if (((void *)result__WZK != (void *)NULL)) {
+      if ((styl__L3H == '+')) {
+        Self__QLIH=((__FAST_ARRAYoITM_LOCALo *)local_list__J3H);
+        other__NLIH=result__WZK;
+        __tmp__OLIH=((__FAST_ARRAYoITM_LOCALo *)result__WZK)->parent_arrayed_collection__H3H.upper__A2K;
+        Self__PLIH= 0;
+        while ((Self__PLIH <= __tmp__OLIH)) {
+          add_last__N2U(Self__QLIH,((void **)((__FAST_ARRAYoITM_LOCALo *)other__NLIH)->parent_arrayed_collection__H3H.storage__HNU)[Self__PLIH]);
+          Self__PLIH=(__INTEGER)(Self__PLIH +  1);
         };
       } else {
-        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);
+        Self__LCPD=((__FAST_ARRAYoITM_LOCALo *)static_list__K3H);
+        other__MCPD=result__WZK;
+        __tmp__WCPD=((__FAST_ARRAYoITM_LOCALo *)result__WZK)->parent_arrayed_collection__H3H.upper__A2K;
+        Self__FUUD= 0;
+        while ((Self__FUUD <= __tmp__WCPD)) {
+          add_last__N2U(Self__LCPD,((void **)((__FAST_ARRAYoITM_LOCALo *)other__MCPD)->parent_arrayed_collection__H3H.storage__HNU)[Self__FUUD]);
+          Self__FUUD=(__INTEGER)(Self__FUUD +  1);
         };
       };
-      result__K2JH=FALSE__;
-      if ((! read_space__KSD())) {
-        result__K2JH=FALSE__;
+      result__JEKH=FALSE__;
+      if ((! read_space__MTD())) {
+        result__JEKH=FALSE__;
       } else {
-        result__L2JH='\0';
+        result__KEKH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__L2JH=((__CHARACTER )(( 0)));
+          result__KEKH=((__CHARACTER )(( 0)));
         } else {
-          result__L2JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+          result__KEKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__L2JH == ';')) {
+        if ((result__KEKH == ';')) {
           position__CCC=(__INTEGER)(position__CCC +  1);
-          result__K2JH=TRUE__;
+          result__JEKH=TRUE__;
         };
       };
-      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)) {
+      if ((! result__JEKH)) {
+        pos__PXZG=current_position__EZF();
+        put_error__text__NPG( 2,(&__string_242));
+        put_position__XQG(pos__PXZG);
+        put_string__P3F(msg_err__SPG);
+        if ((type_error__RPG !=  2)) {
           exit(( 1));
         };
       };
-      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();
+      old_position__2SI=position__CCC;
+      old_pos_cur__4SI=pos_cur__FCC;
+      old_pos_line__ATI=pos_line__GCC;
+      old_pos_col__CTI=pos_col__HCC;
+      old_short_derive__ETI=short_derive__PCC;
+      styl__L3H=read_style__STF();
     } else {
-      restore_context__MBL();
-      styl__5ZH=' ';
+      restore_context__YEL();
+      styl__L3H=' ';
     };
   };
-  if ((((__FAST_ARRAYoITM_LOCALo *)result__UDIH)->parent_arrayed_collection__1ZH.upper__UYK <  0)) {
-    free__ZHK(result__UDIH);
+  if ((((__FAST_ARRAYoITM_LOCALo *)result__HLIH)->parent_arrayed_collection__H3H.upper__A2K <  0)) {
+    free__FLK(result__HLIH);
   } else {
-    copy__C2J(result__UDIH);
+    copy__O5J(result__HLIH);
   };
-  if ((((__FAST_ARRAYoITM_LOCALo *)result__XDIH)->parent_arrayed_collection__1ZH.upper__UYK <  0)) {
-    free__ZHK(result__XDIH);
+  if ((((__FAST_ARRAYoITM_LOCALo *)result__KLIH)->parent_arrayed_collection__H3H.upper__A2K <  0)) {
+    free__FLK(result__KLIH);
   } else {
-    copy__C2J(result__XDIH);
+    copy__O5J(result__KLIH);
   };
 }
 
-static __FAST_ARRAYoITM_CODEo* create_with_capacity__5TI(__INTEGER new_count__BUI)
+static __FAST_ARRAYoITM_CODEo* create_with_capacity__LXI(__INTEGER new_count__NXI)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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__;
+  __POINTER ptr__JMJ,ptr_table__NEKH,next__MEKH,result__OEKH;
+  __POINTER ptr_table__SEKH,next__REKH,result__TEKH;
+  __INTEGER typ_id__OMJ;
+  __UINTEGER_32 sz__LMJ,a__35GH,new_size__45GH,t__CAHH,a__BAHH;
+  __UINTEGER_32 new_size__VEKH,lab_type__UEKH;
+  __FAST_ARRAYoITM_CODEo *result__IMJ,*Self__MAU;
+  result__IMJ=NULL;
+  ptr__JMJ=((__POINTER )(NULL));
+  typ_id__OMJ= 0;
+  sz__LMJ=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_CODEo));
+  if ((sz__LMJ ==  0)) {
+    result__IMJ=FAST_ARRAYoITM_CODEo__;
   } else {
-    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);
+    typ_id__OMJ=__FAST_ARRAYoITM_CODEo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__LMJ);
+    if ((typ_id__OMJ == (__INTEGER)(-  1))) {
+      a__35GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__45GH=(__UINTEGER_32)((__UINTEGER_32)(sz__LMJ + a__35GH) & (__UINTEGER_32)(~ a__35GH));
+      ptr_table__NEKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__45GH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__MEKH=((__POINTER )(NULL));
+      result__OEKH=((__POINTER *)ptr_table__NEKH)[ 0];
+      if ((result__OEKH == (void *)NULL)) {
+        result__OEKH=new_lab__FTJ(new_size__45GH);
+        next__MEKH=(void *)((unsigned long)result__OEKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__45GH)));
+        ((__POINTER *)next__MEKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__NEKH)[ 0]=next__MEKH;
+      } else {
+        next__MEKH=((__POINTER *)result__OEKH)[ 0];
+        if ((next__MEKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__OEKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__45GH <<  1)) <=  4096)) {
+            next__MEKH=(void *)((unsigned long)result__OEKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__45GH)));
+          } else {
+            next__MEKH=new_lab__FTJ(new_size__45GH);
+          };
+          ((__POINTER *)next__MEKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__NEKH)[ 0]=next__MEKH;
+        } else {
+          ((__POINTER *)result__OEKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MEKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__OEKH=next__MEKH;
+        };
+      };
+      ptr__JMJ=result__OEKH;
+    } else {
+      t__CAHH=((__UINTEGER_32 )typ_id__OMJ);
+      a__BAHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__VEKH=(__UINTEGER_32)((__UINTEGER_32)(sz__LMJ + a__BAHH) & (__UINTEGER_32)(~ a__BAHH));
+      ptr_table__SEKH=((__POINTER )(&(table_type[(t__CAHH)])));
+      lab_type__UEKH=(__UINTEGER_32)(t__CAHH |  1);
+      next__REKH=((__POINTER )(NULL));
+      result__TEKH=((__POINTER *)ptr_table__SEKH)[ 0];
+      if ((result__TEKH == (void *)NULL)) {
+        result__TEKH=new_lab__FTJ(lab_type__UEKH);
+        next__REKH=(void *)((unsigned long)result__TEKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VEKH)));
+        ((__POINTER *)next__REKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__SEKH)[ 0]=next__REKH;
+      } else {
+        next__REKH=((__POINTER *)result__TEKH)[ 0];
+        if ((next__REKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TEKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__VEKH <<  1)) <=  4096)) {
+            next__REKH=(void *)((unsigned long)result__TEKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VEKH)));
+          } else {
+            next__REKH=new_lab__FTJ(lab_type__UEKH);
+          };
+          ((__POINTER *)next__REKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__SEKH)[ 0]=next__REKH;
+        } else {
+          ((__POINTER *)result__TEKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__REKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__TEKH=next__REKH;
+        };
+      };
+      ptr__JMJ=result__TEKH;
+    };
+    result__IMJ=((__FAST_ARRAYoITM_CODEo *)ptr__JMJ);
+    *(result__IMJ) = *(FAST_ARRAYoITM_CODEo__);
+  };
+  Self__MAU=((__FAST_ARRAYoITM_CODEo *)result__IMJ);
+  if ((Self__MAU->parent_arrayed_collection__MVF.capacity__H0T < new_count__NXI)) {
+    Self__MAU->parent_arrayed_collection__MVF.storage__S0T=create__3UQB(new_count__NXI);
+    Self__MAU->parent_arrayed_collection__MVF.capacity__H0T=new_count__NXI;
+  };
+  Self__MAU->parent_arrayed_collection__MVF.upper__BJL=(__INTEGER)(-  1);
+  return(result__IMJ);
 }
 
-static void add_last__Q2U(__FAST_ARRAYoITM_CODEo *Self__R2U,void *element__S2U)
+static void add_last__25U(__FAST_ARRAYoITM_CODEo *Self__35U,void *element__45U)
 // ({FAST_ARRAYoITM_CODEo},{NULLxITM_LISTxITM_LDOTSxITM_PROTOTYPExITM_LIST_IDFxITM_WRITE_VALUExITM_WRITE_CASTxITM_READxITM_WRITE_CODExITM_OPERATORxITM_READ_ARG1xITM_READ_ARG2xITM_EXPRESSIONxITM_OLDxITM_EXTERNAL_TYPExITM_BLOCKxITM_EXTERNALxITM_READ_ARGSxITM_REALxITM_NUMBERxITM_CHARACTERxITM_STRINGxITM_RESULT}) VoidNo recursive, No inlinable.
 {
-  __INTEGER new_capacity__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__;
+  __INTEGER new_capacity__55U,__tmp__DBV,__tmp__3GEC,Self__CLVD;
+  __BOOLEAN __tmp__NAV;
+  void **__tmp__CBV,**new__JGEC;
+  new_capacity__55U= 0;
+  if (((__INTEGER)(Self__35U->parent_arrayed_collection__MVF.upper__BJL +  1) <= (__INTEGER)(Self__35U->parent_arrayed_collection__MVF.capacity__H0T -  1))) {
+    Self__35U->parent_arrayed_collection__MVF.upper__BJL=(__INTEGER)(Self__35U->parent_arrayed_collection__MVF.upper__BJL +  1);
+    __tmp__NAV=TRUE__;
   } else {
-    __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;
+    __tmp__NAV=FALSE__;
+  };
+  if ((! __tmp__NAV)) {
+    if ((Self__35U->parent_arrayed_collection__MVF.capacity__H0T ==  0)) {
+      Self__35U->parent_arrayed_collection__MVF.storage__S0T=create__3UQB( 2);
+      Self__35U->parent_arrayed_collection__MVF.capacity__H0T= 2;
+      Self__35U->parent_arrayed_collection__MVF.upper__BJL= 0;
+    } else {
+      new_capacity__55U=(__INTEGER)(Self__35U->parent_arrayed_collection__MVF.capacity__H0T <<  1);
+      __tmp__CBV=Self__35U->parent_arrayed_collection__MVF.storage__S0T;
+      __tmp__DBV=Self__35U->parent_arrayed_collection__MVF.capacity__H0T;
+      new__JGEC=((void **)realloc_dynamic__old_size__new_size__ZHLC(((__POINTER )((void **)__tmp__CBV)),((__UINTEGER_32 )(__INTEGER)(__tmp__DBV * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__55U * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__3GEC=(__INTEGER)(new_capacity__55U -  1);
+      Self__CLVD=__tmp__DBV;
+      while ((Self__CLVD <= __tmp__3GEC)) {
+        new__JGEC[Self__CLVD]=NULL;
+        Self__CLVD=(__INTEGER)(Self__CLVD +  1);
+      };
+      Self__35U->parent_arrayed_collection__MVF.storage__S0T=new__JGEC;
+      Self__35U->parent_arrayed_collection__MVF.capacity__H0T=new_capacity__55U;
+      Self__35U->parent_arrayed_collection__MVF.upper__BJL=(__INTEGER)(Self__35U->parent_arrayed_collection__MVF.upper__BJL +  1);
+    };
+  };
+  ((void **)Self__35U->parent_arrayed_collection__MVF.storage__S0T)[Self__35U->parent_arrayed_collection__MVF.upper__BJL]=element__45U;
 }
 
-static void* copy__H4H(void *tmp__J4H)
+static void* copy__TBI(void *tmp__VBI)
 // ({NULLxFAST_ARRAYoITM_CODEo}) With resultNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER new_capacity__4ZT,other_upper__3ZT,Self__5AKC;
+  void *result__XBI;
+  __FAST_ARRAYoITM_CODEo *Self__1ZT;
+  void **__tmp__V0T,**__tmp__X0T,**Self__RTCC;
+  result__XBI=create_with_capacity__LXI((__INTEGER)(((__FAST_ARRAYoITM_CODEo *)tmp__VBI)->parent_arrayed_collection__MVF.upper__BJL +  1));
+  Self__1ZT=((__FAST_ARRAYoITM_CODEo *)result__XBI);
+  new_capacity__4ZT= 0;
+  other_upper__3ZT=((__FAST_ARRAYoITM_CODEo *)tmp__VBI)->parent_arrayed_collection__MVF.upper__BJL;
+  if ((other_upper__3ZT >=  0)) {
+    new_capacity__4ZT=(__INTEGER)(other_upper__3ZT +  1);
+    if ((Self__1ZT->parent_arrayed_collection__MVF.capacity__H0T < new_capacity__4ZT)) {
+      Self__1ZT->parent_arrayed_collection__MVF.storage__S0T=create__3UQB(new_capacity__4ZT);
+      Self__1ZT->parent_arrayed_collection__MVF.capacity__H0T=new_capacity__4ZT;
+    };
+    __tmp__V0T=Self__1ZT->parent_arrayed_collection__MVF.storage__S0T;
+    __tmp__X0T=((__FAST_ARRAYoITM_CODEo *)tmp__VBI)->parent_arrayed_collection__MVF.storage__S0T;
+    Self__RTCC=((void **)__tmp__V0T);
+    Self__5AKC=other_upper__3ZT;
+    while ((Self__5AKC >=  0)) {
+      Self__RTCC[Self__5AKC]=((void **)__tmp__X0T)[Self__5AKC];
+      Self__5AKC=(__INTEGER)(Self__5AKC -  1);
+    };
+  };
+  Self__1ZT->parent_arrayed_collection__MVF.upper__BJL=other_upper__3ZT;
+  free__RXI(tmp__VBI);
+  return(result__XBI);
 }
 
-static __BOOLEAN fast_has__ZAV(__HASHED_SEToSTRING_CONSTANTo *Self__0AV,void *e__1AV)
+static __BOOLEAN fast_has__FEV(__HASHED_SEToSTRING_CONSTANTo *Self__GEV,void *e__HEV)
 // ({HASHED_SEToSTRING_CONSTANTo},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __STRING_CONSTANT *Self__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));
+  __STRING_CONSTANT *Self__TLIH;
+  __INTEGER result__SLIH,__tmp__ULIH,Self__VLIH;
+  void *node__REV;
+  Self__TLIH=((__STRING_CONSTANT *)e__HEV);
+  result__SLIH= 0;
+  __tmp__ULIH=Self__TLIH->count__DD;
+  Self__VLIH= 1;
+  while ((Self__VLIH <= __tmp__ULIH)) {
+    result__SLIH=(__INTEGER)((__INTEGER)( 5 * result__SLIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__TLIH->storage__FRO)[(__INTEGER)(Self__VLIH -  1)])));
+    Self__VLIH=(__INTEGER)(Self__VLIH +  1);
+  };
+  if ((result__SLIH <  0)) {
+    result__SLIH=(__INTEGER)(~ result__SLIH);
+  };
+  node__REV=((void **)Self__GEV->buckets__XEV)[(__INTEGER)(result__SLIH % Self__GEV->capacity__0IT)];
+  while ((! (((void *)node__REV == (void *)NULL) || ((void *)((__HASHED_SET_NODEoSTRING_CONSTANTo *)node__REV)->item__DFV == (void *)e__HEV)))) {
+    node__REV=((__HASHED_SET_NODEoSTRING_CONSTANTo *)node__REV)->next__OFV;
+  };
+  return(((void *)node__REV != (void *)NULL));
 }
 
-static void restore_context__MBL()
+static void restore_context__YEL()
 // () VoidNo recursive, No inlinable.
 {
-  __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;
+  __INTEGER beg__0EL,end__XLIH,len__ZLIH,__tmp__0LIH,__tmp__2LIH;
+  __INTEGER Self__3LIH,__tmp__MFL,__tmp__PFL,Self__MNM;
+  __STRING *Self__1LIH;
+  beg__0EL= 0;
   if (is_shorter__LZ) {
-    ((__STRING *)token__TCD)->count__EGC= 0;
-    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;
+    ((__STRING *)token__TDD)->count__EGC= 0;
+    beg__0EL=(__INTEGER)(old_position__2SI + old_short_derive__ETI);
+    Self__1LIH=((__STRING *)output_code__SI);
+    end__XLIH=(__INTEGER)((__INTEGER)(position__CCC + short_derive__PCC) -  1);
+    len__ZLIH=(__INTEGER)((__INTEGER)(end__XLIH - beg__0EL) +  1);
+    if ((len__ZLIH >  0)) {
+      __tmp__0LIH=(__INTEGER)(end__XLIH +  1);
+      __tmp__2LIH=Self__1LIH->count__EGC;
+      Self__3LIH=__tmp__0LIH;
+      while ((Self__3LIH <= __tmp__2LIH)) {
+        ((__CHARACTER *)Self__1LIH->storage__RCS)[(__INTEGER)((__INTEGER)(Self__3LIH - len__ZLIH) -  1)]=((__CHARACTER *)Self__1LIH->storage__RCS)[(__INTEGER)(Self__3LIH -  1)];
+        Self__3LIH=(__INTEGER)(Self__3LIH +  1);
+      };
+      Self__1LIH->count__EGC=(__INTEGER)(Self__1LIH->count__EGC - len__ZLIH);
+    };
+    __tmp__MFL=old_position__2SI;
+    __tmp__PFL=(__INTEGER)(position__CCC -  1);
+    Self__MNM=__tmp__MFL;
+    while ((Self__MNM <= __tmp__PFL)) {
+      add_last__GOT(token__TDD,((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(Self__MNM -  1)]);
+      Self__MNM=(__INTEGER)(Self__MNM +  1);
+    };
+    insert_string__to__CYU(output_code__SI,token__TDD,beg__0EL);
+    short_derive__PCC=old_short_derive__ETI;
+  };
+  position__CCC=old_position__2SI;
+  pos_cur__FCC=old_pos_cur__4SI;
+  pos_line__GCC=old_pos_line__ATI;
+  pos_col__HCC=old_pos_col__CTI;
 }
 
-static void* read_expr_message__TTL(__PARSER *Self__UTL)
+static void* read_expr_message__5WL(__PARSER *Self__AXL)
 // ({PARSER}) With resultNo recursive, No inlinable.
 {
-  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));
+  void *result__V2L,*result__CXL;
+  __POSITION pos__50ZG,p__FBAB,pos__H1ZG;
+  __ITM_OLD *result__1TGB;
+  __POINTER ptr__2TGB,ptr_table__ZEKH,next__YEKH,result__0EKH;
+  __POINTER ptr_table__4EKH,next__3EKH,result__5EKH;
+  __INTEGER typ_id__BUGB;
+  __UINTEGER_32 sz__4TGB,a__U2GH,new_size__V2GH,t__Z2GH,a__Y2GH;
+  __UINTEGER_32 new_size__BFKH,lab_type__AFKH;
+  __BOOLEAN result__XEKH,result__CFKH;
+  __CHARACTER result__DFKH;
+  result__V2L=NULL;
+  result__XEKH=read_word__LRF((&__string_8));
   if (is_shorter__LZ) {
-    if (result__Y2JH) {
+    if (result__XEKH) {
       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);
+        short__token__to__YCD((&__string_120),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V1C)->count__DD),position__CCC);
       } else {
-        short__token__to__YBD((&__string_119),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD),position__CCC);
+        short__token__to__YCD((&__string_119),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V1C)->count__DD),position__CCC);
       };
     };
   };
-  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)) {
+  if (result__XEKH) {
+    if (((void *)read_expr__XAJ(Self__AXL) == (void *)NULL)) {
+      pos__50ZG=current_position__EZF();
+      put_error__text__NPG( 0,(&__string_325));
+      put_position__XQG(pos__50ZG);
+      put_string__P3F(msg_err__SPG);
+      if ((type_error__RPG !=  2)) {
         exit(( 1));
       };
     };
-    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)));
+    p__FBAB=current_position__EZF();
+    result__1TGB=NULL;
+    ptr__2TGB=((__POINTER )(NULL));
+    typ_id__BUGB= 0;
+    sz__4TGB=((__UINTEGER_32 )sizeof(__ITM_OLD));
+    if ((sz__4TGB ==  0)) {
+      result__1TGB=ITM_OLD__;
+    } else {
+      typ_id__BUGB=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__4TGB);
+      if ((typ_id__BUGB == (__INTEGER)(-  1))) {
+        a__U2GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__V2GH=(__UINTEGER_32)((__UINTEGER_32)(sz__4TGB + a__U2GH) & (__UINTEGER_32)(~ a__U2GH));
+        ptr_table__ZEKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__V2GH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__YEKH=((__POINTER )(NULL));
+        result__0EKH=((__POINTER *)ptr_table__ZEKH)[ 0];
+        if ((result__0EKH == (void *)NULL)) {
+          result__0EKH=new_lab__FTJ(new_size__V2GH);
+          next__YEKH=(void *)((unsigned long)result__0EKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__V2GH)));
+          ((__POINTER *)next__YEKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__ZEKH)[ 0]=next__YEKH;
+        } else {
+          next__YEKH=((__POINTER *)result__0EKH)[ 0];
+          if ((next__YEKH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__0EKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__V2GH <<  1)) <=  4096)) {
+              next__YEKH=(void *)((unsigned long)result__0EKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__V2GH)));
             } else {
-              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)));
+              next__YEKH=new_lab__FTJ(new_size__V2GH);
+            };
+            ((__POINTER *)next__YEKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__ZEKH)[ 0]=next__YEKH;
+          } else {
+            ((__POINTER *)result__0EKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YEKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__0EKH=next__YEKH;
+          };
+        };
+        ptr__2TGB=result__0EKH;
+      } else {
+        t__Z2GH=((__UINTEGER_32 )typ_id__BUGB);
+        a__Y2GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__BFKH=(__UINTEGER_32)((__UINTEGER_32)(sz__4TGB + a__Y2GH) & (__UINTEGER_32)(~ a__Y2GH));
+        ptr_table__4EKH=((__POINTER )(&(table_type[(t__Z2GH)])));
+        lab_type__AFKH=(__UINTEGER_32)(t__Z2GH |  1);
+        next__3EKH=((__POINTER )(NULL));
+        result__5EKH=((__POINTER *)ptr_table__4EKH)[ 0];
+        if ((result__5EKH == (void *)NULL)) {
+          result__5EKH=new_lab__FTJ(lab_type__AFKH);
+          next__3EKH=(void *)((unsigned long)result__5EKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BFKH)));
+          ((__POINTER *)next__3EKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__4EKH)[ 0]=next__3EKH;
+        } else {
+          next__3EKH=((__POINTER *)result__5EKH)[ 0];
+          if ((next__3EKH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__5EKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__BFKH <<  1)) <=  4096)) {
+              next__3EKH=(void *)((unsigned long)result__5EKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BFKH)));
             } else {
-              next__42JH=new_lab__ZPJ(lab_type__B3JH);
+              next__3EKH=new_lab__FTJ(lab_type__AFKH);
             };
-            ((__POINTER *)next__42JH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__52JH)[ 0]=next__42JH;
+            ((__POINTER *)next__3EKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__4EKH)[ 0]=next__3EKH;
           } else {
-            ((__POINTER *)result__A3JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__42JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__A3JH=next__42JH;
+            ((__POINTER *)result__5EKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3EKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__5EKH=next__3EKH;
           };
         };
-        ptr__QQGB=result__A3JH;
+        ptr__2TGB=result__5EKH;
       };
-      result__PQGB=((__ITM_OLD *)ptr__QQGB);
-      *(result__PQGB) = *(ITM_OLD__);
+      result__1TGB=((__ITM_OLD *)ptr__2TGB);
+      *(result__1TGB) = *(ITM_OLD__);
     };
-    ((__ITM_OLD *)result__PQGB)->parent_itm_code__4ZL.parent_itm_object__OBE.position__0BJ=p__Z35;
-    result__JZL=result__PQGB;
+    ((__ITM_OLD *)result__1TGB)->parent_itm_code__K3L.parent_itm_object__SEE.position__GFJ=p__FBAB;
+    result__V2L=result__1TGB;
   } else {
-    result__JZL=read_expr_primary__M1M(Self__UTL);
-    if (((void *)result__JZL == (void *)NULL)) {
-      result__JZL=read_send_msg__Q1N(Self__UTL,NULL);
+    result__V2L=read_expr_primary__Y4M(Self__AXL);
+    if (((void *)result__V2L == (void *)NULL)) {
+      result__V2L=read_send_msg__24N(Self__AXL,NULL);
     };
   };
-  result__WTL=result__JZL;
-  if (((void *)result__JZL != (void *)NULL)) {
-    while_do__MWM:
+  result__CXL=result__V2L;
+  if (((void *)result__V2L != (void *)NULL)) {
+    while_do__YZM:
     {
-      result__D3JH=FALSE__;
-      if ((! read_space__KSD())) {
-        result__D3JH=FALSE__;
+      result__CFKH=FALSE__;
+      if ((! read_space__MTD())) {
+        result__CFKH=FALSE__;
       } else {
-        result__E3JH='\0';
+        result__DFKH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__E3JH=((__CHARACTER )(( 0)));
+          result__DFKH=((__CHARACTER )(( 0)));
         } else {
-          result__E3JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+          result__DFKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__E3JH == '.')) {
+        if ((result__DFKH == '.')) {
           position__CCC=(__INTEGER)(position__CCC +  1);
-          result__D3JH=TRUE__;
+          result__CFKH=TRUE__;
         };
       };
-      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)) {
+      if (result__CFKH) {
+        result__CXL=read_send_msg__24N(Self__AXL,result__CXL);
+        if (((void *)result__CXL == (void *)NULL)) {
+          pos__H1ZG=current_position__EZF();
+          put_error__text__NPG( 0,(&__string_326));
+          put_position__XQG(pos__H1ZG);
+          put_string__P3F(msg_err__SPG);
+          if ((type_error__RPG !=  2)) {
             exit(( 1));
           };
         };
-        goto while_do__MWM;
+        goto while_do__YZM;
       };
     };
   };
-  return(result__WTL);
+  return(result__CXL);
 }
 
-static void free__FUI(void *tmp__HUI)
+static void free__RXI(void *tmp__TXI)
 // ({NULLxFAST_ARRAYoITM_CODEo}) VoidNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER new_capacity__FCU,__tmp__NDU,__tmp__3AEC,Self__FFVD;
+  __FAST_ARRAYoFAST_ARRAYoITM_CODEoo *Self__DCU;
+  __BOOLEAN __tmp__UCU;
+  void **__tmp__MDU,**new__JAEC;
+  ((__FAST_ARRAYoITM_CODEo *)tmp__TXI)->parent_arrayed_collection__MVF.upper__BJL=(__INTEGER)(-  1);
+  Self__DCU=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__EAI);
+  new_capacity__FCU= 0;
+  if (((__INTEGER)(Self__DCU->parent_arrayed_collection__DAI.upper__VYT +  1) <= (__INTEGER)(Self__DCU->parent_arrayed_collection__DAI.capacity__HCU -  1))) {
+    Self__DCU->parent_arrayed_collection__DAI.upper__VYT=(__INTEGER)(Self__DCU->parent_arrayed_collection__DAI.upper__VYT +  1);
+    __tmp__UCU=TRUE__;
   } else {
-    __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;
+    __tmp__UCU=FALSE__;
+  };
+  if ((! __tmp__UCU)) {
+    if ((Self__DCU->parent_arrayed_collection__DAI.capacity__HCU ==  0)) {
+      Self__DCU->parent_arrayed_collection__DAI.storage__DDU=create__Q3PB( 2);
+      Self__DCU->parent_arrayed_collection__DAI.capacity__HCU= 2;
+      Self__DCU->parent_arrayed_collection__DAI.upper__VYT= 0;
+    } else {
+      new_capacity__FCU=(__INTEGER)(Self__DCU->parent_arrayed_collection__DAI.capacity__HCU <<  1);
+      __tmp__MDU=Self__DCU->parent_arrayed_collection__DAI.storage__DDU;
+      __tmp__NDU=Self__DCU->parent_arrayed_collection__DAI.capacity__HCU;
+      new__JAEC=((void **)realloc_dynamic__old_size__new_size__ZHLC(((__POINTER )((void **)__tmp__MDU)),((__UINTEGER_32 )(__INTEGER)(__tmp__NDU * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__FCU * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__3AEC=(__INTEGER)(new_capacity__FCU -  1);
+      Self__FFVD=__tmp__NDU;
+      while ((Self__FFVD <= __tmp__3AEC)) {
+        new__JAEC[Self__FFVD]=NULL;
+        Self__FFVD=(__INTEGER)(Self__FFVD +  1);
+      };
+      Self__DCU->parent_arrayed_collection__DAI.storage__DDU=new__JAEC;
+      Self__DCU->parent_arrayed_collection__DAI.capacity__HCU=new_capacity__FCU;
+      Self__DCU->parent_arrayed_collection__DAI.upper__VYT=(__INTEGER)(Self__DCU->parent_arrayed_collection__DAI.upper__VYT +  1);
+    };
+  };
+  ((void **)Self__DCU->parent_arrayed_collection__DAI.storage__DDU)[Self__DCU->parent_arrayed_collection__DAI.upper__VYT]=tmp__TXI;
 }
 
-static void display_raw__NLIC(__ITM_TYPE_MULTI *Self__OLIC,void *buffer__PLIC)
+static void display_raw__1OIC(__ITM_TYPE_MULTI *Self__2OIC,void *buffer__3OIC)
 // ({ITM_TYPE_MULTI},{NULLxSTRING}) VoidRecursive, No inlinable.
 {
-  __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) {
+  __INTEGER __tmp__EPIC,Self__PORC;
+  void *__tmp__LPIC,*__tmp__OPIC;
+  __ITM_TYPE_STYLE *Self__4WEH,*Self__AXEH;
+  __FAST_ARRAYoITM_TYPE_MONOo *Self__I3GH;
+  __tmp__EPIC=(__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)Self__2OIC->list_type__QKP)->parent_arrayed_collection__EYC.upper__SIV -  1);
+  Self__PORC= 0;
+  while ((Self__PORC <= __tmp__EPIC)) {
+    __tmp__LPIC=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)Self__2OIC->list_type__QKP)->parent_arrayed_collection__EYC.storage__ZMV)[Self__PORC];
+    switch (((struct ___OBJ *)__tmp__LPIC)->__id) {
     case __ITM_TYPE_PARAMETER__: {
-      append__FLS(buffer__PLIC,((__ITM_TYPE_PARAMETER *)__tmp__3LIC)->parent_itm_type__UBE.name__OVP);
+      append__ROS(buffer__3OIC,((__ITM_TYPE_PARAMETER *)__tmp__LPIC)->parent_itm_type__YEE.name__0YP);
     } break;
     case __ITM_TYPE_SIMPLE__: {
-      append__FLS(buffer__PLIC,((__ITM_TYPE_SIMPLE *)__tmp__3LIC)->name__OVP);
+      append__ROS(buffer__3OIC,((__ITM_TYPE_SIMPLE *)__tmp__LPIC)->name__0YP);
     } break;
     case __ITM_TYPE_BLOCK__: {
-      append_in__0EPD(__tmp__3LIC,buffer__PLIC);
+      append_in__IIPD(__tmp__LPIC,buffer__3OIC);
     } break;
     case __ITM_TYPE_GENERIC__: {
-      append_in__4FPD(__tmp__3LIC,buffer__PLIC);
+      append_in__MJPD(__tmp__LPIC,buffer__3OIC);
     } break;
     case __ITM_TYPE_STYLE__: {
-      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,' ');
+      Self__4WEH=((__ITM_TYPE_STYLE *)__tmp__LPIC);
+      if (((void *)Self__4WEH->style__DZP != (void *)NULL)) {
+        append__ROS(buffer__3OIC,Self__4WEH->style__DZP);
+        add_last__GOT(buffer__3OIC,' ');
       };
-      append__FLS(buffer__PLIC,Self__IQEH->parent_itm_type_simple__FPN.name__OVP);
+      append__ROS(buffer__3OIC,Self__4WEH->parent_itm_type_simple__RSN.name__0YP);
     } break;
     };
-    add_last__3IT(buffer__PLIC,',');
-    Self__BLRC=(__INTEGER)(Self__BLRC +  1);
+    add_last__GOT(buffer__3OIC,',');
+    Self__PORC=(__INTEGER)(Self__PORC +  1);
   };
-  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) {
+  Self__I3GH=((__FAST_ARRAYoITM_TYPE_MONOo *)Self__2OIC->list_type__QKP);
+  __tmp__OPIC=((void **)Self__I3GH->parent_arrayed_collection__EYC.storage__ZMV)[Self__I3GH->parent_arrayed_collection__EYC.upper__SIV];
+  switch (((struct ___OBJ *)__tmp__OPIC)->__id) {
   case __ITM_TYPE_PARAMETER__: {
-    append__FLS(buffer__PLIC,((__ITM_TYPE_PARAMETER *)__tmp__AMIC)->parent_itm_type__UBE.name__OVP);
+    append__ROS(buffer__3OIC,((__ITM_TYPE_PARAMETER *)__tmp__OPIC)->parent_itm_type__YEE.name__0YP);
   } break;
   case __ITM_TYPE_SIMPLE__: {
-    append__FLS(buffer__PLIC,((__ITM_TYPE_SIMPLE *)__tmp__AMIC)->name__OVP);
+    append__ROS(buffer__3OIC,((__ITM_TYPE_SIMPLE *)__tmp__OPIC)->name__0YP);
   } break;
   case __ITM_TYPE_BLOCK__: {
-    append_in__0EPD(__tmp__AMIC,buffer__PLIC);
+    append_in__IIPD(__tmp__OPIC,buffer__3OIC);
   } break;
   case __ITM_TYPE_GENERIC__: {
-    append_in__4FPD(__tmp__AMIC,buffer__PLIC);
+    append_in__MJPD(__tmp__OPIC,buffer__3OIC);
   } break;
   case __ITM_TYPE_STYLE__: {
-    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,' ');
+    Self__AXEH=((__ITM_TYPE_STYLE *)__tmp__OPIC);
+    if (((void *)Self__AXEH->style__DZP != (void *)NULL)) {
+      append__ROS(buffer__3OIC,Self__AXEH->style__DZP);
+      add_last__GOT(buffer__3OIC,' ');
     };
-    append__FLS(buffer__PLIC,Self__KQEH->parent_itm_type_simple__FPN.name__OVP);
+    append__ROS(buffer__3OIC,Self__AXEH->parent_itm_type_simple__RSN.name__0YP);
   } break;
   };
 }
 
-static void put__to__like__TKGG(void *tok__VKGG,void *buf__WKGG,void *key__XKGG)
+static void put__to__like__0PGG(void *tok__2PGG,void *buf__3PGG,void *key__4PGG)
 // ({NULLxSTRING_CONSTANT},{NULLxSTRING},{STRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER __tmp__PQGG,Self__FBIG;
+  void *lst__5PGG;
+  lst__5PGG=NULL;
+  if (((void *)key__4PGG != (void *)NULL)) {
+    lst__5PGG=fast_reference_at__TLNE(short_dico__QD,key__4PGG);
+    if (((void *)lst__5PGG != (void *)NULL)) {
+      __tmp__PQGG=((__LINKED_LISToSTRING_CONSTANTo *)lst__5PGG)->parent_linked_collection__LD.upper__MED;
+      Self__FBIG= 1;
+      while ((Self__FBIG <= __tmp__PQGG)) {
+        if (((void *)item__Q2ND(lst__5PGG,Self__FBIG) == (void *)NULL)) {
+          append__ROS(buf__3PGG,tok__2PGG);
         } else {
-          append__FLS(buf__WKGG,item__CZND(lst__YKGG,Self__41HG));
+          append__ROS(buf__3PGG,item__Q2ND(lst__5PGG,Self__FBIG));
         };
-        Self__41HG=(__INTEGER)(Self__41HG +  1);
+        Self__FBIG=(__INTEGER)(Self__FBIG +  1);
       };
     };
   };
 }
 
-static void put__to__like__MRDG(void *tok__ORDG,void *buf__PRDG,void *key__QRDG)
+static void put__to__like__TWDG(void *tok__VWDG,void *buf__WWDG,void *key__XWDG)
 // ({NULLxSTRING_CONSTANT},{NULLxSTRING},{STRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER __tmp__IXDG,Self__3ZHG;
+  void *lst__YWDG;
+  lst__YWDG=NULL;
+  if (((void *)key__XWDG != (void *)NULL)) {
+    lst__YWDG=fast_reference_at__TLNE(short_dico__QD,key__XWDG);
+    if (((void *)lst__YWDG != (void *)NULL)) {
+      __tmp__IXDG=((__LINKED_LISToSTRING_CONSTANTo *)lst__YWDG)->parent_linked_collection__LD.upper__MED;
+      Self__3ZHG= 1;
+      while ((Self__3ZHG <= __tmp__IXDG)) {
+        if (((void *)item__Q2ND(lst__YWDG,Self__3ZHG) == (void *)NULL)) {
+          append__ROS(buf__WWDG,tok__VWDG);
         } else {
-          append__FLS(buf__PRDG,item__CZND(lst__RRDG,Self__WUHG));
+          append__ROS(buf__WWDG,item__Q2ND(lst__YWDG,Self__3ZHG));
         };
-        Self__WUHG=(__INTEGER)(Self__WUHG +  1);
+        Self__3ZHG=(__INTEGER)(Self__3ZHG +  1);
       };
     };
   };
 }
 
-static void put__to__like__FOFG(void *tok__HOFG,void *buf__IOFG)
+static void put__to__like__MTFG(void *tok__OTFG,void *buf__PTFG)
 // ({STRING_CONSTANT},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __INTEGER __tmp__0OFG,Self__JZHG;
-  void *lst__KOFG;
-  lst__KOFG=NULL;
+  __INTEGER __tmp__BUFG,Self__Q4HG;
+  void *lst__RTFG;
+  lst__RTFG=NULL;
   if (((void *)(&__string_133) != (void *)NULL)) {
-    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);
+    lst__RTFG=fast_reference_at__TLNE(short_dico__QD,(&__string_133));
+    if (((void *)lst__RTFG != (void *)NULL)) {
+      __tmp__BUFG=((__LINKED_LISToSTRING_CONSTANTo *)lst__RTFG)->parent_linked_collection__LD.upper__MED;
+      Self__Q4HG= 1;
+      while ((Self__Q4HG <= __tmp__BUFG)) {
+        if (((void *)item__Q2ND(lst__RTFG,Self__Q4HG) == (void *)NULL)) {
+          append__ROS(buf__PTFG,tok__OTFG);
         } else {
-          append__FLS(buf__IOFG,item__CZND(lst__KOFG,Self__JZHG));
+          append__ROS(buf__PTFG,item__Q2ND(lst__RTFG,Self__Q4HG));
         };
-        Self__JZHG=(__INTEGER)(Self__JZHG +  1);
+        Self__Q4HG=(__INTEGER)(Self__Q4HG +  1);
       };
     };
   };
 }
 
-static void put__to__like__YQFG(void *tok__0QFG,void *buf__1QFG,void *key__2QFG)
+static void put__to__like__5VFG(void *tok__BWFG,void *buf__CWFG,void *key__DWFG)
 // ({NULLxSTRING_CONSTANT},{NULLxSTRING},{STRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER __tmp__UWFG,Self__B5HG;
+  void *lst__EWFG;
+  lst__EWFG=NULL;
+  if (((void *)key__DWFG != (void *)NULL)) {
+    lst__EWFG=fast_reference_at__TLNE(short_dico__QD,key__DWFG);
+    if (((void *)lst__EWFG != (void *)NULL)) {
+      __tmp__UWFG=((__LINKED_LISToSTRING_CONSTANTo *)lst__EWFG)->parent_linked_collection__LD.upper__MED;
+      Self__B5HG= 1;
+      while ((Self__B5HG <= __tmp__UWFG)) {
+        if (((void *)item__Q2ND(lst__EWFG,Self__B5HG) == (void *)NULL)) {
+          append__ROS(buf__CWFG,tok__BWFG);
         } else {
-          append__FLS(buf__1QFG,item__CZND(lst__3QFG,Self__0ZHG));
+          append__ROS(buf__CWFG,item__Q2ND(lst__EWFG,Self__B5HG));
         };
-        Self__0ZHG=(__INTEGER)(Self__0ZHG +  1);
+        Self__B5HG=(__INTEGER)(Self__B5HG +  1);
       };
     };
   };
 }
 
-static __BOOLEAN is_hexadecimal_digit__GMJE(__CHARACTER Self__HMJE)
+static __BOOLEAN is_hexadecimal_digit__UPJE(__CHARACTER Self__VPJE)
 // ({CHARACTER}) With resultNo recursive, No inlinable.
 {
-  __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__;
+  __BOOLEAN result__XPJE,result__EXEH,__tmp__5PJE,__tmp__OQJE;
+  __BOOLEAN result__KIOE;
+  result__XPJE=FALSE__;
+  result__EXEH=FALSE__;
+  if ((((__INTEGER_8 )Self__VPJE) >= ((__INTEGER_8 )'0'))) {
+    result__EXEH=(((__INTEGER_8 )Self__VPJE) <= ((__INTEGER_8 )'9'));
+  };
+  if (result__EXEH) {
+    result__XPJE=TRUE__;
+    __tmp__5PJE=TRUE__;
   } else {
-    __tmp__RMJE=FALSE__;
+    __tmp__5PJE=FALSE__;
   };
-  if (__tmp__RMJE) {
-    __tmp__ANJE=TRUE__;
+  if (__tmp__5PJE) {
+    __tmp__OQJE=TRUE__;
   } else {
-    result__CEOE=(((__INTEGER_8 )Self__HMJE) >= ((__INTEGER_8 )'a'));
-    if (result__CEOE) {
-      result__JMJE=(((__INTEGER_8 )Self__HMJE) <= ((__INTEGER_8 )'f'));
+    result__KIOE=(((__INTEGER_8 )Self__VPJE) >= ((__INTEGER_8 )'a'));
+    if (result__KIOE) {
+      result__XPJE=(((__INTEGER_8 )Self__VPJE) <= ((__INTEGER_8 )'f'));
     };
-    __tmp__ANJE=result__CEOE;
+    __tmp__OQJE=result__KIOE;
   };
-  if ((! __tmp__ANJE)) {
-    if ((((__INTEGER_8 )Self__HMJE) >= ((__INTEGER_8 )'A'))) {
-      result__JMJE=(((__INTEGER_8 )Self__HMJE) <= ((__INTEGER_8 )'F'));
+  if ((! __tmp__OQJE)) {
+    if ((((__INTEGER_8 )Self__VPJE) >= ((__INTEGER_8 )'A'))) {
+      result__XPJE=(((__INTEGER_8 )Self__VPJE) <= ((__INTEGER_8 )'F'));
     };
   };
-  return(result__JMJE);
+  return(result__XPJE);
 }
 
-static void* read_constant__5NO()
+static void* read_constant__LRO()
 // () With resultNo recursive, No inlinable.
 {
-  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__KOBH='\0';
+  void *result__ORO;
+  __INTEGER pos_old__55O,typ_id__OQQ,typ_id__ARMB,old_pos__QCQ;
+  __INTEGER count__RCQ,typ_id__USMB,typ_id__IUMB;
+  __POSITION pos__EC0G,__tmp__WRO,__tmp__ISO,pos__ED0G,pos__GD0G;
+  __POSITION __tmp__0SO,__tmp__LTO;
+  __ITM_REAL *result__IQQ;
+  __POINTER ptr__JQQ,ptr_table__GFKH,next__FFKH,result__HFKH;
+  __POINTER ptr_table__LFKH,next__KFKH,result__MFKH,ptr__1QMB;
+  __POINTER ptr_table__QFKH,next__PFKH,result__RFKH,ptr_table__VFKH;
+  __POINTER next__UFKH,result__WFKH,ptr__PSMB,ptr_table__0FKH;
+  __POINTER next__ZFKH,result__1FKH,ptr_table__5FKH,next__4FKH;
+  __POINTER result__AGKH,ptr__DUMB,ptr_table__EGKH,next__DGKH;
+  __POINTER result__FGKH,ptr_table__JGKH,next__IGKH,result__KGKH;
+  __UINTEGER_32 sz__LQQ,a__M3GH,new_size__N3GH,t__R3GH,a__Q3GH;
+  __UINTEGER_32 new_size__OFKH,lab_type__NFKH,sz__3QMB,a__U3GH;
+  __UINTEGER_32 new_size__V3GH,t__Z3GH,a__Y3GH,new_size__YFKH;
+  __UINTEGER_32 lab_type__XFKH,sz__RSMB,a__23GH,new_size__33GH,t__B4GH;
+  __UINTEGER_32 a__A4GH,new_size__CGKH,lab_type__BGKH,sz__FUMB,a__E4GH;
+  __UINTEGER_32 new_size__F4GH,t__J4GH,a__I4GH,new_size__MGKH;
+  __UINTEGER_32 lab_type__LGKH;
+  __ITM_NUMBER *result__0QMB;
+  __ITM_CHARACTER *result__OSMB;
+  __ITM_STRING *result__CUMB;
+  __BOOLEAN result__45O,result__MXEH,__tmp__KAP,result__YXEH,__tmp__EBP;
+  __BOOLEAN result__QYEH,result__2YEH,__tmp__RDP,result__YZEH;
+  __BOOLEAN result__E0EH,__tmp__1RO,__tmp__NSO,result__RGP,__tmp__4SO;
+  __BOOLEAN result__PCQ,__tmp__1CQ,__tmp__0DQ,__tmp__1DQ;
+  __CHARACTER result__4UBH,result__IVBH,result__NVBH,result__SVBH;
+  __CHARACTER result__XVBH,result__2VBH,result__BWBH,result__GWBH;
+  __CHARACTER result__LWBH,result__QWBH,result__VWBH,result__0WBH;
+  __CHARACTER result__5WBH,result__EXBH,result__JXBH,result__OXBH;
+  __CHARACTER result__TXBH,result__YXBH,result__3XBH,result__CYBH;
+  __CHARACTER result__MYBH,result__VYBH,result__0YBH,result__5YBH;
+  __CHARACTER result__EZBH,result__JZBH;
+  result__ORO=NULL;
+  result__45O=FALSE__;
+  pos_old__55O= 0;
+  if (read_space__MTD()) {
+    result__4UBH='\0';
     if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-      result__KOBH=((__CHARACTER )(( 0)));
+      result__4UBH=((__CHARACTER )(( 0)));
     } else {
-      result__KOBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+      result__4UBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
     };
-    result__WQEH=FALSE__;
-    if ((((__INTEGER_8 )result__KOBH) >= ((__INTEGER_8 )'0'))) {
-      result__WQEH=(((__INTEGER_8 )result__KOBH) <= ((__INTEGER_8 )'9'));
+    result__MXEH=FALSE__;
+    if ((((__INTEGER_8 )result__4UBH) >= ((__INTEGER_8 )'0'))) {
+      result__MXEH=(((__INTEGER_8 )result__4UBH) <= ((__INTEGER_8 )'9'));
     };
-    __tmp__42O=result__WQEH;
+    __tmp__KAP=result__MXEH;
   } else {
-    __tmp__42O=FALSE__;
+    __tmp__KAP=FALSE__;
   };
-  if (__tmp__42O) {
+  if (__tmp__KAP) {
     ((__STRING *)string_tmp__VH)->count__EGC= 0;
-    result__UOBH='\0';
+    result__IVBH='\0';
     if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-      result__UOBH=((__CHARACTER )(( 0)));
+      result__IVBH=((__CHARACTER )(( 0)));
     } else {
-      result__UOBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+      result__IVBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
     };
-    add_last__3IT(string_tmp__VH,result__UOBH);
-    pos_old__T2O=position__CCC;
+    add_last__GOT(string_tmp__VH,result__IVBH);
+    pos_old__55O=position__CCC;
     position__CCC=(__INTEGER)(position__CCC +  1);
-    while_do__R5ZD:
+    while_do__5C0D:
     {
-      result__ZOBH='\0';
+      result__NVBH='\0';
       if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__ZOBH=((__CHARACTER )(( 0)));
+        result__NVBH=((__CHARACTER )(( 0)));
       } else {
-        result__ZOBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+        result__NVBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
       };
-      result__CREH=FALSE__;
-      if ((((__INTEGER_8 )result__ZOBH) >= ((__INTEGER_8 )'0'))) {
-        result__CREH=(((__INTEGER_8 )result__ZOBH) <= ((__INTEGER_8 )'9'));
+      result__YXEH=FALSE__;
+      if ((((__INTEGER_8 )result__NVBH) >= ((__INTEGER_8 )'0'))) {
+        result__YXEH=(((__INTEGER_8 )result__NVBH) <= ((__INTEGER_8 )'9'));
       };
-      if (result__CREH) {
-        __tmp__Y3O=TRUE__;
+      if (result__YXEH) {
+        __tmp__EBP=TRUE__;
       } else {
-        result__4OBH='\0';
+        result__SVBH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__4OBH=((__CHARACTER )(( 0)));
+          result__SVBH=((__CHARACTER )(( 0)));
         } else {
-          result__4OBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+          result__SVBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
         };
-        __tmp__Y3O=(result__4OBH == '_');
+        __tmp__EBP=(result__SVBH == '_');
       };
-      if (__tmp__Y3O) {
-        result__DPBH='\0';
+      if (__tmp__EBP) {
+        result__XVBH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__DPBH=((__CHARACTER )(( 0)));
+          result__XVBH=((__CHARACTER )(( 0)));
         } else {
-          result__DPBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+          result__XVBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__DPBH != '_')) {
-          result__IPBH='\0';
+        if ((result__XVBH != '_')) {
+          result__2VBH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__IPBH=((__CHARACTER )(( 0)));
+            result__2VBH=((__CHARACTER )(( 0)));
           } else {
-            result__IPBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+            result__2VBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
           };
-          add_last__3IT(string_tmp__VH,result__IPBH);
+          add_last__GOT(string_tmp__VH,result__2VBH);
         };
         position__CCC=(__INTEGER)(position__CCC +  1);
-        goto while_do__R5ZD;
+        goto while_do__5C0D;
       };
     };
-    result__NPBH='\0';
+    result__BWBH='\0';
     if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-      result__NPBH=((__CHARACTER )(( 0)));
+      result__BWBH=((__CHARACTER )(( 0)));
     } else {
-      result__NPBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+      result__BWBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
     };
-    if ((result__NPBH == '.')) {
-      add_last__3IT(string_tmp__VH,'.');
+    if ((result__BWBH == '.')) {
+      add_last__GOT(string_tmp__VH,'.');
       position__CCC=(__INTEGER)(position__CCC +  1);
-      result__SPBH='\0';
+      result__GWBH='\0';
       if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__SPBH=((__CHARACTER )(( 0)));
+        result__GWBH=((__CHARACTER )(( 0)));
       } else {
-        result__SPBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+        result__GWBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
       };
-      result__0REH=FALSE__;
-      if ((((__INTEGER_8 )result__SPBH) >= ((__INTEGER_8 )'0'))) {
-        result__0REH=(((__INTEGER_8 )result__SPBH) <= ((__INTEGER_8 )'9'));
+      result__QYEH=FALSE__;
+      if ((((__INTEGER_8 )result__GWBH) >= ((__INTEGER_8 )'0'))) {
+        result__QYEH=(((__INTEGER_8 )result__GWBH) <= ((__INTEGER_8 )'9'));
       };
-      if (result__0REH) {
-        result__S2O=TRUE__;
-        result__XPBH='\0';
+      if (result__QYEH) {
+        result__45O=TRUE__;
+        result__LWBH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__XPBH=((__CHARACTER )(( 0)));
+          result__LWBH=((__CHARACTER )(( 0)));
         } else {
-          result__XPBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+          result__LWBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
         };
-        add_last__3IT(string_tmp__VH,result__XPBH);
+        add_last__GOT(string_tmp__VH,result__LWBH);
         position__CCC=(__INTEGER)(position__CCC +  1);
-        while_do__GOPE:
+        while_do__OSPE:
         {
-          result__2PBH='\0';
+          result__QWBH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__2PBH=((__CHARACTER )(( 0)));
+            result__QWBH=((__CHARACTER )(( 0)));
           } else {
-            result__2PBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+            result__QWBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
           };
-          result__GSEH=FALSE__;
-          if ((((__INTEGER_8 )result__2PBH) >= ((__INTEGER_8 )'0'))) {
-            result__GSEH=(((__INTEGER_8 )result__2PBH) <= ((__INTEGER_8 )'9'));
+          result__2YEH=FALSE__;
+          if ((((__INTEGER_8 )result__QWBH) >= ((__INTEGER_8 )'0'))) {
+            result__2YEH=(((__INTEGER_8 )result__QWBH) <= ((__INTEGER_8 )'9'));
           };
-          if (result__GSEH) {
-            result__BQBH='\0';
+          if (result__2YEH) {
+            result__VWBH='\0';
             if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-              result__BQBH=((__CHARACTER )(( 0)));
+              result__VWBH=((__CHARACTER )(( 0)));
             } else {
-              result__BQBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+              result__VWBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
             };
-            add_last__3IT(string_tmp__VH,result__BQBH);
+            add_last__GOT(string_tmp__VH,result__VWBH);
             position__CCC=(__INTEGER)(position__CCC +  1);
-            goto while_do__GOPE;
+            goto while_do__OSPE;
           };
         };
       };
-      result__GQBH='\0';
+      result__0WBH='\0';
       if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__GQBH=((__CHARACTER )(( 0)));
+        result__0WBH=((__CHARACTER )(( 0)));
       } else {
-        result__GQBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+        result__0WBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__GQBH == 'E')) {
-        result__S2O=TRUE__;
-        add_last__3IT(string_tmp__VH,'E');
+      if ((result__0WBH == 'E')) {
+        result__45O=TRUE__;
+        add_last__GOT(string_tmp__VH,'E');
         position__CCC=(__INTEGER)(position__CCC +  1);
-        result__LQBH='\0';
+        result__5WBH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__LQBH=((__CHARACTER )(( 0)));
+          result__5WBH=((__CHARACTER )(( 0)));
         } else {
-          result__LQBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+          result__5WBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__LQBH == '+')) {
-          __tmp__FAP=TRUE__;
+        if ((result__5WBH == '+')) {
+          __tmp__RDP=TRUE__;
         } else {
-          result__QQBH='\0';
+          result__EXBH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__QQBH=((__CHARACTER )(( 0)));
+            result__EXBH=((__CHARACTER )(( 0)));
           } else {
-            result__QQBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+            result__EXBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
           };
-          __tmp__FAP=(result__QQBH == '-');
+          __tmp__RDP=(result__EXBH == '-');
         };
-        if (__tmp__FAP) {
-          result__VQBH='\0';
+        if (__tmp__RDP) {
+          result__JXBH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__VQBH=((__CHARACTER )(( 0)));
+            result__JXBH=((__CHARACTER )(( 0)));
           } else {
-            result__VQBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+            result__JXBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
           };
-          add_last__3IT(string_tmp__VH,result__VQBH);
+          add_last__GOT(string_tmp__VH,result__JXBH);
           position__CCC=(__INTEGER)(position__CCC +  1);
         };
-        result__0QBH='\0';
+        result__OXBH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__0QBH=((__CHARACTER )(( 0)));
+          result__OXBH=((__CHARACTER )(( 0)));
         } else {
-          result__0QBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+          result__OXBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
         };
-        result__CTEH=FALSE__;
-        if ((((__INTEGER_8 )result__0QBH) >= ((__INTEGER_8 )'0'))) {
-          result__CTEH=(((__INTEGER_8 )result__0QBH) <= ((__INTEGER_8 )'9'));
+        result__YZEH=FALSE__;
+        if ((((__INTEGER_8 )result__OXBH) >= ((__INTEGER_8 )'0'))) {
+          result__YZEH=(((__INTEGER_8 )result__OXBH) <= ((__INTEGER_8 )'9'));
         };
-        if (result__CTEH) {
-          result__5QBH='\0';
+        if (result__YZEH) {
+          result__TXBH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__5QBH=((__CHARACTER )(( 0)));
+            result__TXBH=((__CHARACTER )(( 0)));
           } else {
-            result__5QBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+            result__TXBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
           };
-          add_last__3IT(string_tmp__VH,result__5QBH);
+          add_last__GOT(string_tmp__VH,result__TXBH);
           position__CCC=(__INTEGER)(position__CCC +  1);
-          while_do__JJRE:
+          while_do__2NRE:
           {
-            result__ERBH='\0';
+            result__YXBH='\0';
             if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-              result__ERBH=((__CHARACTER )(( 0)));
+              result__YXBH=((__CHARACTER )(( 0)));
             } else {
-              result__ERBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+              result__YXBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
             };
-            result__OTEH=FALSE__;
-            if ((((__INTEGER_8 )result__ERBH) >= ((__INTEGER_8 )'0'))) {
-              result__OTEH=(((__INTEGER_8 )result__ERBH) <= ((__INTEGER_8 )'9'));
+            result__E0EH=FALSE__;
+            if ((((__INTEGER_8 )result__YXBH) >= ((__INTEGER_8 )'0'))) {
+              result__E0EH=(((__INTEGER_8 )result__YXBH) <= ((__INTEGER_8 )'9'));
             };
-            if (result__OTEH) {
-              result__JRBH='\0';
+            if (result__E0EH) {
+              result__3XBH='\0';
               if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                result__JRBH=((__CHARACTER )(( 0)));
+                result__3XBH=((__CHARACTER )(( 0)));
               } else {
-                result__JRBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+                result__3XBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
               };
-              add_last__3IT(string_tmp__VH,result__JRBH);
+              add_last__GOT(string_tmp__VH,result__3XBH);
               position__CCC=(__INTEGER)(position__CCC +  1);
-              goto while_do__JJRE;
+              goto while_do__2NRE;
             };
           };
         } else {
-          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)) {
+          pos__EC0G=current_position__EZF();
+          put_error__text__NPG( 0,(&__string_327));
+          put_position__XQG(pos__EC0G);
+          put_string__P3F(msg_err__SPG);
+          if ((type_error__RPG !=  2)) {
             exit(( 1));
           };
         };
       };
     };
-    if (result__S2O) {
+    if (result__45O) {
       get__YWB(string_tmp__VH);
     } else {
-      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)));
+      position__CCC=pos_old__55O;
+    };
+  };
+  if (result__45O) {
+    short__token__to__YCD((&__string_121),pos_old__55O,position__CCC);
+  };
+  if (result__45O) {
+    __tmp__WRO=current_position__EZF();
+    result__IQQ=NULL;
+    ptr__JQQ=((__POINTER )(NULL));
+    typ_id__OQQ= 0;
+    sz__LQQ=((__UINTEGER_32 )sizeof(__ITM_REAL));
+    if ((sz__LQQ ==  0)) {
+      result__IQQ=ITM_REAL__;
+    } else {
+      typ_id__OQQ=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__LQQ);
+      if ((typ_id__OQQ == (__INTEGER)(-  1))) {
+        a__M3GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__N3GH=(__UINTEGER_32)((__UINTEGER_32)(sz__LQQ + a__M3GH) & (__UINTEGER_32)(~ a__M3GH));
+        ptr_table__GFKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__N3GH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__FFKH=((__POINTER )(NULL));
+        result__HFKH=((__POINTER *)ptr_table__GFKH)[ 0];
+        if ((result__HFKH == (void *)NULL)) {
+          result__HFKH=new_lab__FTJ(new_size__N3GH);
+          next__FFKH=(void *)((unsigned long)result__HFKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__N3GH)));
+          ((__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__SXH)))) &  4095) + (__UINTEGER_32)(new_size__N3GH <<  1)) <=  4096)) {
+              next__FFKH=(void *)((unsigned long)result__HFKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__N3GH)));
             } else {
-              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)));
+              next__FFKH=new_lab__FTJ(new_size__N3GH);
+            };
+            ((__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__JQQ=result__HFKH;
+      } else {
+        t__R3GH=((__UINTEGER_32 )typ_id__OQQ);
+        a__Q3GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__OFKH=(__UINTEGER_32)((__UINTEGER_32)(sz__LQQ + a__Q3GH) & (__UINTEGER_32)(~ a__Q3GH));
+        ptr_table__LFKH=((__POINTER )(&(table_type[(t__R3GH)])));
+        lab_type__NFKH=(__UINTEGER_32)(t__R3GH |  1);
+        next__KFKH=((__POINTER )(NULL));
+        result__MFKH=((__POINTER *)ptr_table__LFKH)[ 0];
+        if ((result__MFKH == (void *)NULL)) {
+          result__MFKH=new_lab__FTJ(lab_type__NFKH);
+          next__KFKH=(void *)((unsigned long)result__MFKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OFKH)));
+          ((__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__SXH)))) &  4095) + (__UINTEGER_32)(new_size__OFKH <<  1)) <=  4096)) {
+              next__KFKH=(void *)((unsigned long)result__MFKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OFKH)));
             } else {
-              next__L3JH=new_lab__ZPJ(lab_type__O3JH);
+              next__KFKH=new_lab__FTJ(lab_type__NFKH);
             };
-            ((__POINTER *)next__L3JH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__M3JH)[ 0]=next__L3JH;
+            ((__POINTER *)next__KFKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__LFKH)[ 0]=next__KFKH;
           } else {
-            ((__POINTER *)result__N3JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__L3JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__N3JH=next__L3JH;
+            ((__POINTER *)result__MFKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KFKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__MFKH=next__KFKH;
           };
         };
-        ptr__3MQ=result__N3JH;
+        ptr__JQQ=result__MFKH;
       };
-      result__2MQ=((__ITM_REAL *)ptr__3MQ);
-      *(result__2MQ) = *(ITM_REAL__);
+      result__IQQ=((__ITM_REAL *)ptr__JQQ);
+      *(result__IQQ) = *(ITM_REAL__);
     };
-    ((__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__;
+    ((__ITM_REAL *)result__IQQ)->parent_itm_constant__VRO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ=__tmp__WRO;
+    result__ORO=result__IQQ;
+    __tmp__1RO=TRUE__;
   } else {
-    __tmp__POO=FALSE__;
+    __tmp__1RO=FALSE__;
   };
-  if (__tmp__POO) {
-    __tmp__BPO=TRUE__;
+  if (__tmp__1RO) {
+    __tmp__NSO=TRUE__;
   } else {
-    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)));
+    result__RGP=read_integer__Q2P();
+    if (result__RGP) {
+      __tmp__ISO=current_position__EZF();
+      result__0QMB=NULL;
+      ptr__1QMB=((__POINTER )(NULL));
+      typ_id__ARMB= 0;
+      sz__3QMB=((__UINTEGER_32 )sizeof(__ITM_NUMBER));
+      if ((sz__3QMB ==  0)) {
+        result__0QMB=ITM_NUMBER__;
+      } else {
+        typ_id__ARMB=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__3QMB);
+        if ((typ_id__ARMB == (__INTEGER)(-  1))) {
+          a__U3GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__V3GH=(__UINTEGER_32)((__UINTEGER_32)(sz__3QMB + a__U3GH) & (__UINTEGER_32)(~ a__U3GH));
+          ptr_table__QFKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__V3GH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__PFKH=((__POINTER )(NULL));
+          result__RFKH=((__POINTER *)ptr_table__QFKH)[ 0];
+          if ((result__RFKH == (void *)NULL)) {
+            result__RFKH=new_lab__FTJ(new_size__V3GH);
+            next__PFKH=(void *)((unsigned long)result__RFKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__V3GH)));
+            ((__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__SXH)))) &  4095) + (__UINTEGER_32)(new_size__V3GH <<  1)) <=  4096)) {
+                next__PFKH=(void *)((unsigned long)result__RFKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__V3GH)));
               } else {
-                next__Q3JH=new_lab__ZPJ(new_size__0WGH);
+                next__PFKH=new_lab__FTJ(new_size__V3GH);
               };
-              ((__POINTER *)next__Q3JH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__R3JH)[ 0]=next__Q3JH;
+              ((__POINTER *)next__PFKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__QFKH)[ 0]=next__PFKH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__RFKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PFKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__RFKH=next__PFKH;
+            };
+          };
+          ptr__1QMB=result__RFKH;
+        } else {
+          t__Z3GH=((__UINTEGER_32 )typ_id__ARMB);
+          a__Y3GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__YFKH=(__UINTEGER_32)((__UINTEGER_32)(sz__3QMB + a__Y3GH) & (__UINTEGER_32)(~ a__Y3GH));
+          ptr_table__VFKH=((__POINTER )(&(table_type[(t__Z3GH)])));
+          lab_type__XFKH=(__UINTEGER_32)(t__Z3GH |  1);
+          next__UFKH=((__POINTER )(NULL));
+          result__WFKH=((__POINTER *)ptr_table__VFKH)[ 0];
+          if ((result__WFKH == (void *)NULL)) {
+            result__WFKH=new_lab__FTJ(lab_type__XFKH);
+            next__UFKH=(void *)((unsigned long)result__WFKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YFKH)));
+            ((__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__SXH)))) &  4095) + (__UINTEGER_32)(new_size__YFKH <<  1)) <=  4096)) {
+                next__UFKH=(void *)((unsigned long)result__WFKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YFKH)));
               } else {
-                next__V3JH=new_lab__ZPJ(lab_type__Y3JH);
+                next__UFKH=new_lab__FTJ(lab_type__XFKH);
               };
-              ((__POINTER *)next__V3JH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__W3JH)[ 0]=next__V3JH;
+              ((__POINTER *)next__UFKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__VFKH)[ 0]=next__UFKH;
             } else {
-              ((__POINTER *)result__X3JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__V3JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__X3JH=next__V3JH;
+              ((__POINTER *)result__WFKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UFKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__WFKH=next__UFKH;
             };
           };
-          ptr__PNMB=result__X3JH;
+          ptr__1QMB=result__WFKH;
         };
-        result__ONMB=((__ITM_NUMBER *)ptr__PNMB);
-        *(result__ONMB) = *(ITM_NUMBER__);
+        result__0QMB=((__ITM_NUMBER *)ptr__1QMB);
+        *(result__0QMB) = *(ITM_NUMBER__);
       };
-      ((__ITM_NUMBER *)result__ONMB)->parent_itm_constant__1OO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ=__tmp__2OO;
-      result__COO=result__ONMB;
+      ((__ITM_NUMBER *)result__0QMB)->parent_itm_constant__HSO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ=__tmp__ISO;
+      result__ORO=result__0QMB;
     };
-    __tmp__BPO=result__FDP;
+    __tmp__NSO=result__RGP;
   };
-  if (__tmp__BPO) {
-    __tmp__SPO=TRUE__;
+  if (__tmp__NSO) {
+    __tmp__4SO=TRUE__;
   } else {
-    result__D5P=FALSE__;
-    old_pos__E5P= 0;
-    count__F5P= 0;
-    if (read_space__KSD()) {
-      result__ORBH='\0';
+    result__PCQ=FALSE__;
+    old_pos__QCQ= 0;
+    count__RCQ= 0;
+    if (read_space__MTD()) {
+      result__CYBH='\0';
       if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__ORBH=((__CHARACTER )(( 0)));
+        result__CYBH=((__CHARACTER )(( 0)));
       } else {
-        result__ORBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+        result__CYBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
       };
-      __tmp__P5P=(result__ORBH == '\'');
+      __tmp__1CQ=(result__CYBH == '\'');
     } else {
-      __tmp__P5P=FALSE__;
+      __tmp__1CQ=FALSE__;
     };
-    if (__tmp__P5P) {
-      old_pos__E5P=position__CCC;
+    if (__tmp__1CQ) {
+      old_pos__QCQ=position__CCC;
       position__CCC=(__INTEGER)(position__CCC +  1);
       ((__STRING *)string_tmp__VH)->count__EGC= 0;
-      until_do__SJRC:
+      until_do__ANRC:
       {
-        result__YRBH='\0';
+        result__MYBH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__YRBH=((__CHARACTER )(( 0)));
+          result__MYBH=((__CHARACTER )(( 0)));
         } else {
-          result__YRBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+          result__MYBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__YRBH == ((__CHARACTER )(( 0))))) {
-          __tmp__OAQ=TRUE__;
+        if ((result__MYBH == ((__CHARACTER )(( 0))))) {
+          __tmp__0DQ=TRUE__;
         } else {
-          result__BSBH='\0';
+          result__VYBH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__BSBH=((__CHARACTER )(( 0)));
+            result__VYBH=((__CHARACTER )(( 0)));
           } else {
-            result__BSBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+            result__VYBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
           };
-          __tmp__OAQ=(result__BSBH == '\n');
+          __tmp__0DQ=(result__VYBH == '\n');
         };
-        if (__tmp__OAQ) {
-          __tmp__PAQ=TRUE__;
+        if (__tmp__0DQ) {
+          __tmp__1DQ=TRUE__;
         } else {
-          result__GSBH='\0';
+          result__0YBH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__GSBH=((__CHARACTER )(( 0)));
+            result__0YBH=((__CHARACTER )(( 0)));
           } else {
-            result__GSBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+            result__0YBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
           };
-          __tmp__PAQ=(result__GSBH == '\'');
+          __tmp__1DQ=(result__0YBH == '\'');
         };
-        if ((! __tmp__PAQ)) {
-          result__LSBH='\0';
+        if ((! __tmp__1DQ)) {
+          result__5YBH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__LSBH=((__CHARACTER )(( 0)));
+            result__5YBH=((__CHARACTER )(( 0)));
           } else {
-            result__LSBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+            result__5YBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
           };
-          add_last__3IT(string_tmp__VH,result__LSBH);
-          result__QSBH='\0';
+          add_last__GOT(string_tmp__VH,result__5YBH);
+          result__EZBH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__QSBH=((__CHARACTER )(( 0)));
+            result__EZBH=((__CHARACTER )(( 0)));
           } else {
-            result__QSBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+            result__EZBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__QSBH == '\\')) {
+          if ((result__EZBH == '\\')) {
             position__CCC=(__INTEGER)(position__CCC +  1);
-            read_escape_character__AZKF();
-            count__F5P=(__INTEGER)(count__F5P +  1);
+            read_escape_character__G4KF();
+            count__RCQ=(__INTEGER)(count__RCQ +  1);
           } else {
             position__CCC=(__INTEGER)(position__CCC +  1);
-            count__F5P=(__INTEGER)(count__F5P +  1);
+            count__RCQ=(__INTEGER)(count__RCQ +  1);
           };
-          goto until_do__SJRC;
+          goto until_do__ANRC;
         };
       };
-      result__VSBH='\0';
+      result__JZBH='\0';
       if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__VSBH=((__CHARACTER )(( 0)));
+        result__JZBH=((__CHARACTER )(( 0)));
       } else {
-        result__VSBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+        result__JZBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__VSBH == '\'')) {
+      if ((result__JZBH == '\'')) {
         position__CCC=(__INTEGER)(position__CCC +  1);
-        last_string__V0C=get__YWB(string_tmp__VH);
-        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)) {
+        last_string__V1C=get__YWB(string_tmp__VH);
+        if ((count__RCQ !=  1)) {
+          position__CCC=begin_position__ECE;
+          pos__ED0G=current_position__EZF();
+          put_error__text__NPG( 0,(&__string_328));
+          put_position__XQG(pos__ED0G);
+          put_string__P3F(msg_err__SPG);
+          if ((type_error__RPG !=  2)) {
             exit(( 1));
           };
         };
-        result__D5P=TRUE__;
-        short__token__to__YBD((&__string_122),old_pos__E5P,position__CCC);
+        result__PCQ=TRUE__;
+        short__token__to__YCD((&__string_122),old_pos__QCQ,position__CCC);
       } else {
-        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)) {
+        position__CCC=begin_position__ECE;
+        pos__GD0G=current_position__EZF();
+        put_error__text__NPG( 0,(&__string_329));
+        put_position__XQG(pos__GD0G);
+        put_string__P3F(msg_err__SPG);
+        if ((type_error__RPG !=  2)) {
           exit(( 1));
         };
       };
     };
-    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)));
+    if (result__PCQ) {
+      __tmp__0SO=current_position__EZF();
+      result__OSMB=NULL;
+      ptr__PSMB=((__POINTER )(NULL));
+      typ_id__USMB= 0;
+      sz__RSMB=((__UINTEGER_32 )sizeof(__ITM_CHARACTER));
+      if ((sz__RSMB ==  0)) {
+        result__OSMB=ITM_CHARACTER__;
+      } else {
+        typ_id__USMB=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__RSMB);
+        if ((typ_id__USMB == (__INTEGER)(-  1))) {
+          a__23GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__33GH=(__UINTEGER_32)((__UINTEGER_32)(sz__RSMB + a__23GH) & (__UINTEGER_32)(~ a__23GH));
+          ptr_table__0FKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__33GH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__ZFKH=((__POINTER )(NULL));
+          result__1FKH=((__POINTER *)ptr_table__0FKH)[ 0];
+          if ((result__1FKH == (void *)NULL)) {
+            result__1FKH=new_lab__FTJ(new_size__33GH);
+            next__ZFKH=(void *)((unsigned long)result__1FKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__33GH)));
+            ((__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__SXH)))) &  4095) + (__UINTEGER_32)(new_size__33GH <<  1)) <=  4096)) {
+                next__ZFKH=(void *)((unsigned long)result__1FKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__33GH)));
               } else {
-                next__03JH=new_lab__ZPJ(new_size__CXGH);
+                next__ZFKH=new_lab__FTJ(new_size__33GH);
               };
-              ((__POINTER *)next__03JH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__13JH)[ 0]=next__03JH;
+              ((__POINTER *)next__ZFKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__0FKH)[ 0]=next__ZFKH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__1FKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZFKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__1FKH=next__ZFKH;
+            };
+          };
+          ptr__PSMB=result__1FKH;
+        } else {
+          t__B4GH=((__UINTEGER_32 )typ_id__USMB);
+          a__A4GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__CGKH=(__UINTEGER_32)((__UINTEGER_32)(sz__RSMB + a__A4GH) & (__UINTEGER_32)(~ a__A4GH));
+          ptr_table__5FKH=((__POINTER )(&(table_type[(t__B4GH)])));
+          lab_type__BGKH=(__UINTEGER_32)(t__B4GH |  1);
+          next__4FKH=((__POINTER )(NULL));
+          result__AGKH=((__POINTER *)ptr_table__5FKH)[ 0];
+          if ((result__AGKH == (void *)NULL)) {
+            result__AGKH=new_lab__FTJ(lab_type__BGKH);
+            next__4FKH=(void *)((unsigned long)result__AGKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CGKH)));
+            ((__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__SXH)))) &  4095) + (__UINTEGER_32)(new_size__CGKH <<  1)) <=  4096)) {
+                next__4FKH=(void *)((unsigned long)result__AGKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CGKH)));
               } else {
-                next__53JH=new_lab__ZPJ(lab_type__C4JH);
+                next__4FKH=new_lab__FTJ(lab_type__BGKH);
               };
-              ((__POINTER *)next__53JH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__A4JH)[ 0]=next__53JH;
+              ((__POINTER *)next__4FKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__5FKH)[ 0]=next__4FKH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__AGKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4FKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__AGKH=next__4FKH;
+            };
+          };
+          ptr__PSMB=result__AGKH;
+        };
+        result__OSMB=((__ITM_CHARACTER *)ptr__PSMB);
+        *(result__OSMB) = *(ITM_CHARACTER__);
+      };
+      ((__ITM_CHARACTER *)result__OSMB)->parent_itm_constant__ZSO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ=__tmp__0SO;
+      result__ORO=result__OSMB;
+    };
+    __tmp__4SO=result__PCQ;
+  };
+  if ((! __tmp__4SO)) {
+    if (read_string__1FQ()) {
+      __tmp__LTO=current_position__EZF();
+      result__CUMB=NULL;
+      ptr__DUMB=((__POINTER )(NULL));
+      typ_id__IUMB= 0;
+      sz__FUMB=((__UINTEGER_32 )sizeof(__ITM_STRING));
+      if ((sz__FUMB ==  0)) {
+        result__CUMB=ITM_STRING__;
+      } else {
+        typ_id__IUMB=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__FUMB);
+        if ((typ_id__IUMB == (__INTEGER)(-  1))) {
+          a__E4GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__F4GH=(__UINTEGER_32)((__UINTEGER_32)(sz__FUMB + a__E4GH) & (__UINTEGER_32)(~ a__E4GH));
+          ptr_table__EGKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__F4GH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__DGKH=((__POINTER )(NULL));
+          result__FGKH=((__POINTER *)ptr_table__EGKH)[ 0];
+          if ((result__FGKH == (void *)NULL)) {
+            result__FGKH=new_lab__FTJ(new_size__F4GH);
+            next__DGKH=(void *)((unsigned long)result__FGKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__F4GH)));
+            ((__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__SXH)))) &  4095) + (__UINTEGER_32)(new_size__F4GH <<  1)) <=  4096)) {
+                next__DGKH=(void *)((unsigned long)result__FGKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__F4GH)));
               } else {
-                next__E4JH=new_lab__ZPJ(new_size__KXGH);
+                next__DGKH=new_lab__FTJ(new_size__F4GH);
               };
-              ((__POINTER *)next__E4JH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__F4JH)[ 0]=next__E4JH;
+              ((__POINTER *)next__DGKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__EGKH)[ 0]=next__DGKH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__FGKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DGKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__FGKH=next__DGKH;
+            };
+          };
+          ptr__DUMB=result__FGKH;
+        } else {
+          t__J4GH=((__UINTEGER_32 )typ_id__IUMB);
+          a__I4GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__MGKH=(__UINTEGER_32)((__UINTEGER_32)(sz__FUMB + a__I4GH) & (__UINTEGER_32)(~ a__I4GH));
+          ptr_table__JGKH=((__POINTER )(&(table_type[(t__J4GH)])));
+          lab_type__LGKH=(__UINTEGER_32)(t__J4GH |  1);
+          next__IGKH=((__POINTER )(NULL));
+          result__KGKH=((__POINTER *)ptr_table__JGKH)[ 0];
+          if ((result__KGKH == (void *)NULL)) {
+            result__KGKH=new_lab__FTJ(lab_type__LGKH);
+            next__IGKH=(void *)((unsigned long)result__KGKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MGKH)));
+            ((__POINTER *)next__IGKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__JGKH)[ 0]=next__IGKH;
+          } else {
+            next__IGKH=((__POINTER *)result__KGKH)[ 0];
+            if ((next__IGKH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__KGKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__MGKH <<  1)) <=  4096)) {
+                next__IGKH=(void *)((unsigned long)result__KGKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MGKH)));
               } else {
-                next__J4JH=new_lab__ZPJ(lab_type__M4JH);
+                next__IGKH=new_lab__FTJ(lab_type__LGKH);
               };
-              ((__POINTER *)next__J4JH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__K4JH)[ 0]=next__J4JH;
+              ((__POINTER *)next__IGKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__JGKH)[ 0]=next__IGKH;
             } else {
-              ((__POINTER *)result__L4JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__J4JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__L4JH=next__J4JH;
+              ((__POINTER *)result__KGKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__IGKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__KGKH=next__IGKH;
             };
           };
-          ptr__XQMB=result__L4JH;
+          ptr__DUMB=result__KGKH;
         };
-        result__WQMB=((__ITM_STRING *)ptr__XQMB);
-        *(result__WQMB) = *(ITM_STRING__);
+        result__CUMB=((__ITM_STRING *)ptr__DUMB);
+        *(result__CUMB) = *(ITM_STRING__);
       };
-      ((__ITM_STRING *)result__WQMB)->parent_itm_constant__4PO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ=__tmp__5PO;
-      result__COO=result__WQMB;
+      ((__ITM_STRING *)result__CUMB)->parent_itm_constant__KTO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ=__tmp__LTO;
+      result__ORO=result__CUMB;
     };
   };
-  return(result__COO);
+  return(result__ORO);
 }
 
-static void* read_group__H4GB(__PARSER *Self__I4GB)
+static void* read_group__TBHB(__PARSER *Self__UBHB)
 // ({PARSER}) With resultNo recursive, No inlinable.
 {
-  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);
+  void *e__WBHB;
+  __ITM_RESULT *result__TGKH,*result__TZWB;
+  __POINTER ptr__UGKH,ptr_table__3GKH,next__2GKH,result__4GKH;
+  __POINTER ptr_table__CHKH,next__BHKH,result__DHKH,ptr__UZWB;
+  __POINTER ptr_table__NHKH,next__MHKH,result__OHKH,ptr_table__SHKH;
+  __POINTER next__RHKH,result__THKH;
+  __INTEGER typ_id__VGKH,typ_id__ZZWB;
+  __UINTEGER_32 sz__WGKH,a__XGKH,new_size__YGKH,t__ZGKH,a__0GKH;
+  __UINTEGER_32 new_size__FHKH,lab_type__EHKH,sz__WZWB,a__TBHH;
+  __UINTEGER_32 new_size__UBHH,t__YBHH,a__XBHH,new_size__VHKH;
+  __UINTEGER_32 lab_type__UHKH;
+  __POSITION pos__UD0G;
+  void *result__PZHH,*result__XBHB;
+  __FAST_ARRAYoFAST_ARRAYoITM_CODEoo *Self__QZHH,*Self__RZHH;
+  __BOOLEAN result__NGKH,__tmp__GCHB,result__QGKH,result__GHKH;
+  __BOOLEAN __tmp__NDHB,result__JHKH;
+  __CHARACTER result__OGKH,result__RGKH,result__HHKH,result__KHKH;
+  read_def_local__A3H(Self__UBHB);
+  result__PZHH=NULL;
+  if ((((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__EAI)->parent_arrayed_collection__DAI.upper__VYT <  0)) {
+    result__PZHH=create_with_capacity__LXI( 16);
   } else {
-    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:
+    Self__QZHH=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__EAI);
+    result__PZHH=((void **)Self__QZHH->parent_arrayed_collection__DAI.storage__DDU)[Self__QZHH->parent_arrayed_collection__DAI.upper__VYT];
+    Self__RZHH=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__EAI);
+    Self__RZHH->parent_arrayed_collection__DAI.upper__VYT=(__INTEGER)(Self__RZHH->parent_arrayed_collection__DAI.upper__VYT -  1);
+  };
+  result__XBHB=result__PZHH;
+  e__WBHB=read_expr__XAJ(Self__UBHB);
+  while_do__GHMB:
   {
-    if (((void *)e__K4GB != (void *)NULL)) {
-      result__O4JH=FALSE__;
-      if ((! read_space__KSD())) {
-        result__O4JH=FALSE__;
+    if (((void *)e__WBHB != (void *)NULL)) {
+      result__NGKH=FALSE__;
+      if ((! read_space__MTD())) {
+        result__NGKH=FALSE__;
       } else {
-        result__P4JH='\0';
+        result__OGKH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__P4JH=((__CHARACTER )(( 0)));
+          result__OGKH=((__CHARACTER )(( 0)));
         } else {
-          result__P4JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+          result__OGKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__P4JH == ';')) {
+        if ((result__OGKH == ';')) {
           position__CCC=(__INTEGER)(position__CCC +  1);
-          result__O4JH=TRUE__;
+          result__NGKH=TRUE__;
         };
       };
-      __tmp__04GB=result__O4JH;
+      __tmp__GCHB=result__NGKH;
     } else {
-      __tmp__04GB=FALSE__;
+      __tmp__GCHB=FALSE__;
     };
-    if (__tmp__04GB) {
-      add_last__Q2U(result__L4GB,e__K4GB);
-      e__K4GB=read_expr__L3I(Self__I4GB);
-      goto while_do__0DMB;
+    if (__tmp__GCHB) {
+      add_last__25U(result__XBHB,e__WBHB);
+      e__WBHB=read_expr__XAJ(Self__UBHB);
+      goto while_do__GHMB;
     };
   };
-  if (((void *)e__K4GB != (void *)NULL)) {
-    result__R4JH=FALSE__;
-    if ((! read_space__KSD())) {
-      result__R4JH=FALSE__;
+  if (((void *)e__WBHB != (void *)NULL)) {
+    result__QGKH=FALSE__;
+    if ((! read_space__MTD())) {
+      result__QGKH=FALSE__;
     } else {
-      result__S4JH='\0';
+      result__RGKH='\0';
       if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__S4JH=((__CHARACTER )(( 0)));
+        result__RGKH=((__CHARACTER )(( 0)));
       } else {
-        result__S4JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+        result__RGKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__S4JH == ',')) {
+      if ((result__RGKH == ',')) {
         position__CCC=(__INTEGER)(position__CCC +  1);
-        result__R4JH=TRUE__;
+        result__QGKH=TRUE__;
       };
     };
-    if (result__R4JH) {
+    if (result__QGKH) {
       do {
-        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;
+        result__TGKH=NULL;
+        ptr__UGKH=((__POINTER )(NULL));
+        typ_id__VGKH= 0;
+        sz__WGKH=((__UINTEGER_32 )sizeof(__ITM_RESULT));
+        if ((sz__WGKH ==  0)) {
+          result__TGKH=ITM_RESULT__;
+        } else {
+          typ_id__VGKH=-1;
+          clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__WGKH);
+          if ((typ_id__VGKH == (__INTEGER)(-  1))) {
+            a__XGKH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__YGKH=(__UINTEGER_32)((__UINTEGER_32)(sz__WGKH + a__XGKH) & (__UINTEGER_32)(~ a__XGKH));
+            ptr_table__3GKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__YGKH / ((__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__FTJ(new_size__YGKH);
+              next__2GKH=(void *)((unsigned long)result__4GKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YGKH)));
+              ((__POINTER *)next__2GKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__3GKH)[ 0]=next__2GKH;
             } else {
-              next__34JH=((__POINTER *)result__54JH)[ 0];
-              if ((next__34JH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__54JH - (unsigned long)begin_memory__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)));
+              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__SXH)))) &  4095) + (__UINTEGER_32)(new_size__YGKH <<  1)) <=  4096)) {
+                  next__2GKH=(void *)((unsigned long)result__4GKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YGKH)));
                 } else {
-                  next__34JH=new_lab__ZPJ(new_size__Z4JH);
+                  next__2GKH=new_lab__FTJ(new_size__YGKH);
                 };
-                ((__POINTER *)next__34JH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__44JH)[ 0]=next__34JH;
+                ((__POINTER *)next__2GKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__3GKH)[ 0]=next__2GKH;
               } else {
-                ((__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;
+                ((__POINTER *)result__4GKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2GKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__4GKH=next__2GKH;
+              };
+            };
+            ptr__UGKH=result__4GKH;
+          } else {
+            t__ZGKH=((__UINTEGER_32 )typ_id__VGKH);
+            a__0GKH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__FHKH=(__UINTEGER_32)((__UINTEGER_32)(sz__WGKH + a__0GKH) & (__UINTEGER_32)(~ a__0GKH));
+            ptr_table__CHKH=((__POINTER )(&(table_type[(t__ZGKH)])));
+            lab_type__EHKH=(__UINTEGER_32)(t__ZGKH |  1);
+            next__BHKH=((__POINTER )(NULL));
+            result__DHKH=((__POINTER *)ptr_table__CHKH)[ 0];
+            if ((result__DHKH == (void *)NULL)) {
+              result__DHKH=new_lab__FTJ(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__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)));
+              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__SXH)))) &  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__C5JH=new_lab__ZPJ(lab_type__F5JH);
+                  next__BHKH=new_lab__FTJ(lab_type__EHKH);
                 };
-                ((__POINTER *)next__C5JH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__D5JH)[ 0]=next__C5JH;
+                ((__POINTER *)next__BHKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__CHKH)[ 0]=next__BHKH;
               } else {
-                ((__POINTER *)result__E5JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__C5JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__E5JH=next__C5JH;
+                ((__POINTER *)result__DHKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BHKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__DHKH=next__BHKH;
               };
             };
-            ptr__V4JH=result__E5JH;
+            ptr__UGKH=result__DHKH;
           };
-          result__U4JH=((__ITM_RESULT *)ptr__V4JH);
-          *(result__U4JH) = *(ITM_RESULT__);
+          result__TGKH=((__ITM_RESULT *)ptr__UGKH);
+          *(result__TGKH) = *(ITM_RESULT__);
         };
-        ((__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:
+        ((__ITM_RESULT *)result__TGKH)->value__FOFC=e__WBHB;
+        add_last__25U(result__XBHB,result__TGKH);
+        e__WBHB=read_expr__XAJ(Self__UBHB);
+        while_do__H23B:
         {
-          if (((void *)e__K4GB != (void *)NULL)) {
-            result__H5JH=FALSE__;
-            if ((! read_space__KSD())) {
-              result__H5JH=FALSE__;
+          if (((void *)e__WBHB != (void *)NULL)) {
+            result__GHKH=FALSE__;
+            if ((! read_space__MTD())) {
+              result__GHKH=FALSE__;
             } else {
-              result__I5JH='\0';
+              result__HHKH='\0';
               if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                result__I5JH=((__CHARACTER )(( 0)));
+                result__HHKH=((__CHARACTER )(( 0)));
               } else {
-                result__I5JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+                result__HHKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
               };
-              if ((result__I5JH == ';')) {
+              if ((result__HHKH == ';')) {
                 position__CCC=(__INTEGER)(position__CCC +  1);
-                result__H5JH=TRUE__;
+                result__GHKH=TRUE__;
               };
             };
-            __tmp__BAHB=result__H5JH;
+            __tmp__NDHB=result__GHKH;
           } else {
-            __tmp__BAHB=FALSE__;
+            __tmp__NDHB=FALSE__;
           };
-          if (__tmp__BAHB) {
-            add_last__Q2U(result__L4GB,e__K4GB);
-            e__K4GB=read_expr__L3I(Self__I4GB);
-            goto while_do__1Y3B;
+          if (__tmp__NDHB) {
+            add_last__25U(result__XBHB,e__WBHB);
+            e__WBHB=read_expr__XAJ(Self__UBHB);
+            goto while_do__H23B;
           };
         };
-        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)) {
+        if (((void *)e__WBHB == (void *)NULL)) {
+          pos__UD0G=current_position__EZF();
+          put_error__text__NPG( 0,(&__string_330));
+          put_position__XQG(pos__UD0G);
+          put_string__P3F(msg_err__SPG);
+          if ((type_error__RPG !=  2)) {
             exit(( 1));
           };
         };
-        result__K5JH=FALSE__;
-        if ((! read_space__KSD())) {
-          result__K5JH=FALSE__;
+        result__JHKH=FALSE__;
+        if ((! read_space__MTD())) {
+          result__JHKH=FALSE__;
         } else {
-          result__L5JH='\0';
+          result__KHKH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__L5JH=((__CHARACTER )(( 0)));
+            result__KHKH=((__CHARACTER )(( 0)));
           } else {
-            result__L5JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+            result__KHKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__L5JH == ',')) {
+          if ((result__KHKH == ',')) {
             position__CCC=(__INTEGER)(position__CCC +  1);
-            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)));
+            result__JHKH=TRUE__;
+          };
+        };
+      } while (result__JHKH);
+    };
+    result__TZWB=NULL;
+    ptr__UZWB=((__POINTER )(NULL));
+    typ_id__ZZWB= 0;
+    sz__WZWB=((__UINTEGER_32 )sizeof(__ITM_RESULT));
+    if ((sz__WZWB ==  0)) {
+      result__TZWB=ITM_RESULT__;
+    } else {
+      typ_id__ZZWB=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__WZWB);
+      if ((typ_id__ZZWB == (__INTEGER)(-  1))) {
+        a__TBHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__UBHH=(__UINTEGER_32)((__UINTEGER_32)(sz__WZWB + a__TBHH) & (__UINTEGER_32)(~ a__TBHH));
+        ptr_table__NHKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__UBHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__MHKH=((__POINTER )(NULL));
+        result__OHKH=((__POINTER *)ptr_table__NHKH)[ 0];
+        if ((result__OHKH == (void *)NULL)) {
+          result__OHKH=new_lab__FTJ(new_size__UBHH);
+          next__MHKH=(void *)((unsigned long)result__OHKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UBHH)));
+          ((__POINTER *)next__MHKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__NHKH)[ 0]=next__MHKH;
+        } else {
+          next__MHKH=((__POINTER *)result__OHKH)[ 0];
+          if ((next__MHKH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__OHKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__UBHH <<  1)) <=  4096)) {
+              next__MHKH=(void *)((unsigned long)result__OHKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UBHH)));
             } else {
-              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)));
+              next__MHKH=new_lab__FTJ(new_size__UBHH);
+            };
+            ((__POINTER *)next__MHKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__NHKH)[ 0]=next__MHKH;
+          } else {
+            ((__POINTER *)result__OHKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MHKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__OHKH=next__MHKH;
+          };
+        };
+        ptr__UZWB=result__OHKH;
+      } else {
+        t__YBHH=((__UINTEGER_32 )typ_id__ZZWB);
+        a__XBHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__VHKH=(__UINTEGER_32)((__UINTEGER_32)(sz__WZWB + a__XBHH) & (__UINTEGER_32)(~ a__XBHH));
+        ptr_table__SHKH=((__POINTER )(&(table_type[(t__YBHH)])));
+        lab_type__UHKH=(__UINTEGER_32)(t__YBHH |  1);
+        next__RHKH=((__POINTER )(NULL));
+        result__THKH=((__POINTER *)ptr_table__SHKH)[ 0];
+        if ((result__THKH == (void *)NULL)) {
+          result__THKH=new_lab__FTJ(lab_type__UHKH);
+          next__RHKH=(void *)((unsigned long)result__THKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VHKH)));
+          ((__POINTER *)next__RHKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__SHKH)[ 0]=next__RHKH;
+        } else {
+          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__SXH)))) &  4095) + (__UINTEGER_32)(new_size__VHKH <<  1)) <=  4096)) {
+              next__RHKH=(void *)((unsigned long)result__THKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VHKH)));
             } else {
-              next__S5JH=new_lab__ZPJ(lab_type__V5JH);
+              next__RHKH=new_lab__FTJ(lab_type__UHKH);
             };
-            ((__POINTER *)next__S5JH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__T5JH)[ 0]=next__S5JH;
+            ((__POINTER *)next__RHKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__SHKH)[ 0]=next__RHKH;
           } else {
-            ((__POINTER *)result__U5JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__S5JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__U5JH=next__S5JH;
+            ((__POINTER *)result__THKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RHKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__THKH=next__RHKH;
           };
         };
-        ptr__IWWB=result__U5JH;
+        ptr__UZWB=result__THKH;
       };
-      result__HWWB=((__ITM_RESULT *)ptr__IWWB);
-      *(result__HWWB) = *(ITM_RESULT__);
+      result__TZWB=((__ITM_RESULT *)ptr__UZWB);
+      *(result__TZWB) = *(ITM_RESULT__);
     };
-    ((__ITM_RESULT *)result__HWWB)->value__XKFC=e__K4GB;
-    e__K4GB=result__HWWB;
-    add_last__Q2U(result__USHH,result__HWWB);
+    ((__ITM_RESULT *)result__TZWB)->value__FOFC=e__WBHB;
+    e__WBHB=result__TZWB;
+    add_last__25U(result__PZHH,result__TZWB);
   };
-  return(copy__H4H(result__USHH));
+  return(copy__TBI(result__PZHH));
 }
 
-static void* readlip_expr_operator__NMZB(__PARSER *Self__OMZB)
+static void* readlip_expr_operator__ZPZB(__PARSER *Self__0PZB)
 // ({PARSER}) With resultRecursive, No inlinable.
 {
-  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:
+  void *right__3PZB,*result__2PZB;
+  __POSITION pos__KE0G,p__FIKH,p__2IKH;
+  __LIP_BINARY *result__2HKH,*Self__EIKH,*result__TIKH,*Self__1IKH;
+  __POINTER ptr__3HKH,ptr_table__KIKH,next__JIKH,result__LIKH;
+  __POINTER ptr_table__PIKH,next__OIKH,result__QIKH,ptr__UIKH;
+  __POINTER ptr_table__BJKH,next__AJKH,result__CJKH,ptr_table__GJKH;
+  __POINTER next__FJKH,result__HJKH;
+  __INTEGER typ_id__4HKH,typ_id__VIKH;
+  __UINTEGER_32 sz__5HKH,a__AIKH,new_size__BIKH,t__CIKH,a__DIKH;
+  __UINTEGER_32 new_size__SIKH,lab_type__RIKH,sz__WIKH,a__XIKH;
+  __UINTEGER_32 new_size__YIKH,t__ZIKH,a__0IKH,new_size__JJKH;
+  __UINTEGER_32 lab_type__IJKH;
+  __BOOLEAN result__WHKH,__tmp__SQZB,result__ZHKH;
+  __CHARACTER result__XHKH,result__0HKH;
+  right__3PZB=NULL;
+  result__2PZB=readlip_expr_cmp__N21B(Self__0PZB);
+  if (((void *)result__2PZB != (void *)NULL)) {
+    while_do__234B:
     {
-      result__X5JH=FALSE__;
-      if ((! read_space__KSD())) {
-        result__X5JH=FALSE__;
+      result__WHKH=FALSE__;
+      if ((! read_space__MTD())) {
+        result__WHKH=FALSE__;
       } else {
-        result__Y5JH='\0';
+        result__XHKH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__Y5JH=((__CHARACTER )(( 0)));
+          result__XHKH=((__CHARACTER )(( 0)));
         } else {
-          result__Y5JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+          result__XHKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__Y5JH == '|')) {
+        if ((result__XHKH == '|')) {
           position__CCC=(__INTEGER)(position__CCC +  1);
-          result__X5JH=TRUE__;
+          result__WHKH=TRUE__;
         };
       };
-      if (result__X5JH) {
-        __tmp__GNZB=TRUE__;
+      if (result__WHKH) {
+        __tmp__SQZB=TRUE__;
       } else {
-        result__05JH=FALSE__;
-        if ((! read_space__KSD())) {
-          result__05JH=FALSE__;
+        result__ZHKH=FALSE__;
+        if ((! read_space__MTD())) {
+          result__ZHKH=FALSE__;
         } else {
-          result__15JH='\0';
+          result__0HKH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__15JH=((__CHARACTER )(( 0)));
+            result__0HKH=((__CHARACTER )(( 0)));
           } else {
-            result__15JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+            result__0HKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__15JH == '&')) {
+          if ((result__0HKH == '&')) {
             position__CCC=(__INTEGER)(position__CCC +  1);
-            result__05JH=TRUE__;
+            result__ZHKH=TRUE__;
           };
         };
-        __tmp__GNZB=result__05JH;
+        __tmp__SQZB=result__ZHKH;
       };
-      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)) {
+      if (__tmp__SQZB) {
+        right__3PZB=readlip_expr_cmp__N21B(Self__0PZB);
+        if (((void *)right__3PZB == (void *)NULL)) {
+          pos__KE0G=current_position__EZF();
+          put_error__text__NPG( 0,(&__string_240));
+          put_position__XQG(pos__KE0G);
+          put_string__P3F(msg_err__SPG);
+          if ((type_error__RPG !=  2)) {
             exit(( 1));
           };
         };
-        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;
+        if (result__WHKH) {
+          p__FIKH=current_position__EZF();
+          result__2HKH=NULL;
+          ptr__3HKH=((__POINTER )(NULL));
+          typ_id__4HKH= 0;
+          sz__5HKH=((__UINTEGER_32 )sizeof(__LIP_BINARY));
+          if ((sz__5HKH ==  0)) {
+            result__2HKH=LIP_BINARY__;
+          } else {
+            typ_id__4HKH=-1;
+            clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__5HKH);
+            if ((typ_id__4HKH == (__INTEGER)(-  1))) {
+              a__AIKH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__BIKH=(__UINTEGER_32)((__UINTEGER_32)(sz__5HKH + a__AIKH) & (__UINTEGER_32)(~ a__AIKH));
+              ptr_table__KIKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__BIKH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__JIKH=((__POINTER )(NULL));
+              result__LIKH=((__POINTER *)ptr_table__KIKH)[ 0];
+              if ((result__LIKH == (void *)NULL)) {
+                result__LIKH=new_lab__FTJ(new_size__BIKH);
+                next__JIKH=(void *)((unsigned long)result__LIKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BIKH)));
+                ((__POINTER *)next__JIKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__KIKH)[ 0]=next__JIKH;
               } else {
-                next__KAKH=((__POINTER *)result__MAKH)[ 0];
-                if ((next__KAKH == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MAKH - (unsigned long)begin_memory__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)));
+                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__SXH)))) &  4095) + (__UINTEGER_32)(new_size__BIKH <<  1)) <=  4096)) {
+                    next__JIKH=(void *)((unsigned long)result__LIKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BIKH)));
                   } else {
-                    next__KAKH=new_lab__ZPJ(new_size__CAKH);
+                    next__JIKH=new_lab__FTJ(new_size__BIKH);
                   };
-                  ((__POINTER *)next__KAKH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__LAKH)[ 0]=next__KAKH;
+                  ((__POINTER *)next__JIKH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__KIKH)[ 0]=next__JIKH;
                 } else {
-                  ((__POINTER *)result__MAKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KAKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__MAKH=next__KAKH;
+                  ((__POINTER *)result__LIKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JIKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__LIKH=next__JIKH;
                 };
               };
-              ptr__45JH=result__MAKH;
+              ptr__3HKH=result__LIKH;
             } else {
-              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;
+              t__CIKH=((__UINTEGER_32 )typ_id__4HKH);
+              a__DIKH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__SIKH=(__UINTEGER_32)((__UINTEGER_32)(sz__5HKH + a__DIKH) & (__UINTEGER_32)(~ a__DIKH));
+              ptr_table__PIKH=((__POINTER )(&(table_type[(t__CIKH)])));
+              lab_type__RIKH=(__UINTEGER_32)(t__CIKH |  1);
+              next__OIKH=((__POINTER )(NULL));
+              result__QIKH=((__POINTER *)ptr_table__PIKH)[ 0];
+              if ((result__QIKH == (void *)NULL)) {
+                result__QIKH=new_lab__FTJ(lab_type__RIKH);
+                next__OIKH=(void *)((unsigned long)result__QIKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SIKH)));
+                ((__POINTER *)next__OIKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__PIKH)[ 0]=next__OIKH;
               } else {
-                next__PAKH=((__POINTER *)result__RAKH)[ 0];
-                if ((next__PAKH == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__RAKH - (unsigned long)begin_memory__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)));
+                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__SXH)))) &  4095) + (__UINTEGER_32)(new_size__SIKH <<  1)) <=  4096)) {
+                    next__OIKH=(void *)((unsigned long)result__QIKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SIKH)));
                   } else {
-                    next__PAKH=new_lab__ZPJ(lab_type__SAKH);
+                    next__OIKH=new_lab__FTJ(lab_type__RIKH);
                   };
-                  ((__POINTER *)next__PAKH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__QAKH)[ 0]=next__PAKH;
+                  ((__POINTER *)next__OIKH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__PIKH)[ 0]=next__OIKH;
                 } else {
-                  ((__POINTER *)result__RAKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PAKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__RAKH=next__PAKH;
+                  ((__POINTER *)result__QIKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OIKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__QIKH=next__OIKH;
                 };
               };
-              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;
+              ptr__3HKH=result__QIKH;
+            };
+            result__2HKH=((__LIP_BINARY *)ptr__3HKH);
+            *(result__2HKH) = *(LIP_BINARY__);
+          };
+          Self__EIKH=((__LIP_BINARY *)result__2HKH);
+          Self__EIKH->parent_lip_code__JRZB.parent_itm_object__0EE.position__GFJ=p__FIKH;
+          Self__EIKH->left__G1QD=result__2PZB;
+          Self__EIKH->right__J1QD=right__3PZB;
+          Self__EIKH->operator__M1QD='|';
+          result__2PZB=result__2HKH;
+        } else {
+          p__2IKH=current_position__EZF();
+          result__TIKH=NULL;
+          ptr__UIKH=((__POINTER )(NULL));
+          typ_id__VIKH= 0;
+          sz__WIKH=((__UINTEGER_32 )sizeof(__LIP_BINARY));
+          if ((sz__WIKH ==  0)) {
+            result__TIKH=LIP_BINARY__;
+          } else {
+            typ_id__VIKH=-1;
+            clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__WIKH);
+            if ((typ_id__VIKH == (__INTEGER)(-  1))) {
+              a__XIKH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__YIKH=(__UINTEGER_32)((__UINTEGER_32)(sz__WIKH + a__XIKH) & (__UINTEGER_32)(~ a__XIKH));
+              ptr_table__BJKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__YIKH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__AJKH=((__POINTER )(NULL));
+              result__CJKH=((__POINTER *)ptr_table__BJKH)[ 0];
+              if ((result__CJKH == (void *)NULL)) {
+                result__CJKH=new_lab__FTJ(new_size__YIKH);
+                next__AJKH=(void *)((unsigned long)result__CJKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YIKH)));
+                ((__POINTER *)next__AJKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__BJKH)[ 0]=next__AJKH;
               } else {
-                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)));
+                next__AJKH=((__POINTER *)result__CJKH)[ 0];
+                if ((next__AJKH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__CJKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__YIKH <<  1)) <=  4096)) {
+                    next__AJKH=(void *)((unsigned long)result__CJKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YIKH)));
                   } else {
-                    next__BBKH=new_lab__ZPJ(new_size__ZAKH);
+                    next__AJKH=new_lab__FTJ(new_size__YIKH);
                   };
-                  ((__POINTER *)next__BBKH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__CBKH)[ 0]=next__BBKH;
+                  ((__POINTER *)next__AJKH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__BJKH)[ 0]=next__AJKH;
                 } else {
-                  ((__POINTER *)result__DBKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BBKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__DBKH=next__BBKH;
+                  ((__POINTER *)result__CJKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__AJKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__CJKH=next__AJKH;
                 };
               };
-              ptr__VAKH=result__DBKH;
+              ptr__UIKH=result__CJKH;
             } else {
-              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;
+              t__ZIKH=((__UINTEGER_32 )typ_id__VIKH);
+              a__0IKH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__JJKH=(__UINTEGER_32)((__UINTEGER_32)(sz__WIKH + a__0IKH) & (__UINTEGER_32)(~ a__0IKH));
+              ptr_table__GJKH=((__POINTER )(&(table_type[(t__ZIKH)])));
+              lab_type__IJKH=(__UINTEGER_32)(t__ZIKH |  1);
+              next__FJKH=((__POINTER )(NULL));
+              result__HJKH=((__POINTER *)ptr_table__GJKH)[ 0];
+              if ((result__HJKH == (void *)NULL)) {
+                result__HJKH=new_lab__FTJ(lab_type__IJKH);
+                next__FJKH=(void *)((unsigned long)result__HJKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JJKH)));
+                ((__POINTER *)next__FJKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__GJKH)[ 0]=next__FJKH;
               } else {
-                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)));
+                next__FJKH=((__POINTER *)result__HJKH)[ 0];
+                if ((next__FJKH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HJKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__JJKH <<  1)) <=  4096)) {
+                    next__FJKH=(void *)((unsigned long)result__HJKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JJKH)));
                   } else {
-                    next__GBKH=new_lab__ZPJ(lab_type__JBKH);
+                    next__FJKH=new_lab__FTJ(lab_type__IJKH);
                   };
-                  ((__POINTER *)next__GBKH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__HBKH)[ 0]=next__GBKH;
+                  ((__POINTER *)next__FJKH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__GJKH)[ 0]=next__FJKH;
                 } else {
-                  ((__POINTER *)result__IBKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GBKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__IBKH=next__GBKH;
+                  ((__POINTER *)result__HJKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FJKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__HJKH=next__FJKH;
                 };
               };
-              ptr__VAKH=result__IBKH;
+              ptr__UIKH=result__HJKH;
             };
-            result__UAKH=((__LIP_BINARY *)ptr__VAKH);
-            *(result__UAKH) = *(LIP_BINARY__);
+            result__TIKH=((__LIP_BINARY *)ptr__UIKH);
+            *(result__TIKH) = *(LIP_BINARY__);
           };
-          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;
+          Self__1IKH=((__LIP_BINARY *)result__TIKH);
+          Self__1IKH->parent_lip_code__JRZB.parent_itm_object__0EE.position__GFJ=p__2IKH;
+          Self__1IKH->left__G1QD=result__2PZB;
+          Self__1IKH->right__J1QD=right__3PZB;
+          Self__1IKH->operator__M1QD='&';
+          result__2PZB=result__TIKH;
         };
-        goto while_do__Q04B;
+        goto while_do__234B;
       };
     };
   };
-  return(result__QMZB);
+  return(result__2PZB);
 }
 
-static __FAST_ARRAYoLIP_CODEo* create_with_capacity__QRKD(__INTEGER new_count__SRKD)
+static __FAST_ARRAYoLIP_CODEo* create_with_capacity__4UKD(__INTEGER new_count__AVKD)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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__;
+  __POINTER ptr__T5LD,ptr_table__LJKH,next__KJKH,result__MJKH;
+  __POINTER ptr_table__QJKH,next__PJKH,result__RJKH;
+  __INTEGER typ_id__Y5LD;
+  __UINTEGER_32 sz__V5LD,a__DCHH,new_size__ECHH,t__ICHH,a__HCHH;
+  __UINTEGER_32 new_size__TJKH,lab_type__SJKH;
+  __FAST_ARRAYoLIP_CODEo *result__S5LD,*Self__OCUD;
+  result__S5LD=NULL;
+  ptr__T5LD=((__POINTER )(NULL));
+  typ_id__Y5LD= 0;
+  sz__V5LD=((__UINTEGER_32 )sizeof(__FAST_ARRAYoLIP_CODEo));
+  if ((sz__V5LD ==  0)) {
+    result__S5LD=FAST_ARRAYoLIP_CODEo__;
   } else {
-    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);
+    typ_id__Y5LD=__FAST_ARRAYoLIP_CODEo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__V5LD);
+    if ((typ_id__Y5LD == (__INTEGER)(-  1))) {
+      a__DCHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__ECHH=(__UINTEGER_32)((__UINTEGER_32)(sz__V5LD + a__DCHH) & (__UINTEGER_32)(~ a__DCHH));
+      ptr_table__LJKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ECHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__KJKH=((__POINTER )(NULL));
+      result__MJKH=((__POINTER *)ptr_table__LJKH)[ 0];
+      if ((result__MJKH == (void *)NULL)) {
+        result__MJKH=new_lab__FTJ(new_size__ECHH);
+        next__KJKH=(void *)((unsigned long)result__MJKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ECHH)));
+        ((__POINTER *)next__KJKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__LJKH)[ 0]=next__KJKH;
+      } else {
+        next__KJKH=((__POINTER *)result__MJKH)[ 0];
+        if ((next__KJKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MJKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__ECHH <<  1)) <=  4096)) {
+            next__KJKH=(void *)((unsigned long)result__MJKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ECHH)));
+          } else {
+            next__KJKH=new_lab__FTJ(new_size__ECHH);
+          };
+          ((__POINTER *)next__KJKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__LJKH)[ 0]=next__KJKH;
+        } else {
+          ((__POINTER *)result__MJKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KJKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__MJKH=next__KJKH;
+        };
+      };
+      ptr__T5LD=result__MJKH;
+    } else {
+      t__ICHH=((__UINTEGER_32 )typ_id__Y5LD);
+      a__HCHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__TJKH=(__UINTEGER_32)((__UINTEGER_32)(sz__V5LD + a__HCHH) & (__UINTEGER_32)(~ a__HCHH));
+      ptr_table__QJKH=((__POINTER )(&(table_type[(t__ICHH)])));
+      lab_type__SJKH=(__UINTEGER_32)(t__ICHH |  1);
+      next__PJKH=((__POINTER )(NULL));
+      result__RJKH=((__POINTER *)ptr_table__QJKH)[ 0];
+      if ((result__RJKH == (void *)NULL)) {
+        result__RJKH=new_lab__FTJ(lab_type__SJKH);
+        next__PJKH=(void *)((unsigned long)result__RJKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TJKH)));
+        ((__POINTER *)next__PJKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__QJKH)[ 0]=next__PJKH;
+      } else {
+        next__PJKH=((__POINTER *)result__RJKH)[ 0];
+        if ((next__PJKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__RJKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__TJKH <<  1)) <=  4096)) {
+            next__PJKH=(void *)((unsigned long)result__RJKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TJKH)));
+          } else {
+            next__PJKH=new_lab__FTJ(lab_type__SJKH);
+          };
+          ((__POINTER *)next__PJKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__QJKH)[ 0]=next__PJKH;
+        } else {
+          ((__POINTER *)result__RJKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PJKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__RJKH=next__PJKH;
+        };
+      };
+      ptr__T5LD=result__RJKH;
+    };
+    result__S5LD=((__FAST_ARRAYoLIP_CODEo *)ptr__T5LD);
+    *(result__S5LD) = *(FAST_ARRAYoLIP_CODEo__);
+  };
+  Self__OCUD=((__FAST_ARRAYoLIP_CODEo *)result__S5LD);
+  if ((Self__OCUD->parent_arrayed_collection__EQYC.capacity__UTTD < new_count__AVKD)) {
+    Self__OCUD->parent_arrayed_collection__EQYC.storage__5TTD=create__OWIE(new_count__AVKD);
+    Self__OCUD->parent_arrayed_collection__EQYC.capacity__UTTD=new_count__AVKD;
+  };
+  Self__OCUD->parent_arrayed_collection__EQYC.upper__WFQD=(__INTEGER)(-  1);
+  return(result__S5LD);
 }
 
-static void add_last__UJUD(__FAST_ARRAYoLIP_CODEo *Self__VJUD,void *element__WJUD)
+static void add_last__CNUD(__FAST_ARRAYoLIP_CODEo *Self__DNUD,void *element__ENUD)
 // ({FAST_ARRAYoLIP_CODEo},{NULLxLIP_AFFECTxLIP_BINARYxLIP_UNARYxLIP_CALLxLIP_IFxLIP_PRINTxLIP_VALUE}) VoidNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER new_capacity__FNUD,__tmp__JOUD,__tmp__00WE,Self__D1QF;
+  __BOOLEAN __tmp__TNUD;
+  void **__tmp__IOUD,**new__G0WE;
+  new_capacity__FNUD= 0;
+  if (((__INTEGER)(Self__DNUD->parent_arrayed_collection__EQYC.upper__WFQD +  1) <= (__INTEGER)(Self__DNUD->parent_arrayed_collection__EQYC.capacity__UTTD -  1))) {
+    Self__DNUD->parent_arrayed_collection__EQYC.upper__WFQD=(__INTEGER)(Self__DNUD->parent_arrayed_collection__EQYC.upper__WFQD +  1);
+    __tmp__TNUD=TRUE__;
   } else {
-    __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;
+    __tmp__TNUD=FALSE__;
+  };
+  if ((! __tmp__TNUD)) {
+    if ((Self__DNUD->parent_arrayed_collection__EQYC.capacity__UTTD ==  0)) {
+      Self__DNUD->parent_arrayed_collection__EQYC.storage__5TTD=create__OWIE( 2);
+      Self__DNUD->parent_arrayed_collection__EQYC.capacity__UTTD= 2;
+      Self__DNUD->parent_arrayed_collection__EQYC.upper__WFQD= 0;
+    } else {
+      new_capacity__FNUD=(__INTEGER)(Self__DNUD->parent_arrayed_collection__EQYC.capacity__UTTD <<  1);
+      __tmp__IOUD=Self__DNUD->parent_arrayed_collection__EQYC.storage__5TTD;
+      __tmp__JOUD=Self__DNUD->parent_arrayed_collection__EQYC.capacity__UTTD;
+      new__G0WE=((void **)realloc_dynamic__old_size__new_size__ZHLC(((__POINTER )((void **)__tmp__IOUD)),((__UINTEGER_32 )(__INTEGER)(__tmp__JOUD * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__FNUD * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__00WE=(__INTEGER)(new_capacity__FNUD -  1);
+      Self__D1QF=__tmp__JOUD;
+      while ((Self__D1QF <= __tmp__00WE)) {
+        new__G0WE[Self__D1QF]=NULL;
+        Self__D1QF=(__INTEGER)(Self__D1QF +  1);
+      };
+      Self__DNUD->parent_arrayed_collection__EQYC.storage__5TTD=new__G0WE;
+      Self__DNUD->parent_arrayed_collection__EQYC.capacity__UTTD=new_capacity__FNUD;
+      Self__DNUD->parent_arrayed_collection__EQYC.upper__WFQD=(__INTEGER)(Self__DNUD->parent_arrayed_collection__EQYC.upper__WFQD +  1);
+    };
+  };
+  ((void **)Self__DNUD->parent_arrayed_collection__EQYC.storage__5TTD)[Self__DNUD->parent_arrayed_collection__EQYC.upper__WFQD]=element__ENUD;
 }
 
-static void* copy__VMID(void *tmp__XMID)
+static void* copy__DQID(void *tmp__FQID)
 // ({NULLxFAST_ARRAYoLIP_CODEo}) With resultNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER new_capacity__LTTD,other_upper__KTTD,Self__GSYE;
+  __INTEGER new_capacity__HEUD,__tmp__PFUD,__tmp__GZWE,Self__EZQF;
+  void *result__HQID;
+  __FAST_ARRAYoLIP_CODEo *Self__ITTD;
+  void **__tmp__CUTD,**__tmp__EUTD,**Self__5PWE;
+  __FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *Self__FEUD;
+  __BOOLEAN __tmp__WEUD;
+  void **__tmp__OFUD,**new__SYWE;
+  result__HQID=create_with_capacity__4UKD((__INTEGER)(((__FAST_ARRAYoLIP_CODEo *)tmp__FQID)->parent_arrayed_collection__EQYC.upper__WFQD +  1));
+  Self__ITTD=((__FAST_ARRAYoLIP_CODEo *)result__HQID);
+  new_capacity__LTTD= 0;
+  other_upper__KTTD=((__FAST_ARRAYoLIP_CODEo *)tmp__FQID)->parent_arrayed_collection__EQYC.upper__WFQD;
+  if ((other_upper__KTTD >=  0)) {
+    new_capacity__LTTD=(__INTEGER)(other_upper__KTTD +  1);
+    if ((Self__ITTD->parent_arrayed_collection__EQYC.capacity__UTTD < new_capacity__LTTD)) {
+      Self__ITTD->parent_arrayed_collection__EQYC.storage__5TTD=create__OWIE(new_capacity__LTTD);
+      Self__ITTD->parent_arrayed_collection__EQYC.capacity__UTTD=new_capacity__LTTD;
+    };
+    __tmp__CUTD=Self__ITTD->parent_arrayed_collection__EQYC.storage__5TTD;
+    __tmp__EUTD=((__FAST_ARRAYoLIP_CODEo *)tmp__FQID)->parent_arrayed_collection__EQYC.storage__5TTD;
+    Self__5PWE=((void **)__tmp__CUTD);
+    Self__GSYE=other_upper__KTTD;
+    while ((Self__GSYE >=  0)) {
+      Self__5PWE[Self__GSYE]=((void **)__tmp__EUTD)[Self__GSYE];
+      Self__GSYE=(__INTEGER)(Self__GSYE -  1);
+    };
+  };
+  Self__ITTD->parent_arrayed_collection__EQYC.upper__WFQD=other_upper__KTTD;
+  ((__FAST_ARRAYoLIP_CODEo *)tmp__FQID)->parent_arrayed_collection__EQYC.upper__WFQD=(__INTEGER)(-  1);
+  Self__FEUD=((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)free_list__BPID);
+  new_capacity__HEUD= 0;
+  if (((__INTEGER)(Self__FEUD->parent_arrayed_collection__APID.upper__ISTD +  1) <= (__INTEGER)(Self__FEUD->parent_arrayed_collection__APID.capacity__JEUD -  1))) {
+    Self__FEUD->parent_arrayed_collection__APID.upper__ISTD=(__INTEGER)(Self__FEUD->parent_arrayed_collection__APID.upper__ISTD +  1);
+    __tmp__WEUD=TRUE__;
   } else {
-    __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);
+    __tmp__WEUD=FALSE__;
+  };
+  if ((! __tmp__WEUD)) {
+    if ((Self__FEUD->parent_arrayed_collection__APID.capacity__JEUD ==  0)) {
+      Self__FEUD->parent_arrayed_collection__APID.storage__FFUD=create__C2IE( 2);
+      Self__FEUD->parent_arrayed_collection__APID.capacity__JEUD= 2;
+      Self__FEUD->parent_arrayed_collection__APID.upper__ISTD= 0;
+    } else {
+      new_capacity__HEUD=(__INTEGER)(Self__FEUD->parent_arrayed_collection__APID.capacity__JEUD <<  1);
+      __tmp__OFUD=Self__FEUD->parent_arrayed_collection__APID.storage__FFUD;
+      __tmp__PFUD=Self__FEUD->parent_arrayed_collection__APID.capacity__JEUD;
+      new__SYWE=((void **)realloc_dynamic__old_size__new_size__ZHLC(((__POINTER )((void **)__tmp__OFUD)),((__UINTEGER_32 )(__INTEGER)(__tmp__PFUD * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__HEUD * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__GZWE=(__INTEGER)(new_capacity__HEUD -  1);
+      Self__EZQF=__tmp__PFUD;
+      while ((Self__EZQF <= __tmp__GZWE)) {
+        new__SYWE[Self__EZQF]=NULL;
+        Self__EZQF=(__INTEGER)(Self__EZQF +  1);
+      };
+      Self__FEUD->parent_arrayed_collection__APID.storage__FFUD=new__SYWE;
+      Self__FEUD->parent_arrayed_collection__APID.capacity__JEUD=new_capacity__HEUD;
+      Self__FEUD->parent_arrayed_collection__APID.upper__ISTD=(__INTEGER)(Self__FEUD->parent_arrayed_collection__APID.upper__ISTD +  1);
+    };
+  };
+  ((void **)Self__FEUD->parent_arrayed_collection__APID.storage__FFUD)[Self__FEUD->parent_arrayed_collection__APID.upper__ISTD]=tmp__FQID;
+  return(result__HQID);
 }
 
-static void* fast_reference_at__4SRD(__HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo *Self__5SRD,void *k__ATRD)
+static void* fast_reference_at__MWRD(__HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo *Self__NWRD,void *k__OWRD)
 // ({HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __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:
+  __STRING_CONSTANT *Self__BMIH;
+  __INTEGER result__AMIH,__tmp__CMIH,Self__DMIH;
+  void *node__YWRD;
+  __BOOLEAN __tmp__QXRD;
+  Self__BMIH=((__STRING_CONSTANT *)k__OWRD);
+  result__AMIH= 0;
+  __tmp__CMIH=Self__BMIH->count__DD;
+  Self__DMIH= 1;
+  while ((Self__DMIH <= __tmp__CMIH)) {
+    result__AMIH=(__INTEGER)((__INTEGER)( 5 * result__AMIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__BMIH->storage__FRO)[(__INTEGER)(Self__DMIH -  1)])));
+    Self__DMIH=(__INTEGER)(Self__DMIH +  1);
+  };
+  if ((result__AMIH <  0)) {
+    result__AMIH=(__INTEGER)(~ result__AMIH);
+  };
+  node__YWRD=((void **)Self__NWRD->buckets__AXRD)[(__INTEGER)(result__AMIH % Self__NWRD->capacity__1WRD)];
+  until_do__UJWD:
   {
-    if (((void *)node__KTRD == (void *)NULL)) {
-      __tmp__CURD=TRUE__;
+    if (((void *)node__YWRD == (void *)NULL)) {
+      __tmp__QXRD=TRUE__;
     } else {
       print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
-      __tmp__CURD=((void *)NULL == (void *)k__ATRD);
+      __tmp__QXRD=((void *)NULL == (void *)k__OWRD);
     };
-    if ((! __tmp__CURD)) {
+    if ((! __tmp__QXRD)) {
       print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
-      node__KTRD=NULL;
-      goto until_do__GGWD;
+      node__YWRD=NULL;
+      goto until_do__UJWD;
     };
   };
-  if (((void *)node__KTRD != (void *)NULL)) {
+  if (((void *)node__YWRD != (void *)NULL)) {
     print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
   };
   return(NULL);
 }
 
-static void* run_expr__SXQD(__LIP_BINARY *Self__TXQD)
+static void* run_expr__A1QD(__LIP_BINARY *Self__B1QD)
 // ({LIP_BINARY}) With resultRecursive, No inlinable.
 {
-  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) {
+  void *result__D1QD,*__tmp__I1QD,*__tmp__VJKH,*__tmp__WJKH,*__tmp__L1QD;
+  void *__tmp__0JKH,*__tmp__1JKH,*result__WC4F,*__tmp__T1QD;
+  void *result__GD4F,*result__YD4F,*__tmp__01QD,*result__IE4F;
+  void *result__0E4F,*__tmp__B2QD,*result__KF4F,*result__3HIG;
+  void *result__2F4F,*__tmp__I2QD,*result__MG4F,*result__OIIG;
+  void *__tmp__P2QD,*result__OH4F,*__tmp__W2QD,*result__QI4F;
+  void *__tmp__32QD,*result__SJ4F,*__tmp__E3QD,*result__UK4F;
+  void *__tmp__L3QD,*result__WL4F,*result__DLIG,*__tmp__S3QD;
+  void *result__YM4F;
+  void *__tmp__H1QD,*__tmp__K1QD;
+  __LIP_INTEGER *Self__XJKH,*Self__2JKH,*Self__DD4F,*__tmp__JD4F;
+  __LIP_INTEGER *s__HD4F,*Self__FE4F,*__tmp__LE4F,*s__JE4F,*Self__HF4F;
+  __LIP_INTEGER *__tmp__NF4F,*s__LF4F,*Self__JG4F,*__tmp__PG4F,*s__NG4F;
+  __LIP_INTEGER *Self__LH4F,*__tmp__RH4F,*s__PH4F,*Self__NI4F;
+  __LIP_INTEGER *__tmp__TI4F,*s__RI4F,*Self__PJ4F,*__tmp__VJ4F,*s__TJ4F;
+  __LIP_INTEGER *Self__RK4F,*__tmp__XK4F,*s__VK4F,*Self__TL4F;
+  __LIP_INTEGER *__tmp__ZL4F,*s__XL4F,*Self__VM4F,*__tmp__1M4F,*s__ZM4F;
+  __LIP_STRING *Self__YJKH,*Self__3JKH,*__tmp__4GIG,*s__2GIG;
+  __LIP_STRING *__tmp__PHIG,*s__NHIG,*Self__0HIG,*__tmp__AIIG,*s__4HIG;
+  __LIP_STRING *Self__LIIG,*__tmp__RIIG,*s__PIIG,*__tmp__CJIG,*s__AJIG;
+  __LIP_STRING *__tmp__TJIG,*s__RJIG,*__tmp__EKIG,*s__CKIG,*__tmp__VKIG;
+  __LIP_STRING *s__TKIG,*Self__ALIG,*__tmp__GLIG,*s__ELIG,*__tmp__XLIG;
+  __LIP_STRING *s__VLIG;
+  __LIP_BOOLEAN *Self__TC4F,*__tmp__ZC4F,*s__XC4F,*Self__VD4F;
+  __LIP_BOOLEAN *__tmp__1D4F,*s__ZD4F,*Self__XE4F,*__tmp__3E4F,*s__1E4F;
+  __LIP_BOOLEAN *Self__ZF4F,*__tmp__5F4F,*s__3F4F,*__tmp__BH4F,*s__5G4F;
+  __LIP_BOOLEAN *__tmp__DI4F,*s__BI4F,*__tmp__FJ4F,*s__DJ4F,*__tmp__HK4F;
+  __LIP_BOOLEAN *s__FK4F,*__tmp__JL4F,*s__HL4F,*__tmp__LM4F,*s__JM4F;
+  void *result__G2EH,*result__I2EH,*result__K2EH,*result__M2EH;
+  void *result__O2EH,*result__Q2EH,*result__S2EH,*result__U2EH;
+  void *result__W2EH,*result__Y2EH,*result__02EH,*result__22EH;
+  __POSITION __tmp__13QD;
+  __CHARACTER Self__5UVD;
+  __BOOLEAN b__H2EH,b__J2EH,b__L2EH,b__N2EH,b__P2EH,b__R2EH,b__T2EH;
+  __BOOLEAN b__V2EH,b__X2EH,b__Z2EH,b__12EH,b__32EH;
+  result__D1QD=NULL;
+  __tmp__H1QD=Self__B1QD->left__G1QD;
+  switch (((struct ___OBJ *)__tmp__H1QD)->__id) {
   case __LIP_BINARY__: {
-    __tmp__0XQD=run_expr__SXQD(__tmp__ZXQD);
+    __tmp__I1QD=run_expr__A1QD(__tmp__H1QD);
   } break;
   case __LIP_UNARY__: {
-    __tmp__0XQD=run_expr__R0QD(__tmp__ZXQD);
+    __tmp__I1QD=run_expr__53QD(__tmp__H1QD);
   } break;
   case __LIP_CALL__: {
-    __tmp__0XQD=run_expr__DSUE(__tmp__ZXQD);
+    __tmp__I1QD=run_expr__XWUE(__tmp__H1QD);
   } break;
   case __LIP_VALUE__: {
-    __tmp__WBKH=((__LIP_VALUE *)__tmp__ZXQD)->value__DWUE;
-    switch (((struct ___OBJ *)__tmp__WBKH)->__id) {
+    __tmp__VJKH=((__LIP_VALUE *)__tmp__H1QD)->value__X0UE;
+    switch (((struct ___OBJ *)__tmp__VJKH)->__id) {
     case __LIP_BOOLEAN__: {
-      __tmp__XBKH=((__LIP_BOOLEAN *)__tmp__WBKH);
+      __tmp__WJKH=((__LIP_BOOLEAN *)__tmp__VJKH);
     } break;
     case __LIP_INTEGER__: {
-      Self__YBKH=((__LIP_INTEGER *)__tmp__WBKH);
-      __tmp__XBKH=get__LTSE(Self__YBKH,Self__YBKH->value__EI4F);
+      Self__XJKH=((__LIP_INTEGER *)__tmp__VJKH);
+      __tmp__WJKH=get__5XSE(Self__XJKH,Self__XJKH->value__LN4F);
     } break;
     case __LIP_STRING__: {
-      Self__ZBKH=((__LIP_STRING *)__tmp__WBKH);
-      __tmp__XBKH=get__GYFF(Self__ZBKH,Self__ZBKH->value__RNUE);
+      Self__YJKH=((__LIP_STRING *)__tmp__VJKH);
+      __tmp__WJKH=get__M3FF(Self__YJKH,Self__YJKH->value__FSUE);
     } break;
     };
-    __tmp__0XQD=__tmp__XBKH;
+    __tmp__I1QD=__tmp__WJKH;
   } break;
   };
-  __tmp__2XQD=Self__TXQD->right__1XQD;
-  switch (((struct ___OBJ *)__tmp__2XQD)->__id) {
+  __tmp__K1QD=Self__B1QD->right__J1QD;
+  switch (((struct ___OBJ *)__tmp__K1QD)->__id) {
   case __LIP_BINARY__: {
-    __tmp__3XQD=run_expr__SXQD(__tmp__2XQD);
+    __tmp__L1QD=run_expr__A1QD(__tmp__K1QD);
   } break;
   case __LIP_UNARY__: {
-    __tmp__3XQD=run_expr__R0QD(__tmp__2XQD);
+    __tmp__L1QD=run_expr__53QD(__tmp__K1QD);
   } break;
   case __LIP_CALL__: {
-    __tmp__3XQD=run_expr__DSUE(__tmp__2XQD);
+    __tmp__L1QD=run_expr__XWUE(__tmp__K1QD);
   } break;
   case __LIP_VALUE__: {
-    __tmp__1BKH=((__LIP_VALUE *)__tmp__2XQD)->value__DWUE;
-    switch (((struct ___OBJ *)__tmp__1BKH)->__id) {
+    __tmp__0JKH=((__LIP_VALUE *)__tmp__K1QD)->value__X0UE;
+    switch (((struct ___OBJ *)__tmp__0JKH)->__id) {
     case __LIP_BOOLEAN__: {
-      __tmp__2BKH=((__LIP_BOOLEAN *)__tmp__1BKH);
+      __tmp__1JKH=((__LIP_BOOLEAN *)__tmp__0JKH);
     } break;
     case __LIP_INTEGER__: {
-      Self__3BKH=((__LIP_INTEGER *)__tmp__1BKH);
-      __tmp__2BKH=get__LTSE(Self__3BKH,Self__3BKH->value__EI4F);
+      Self__2JKH=((__LIP_INTEGER *)__tmp__0JKH);
+      __tmp__1JKH=get__5XSE(Self__2JKH,Self__2JKH->value__LN4F);
     } break;
     case __LIP_STRING__: {
-      Self__4BKH=((__LIP_STRING *)__tmp__1BKH);
-      __tmp__2BKH=get__GYFF(Self__4BKH,Self__4BKH->value__RNUE);
+      Self__3JKH=((__LIP_STRING *)__tmp__0JKH);
+      __tmp__1JKH=get__M3FF(Self__3JKH,Self__3JKH->value__FSUE);
     } break;
     };
-    __tmp__3XQD=__tmp__2BKH;
+    __tmp__L1QD=__tmp__1JKH;
   } break;
   };
-  Self__RRVD=Self__TXQD->operator__4XQD;
-  if ((Self__RRVD == '|')) {
-    switch (((struct ___OBJ *)__tmp__0XQD)->__id) {
+  Self__5UVD=Self__B1QD->operator__M1QD;
+  if ((Self__5UVD == '|')) {
+    switch (((struct ___OBJ *)__tmp__I1QD)->__id) {
     case __LIP_BOOLEAN__: {
-      Self__M33F=((__LIP_BOOLEAN *)__tmp__0XQD);
-      result__P33F=NULL;
-      if (__tmp__3XQD==NULL) {
-        __tmp__S33F=NULL;
+      Self__TC4F=((__LIP_BOOLEAN *)__tmp__I1QD);
+      result__WC4F=NULL;
+      if (__tmp__L1QD==NULL) {
+        __tmp__ZC4F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__3XQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__L1QD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__S33F=((__LIP_BOOLEAN *)__tmp__3XQD);
+          __tmp__ZC4F=((__LIP_BOOLEAN *)__tmp__L1QD);
         } break;
         case __LIP_INTEGER__: {
-          __tmp__S33F=NULL;
+          __tmp__ZC4F=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__S33F=NULL;
+          __tmp__ZC4F=NULL;
         } break;
         }
       };
-      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;
+      s__XC4F=__tmp__ZC4F;
+      if (((void *)__tmp__ZC4F != (void *)NULL)) {
+        b__H2EH=(Self__TC4F->value__JFQD | __tmp__ZC4F->value__JFQD);
+        result__G2EH=NULL;
+        if (b__H2EH) {
+          result__G2EH=true__FXLF;
         } else {
-          result__QVEH=LIP_BOOLEAN__;
+          result__G2EH=LIP_BOOLEAN__;
         };
-        result__P33F=result__QVEH;
+        result__WC4F=result__G2EH;
       };
-      __tmp__FYQD=result__P33F;
+      __tmp__T1QD=result__WC4F;
     } break;
     case __LIP_INTEGER__: {
-      Self__233F=((__LIP_INTEGER *)__tmp__0XQD);
-      result__533F=NULL;
-      if (__tmp__3XQD==NULL) {
-        __tmp__C43F=NULL;
+      Self__DD4F=((__LIP_INTEGER *)__tmp__I1QD);
+      result__GD4F=NULL;
+      if (__tmp__L1QD==NULL) {
+        __tmp__JD4F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__3XQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__L1QD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__C43F=NULL;
+          __tmp__JD4F=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__C43F=((__LIP_INTEGER *)__tmp__3XQD);
+          __tmp__JD4F=((__LIP_INTEGER *)__tmp__L1QD);
         } break;
         case __LIP_STRING__: {
-          __tmp__C43F=NULL;
+          __tmp__JD4F=NULL;
         } break;
         }
       };
-      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;
+      s__HD4F=__tmp__JD4F;
+      if (((void *)__tmp__JD4F != (void *)NULL)) {
+        Self__DD4F->value__LN4F=(__INTEGER)(Self__DD4F->value__LN4F | __tmp__JD4F->value__LN4F);
+        free__DC4F(__tmp__JD4F);
+        result__GD4F=Self__DD4F;
       };
-      __tmp__FYQD=result__533F;
+      __tmp__T1QD=result__GD4F;
     } break;
     case __LIP_STRING__: {
-      if (__tmp__3XQD==NULL) {
-        __tmp__XBIG=NULL;
+      if (__tmp__L1QD==NULL) {
+        __tmp__4GIG=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__3XQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__L1QD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__XBIG=NULL;
+          __tmp__4GIG=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__XBIG=NULL;
+          __tmp__4GIG=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__XBIG=((__LIP_STRING *)__tmp__3XQD);
+          __tmp__4GIG=((__LIP_STRING *)__tmp__L1QD);
         } break;
         }
       };
-      s__VBIG=__tmp__XBIG;
-      __tmp__FYQD=NULL;
+      s__2GIG=__tmp__4GIG;
+      __tmp__T1QD=NULL;
     } break;
     };
-    result__VXQD=__tmp__FYQD;
+    result__D1QD=__tmp__T1QD;
   };
-  if ((Self__RRVD == '&')) {
-    switch (((struct ___OBJ *)__tmp__0XQD)->__id) {
+  if ((Self__5UVD == '&')) {
+    switch (((struct ___OBJ *)__tmp__I1QD)->__id) {
     case __LIP_BOOLEAN__: {
-      Self__O43F=((__LIP_BOOLEAN *)__tmp__0XQD);
-      result__R43F=NULL;
-      if (__tmp__3XQD==NULL) {
-        __tmp__U43F=NULL;
+      Self__VD4F=((__LIP_BOOLEAN *)__tmp__I1QD);
+      result__YD4F=NULL;
+      if (__tmp__L1QD==NULL) {
+        __tmp__1D4F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__3XQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__L1QD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__U43F=((__LIP_BOOLEAN *)__tmp__3XQD);
+          __tmp__1D4F=((__LIP_BOOLEAN *)__tmp__L1QD);
         } break;
         case __LIP_INTEGER__: {
-          __tmp__U43F=NULL;
+          __tmp__1D4F=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__U43F=NULL;
+          __tmp__1D4F=NULL;
         } break;
         }
       };
-      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;
+      s__ZD4F=__tmp__1D4F;
+      if (((void *)__tmp__1D4F != (void *)NULL)) {
+        b__J2EH=(Self__VD4F->value__JFQD & __tmp__1D4F->value__JFQD);
+        result__I2EH=NULL;
+        if (b__J2EH) {
+          result__I2EH=true__FXLF;
         } else {
-          result__SVEH=LIP_BOOLEAN__;
+          result__I2EH=LIP_BOOLEAN__;
         };
-        result__R43F=result__SVEH;
+        result__YD4F=result__I2EH;
       };
-      __tmp__MYQD=result__R43F;
+      __tmp__01QD=result__YD4F;
     } break;
     case __LIP_INTEGER__: {
-      Self__443F=((__LIP_INTEGER *)__tmp__0XQD);
-      result__B53F=NULL;
-      if (__tmp__3XQD==NULL) {
-        __tmp__E53F=NULL;
+      Self__FE4F=((__LIP_INTEGER *)__tmp__I1QD);
+      result__IE4F=NULL;
+      if (__tmp__L1QD==NULL) {
+        __tmp__LE4F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__3XQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__L1QD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__E53F=NULL;
+          __tmp__LE4F=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__E53F=((__LIP_INTEGER *)__tmp__3XQD);
+          __tmp__LE4F=((__LIP_INTEGER *)__tmp__L1QD);
         } break;
         case __LIP_STRING__: {
-          __tmp__E53F=NULL;
+          __tmp__LE4F=NULL;
         } break;
         }
       };
-      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;
+      s__JE4F=__tmp__LE4F;
+      if (((void *)__tmp__LE4F != (void *)NULL)) {
+        Self__FE4F->value__LN4F=(__INTEGER)(Self__FE4F->value__LN4F & __tmp__LE4F->value__LN4F);
+        free__DC4F(__tmp__LE4F);
+        result__IE4F=Self__FE4F;
       };
-      __tmp__MYQD=result__B53F;
+      __tmp__01QD=result__IE4F;
     } break;
     case __LIP_STRING__: {
-      if (__tmp__3XQD==NULL) {
-        __tmp__ICIG=NULL;
+      if (__tmp__L1QD==NULL) {
+        __tmp__PHIG=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__3XQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__L1QD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__ICIG=NULL;
+          __tmp__PHIG=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__ICIG=NULL;
+          __tmp__PHIG=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__ICIG=((__LIP_STRING *)__tmp__3XQD);
+          __tmp__PHIG=((__LIP_STRING *)__tmp__L1QD);
         } break;
         }
       };
-      s__GCIG=__tmp__ICIG;
-      __tmp__MYQD=NULL;
+      s__NHIG=__tmp__PHIG;
+      __tmp__01QD=NULL;
     } break;
     };
-    result__VXQD=__tmp__MYQD;
+    result__D1QD=__tmp__01QD;
   };
-  if ((Self__RRVD == '=')) {
-    switch (((struct ___OBJ *)__tmp__0XQD)->__id) {
+  if ((Self__5UVD == '=')) {
+    switch (((struct ___OBJ *)__tmp__I1QD)->__id) {
     case __LIP_BOOLEAN__: {
-      Self__Q53F=((__LIP_BOOLEAN *)__tmp__0XQD);
-      result__T53F=NULL;
-      if (__tmp__3XQD==NULL) {
-        __tmp__W53F=NULL;
+      Self__XE4F=((__LIP_BOOLEAN *)__tmp__I1QD);
+      result__0E4F=NULL;
+      if (__tmp__L1QD==NULL) {
+        __tmp__3E4F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__3XQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__L1QD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__W53F=((__LIP_BOOLEAN *)__tmp__3XQD);
+          __tmp__3E4F=((__LIP_BOOLEAN *)__tmp__L1QD);
         } break;
         case __LIP_INTEGER__: {
-          __tmp__W53F=NULL;
+          __tmp__3E4F=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__W53F=NULL;
+          __tmp__3E4F=NULL;
         } break;
         }
       };
-      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;
+      s__1E4F=__tmp__3E4F;
+      if (((void *)__tmp__3E4F != (void *)NULL)) {
+        b__L2EH=(Self__XE4F->value__JFQD == __tmp__3E4F->value__JFQD);
+        result__K2EH=NULL;
+        if (b__L2EH) {
+          result__K2EH=true__FXLF;
         } else {
-          result__UVEH=LIP_BOOLEAN__;
+          result__K2EH=LIP_BOOLEAN__;
         };
-        result__T53F=result__UVEH;
+        result__0E4F=result__K2EH;
       };
-      __tmp__TYQD=result__T53F;
+      __tmp__B2QD=result__0E4F;
     } break;
     case __LIP_INTEGER__: {
-      Self__AA4F=((__LIP_INTEGER *)__tmp__0XQD);
-      result__DA4F=NULL;
-      if (__tmp__3XQD==NULL) {
-        __tmp__GA4F=NULL;
+      Self__HF4F=((__LIP_INTEGER *)__tmp__I1QD);
+      result__KF4F=NULL;
+      if (__tmp__L1QD==NULL) {
+        __tmp__NF4F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__3XQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__L1QD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__GA4F=NULL;
+          __tmp__NF4F=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__GA4F=((__LIP_INTEGER *)__tmp__3XQD);
+          __tmp__NF4F=((__LIP_INTEGER *)__tmp__L1QD);
         } break;
         case __LIP_STRING__: {
-          __tmp__GA4F=NULL;
+          __tmp__NF4F=NULL;
         } break;
         }
       };
-      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;
+      s__LF4F=__tmp__NF4F;
+      if (((void *)__tmp__NF4F != (void *)NULL)) {
+        free__DC4F(__tmp__NF4F);
+        free__DC4F(Self__HF4F);
+        b__N2EH=(Self__HF4F->value__LN4F == __tmp__NF4F->value__LN4F);
+        result__M2EH=NULL;
+        if (b__N2EH) {
+          result__M2EH=true__FXLF;
         } else {
-          result__WVEH=LIP_BOOLEAN__;
+          result__M2EH=LIP_BOOLEAN__;
         };
-        result__DA4F=result__WVEH;
+        result__KF4F=result__M2EH;
       };
-      __tmp__TYQD=result__DA4F;
+      __tmp__B2QD=result__KF4F;
     } break;
     case __LIP_STRING__: {
-      Self__TCIG=((__LIP_STRING *)__tmp__0XQD);
-      result__WCIG=NULL;
-      if (__tmp__3XQD==NULL) {
-        __tmp__ZCIG=NULL;
+      Self__0HIG=((__LIP_STRING *)__tmp__I1QD);
+      result__3HIG=NULL;
+      if (__tmp__L1QD==NULL) {
+        __tmp__AIIG=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__3XQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__L1QD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__ZCIG=NULL;
+          __tmp__AIIG=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__ZCIG=NULL;
+          __tmp__AIIG=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__ZCIG=((__LIP_STRING *)__tmp__3XQD);
+          __tmp__AIIG=((__LIP_STRING *)__tmp__L1QD);
         } break;
         }
       };
-      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;
+      s__4HIG=__tmp__AIIG;
+      if (((void *)__tmp__AIIG != (void *)NULL)) {
+        free__RGIG(__tmp__AIIG);
+        free__RGIG(Self__0HIG);
+        b__P2EH=((void *)Self__0HIG->value__FSUE == (void *)__tmp__AIIG->value__FSUE);
+        result__O2EH=NULL;
+        if (b__P2EH) {
+          result__O2EH=true__FXLF;
         } else {
-          result__YVEH=LIP_BOOLEAN__;
+          result__O2EH=LIP_BOOLEAN__;
         };
-        result__WCIG=result__YVEH;
+        result__3HIG=result__O2EH;
       };
-      __tmp__TYQD=result__WCIG;
+      __tmp__B2QD=result__3HIG;
     } break;
     };
-    result__VXQD=__tmp__TYQD;
+    result__D1QD=__tmp__B2QD;
   };
-  if ((Self__RRVD == 'E')) {
-    switch (((struct ___OBJ *)__tmp__0XQD)->__id) {
+  if ((Self__5UVD == 'E')) {
+    switch (((struct ___OBJ *)__tmp__I1QD)->__id) {
     case __LIP_BOOLEAN__: {
-      Self__SA4F=((__LIP_BOOLEAN *)__tmp__0XQD);
-      result__VA4F=NULL;
-      if (__tmp__3XQD==NULL) {
-        __tmp__YA4F=NULL;
+      Self__ZF4F=((__LIP_BOOLEAN *)__tmp__I1QD);
+      result__2F4F=NULL;
+      if (__tmp__L1QD==NULL) {
+        __tmp__5F4F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__3XQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__L1QD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__YA4F=((__LIP_BOOLEAN *)__tmp__3XQD);
+          __tmp__5F4F=((__LIP_BOOLEAN *)__tmp__L1QD);
         } break;
         case __LIP_INTEGER__: {
-          __tmp__YA4F=NULL;
+          __tmp__5F4F=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__YA4F=NULL;
+          __tmp__5F4F=NULL;
         } break;
         }
       };
-      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;
+      s__3F4F=__tmp__5F4F;
+      if (((void *)__tmp__5F4F != (void *)NULL)) {
+        b__R2EH=(Self__ZF4F->value__JFQD != __tmp__5F4F->value__JFQD);
+        result__Q2EH=NULL;
+        if (b__R2EH) {
+          result__Q2EH=true__FXLF;
         } else {
-          result__0VEH=LIP_BOOLEAN__;
+          result__Q2EH=LIP_BOOLEAN__;
         };
-        result__VA4F=result__0VEH;
+        result__2F4F=result__Q2EH;
       };
-      __tmp__0YQD=result__VA4F;
+      __tmp__I2QD=result__2F4F;
     } break;
     case __LIP_INTEGER__: {
-      Self__CB4F=((__LIP_INTEGER *)__tmp__0XQD);
-      result__FB4F=NULL;
-      if (__tmp__3XQD==NULL) {
-        __tmp__IB4F=NULL;
+      Self__JG4F=((__LIP_INTEGER *)__tmp__I1QD);
+      result__MG4F=NULL;
+      if (__tmp__L1QD==NULL) {
+        __tmp__PG4F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__3XQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__L1QD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__IB4F=NULL;
+          __tmp__PG4F=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__IB4F=((__LIP_INTEGER *)__tmp__3XQD);
+          __tmp__PG4F=((__LIP_INTEGER *)__tmp__L1QD);
         } break;
         case __LIP_STRING__: {
-          __tmp__IB4F=NULL;
+          __tmp__PG4F=NULL;
         } break;
         }
       };
-      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;
+      s__NG4F=__tmp__PG4F;
+      if (((void *)__tmp__PG4F != (void *)NULL)) {
+        free__DC4F(__tmp__PG4F);
+        free__DC4F(Self__JG4F);
+        b__T2EH=(Self__JG4F->value__LN4F != __tmp__PG4F->value__LN4F);
+        result__S2EH=NULL;
+        if (b__T2EH) {
+          result__S2EH=true__FXLF;
         } else {
-          result__2VEH=LIP_BOOLEAN__;
+          result__S2EH=LIP_BOOLEAN__;
         };
-        result__FB4F=result__2VEH;
+        result__MG4F=result__S2EH;
       };
-      __tmp__0YQD=result__FB4F;
+      __tmp__I2QD=result__MG4F;
     } break;
     case __LIP_STRING__: {
-      Self__EDIG=((__LIP_STRING *)__tmp__0XQD);
-      result__HDIG=NULL;
-      if (__tmp__3XQD==NULL) {
-        __tmp__KDIG=NULL;
+      Self__LIIG=((__LIP_STRING *)__tmp__I1QD);
+      result__OIIG=NULL;
+      if (__tmp__L1QD==NULL) {
+        __tmp__RIIG=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__3XQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__L1QD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__KDIG=NULL;
+          __tmp__RIIG=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__KDIG=NULL;
+          __tmp__RIIG=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__KDIG=((__LIP_STRING *)__tmp__3XQD);
+          __tmp__RIIG=((__LIP_STRING *)__tmp__L1QD);
         } break;
         }
       };
-      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;
+      s__PIIG=__tmp__RIIG;
+      if (((void *)__tmp__RIIG != (void *)NULL)) {
+        free__RGIG(__tmp__RIIG);
+        free__RGIG(Self__LIIG);
+        b__V2EH=((void *)Self__LIIG->value__FSUE != (void *)__tmp__RIIG->value__FSUE);
+        result__U2EH=NULL;
+        if (b__V2EH) {
+          result__U2EH=true__FXLF;
         } else {
-          result__4VEH=LIP_BOOLEAN__;
+          result__U2EH=LIP_BOOLEAN__;
         };
-        result__HDIG=result__4VEH;
+        result__OIIG=result__U2EH;
       };
-      __tmp__0YQD=result__HDIG;
+      __tmp__I2QD=result__OIIG;
     } break;
     };
-    result__VXQD=__tmp__0YQD;
+    result__D1QD=__tmp__I2QD;
   };
-  if ((Self__RRVD == '>')) {
-    switch (((struct ___OBJ *)__tmp__0XQD)->__id) {
+  if ((Self__5UVD == '>')) {
+    switch (((struct ___OBJ *)__tmp__I1QD)->__id) {
     case __LIP_BOOLEAN__: {
-      if (__tmp__3XQD==NULL) {
-        __tmp__0B4F=NULL;
+      if (__tmp__L1QD==NULL) {
+        __tmp__BH4F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__3XQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__L1QD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__0B4F=((__LIP_BOOLEAN *)__tmp__3XQD);
+          __tmp__BH4F=((__LIP_BOOLEAN *)__tmp__L1QD);
         } break;
         case __LIP_INTEGER__: {
-          __tmp__0B4F=NULL;
+          __tmp__BH4F=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__0B4F=NULL;
+          __tmp__BH4F=NULL;
         } break;
         }
       };
-      s__YB4F=__tmp__0B4F;
-      __tmp__BZQD=NULL;
+      s__5G4F=__tmp__BH4F;
+      __tmp__P2QD=NULL;
     } break;
     case __LIP_INTEGER__: {
-      Self__EC4F=((__LIP_INTEGER *)__tmp__0XQD);
-      result__HC4F=NULL;
-      if (__tmp__3XQD==NULL) {
-        __tmp__KC4F=NULL;
+      Self__LH4F=((__LIP_INTEGER *)__tmp__I1QD);
+      result__OH4F=NULL;
+      if (__tmp__L1QD==NULL) {
+        __tmp__RH4F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__3XQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__L1QD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__KC4F=NULL;
+          __tmp__RH4F=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__KC4F=((__LIP_INTEGER *)__tmp__3XQD);
+          __tmp__RH4F=((__LIP_INTEGER *)__tmp__L1QD);
         } break;
         case __LIP_STRING__: {
-          __tmp__KC4F=NULL;
+          __tmp__RH4F=NULL;
         } break;
         }
       };
-      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;
+      s__PH4F=__tmp__RH4F;
+      if (((void *)__tmp__RH4F != (void *)NULL)) {
+        free__DC4F(__tmp__RH4F);
+        free__DC4F(Self__LH4F);
+        b__X2EH=(Self__LH4F->value__LN4F > __tmp__RH4F->value__LN4F);
+        result__W2EH=NULL;
+        if (b__X2EH) {
+          result__W2EH=true__FXLF;
         } else {
-          result__AWEH=LIP_BOOLEAN__;
+          result__W2EH=LIP_BOOLEAN__;
         };
-        result__HC4F=result__AWEH;
+        result__OH4F=result__W2EH;
       };
-      __tmp__BZQD=result__HC4F;
+      __tmp__P2QD=result__OH4F;
     } break;
     case __LIP_STRING__: {
-      if (__tmp__3XQD==NULL) {
-        __tmp__1DIG=NULL;
+      if (__tmp__L1QD==NULL) {
+        __tmp__CJIG=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__3XQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__L1QD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__1DIG=NULL;
+          __tmp__CJIG=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__1DIG=NULL;
+          __tmp__CJIG=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__1DIG=((__LIP_STRING *)__tmp__3XQD);
+          __tmp__CJIG=((__LIP_STRING *)__tmp__L1QD);
         } break;
         }
       };
-      s__ZDIG=__tmp__1DIG;
-      __tmp__BZQD=NULL;
+      s__AJIG=__tmp__CJIG;
+      __tmp__P2QD=NULL;
     } break;
     };
-    result__VXQD=__tmp__BZQD;
+    result__D1QD=__tmp__P2QD;
   };
-  if ((Self__RRVD == '<')) {
-    switch (((struct ___OBJ *)__tmp__0XQD)->__id) {
+  if ((Self__5UVD == '<')) {
+    switch (((struct ___OBJ *)__tmp__I1QD)->__id) {
     case __LIP_BOOLEAN__: {
-      if (__tmp__3XQD==NULL) {
-        __tmp__2C4F=NULL;
+      if (__tmp__L1QD==NULL) {
+        __tmp__DI4F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__3XQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__L1QD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__2C4F=((__LIP_BOOLEAN *)__tmp__3XQD);
+          __tmp__DI4F=((__LIP_BOOLEAN *)__tmp__L1QD);
         } break;
         case __LIP_INTEGER__: {
-          __tmp__2C4F=NULL;
+          __tmp__DI4F=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__2C4F=NULL;
+          __tmp__DI4F=NULL;
         } break;
         }
       };
-      s__0C4F=__tmp__2C4F;
-      __tmp__IZQD=NULL;
+      s__BI4F=__tmp__DI4F;
+      __tmp__W2QD=NULL;
     } break;
     case __LIP_INTEGER__: {
-      Self__GD4F=((__LIP_INTEGER *)__tmp__0XQD);
-      result__JD4F=NULL;
-      if (__tmp__3XQD==NULL) {
-        __tmp__MD4F=NULL;
+      Self__NI4F=((__LIP_INTEGER *)__tmp__I1QD);
+      result__QI4F=NULL;
+      if (__tmp__L1QD==NULL) {
+        __tmp__TI4F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__3XQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__L1QD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__MD4F=NULL;
+          __tmp__TI4F=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__MD4F=((__LIP_INTEGER *)__tmp__3XQD);
+          __tmp__TI4F=((__LIP_INTEGER *)__tmp__L1QD);
         } break;
         case __LIP_STRING__: {
-          __tmp__MD4F=NULL;
+          __tmp__TI4F=NULL;
         } break;
         }
       };
-      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;
+      s__RI4F=__tmp__TI4F;
+      if (((void *)__tmp__TI4F != (void *)NULL)) {
+        free__DC4F(__tmp__TI4F);
+        free__DC4F(Self__NI4F);
+        b__Z2EH=(Self__NI4F->value__LN4F < __tmp__TI4F->value__LN4F);
+        result__Y2EH=NULL;
+        if (b__Z2EH) {
+          result__Y2EH=true__FXLF;
         } else {
-          result__CWEH=LIP_BOOLEAN__;
+          result__Y2EH=LIP_BOOLEAN__;
         };
-        result__JD4F=result__CWEH;
+        result__QI4F=result__Y2EH;
       };
-      __tmp__IZQD=result__JD4F;
+      __tmp__W2QD=result__QI4F;
     } break;
     case __LIP_STRING__: {
-      if (__tmp__3XQD==NULL) {
-        __tmp__MEIG=NULL;
+      if (__tmp__L1QD==NULL) {
+        __tmp__TJIG=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__3XQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__L1QD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__MEIG=NULL;
+          __tmp__TJIG=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__MEIG=NULL;
+          __tmp__TJIG=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__MEIG=((__LIP_STRING *)__tmp__3XQD);
+          __tmp__TJIG=((__LIP_STRING *)__tmp__L1QD);
         } break;
         }
       };
-      s__KEIG=__tmp__MEIG;
-      __tmp__IZQD=NULL;
+      s__RJIG=__tmp__TJIG;
+      __tmp__W2QD=NULL;
     } break;
     };
-    result__VXQD=__tmp__IZQD;
+    result__D1QD=__tmp__W2QD;
   };
-  if ((Self__RRVD == 'S')) {
-    switch (((struct ___OBJ *)__tmp__0XQD)->__id) {
+  if ((Self__5UVD == 'S')) {
+    switch (((struct ___OBJ *)__tmp__I1QD)->__id) {
     case __LIP_BOOLEAN__: {
-      if (__tmp__3XQD==NULL) {
-        __tmp__4D4F=NULL;
+      if (__tmp__L1QD==NULL) {
+        __tmp__FJ4F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__3XQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__L1QD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__4D4F=((__LIP_BOOLEAN *)__tmp__3XQD);
+          __tmp__FJ4F=((__LIP_BOOLEAN *)__tmp__L1QD);
         } break;
         case __LIP_INTEGER__: {
-          __tmp__4D4F=NULL;
+          __tmp__FJ4F=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__4D4F=NULL;
+          __tmp__FJ4F=NULL;
         } break;
         }
       };
-      s__2D4F=__tmp__4D4F;
-      __tmp__PZQD=NULL;
+      s__DJ4F=__tmp__FJ4F;
+      __tmp__32QD=NULL;
     } break;
     case __LIP_INTEGER__: {
-      Self__IE4F=((__LIP_INTEGER *)__tmp__0XQD);
-      result__LE4F=NULL;
-      if (__tmp__3XQD==NULL) {
-        __tmp__OE4F=NULL;
+      Self__PJ4F=((__LIP_INTEGER *)__tmp__I1QD);
+      result__SJ4F=NULL;
+      if (__tmp__L1QD==NULL) {
+        __tmp__VJ4F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__3XQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__L1QD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__OE4F=NULL;
+          __tmp__VJ4F=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__OE4F=((__LIP_INTEGER *)__tmp__3XQD);
+          __tmp__VJ4F=((__LIP_INTEGER *)__tmp__L1QD);
         } break;
         case __LIP_STRING__: {
-          __tmp__OE4F=NULL;
+          __tmp__VJ4F=NULL;
         } break;
         }
       };
-      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;
+      s__TJ4F=__tmp__VJ4F;
+      if (((void *)__tmp__VJ4F != (void *)NULL)) {
+        free__DC4F(__tmp__VJ4F);
+        free__DC4F(Self__PJ4F);
+        b__12EH=(Self__PJ4F->value__LN4F >= __tmp__VJ4F->value__LN4F);
+        result__02EH=NULL;
+        if (b__12EH) {
+          result__02EH=true__FXLF;
         } else {
-          result__EWEH=LIP_BOOLEAN__;
+          result__02EH=LIP_BOOLEAN__;
         };
-        result__LE4F=result__EWEH;
+        result__SJ4F=result__02EH;
       };
-      __tmp__PZQD=result__LE4F;
+      __tmp__32QD=result__SJ4F;
     } break;
     case __LIP_STRING__: {
-      if (__tmp__3XQD==NULL) {
-        __tmp__3EIG=NULL;
+      if (__tmp__L1QD==NULL) {
+        __tmp__EKIG=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__3XQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__L1QD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__3EIG=NULL;
+          __tmp__EKIG=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__3EIG=NULL;
+          __tmp__EKIG=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__3EIG=((__LIP_STRING *)__tmp__3XQD);
+          __tmp__EKIG=((__LIP_STRING *)__tmp__L1QD);
         } break;
         }
       };
-      s__1EIG=__tmp__3EIG;
-      __tmp__PZQD=NULL;
+      s__CKIG=__tmp__EKIG;
+      __tmp__32QD=NULL;
     } break;
     };
-    result__VXQD=__tmp__PZQD;
+    result__D1QD=__tmp__32QD;
   };
-  if ((Self__RRVD == 'I')) {
-    switch (((struct ___OBJ *)__tmp__0XQD)->__id) {
+  if ((Self__5UVD == 'I')) {
+    switch (((struct ___OBJ *)__tmp__I1QD)->__id) {
     case __LIP_BOOLEAN__: {
-      if (__tmp__3XQD==NULL) {
-        __tmp__AF4F=NULL;
+      if (__tmp__L1QD==NULL) {
+        __tmp__HK4F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__3XQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__L1QD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__AF4F=((__LIP_BOOLEAN *)__tmp__3XQD);
+          __tmp__HK4F=((__LIP_BOOLEAN *)__tmp__L1QD);
         } break;
         case __LIP_INTEGER__: {
-          __tmp__AF4F=NULL;
+          __tmp__HK4F=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__AF4F=NULL;
+          __tmp__HK4F=NULL;
         } break;
         }
       };
-      s__4E4F=__tmp__AF4F;
-      __tmp__WZQD=NULL;
+      s__FK4F=__tmp__HK4F;
+      __tmp__E3QD=NULL;
     } break;
     case __LIP_INTEGER__: {
-      Self__KF4F=((__LIP_INTEGER *)__tmp__0XQD);
-      result__NF4F=NULL;
-      if (__tmp__3XQD==NULL) {
-        __tmp__QF4F=NULL;
+      Self__RK4F=((__LIP_INTEGER *)__tmp__I1QD);
+      result__UK4F=NULL;
+      if (__tmp__L1QD==NULL) {
+        __tmp__XK4F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__3XQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__L1QD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__QF4F=NULL;
+          __tmp__XK4F=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__QF4F=((__LIP_INTEGER *)__tmp__3XQD);
+          __tmp__XK4F=((__LIP_INTEGER *)__tmp__L1QD);
         } break;
         case __LIP_STRING__: {
-          __tmp__QF4F=NULL;
+          __tmp__XK4F=NULL;
         } break;
         }
       };
-      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;
+      s__VK4F=__tmp__XK4F;
+      if (((void *)__tmp__XK4F != (void *)NULL)) {
+        free__DC4F(__tmp__XK4F);
+        free__DC4F(Self__RK4F);
+        b__32EH=(Self__RK4F->value__LN4F <= __tmp__XK4F->value__LN4F);
+        result__22EH=NULL;
+        if (b__32EH) {
+          result__22EH=true__FXLF;
         } else {
-          result__GWEH=LIP_BOOLEAN__;
+          result__22EH=LIP_BOOLEAN__;
         };
-        result__NF4F=result__GWEH;
+        result__UK4F=result__22EH;
       };
-      __tmp__WZQD=result__NF4F;
+      __tmp__E3QD=result__UK4F;
     } break;
     case __LIP_STRING__: {
-      if (__tmp__3XQD==NULL) {
-        __tmp__OFIG=NULL;
+      if (__tmp__L1QD==NULL) {
+        __tmp__VKIG=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__3XQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__L1QD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__OFIG=NULL;
+          __tmp__VKIG=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__OFIG=NULL;
+          __tmp__VKIG=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__OFIG=((__LIP_STRING *)__tmp__3XQD);
+          __tmp__VKIG=((__LIP_STRING *)__tmp__L1QD);
         } break;
         }
       };
-      s__MFIG=__tmp__OFIG;
-      __tmp__WZQD=NULL;
+      s__TKIG=__tmp__VKIG;
+      __tmp__E3QD=NULL;
     } break;
     };
-    result__VXQD=__tmp__WZQD;
+    result__D1QD=__tmp__E3QD;
   };
-  if ((Self__RRVD == '+')) {
-    switch (((struct ___OBJ *)__tmp__0XQD)->__id) {
+  if ((Self__5UVD == '+')) {
+    switch (((struct ___OBJ *)__tmp__I1QD)->__id) {
     case __LIP_BOOLEAN__: {
-      if (__tmp__3XQD==NULL) {
-        __tmp__CG4F=NULL;
+      if (__tmp__L1QD==NULL) {
+        __tmp__JL4F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__3XQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__L1QD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__CG4F=((__LIP_BOOLEAN *)__tmp__3XQD);
+          __tmp__JL4F=((__LIP_BOOLEAN *)__tmp__L1QD);
         } break;
         case __LIP_INTEGER__: {
-          __tmp__CG4F=NULL;
+          __tmp__JL4F=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__CG4F=NULL;
+          __tmp__JL4F=NULL;
         } break;
         }
       };
-      s__AG4F=__tmp__CG4F;
-      __tmp__3ZQD=NULL;
+      s__HL4F=__tmp__JL4F;
+      __tmp__L3QD=NULL;
     } break;
     case __LIP_INTEGER__: {
-      Self__MG4F=((__LIP_INTEGER *)__tmp__0XQD);
-      result__PG4F=NULL;
-      if (__tmp__3XQD==NULL) {
-        __tmp__SG4F=NULL;
+      Self__TL4F=((__LIP_INTEGER *)__tmp__I1QD);
+      result__WL4F=NULL;
+      if (__tmp__L1QD==NULL) {
+        __tmp__ZL4F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__3XQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__L1QD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__SG4F=NULL;
+          __tmp__ZL4F=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__SG4F=((__LIP_INTEGER *)__tmp__3XQD);
+          __tmp__ZL4F=((__LIP_INTEGER *)__tmp__L1QD);
         } break;
         case __LIP_STRING__: {
-          __tmp__SG4F=NULL;
+          __tmp__ZL4F=NULL;
         } break;
         }
       };
-      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;
+      s__XL4F=__tmp__ZL4F;
+      if (((void *)__tmp__ZL4F != (void *)NULL)) {
+        Self__TL4F->value__LN4F=(__INTEGER)(Self__TL4F->value__LN4F + __tmp__ZL4F->value__LN4F);
+        free__DC4F(__tmp__ZL4F);
+        result__WL4F=Self__TL4F;
       };
-      __tmp__3ZQD=result__PG4F;
+      __tmp__L3QD=result__WL4F;
     } break;
     case __LIP_STRING__: {
-      Self__ZFIG=((__LIP_STRING *)__tmp__0XQD);
-      result__2FIG=NULL;
-      if (__tmp__3XQD==NULL) {
-        __tmp__5FIG=NULL;
+      Self__ALIG=((__LIP_STRING *)__tmp__I1QD);
+      result__DLIG=NULL;
+      if (__tmp__L1QD==NULL) {
+        __tmp__GLIG=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__3XQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__L1QD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__5FIG=NULL;
+          __tmp__GLIG=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__5FIG=NULL;
+          __tmp__GLIG=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__5FIG=((__LIP_STRING *)__tmp__3XQD);
+          __tmp__GLIG=((__LIP_STRING *)__tmp__L1QD);
         } break;
         }
       };
-      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;
+      s__ELIG=__tmp__GLIG;
+      if (((void *)__tmp__GLIG != (void *)NULL)) {
+        copy__JDS(string_tmp__VH,Self__ALIG->value__FSUE);
+        append__ROS(string_tmp__VH,__tmp__GLIG->value__FSUE);
+        Self__ALIG->value__FSUE=get__YWB(string_tmp__VH);
+        free__RGIG(__tmp__GLIG);
+        result__DLIG=Self__ALIG;
       };
-      __tmp__3ZQD=result__2FIG;
+      __tmp__L3QD=result__DLIG;
     } break;
     };
-    result__VXQD=__tmp__3ZQD;
+    result__D1QD=__tmp__L3QD;
   };
-  if ((Self__RRVD == '-')) {
-    switch (((struct ___OBJ *)__tmp__0XQD)->__id) {
+  if ((Self__5UVD == '-')) {
+    switch (((struct ___OBJ *)__tmp__I1QD)->__id) {
     case __LIP_BOOLEAN__: {
-      if (__tmp__3XQD==NULL) {
-        __tmp__EH4F=NULL;
+      if (__tmp__L1QD==NULL) {
+        __tmp__LM4F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__3XQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__L1QD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__EH4F=((__LIP_BOOLEAN *)__tmp__3XQD);
+          __tmp__LM4F=((__LIP_BOOLEAN *)__tmp__L1QD);
         } break;
         case __LIP_INTEGER__: {
-          __tmp__EH4F=NULL;
+          __tmp__LM4F=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__EH4F=NULL;
+          __tmp__LM4F=NULL;
         } break;
         }
       };
-      s__CH4F=__tmp__EH4F;
-      __tmp__E0QD=NULL;
+      s__JM4F=__tmp__LM4F;
+      __tmp__S3QD=NULL;
     } break;
     case __LIP_INTEGER__: {
-      Self__OH4F=((__LIP_INTEGER *)__tmp__0XQD);
-      result__RH4F=NULL;
-      if (__tmp__3XQD==NULL) {
-        __tmp__UH4F=NULL;
+      Self__VM4F=((__LIP_INTEGER *)__tmp__I1QD);
+      result__YM4F=NULL;
+      if (__tmp__L1QD==NULL) {
+        __tmp__1M4F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__3XQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__L1QD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__UH4F=NULL;
+          __tmp__1M4F=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__UH4F=((__LIP_INTEGER *)__tmp__3XQD);
+          __tmp__1M4F=((__LIP_INTEGER *)__tmp__L1QD);
         } break;
         case __LIP_STRING__: {
-          __tmp__UH4F=NULL;
+          __tmp__1M4F=NULL;
         } break;
         }
       };
-      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;
+      s__ZM4F=__tmp__1M4F;
+      if (((void *)__tmp__1M4F != (void *)NULL)) {
+        Self__VM4F->value__LN4F=(__INTEGER)(Self__VM4F->value__LN4F - __tmp__1M4F->value__LN4F);
+        free__DC4F(__tmp__1M4F);
+        result__YM4F=Self__VM4F;
       };
-      __tmp__E0QD=result__RH4F;
+      __tmp__S3QD=result__YM4F;
     } break;
     case __LIP_STRING__: {
-      if (__tmp__3XQD==NULL) {
-        __tmp__QGIG=NULL;
+      if (__tmp__L1QD==NULL) {
+        __tmp__XLIG=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__3XQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__L1QD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__QGIG=NULL;
+          __tmp__XLIG=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__QGIG=NULL;
+          __tmp__XLIG=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__QGIG=((__LIP_STRING *)__tmp__3XQD);
+          __tmp__XLIG=((__LIP_STRING *)__tmp__L1QD);
         } break;
         }
       };
-      s__OGIG=__tmp__QGIG;
-      __tmp__E0QD=NULL;
+      s__VLIG=__tmp__XLIG;
+      __tmp__S3QD=NULL;
     } break;
     };
-    result__VXQD=__tmp__E0QD;
+    result__D1QD=__tmp__S3QD;
   };
-  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)) {
+  if (((void *)result__D1QD == (void *)NULL)) {
+    __tmp__13QD=Self__B1QD->parent_lip_code__JRZB.parent_itm_object__0EE.position__GFJ;
+    put_error__text__NPG( 1,(&__string_279));
+    put_position__XQG(__tmp__13QD);
+    put_string__P3F(msg_err__SPG);
+    if ((type_error__RPG !=  2)) {
       exit(( 1));
     };
   };
-  return(result__VXQD);
+  return(result__D1QD);
 }
 
-static void* run_expr__R0QD(__LIP_UNARY *Self__S0QD)
+static void* run_expr__53QD(__LIP_UNARY *Self__A4QD)
 // ({LIP_UNARY}) With resultRecursive, No inlinable.
 {
-  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) {
+  void *__tmp__E4QD;
+  void *__tmp__F4QD,*__tmp__5JKH,*__tmp__AKKH,*result__C4QD,*__tmp__N4QD;
+  void *__tmp__U4QD;
+  __LIP_INTEGER *Self__BKKH,*Self__JN4F,*Self__WN4F;
+  __LIP_STRING *Self__CKKH;
+  void *result__AXLF;
+  __POSITION __tmp__34QD;
+  __CHARACTER Self__PXVD;
+  __BOOLEAN b__4WLF;
+  __tmp__E4QD=Self__A4QD->value__D4QD;
+  switch (((struct ___OBJ *)__tmp__E4QD)->__id) {
   case __LIP_BINARY__: {
-    __tmp__X0QD=run_expr__SXQD(__tmp__W0QD);
+    __tmp__F4QD=run_expr__A1QD(__tmp__E4QD);
   } break;
   case __LIP_UNARY__: {
-    __tmp__X0QD=run_expr__R0QD(__tmp__W0QD);
+    __tmp__F4QD=run_expr__53QD(__tmp__E4QD);
   } break;
   case __LIP_CALL__: {
-    __tmp__X0QD=run_expr__DSUE(__tmp__W0QD);
+    __tmp__F4QD=run_expr__XWUE(__tmp__E4QD);
   } break;
   case __LIP_VALUE__: {
-    __tmp__ACKH=((__LIP_VALUE *)__tmp__W0QD)->value__DWUE;
-    switch (((struct ___OBJ *)__tmp__ACKH)->__id) {
+    __tmp__5JKH=((__LIP_VALUE *)__tmp__E4QD)->value__X0UE;
+    switch (((struct ___OBJ *)__tmp__5JKH)->__id) {
     case __LIP_BOOLEAN__: {
-      __tmp__BCKH=((__LIP_BOOLEAN *)__tmp__ACKH);
+      __tmp__AKKH=((__LIP_BOOLEAN *)__tmp__5JKH);
     } break;
     case __LIP_INTEGER__: {
-      Self__CCKH=((__LIP_INTEGER *)__tmp__ACKH);
-      __tmp__BCKH=get__LTSE(Self__CCKH,Self__CCKH->value__EI4F);
+      Self__BKKH=((__LIP_INTEGER *)__tmp__5JKH);
+      __tmp__AKKH=get__5XSE(Self__BKKH,Self__BKKH->value__LN4F);
     } break;
     case __LIP_STRING__: {
-      Self__DCKH=((__LIP_STRING *)__tmp__ACKH);
-      __tmp__BCKH=get__GYFF(Self__DCKH,Self__DCKH->value__RNUE);
+      Self__CKKH=((__LIP_STRING *)__tmp__5JKH);
+      __tmp__AKKH=get__M3FF(Self__CKKH,Self__CKKH->value__FSUE);
     } break;
     };
-    __tmp__X0QD=__tmp__BCKH;
+    __tmp__F4QD=__tmp__AKKH;
   } break;
   };
-  result__U0QD=__tmp__X0QD;
-  Self__BUVD=Self__S0QD->operator__Y0QD;
-  if ((Self__BUVD == '-')) {
-    switch (((struct ___OBJ *)__tmp__X0QD)->__id) {
+  result__C4QD=__tmp__F4QD;
+  Self__PXVD=Self__A4QD->operator__G4QD;
+  if ((Self__PXVD == '-')) {
+    switch (((struct ___OBJ *)__tmp__F4QD)->__id) {
     case __LIP_BOOLEAN__: {
-      __tmp__50QD=NULL;
+      __tmp__N4QD=NULL;
     } break;
     case __LIP_INTEGER__: {
-      Self__CI4F=((__LIP_INTEGER *)__tmp__X0QD);
-      Self__CI4F->value__EI4F=(__INTEGER)(- Self__CI4F->value__EI4F);
-      __tmp__50QD=Self__CI4F;
+      Self__JN4F=((__LIP_INTEGER *)__tmp__F4QD);
+      Self__JN4F->value__LN4F=(__INTEGER)(- Self__JN4F->value__LN4F);
+      __tmp__N4QD=Self__JN4F;
     } break;
     case __LIP_STRING__: {
-      __tmp__50QD=NULL;
+      __tmp__N4QD=NULL;
     } break;
     };
-    result__U0QD=__tmp__50QD;
+    result__C4QD=__tmp__N4QD;
   };
-  if ((Self__BUVD == '!')) {
-    switch (((struct ___OBJ *)result__U0QD)->__id) {
+  if ((Self__PXVD == '!')) {
+    switch (((struct ___OBJ *)result__C4QD)->__id) {
     case __LIP_BOOLEAN__: {
-      b__XRLF=(! ((__LIP_BOOLEAN *)result__U0QD)->value__1BQD);
-      result__ZRLF=NULL;
-      if (b__XRLF) {
-        result__ZRLF=true__4RLF;
+      b__4WLF=(! ((__LIP_BOOLEAN *)result__C4QD)->value__JFQD);
+      result__AXLF=NULL;
+      if (b__4WLF) {
+        result__AXLF=true__FXLF;
       } else {
-        result__ZRLF=LIP_BOOLEAN__;
+        result__AXLF=LIP_BOOLEAN__;
       };
-      __tmp__G1QD=result__ZRLF;
+      __tmp__U4QD=result__AXLF;
     } break;
     case __LIP_INTEGER__: {
-      Self__PI4F=((__LIP_INTEGER *)result__U0QD);
-      Self__PI4F->value__EI4F=(__INTEGER)(~ Self__PI4F->value__EI4F);
-      __tmp__G1QD=Self__PI4F;
+      Self__WN4F=((__LIP_INTEGER *)result__C4QD);
+      Self__WN4F->value__LN4F=(__INTEGER)(~ Self__WN4F->value__LN4F);
+      __tmp__U4QD=Self__WN4F;
     } break;
     case __LIP_STRING__: {
-      __tmp__G1QD=NULL;
+      __tmp__U4QD=NULL;
     } break;
     };
-    result__U0QD=__tmp__G1QD;
+    result__C4QD=__tmp__U4QD;
   };
-  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)) {
+  if (((void *)result__C4QD == (void *)NULL)) {
+    __tmp__34QD=Self__A4QD->parent_lip_code__Y24B.parent_itm_object__0EE.position__GFJ;
+    put_error__text__NPG( 1,(&__string_279));
+    put_position__XQG(__tmp__34QD);
+    put_string__P3F(msg_err__SPG);
+    if ((type_error__RPG !=  2)) {
       exit(( 1));
     };
   };
-  return(result__U0QD);
+  return(result__C4QD);
 }
 
-static void* run_expr__DSUE(__LIP_CALL *Self__ESUE)
+static void* run_expr__XWUE(__LIP_CALL *Self__YWUE)
 // ({LIP_CALL}) With resultRecursive, No inlinable.
 {
-  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) {
+  void *str__1WUE,*__tmp__RXUE;
+  void *val__2WUE,*result__3WUE,*__tmp__GXUE,*__tmp__Y0UE,*__tmp__Z0UE;
+  void *__tmp__FXUE;
+  __LIP_INTEGER *Self__WQ4F;
+  __LIP_STRING *Self__HNIG;
+  __POSITION pos__EI2G,pos__H2KF;
+  __STRING *Self__W4GH;
+  __INTEGER state__QFXF,Self__UXGG;
+  __BOOLEAN __tmp__CYUE,__tmp__UYUE,result__5WXE,sign__RFXF,__tmp__DHXF;
+  __BOOLEAN result__42EH,__tmp__QHXF,result__1EQG,__tmp__DIXF;
+  __BOOLEAN result__C3EH,result__G3EH,result__K3EH,result__L3EH;
+  __CHARACTER Self__D4BH,Self__52EH,Self__E4BH,Self__D3EH,Self__H3EH;
+  __CHARACTER mem__MEMF;
+  __FAST_ARRAYoLIP_SLOT_DATAo *Self__2AQF;
+  str__1WUE=NULL;
+  val__2WUE=NULL;
+  result__3WUE=NULL;
+  if (((void *)Self__YWUE->argument__NQUE != (void *)NULL)) {
+    __tmp__FXUE=Self__YWUE->argument__NQUE;
+    switch (((struct ___OBJ *)__tmp__FXUE)->__id) {
     case __LIP_BINARY__: {
-      __tmp__SSUE=run_expr__SXQD(__tmp__RSUE);
+      __tmp__GXUE=run_expr__A1QD(__tmp__FXUE);
     } break;
     case __LIP_UNARY__: {
-      __tmp__SSUE=run_expr__R0QD(__tmp__RSUE);
+      __tmp__GXUE=run_expr__53QD(__tmp__FXUE);
     } break;
     case __LIP_CALL__: {
-      __tmp__SSUE=run_expr__DSUE(__tmp__RSUE);
+      __tmp__GXUE=run_expr__XWUE(__tmp__FXUE);
     } break;
     case __LIP_VALUE__: {
-      __tmp__EWUE=((__LIP_VALUE *)__tmp__RSUE)->value__DWUE;
-      switch (((struct ___OBJ *)__tmp__EWUE)->__id) {
+      __tmp__Y0UE=((__LIP_VALUE *)__tmp__FXUE)->value__X0UE;
+      switch (((struct ___OBJ *)__tmp__Y0UE)->__id) {
       case __LIP_BOOLEAN__: {
-        __tmp__FWUE=((__LIP_BOOLEAN *)__tmp__EWUE);
+        __tmp__Z0UE=((__LIP_BOOLEAN *)__tmp__Y0UE);
       } break;
       case __LIP_INTEGER__: {
-        Self__PL4F=((__LIP_INTEGER *)__tmp__EWUE);
-        __tmp__FWUE=get__LTSE(Self__PL4F,Self__PL4F->value__EI4F);
+        Self__WQ4F=((__LIP_INTEGER *)__tmp__Y0UE);
+        __tmp__Z0UE=get__5XSE(Self__WQ4F,Self__WQ4F->value__LN4F);
       } break;
       case __LIP_STRING__: {
-        Self__AIIG=((__LIP_STRING *)__tmp__EWUE);
-        __tmp__FWUE=get__GYFF(Self__AIIG,Self__AIIG->value__RNUE);
+        Self__HNIG=((__LIP_STRING *)__tmp__Y0UE);
+        __tmp__Z0UE=get__M3FF(Self__HNIG,Self__HNIG->value__FSUE);
       } break;
       };
-      __tmp__SSUE=__tmp__FWUE;
+      __tmp__GXUE=__tmp__Z0UE;
     } break;
     };
-    val__ISUE=__tmp__SSUE;
+    val__2WUE=__tmp__GXUE;
   };
-  if (((void *)Self__ESUE->name__EMUE == (void *)(&__string_93))) {
-    if (val__ISUE==NULL) {
-      __tmp__3SUE=NULL;
+  if (((void *)Self__YWUE->name__YQUE == (void *)(&__string_93))) {
+    if (val__2WUE==NULL) {
+      __tmp__RXUE=NULL;
     } else {
-      switch (((struct ___OBJ *)val__ISUE)->__id) {
+      switch (((struct ___OBJ *)val__2WUE)->__id) {
       case __LIP_BOOLEAN__: {
-        __tmp__3SUE=NULL;
+        __tmp__RXUE=NULL;
       } break;
       case __LIP_INTEGER__: {
-        __tmp__3SUE=NULL;
+        __tmp__RXUE=NULL;
       } break;
       case __LIP_STRING__: {
-        __tmp__3SUE=((void *)val__ISUE);
+        __tmp__RXUE=((void *)val__2WUE);
       } break;
       }
     };
-    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)) {
+    str__1WUE=__tmp__RXUE;
+    if (((void *)__tmp__RXUE == (void *)NULL)) {
+      pos__EI2G=Self__YWUE->parent_lip_code__K34B.parent_itm_object__0EE.position__GFJ;
+      put_error__text__NPG( 1,(&__string_312));
+      put_position__XQG(pos__EI2G);
+      put_string__P3F(msg_err__SPG);
+      if ((type_error__RPG !=  2)) {
         exit(( 1));
       };
     };
     ((__STRING *)string_tmp__VH)->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';
+    append_in__LNIG(__tmp__RXUE,string_tmp__VH);
+    Self__W4GH=((__STRING *)string_tmp__VH);
+    if ((Self__W4GH->capacity__ICS > Self__W4GH->count__EGC)) {
+      ((__CHARACTER *)Self__W4GH->storage__RCS)[Self__W4GH->count__EGC]='\0';
     } else {
-      add_last__3IT(Self__1XGH,'\0');
-      Self__1XGH->count__EGC=(__INTEGER)(Self__1XGH->count__EGC -  1);
+      add_last__GOT(Self__W4GH,'\0');
+      Self__W4GH->count__EGC=(__INTEGER)(Self__W4GH->count__EGC -  1);
     };
-    result__JSUE=get__LTSE(LIP_INTEGER__,((__INTEGER )(system(((char*)((Self__1XGH->storage__F5R)))))));
-    __tmp__OTUE=TRUE__;
+    result__3WUE=get__5XSE(LIP_INTEGER__,((__INTEGER )(system(((char*)((Self__W4GH->storage__RCS)))))));
+    __tmp__CYUE=TRUE__;
   } else {
-    __tmp__OTUE=FALSE__;
+    __tmp__CYUE=FALSE__;
   };
-  if (__tmp__OTUE) {
-    __tmp__AUUE=TRUE__;
+  if (__tmp__CYUE) {
+    __tmp__UYUE=TRUE__;
   } else {
-    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__;
+    result__5WXE=((void *)Self__YWUE->name__YQUE == (void *)(&__string_106));
+    if (result__5WXE) {
+      state__QFXF= 0;
+      sign__RFXF=FALSE__;
+      while ((state__QFXF <=  2)) {
+        if (push_back_flag__VYMF) {
+          push_back_flag__VYMF=FALSE__;
         } else {
-          memory__N5LF=((__CHARACTER )(fgetc(stdin)));
+          memory__UEMF=((__CHARACTER )(fgetc(stdin)));
         };
-        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__;
+        if ((state__QFXF ==  0)) {
+          Self__D4BH=memory__UEMF;
+          if ((((((((Self__D4BH == ' ') || (Self__D4BH == '\t')) || (Self__D4BH == '\n')) || (Self__D4BH == '\r')) || (Self__D4BH == '\0')) || (Self__D4BH == '\f')) || (Self__D4BH == '\v'))) {
+            __tmp__DHXF=TRUE__;
           } else {
-            Self__JWEH=memory__N5LF;
-            result__IWEH=FALSE__;
-            if ((((__INTEGER_8 )Self__JWEH) >= ((__INTEGER_8 )'0'))) {
-              result__IWEH=(((__INTEGER_8 )Self__JWEH) <= ((__INTEGER_8 )'9'));
+            Self__52EH=memory__UEMF;
+            result__42EH=FALSE__;
+            if ((((__INTEGER_8 )Self__52EH) >= ((__INTEGER_8 )'0'))) {
+              result__42EH=(((__INTEGER_8 )Self__52EH) <= ((__INTEGER_8 )'9'));
             };
-            if (result__IWEH) {
-              last_integer__1TUE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )memory__N5LF)) -  48);
-              state__JAXF= 2;
+            if (result__42EH) {
+              last_integer__PYUE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )memory__UEMF)) -  48);
+              state__QFXF= 2;
             };
-            __tmp__2BXF=result__IWEH;
+            __tmp__DHXF=result__42EH;
           };
-          if (__tmp__2BXF) {
-            __tmp__JCXF=TRUE__;
+          if (__tmp__DHXF) {
+            __tmp__QHXF=TRUE__;
           } else {
-            result__U5PG=(memory__N5LF == '-');
-            if (result__U5PG) {
-              sign__KAXF=TRUE__;
-              state__JAXF= 1;
+            result__1EQG=(memory__UEMF == '-');
+            if (result__1EQG) {
+              sign__RFXF=TRUE__;
+              state__QFXF= 1;
             };
-            __tmp__JCXF=result__U5PG;
+            __tmp__QHXF=result__1EQG;
           };
-          if ((! __tmp__JCXF)) {
-            if ((memory__N5LF == '+')) {
-              state__JAXF= 1;
+          if ((! __tmp__QHXF)) {
+            if ((memory__UEMF == '+')) {
+              state__QFXF= 1;
             } else {
-              state__JAXF= 4;
+              state__QFXF= 4;
             };
           };
-          __tmp__2CXF=TRUE__;
+          __tmp__DIXF=TRUE__;
         } else {
-          __tmp__2CXF=FALSE__;
+          __tmp__DIXF=FALSE__;
         };
-        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 ((! __tmp__DIXF)) {
+          if ((state__QFXF ==  1)) {
+            Self__E4BH=memory__UEMF;
+            if ((! (((((((Self__E4BH == ' ') || (Self__E4BH == '\t')) || (Self__E4BH == '\n')) || (Self__E4BH == '\r')) || (Self__E4BH == '\0')) || (Self__E4BH == '\f')) || (Self__E4BH == '\v')))) {
+              Self__D3EH=memory__UEMF;
+              result__C3EH=FALSE__;
+              if ((((__INTEGER_8 )Self__D3EH) >= ((__INTEGER_8 )'0'))) {
+                result__C3EH=(((__INTEGER_8 )Self__D3EH) <= ((__INTEGER_8 )'9'));
               };
-              if (result__MWEH) {
-                last_integer__1TUE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )memory__N5LF)) -  48);
-                state__JAXF= 2;
+              if (result__C3EH) {
+                last_integer__PYUE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )memory__UEMF)) -  48);
+                state__QFXF= 2;
               } else {
-                state__JAXF= 4;
+                state__QFXF= 4;
               };
             };
           } else {
-            Self__RWEH=memory__N5LF;
-            result__QWEH=FALSE__;
-            if ((((__INTEGER_8 )Self__RWEH) >= ((__INTEGER_8 )'0'))) {
-              result__QWEH=(((__INTEGER_8 )Self__RWEH) <= ((__INTEGER_8 )'9'));
+            Self__H3EH=memory__UEMF;
+            result__G3EH=FALSE__;
+            if ((((__INTEGER_8 )Self__H3EH) >= ((__INTEGER_8 )'0'))) {
+              result__G3EH=(((__INTEGER_8 )Self__H3EH) <= ((__INTEGER_8 )'9'));
             };
-            if (result__QWEH) {
-              last_integer__1TUE=(__INTEGER)((__INTEGER)(last_integer__1TUE *  10) + (__INTEGER)(((__INTEGER )((__INTEGER_8 )memory__N5LF)) -  48));
+            if (result__G3EH) {
+              last_integer__PYUE=(__INTEGER)((__INTEGER)(last_integer__PYUE *  10) + (__INTEGER)(((__INTEGER )((__INTEGER_8 )memory__UEMF)) -  48));
             } else {
-              state__JAXF= 3;
+              state__QFXF= 3;
             };
           };
         };
-        result__UWEH=FALSE__;
-        if ((! push_back_flag__OTMF)) {
-          result__UWEH=(memory__N5LF == ((__CHARACTER )(EOF)));
+        result__K3EH=FALSE__;
+        if ((! push_back_flag__VYMF)) {
+          result__K3EH=(memory__UEMF == ((__CHARACTER )(EOF)));
         };
-        if (result__UWEH) {
-          Self__NSGG=state__JAXF;
-          if (((state__JAXF >=  0) && (state__JAXF <=  1))) {
-            state__JAXF= 4;
+        if (result__K3EH) {
+          Self__UXGG=state__QFXF;
+          if (((state__QFXF >=  0) && (state__QFXF <=  1))) {
+            state__QFXF= 4;
           };
-          if (((Self__NSGG >=  2) && (Self__NSGG <=  3))) {
-            state__JAXF= 3;
+          if (((Self__UXGG >=  2) && (Self__UXGG <=  3))) {
+            state__QFXF= 3;
           };
         };
       };
-      result__VWEH=FALSE__;
-      if ((! push_back_flag__OTMF)) {
-        result__VWEH=(memory__N5LF == ((__CHARACTER )(EOF)));
+      result__L3EH=FALSE__;
+      if ((! push_back_flag__VYMF)) {
+        result__L3EH=(memory__UEMF == ((__CHARACTER )(EOF)));
       };
-      if (result__VWEH) {
-        push_back_flag__OTMF=TRUE__;
+      if (result__L3EH) {
+        push_back_flag__VYMF=TRUE__;
       };
-      if ((state__JAXF ==  4)) {
-        print__DID((&__string_331));
-        print__DID((&__string_220));
+      if ((state__QFXF ==  4)) {
+        print__DJD((&__string_331));
+        print__DJD((&__string_220));
         fputc((int)('\n'),stdout);
         exit(( 1));
       };
-      if (sign__KAXF) {
-        last_integer__1TUE=(__INTEGER)(- last_integer__1TUE);
+      if (sign__RFXF) {
+        last_integer__PYUE=(__INTEGER)(- last_integer__PYUE);
       };
-      result__JSUE=get__LTSE(LIP_INTEGER__,last_integer__1TUE);
+      result__3WUE=get__5XSE(LIP_INTEGER__,last_integer__PYUE);
     };
-    __tmp__AUUE=result__DSXE;
+    __tmp__UYUE=result__5WXE;
   };
-  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__;
+  if ((! __tmp__UYUE)) {
+    if (((void *)Self__YWUE->name__YQUE == (void *)(&__string_107))) {
+      ((__STRING *)last_string__BZUE)->count__EGC= 0;
+      mem__MEMF='\0';
+      if (push_back_flag__VYMF) {
+        push_back_flag__VYMF=FALSE__;
       } else {
-        memory__N5LF=((__CHARACTER )(fgetc(stdin)));
+        memory__UEMF=((__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)));
+      if (((memory__UEMF != '\n') && (memory__UEMF != ((__CHARACTER )(EOF))))) {
+        add_last__GOT(((__STRING *)last_string__BZUE),memory__UEMF);
+        mem__MEMF=((__CHARACTER )(fgetc(stdin)));
+        while ((! ((mem__MEMF == ((__CHARACTER )(EOF))) || (mem__MEMF == '\n')))) {
+          add_last__GOT(((__STRING *)last_string__BZUE),mem__MEMF);
+          mem__MEMF=((__CHARACTER )(fgetc(stdin)));
         };
-        memory__N5LF=mem__F5LF;
+        memory__UEMF=mem__MEMF;
       };
-      result__JSUE=get__GYFF(LIP_STRING__,get__YWB(last_string__NUUE));
+      result__3WUE=get__M3FF(LIP_STRING__,get__YWB(last_string__BZUE));
     } else {
-      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)) {
+      if (((void *)fast_reference_at__MWRD(list_data__WRNC,Self__YWUE->name__YQUE) == (void *)NULL)) {
+        Self__2AQF=((__FAST_ARRAYoLIP_SLOT_DATAo *)stack__XZUE);
+        if (((void *)((void **)Self__2AQF->parent_arrayed_collection__WZUE.storage__YHQF)[Self__2AQF->parent_arrayed_collection__WZUE.upper__GBQF] == (void *)NULL)) {
+          copy__JDS(string_tmp__VH,(&__string_309));
+          append__ROS(string_tmp__VH,Self__YWUE->name__YQUE);
+          append__ROS(string_tmp__VH,(&__string_310));
+          pos__H2KF=Self__YWUE->parent_lip_code__K34B.parent_itm_object__0EE.position__GFJ;
+          put_error__text__NPG( 1,string_tmp__VH);
+          put_position__XQG(pos__H2KF);
+          put_string__P3F(msg_err__SPG);
+          if ((type_error__RPG !=  2)) {
             exit(( 1));
           };
         };
       };
       print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
-      result__JSUE=NULL;
+      result__3WUE=NULL;
     };
   };
-  if (((void *)val__ISUE != (void *)NULL)) {
-    switch (((struct ___OBJ *)val__ISUE)->__id) {
+  if (((void *)val__2WUE != (void *)NULL)) {
+    switch (((struct ___OBJ *)val__2WUE)->__id) {
     case __LIP_BOOLEAN__: {
     } break;
     case __LIP_INTEGER__: {
-      free__223F(val__ISUE);
+      free__DC4F(val__2WUE);
     } break;
     case __LIP_STRING__: {
-      free__KBIG(val__ISUE);
+      free__RGIG(val__2WUE);
     } break;
     };
   };
-  return(result__JSUE);
+  return(result__3WUE);
 }
 
-static void* get__LTSE(__LIP_INTEGER *Self__MTSE,__INTEGER i__NTSE)
+static void* get__5XSE(__LIP_INTEGER *Self__AYSE,__INTEGER i__BYSE)
 // ({LIP_INTEGER},{INTEGER}) With resultNo recursive, No inlinable.
 {
-  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)));
+  void *result__DYSE;
+  __LIP_INTEGER *result__OZSF;
+  __POINTER ptr__PZSF,ptr_table__EKKH,next__DKKH,result__FKKH;
+  __POINTER ptr_table__JKKH,next__IKKH,result__KKKH;
+  __INTEGER typ_id__UZSF;
+  __UINTEGER_32 sz__RZSF,a__SCHH,new_size__TCHH,t__XCHH,a__WCHH;
+  __UINTEGER_32 new_size__MKKH,lab_type__LKKH;
+  __FAST_ARRAYoLIP_INTEGERo *Self__YB4E,*Self__OC4E;
+  result__DYSE=NULL;
+  if ((((__FAST_ARRAYoLIP_INTEGERo *)storage__JYSE)->parent_arrayed_collection__IYSE.upper__NHXE <  0)) {
+    result__OZSF=NULL;
+    ptr__PZSF=((__POINTER )(NULL));
+    typ_id__UZSF= 0;
+    sz__RZSF=((__UINTEGER_32 )sizeof(__LIP_INTEGER));
+    if ((sz__RZSF ==  0)) {
+      result__OZSF=Self__AYSE;
+    } else {
+      typ_id__UZSF=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__RZSF);
+      if ((typ_id__UZSF == (__INTEGER)(-  1))) {
+        a__SCHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__TCHH=(__UINTEGER_32)((__UINTEGER_32)(sz__RZSF + a__SCHH) & (__UINTEGER_32)(~ a__SCHH));
+        ptr_table__EKKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__TCHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__DKKH=((__POINTER )(NULL));
+        result__FKKH=((__POINTER *)ptr_table__EKKH)[ 0];
+        if ((result__FKKH == (void *)NULL)) {
+          result__FKKH=new_lab__FTJ(new_size__TCHH);
+          next__DKKH=(void *)((unsigned long)result__FKKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TCHH)));
+          ((__POINTER *)next__DKKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__EKKH)[ 0]=next__DKKH;
+        } else {
+          next__DKKH=((__POINTER *)result__FKKH)[ 0];
+          if ((next__DKKH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__FKKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__TCHH <<  1)) <=  4096)) {
+              next__DKKH=(void *)((unsigned long)result__FKKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TCHH)));
             } else {
-              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)));
+              next__DKKH=new_lab__FTJ(new_size__TCHH);
+            };
+            ((__POINTER *)next__DKKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__EKKH)[ 0]=next__DKKH;
+          } else {
+            ((__POINTER *)result__FKKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DKKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__FKKH=next__DKKH;
+          };
+        };
+        ptr__PZSF=result__FKKH;
+      } else {
+        t__XCHH=((__UINTEGER_32 )typ_id__UZSF);
+        a__WCHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__MKKH=(__UINTEGER_32)((__UINTEGER_32)(sz__RZSF + a__WCHH) & (__UINTEGER_32)(~ a__WCHH));
+        ptr_table__JKKH=((__POINTER )(&(table_type[(t__XCHH)])));
+        lab_type__LKKH=(__UINTEGER_32)(t__XCHH |  1);
+        next__IKKH=((__POINTER )(NULL));
+        result__KKKH=((__POINTER *)ptr_table__JKKH)[ 0];
+        if ((result__KKKH == (void *)NULL)) {
+          result__KKKH=new_lab__FTJ(lab_type__LKKH);
+          next__IKKH=(void *)((unsigned long)result__KKKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MKKH)));
+          ((__POINTER *)next__IKKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__JKKH)[ 0]=next__IKKH;
+        } else {
+          next__IKKH=((__POINTER *)result__KKKH)[ 0];
+          if ((next__IKKH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__KKKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__MKKH <<  1)) <=  4096)) {
+              next__IKKH=(void *)((unsigned long)result__KKKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MKKH)));
             } else {
-              next__JCKH=new_lab__ZPJ(lab_type__MCKH);
+              next__IKKH=new_lab__FTJ(lab_type__LKKH);
             };
-            ((__POINTER *)next__JCKH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__KCKH)[ 0]=next__JCKH;
+            ((__POINTER *)next__IKKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__JKKH)[ 0]=next__IKKH;
           } else {
-            ((__POINTER *)result__LCKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JCKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__LCKH=next__JCKH;
+            ((__POINTER *)result__KKKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__IKKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__KKKH=next__IKKH;
           };
         };
-        ptr__IUSF=result__LCKH;
+        ptr__PZSF=result__KKKH;
       };
-      result__HUSF=((__LIP_INTEGER *)ptr__IUSF);
-      *(result__HUSF) = *(Self__MTSE);
+      result__OZSF=((__LIP_INTEGER *)ptr__PZSF);
+      *(result__OZSF) = *(Self__AYSE);
     };
-    result__PTSE=result__HUSF;
+    result__DYSE=result__OZSF;
   } else {
-    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);
+    Self__YB4E=((__FAST_ARRAYoLIP_INTEGERo *)storage__JYSE);
+    result__DYSE=((void **)Self__YB4E->parent_arrayed_collection__IYSE.storage__0LXE)[Self__YB4E->parent_arrayed_collection__IYSE.upper__NHXE];
+    Self__OC4E=((__FAST_ARRAYoLIP_INTEGERo *)storage__JYSE);
+    Self__OC4E->parent_arrayed_collection__IYSE.upper__NHXE=(__INTEGER)(Self__OC4E->parent_arrayed_collection__IYSE.upper__NHXE -  1);
   };
-  ((__LIP_INTEGER *)result__PTSE)->value__EI4F=i__NTSE;
-  return(result__PTSE);
+  ((__LIP_INTEGER *)result__DYSE)->value__LN4F=i__BYSE;
+  return(result__DYSE);
 }
 
-static void* get__GYFF(__LIP_STRING *Self__HYFF,void *str__IYFF)
+static void* get__M3FF(__LIP_STRING *Self__N3FF,void *str__O3FF)
 // ({LIP_STRING},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  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)));
+  void *result__Q3FF;
+  __LIP_STRING *result__HQBG;
+  __POINTER ptr__IQBG,ptr_table__OKKH,next__NKKH,result__PKKH;
+  __POINTER ptr_table__TKKH,next__SKKH,result__UKKH;
+  __INTEGER typ_id__NQBG;
+  __UINTEGER_32 sz__KQBG,a__0CHH,new_size__1CHH,t__5CHH,a__4CHH;
+  __UINTEGER_32 new_size__WKKH,lab_type__VKKH;
+  __FAST_ARRAYoLIP_STRINGo *Self__ONTF,*Self__EOTF;
+  result__Q3FF=NULL;
+  if ((((__FAST_ARRAYoLIP_STRINGo *)storage__W3FF)->parent_arrayed_collection__V3FF.upper__2XPF <  0)) {
+    result__HQBG=NULL;
+    ptr__IQBG=((__POINTER )(NULL));
+    typ_id__NQBG= 0;
+    sz__KQBG=((__UINTEGER_32 )sizeof(__LIP_STRING));
+    if ((sz__KQBG ==  0)) {
+      result__HQBG=Self__N3FF;
+    } else {
+      typ_id__NQBG=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__KQBG);
+      if ((typ_id__NQBG == (__INTEGER)(-  1))) {
+        a__0CHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__1CHH=(__UINTEGER_32)((__UINTEGER_32)(sz__KQBG + a__0CHH) & (__UINTEGER_32)(~ a__0CHH));
+        ptr_table__OKKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__1CHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__NKKH=((__POINTER )(NULL));
+        result__PKKH=((__POINTER *)ptr_table__OKKH)[ 0];
+        if ((result__PKKH == (void *)NULL)) {
+          result__PKKH=new_lab__FTJ(new_size__1CHH);
+          next__NKKH=(void *)((unsigned long)result__PKKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1CHH)));
+          ((__POINTER *)next__NKKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__OKKH)[ 0]=next__NKKH;
+        } else {
+          next__NKKH=((__POINTER *)result__PKKH)[ 0];
+          if ((next__NKKH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__PKKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__1CHH <<  1)) <=  4096)) {
+              next__NKKH=(void *)((unsigned long)result__PKKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1CHH)));
             } else {
-              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)));
+              next__NKKH=new_lab__FTJ(new_size__1CHH);
+            };
+            ((__POINTER *)next__NKKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__OKKH)[ 0]=next__NKKH;
+          } else {
+            ((__POINTER *)result__PKKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NKKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__PKKH=next__NKKH;
+          };
+        };
+        ptr__IQBG=result__PKKH;
+      } else {
+        t__5CHH=((__UINTEGER_32 )typ_id__NQBG);
+        a__4CHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__WKKH=(__UINTEGER_32)((__UINTEGER_32)(sz__KQBG + a__4CHH) & (__UINTEGER_32)(~ a__4CHH));
+        ptr_table__TKKH=((__POINTER )(&(table_type[(t__5CHH)])));
+        lab_type__VKKH=(__UINTEGER_32)(t__5CHH |  1);
+        next__SKKH=((__POINTER )(NULL));
+        result__UKKH=((__POINTER *)ptr_table__TKKH)[ 0];
+        if ((result__UKKH == (void *)NULL)) {
+          result__UKKH=new_lab__FTJ(lab_type__VKKH);
+          next__SKKH=(void *)((unsigned long)result__UKKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WKKH)));
+          ((__POINTER *)next__SKKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__TKKH)[ 0]=next__SKKH;
+        } else {
+          next__SKKH=((__POINTER *)result__UKKH)[ 0];
+          if ((next__SKKH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__UKKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__WKKH <<  1)) <=  4096)) {
+              next__SKKH=(void *)((unsigned long)result__UKKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WKKH)));
             } else {
-              next__TCKH=new_lab__ZPJ(lab_type__WCKH);
+              next__SKKH=new_lab__FTJ(lab_type__VKKH);
             };
-            ((__POINTER *)next__TCKH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__UCKH)[ 0]=next__TCKH;
+            ((__POINTER *)next__SKKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__TKKH)[ 0]=next__SKKH;
           } else {
-            ((__POINTER *)result__VCKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TCKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__VCKH=next__TCKH;
+            ((__POINTER *)result__UKKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__SKKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__UKKH=next__SKKH;
           };
         };
-        ptr__BLBG=result__VCKH;
+        ptr__IQBG=result__UKKH;
       };
-      result__ALBG=((__LIP_STRING *)ptr__BLBG);
-      *(result__ALBG) = *(Self__HYFF);
+      result__HQBG=((__LIP_STRING *)ptr__IQBG);
+      *(result__HQBG) = *(Self__N3FF);
     };
-    result__KYFF=result__ALBG;
+    result__Q3FF=result__HQBG;
   } else {
-    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);
+    Self__ONTF=((__FAST_ARRAYoLIP_STRINGo *)storage__W3FF);
+    result__Q3FF=((void **)Self__ONTF->parent_arrayed_collection__V3FF.storage__P5PF)[Self__ONTF->parent_arrayed_collection__V3FF.upper__2XPF];
+    Self__EOTF=((__FAST_ARRAYoLIP_STRINGo *)storage__W3FF);
+    Self__EOTF->parent_arrayed_collection__V3FF.upper__2XPF=(__INTEGER)(Self__EOTF->parent_arrayed_collection__V3FF.upper__2XPF -  1);
   };
-  ((__LIP_STRING *)result__KYFF)->value__RNUE=str__IYFF;
-  return(result__KYFF);
+  ((__LIP_STRING *)result__Q3FF)->value__FSUE=str__O3FF;
+  return(result__Q3FF);
 }
 
-static void free__223F(__LIP_INTEGER *Self__323F)
+static void free__DC4F(__LIP_INTEGER *Self__EC4F)
 // ({LIP_INTEGER}) VoidNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER new_capacity__AT5F,__tmp__EU5F,__tmp__S2GG,Self__PHJG;
+  __FAST_ARRAYoLIP_INTEGERo *Self__4S5F;
+  __BOOLEAN __tmp__OT5F;
+  void **__tmp__DU5F,**new__41GG;
+  Self__4S5F=((__FAST_ARRAYoLIP_INTEGERo *)storage__JYSE);
+  new_capacity__AT5F= 0;
+  if (((__INTEGER)(Self__4S5F->parent_arrayed_collection__IYSE.upper__NHXE +  1) <= (__INTEGER)(Self__4S5F->parent_arrayed_collection__IYSE.capacity__PLXE -  1))) {
+    Self__4S5F->parent_arrayed_collection__IYSE.upper__NHXE=(__INTEGER)(Self__4S5F->parent_arrayed_collection__IYSE.upper__NHXE +  1);
+    __tmp__OT5F=TRUE__;
   } else {
-    __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;
+    __tmp__OT5F=FALSE__;
+  };
+  if ((! __tmp__OT5F)) {
+    if ((Self__4S5F->parent_arrayed_collection__IYSE.capacity__PLXE ==  0)) {
+      Self__4S5F->parent_arrayed_collection__IYSE.storage__0LXE=create__YNGF( 2);
+      Self__4S5F->parent_arrayed_collection__IYSE.capacity__PLXE= 2;
+      Self__4S5F->parent_arrayed_collection__IYSE.upper__NHXE= 0;
+    } else {
+      new_capacity__AT5F=(__INTEGER)(Self__4S5F->parent_arrayed_collection__IYSE.capacity__PLXE <<  1);
+      __tmp__DU5F=Self__4S5F->parent_arrayed_collection__IYSE.storage__0LXE;
+      __tmp__EU5F=Self__4S5F->parent_arrayed_collection__IYSE.capacity__PLXE;
+      new__41GG=((void **)realloc_dynamic__old_size__new_size__ZHLC(((__POINTER )((void **)__tmp__DU5F)),((__UINTEGER_32 )(__INTEGER)(__tmp__EU5F * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__AT5F * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__S2GG=(__INTEGER)(new_capacity__AT5F -  1);
+      Self__PHJG=__tmp__EU5F;
+      while ((Self__PHJG <= __tmp__S2GG)) {
+        new__41GG[Self__PHJG]=NULL;
+        Self__PHJG=(__INTEGER)(Self__PHJG +  1);
+      };
+      Self__4S5F->parent_arrayed_collection__IYSE.storage__0LXE=new__41GG;
+      Self__4S5F->parent_arrayed_collection__IYSE.capacity__PLXE=new_capacity__AT5F;
+      Self__4S5F->parent_arrayed_collection__IYSE.upper__NHXE=(__INTEGER)(Self__4S5F->parent_arrayed_collection__IYSE.upper__NHXE +  1);
+    };
+  };
+  ((void **)Self__4S5F->parent_arrayed_collection__IYSE.storage__0LXE)[Self__4S5F->parent_arrayed_collection__IYSE.upper__NHXE]=Self__EC4F;
 }
 
-static void free__KBIG(__LIP_STRING *Self__LBIG)
+static void free__RGIG(__LIP_STRING *Self__SGIG)
 // ({LIP_STRING}) VoidNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER new_capacity__L5IG,__tmp__PAJG,__tmp__CIMG,Self__VTNG;
+  __FAST_ARRAYoLIP_STRINGo *Self__J5IG;
+  __BOOLEAN __tmp__Z5IG;
+  void **__tmp__OAJG,**new__OHMG;
+  Self__J5IG=((__FAST_ARRAYoLIP_STRINGo *)storage__W3FF);
+  new_capacity__L5IG= 0;
+  if (((__INTEGER)(Self__J5IG->parent_arrayed_collection__V3FF.upper__2XPF +  1) <= (__INTEGER)(Self__J5IG->parent_arrayed_collection__V3FF.capacity__E5PF -  1))) {
+    Self__J5IG->parent_arrayed_collection__V3FF.upper__2XPF=(__INTEGER)(Self__J5IG->parent_arrayed_collection__V3FF.upper__2XPF +  1);
+    __tmp__Z5IG=TRUE__;
   } else {
-    __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;
+    __tmp__Z5IG=FALSE__;
+  };
+  if ((! __tmp__Z5IG)) {
+    if ((Self__J5IG->parent_arrayed_collection__V3FF.capacity__E5PF ==  0)) {
+      Self__J5IG->parent_arrayed_collection__V3FF.storage__P5PF=create__GPYF( 2);
+      Self__J5IG->parent_arrayed_collection__V3FF.capacity__E5PF= 2;
+      Self__J5IG->parent_arrayed_collection__V3FF.upper__2XPF= 0;
+    } else {
+      new_capacity__L5IG=(__INTEGER)(Self__J5IG->parent_arrayed_collection__V3FF.capacity__E5PF <<  1);
+      __tmp__OAJG=Self__J5IG->parent_arrayed_collection__V3FF.storage__P5PF;
+      __tmp__PAJG=Self__J5IG->parent_arrayed_collection__V3FF.capacity__E5PF;
+      new__OHMG=((void **)realloc_dynamic__old_size__new_size__ZHLC(((__POINTER )((void **)__tmp__OAJG)),((__UINTEGER_32 )(__INTEGER)(__tmp__PAJG * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__L5IG * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__CIMG=(__INTEGER)(new_capacity__L5IG -  1);
+      Self__VTNG=__tmp__PAJG;
+      while ((Self__VTNG <= __tmp__CIMG)) {
+        new__OHMG[Self__VTNG]=NULL;
+        Self__VTNG=(__INTEGER)(Self__VTNG +  1);
+      };
+      Self__J5IG->parent_arrayed_collection__V3FF.storage__P5PF=new__OHMG;
+      Self__J5IG->parent_arrayed_collection__V3FF.capacity__E5PF=new_capacity__L5IG;
+      Self__J5IG->parent_arrayed_collection__V3FF.upper__2XPF=(__INTEGER)(Self__J5IG->parent_arrayed_collection__V3FF.upper__2XPF +  1);
+    };
+  };
+  ((void **)Self__J5IG->parent_arrayed_collection__V3FF.storage__P5PF)[Self__J5IG->parent_arrayed_collection__V3FF.upper__2XPF]=Self__SGIG;
 }
 
-static void load_directory__is_recursive__K3WF(__LIP_CALL *Self__L3WF,void *path__M3WF,__BOOLEAN is_rec__N3WF)
+static void load_directory__is_recursive__RCXF(__LIP_CALL *Self__SCXF,void *path__TCXF,__BOOLEAN is_rec__UCXF)
 // ({LIP_CALL},{NULLxSTRING_CONSTANT},{TRUExFALSE}) VoidRecursive, No inlinable.
 {
-  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) {
+  void *dir__WCXF,*__tmp__PDXF;
+  void *entry__VCXF;
+  __FILE_UNIX *Self__RBCH;
+  __INTEGER __tmp__TDXF,Self__I5NG,i1__YKKH,i2__ZKKH;
+  void *__tmp__0DXF,*__tmp__DEXF,*__tmp__0EXF;
+  __STRING_CONSTANT *Self__0KKH;
+  __POSITION __tmp__IFXF;
+  __BOOLEAN __tmp__3CXF,__tmp__HDXF,__tmp__EDXF,__tmp__IDXF;
+  __BOOLEAN result__XKKH,__tmp__GEXF,__tmp__QEXF,__tmp__TEXF;
+  dir__WCXF=NULL;
+  if (FILE_SYSTEM__->parent_directory__2GD==0) {
   } else {
-    parent_directory__1ED();
+    parent_directory__1FD();
   };
-  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);
+  entry__VCXF=get_entry__S2AC(path__TCXF);
+  if (((void *)entry__VCXF != (void *)NULL)) {
+    if (((struct ___OBJ *)entry__VCXF)->__id==__DIRECTORY_UNIX__) {
+      __tmp__3CXF=((void *)((__DIRECTORY_UNIX *)entry__VCXF) != (void *)NULL);
     } else {
-      __tmp__W3WF=FALSE__;
+      __tmp__3CXF=FALSE__;
     };
-    __tmp__A4WF=__tmp__W3WF;
+    __tmp__HDXF=__tmp__3CXF;
   } else {
-    __tmp__A4WF=FALSE__;
+    __tmp__HDXF=FALSE__;
   };
-  if (__tmp__A4WF) {
-    if (((struct ___OBJ *)entry__O3WF)->__id==__DIRECTORY_UNIX__) {
-      __tmp__33WF=open__FDRD(entry__O3WF);
+  if (__tmp__HDXF) {
+    if (((struct ___OBJ *)entry__VCXF)->__id==__DIRECTORY_UNIX__) {
+      __tmp__EDXF=open__TGRD(entry__VCXF);
     } else {
-      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);
+      Self__RBCH=((__FILE_UNIX *)entry__VCXF);
+      Self__RBCH->stream__4KRD=((__POINTER )(fopen((char*)(((__STRING_CONSTANT *)Self__RBCH->parent_entry_unix__HEF.parent_entry__FGD.path__BD)->storage__FRO),"r+b")));
+      __tmp__EDXF=(Self__RBCH->stream__4KRD != (void *)NULL);
     };
-    __tmp__B4WF=__tmp__33WF;
+    __tmp__IDXF=__tmp__EDXF;
   } else {
-    __tmp__B4WF=FALSE__;
+    __tmp__IDXF=FALSE__;
   };
-  if (__tmp__B4WF) {
-    if (entry__O3WF==NULL) {
-      __tmp__I4WF=NULL;
+  if (__tmp__IDXF) {
+    if (entry__VCXF==NULL) {
+      __tmp__PDXF=NULL;
     } else {
-      switch (((struct ___OBJ *)entry__O3WF)->__id) {
+      switch (((struct ___OBJ *)entry__VCXF)->__id) {
       case __DIRECTORY_UNIX__: {
-        __tmp__I4WF=((void *)entry__O3WF);
+        __tmp__PDXF=((void *)entry__VCXF);
       } break;
       case __FILE_UNIX__: {
-        __tmp__I4WF=NULL;
+        __tmp__PDXF=NULL;
       } break;
       }
     };
-    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;
+    dir__WCXF=__tmp__PDXF;
+    __tmp__TDXF=((__LINKED_LISToENTRYo *)((__DIRECTORY_UNIX *)__tmp__PDXF)->parent_directory__HGD.list__CHRD)->parent_linked_collection__BHRD.upper__GQ3D;
+    Self__I5NG= 1;
+    while ((Self__I5NG <= __tmp__TDXF)) {
+      entry__VCXF=item__A3PE(dir__WCXF,Self__I5NG);
+      if (((struct ___OBJ *)entry__VCXF)->__id==__DIRECTORY_UNIX__) {
+        __tmp__0DXF=((__DIRECTORY_UNIX *)entry__VCXF)->parent_entry_unix__GGD.parent_entry__FGD.name__CQT;
       } else {
-        __tmp__T4WF=((__FILE_UNIX *)entry__O3WF)->parent_entry_unix__DBF.parent_entry__FFD.name__ZKT;
+        __tmp__0DXF=((__FILE_UNIX *)entry__VCXF)->parent_entry_unix__HEF.parent_entry__FGD.name__CQT;
       };
-      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);
+      Self__0KKH=((__STRING_CONSTANT *)__tmp__0DXF);
+      result__XKKH=FALSE__;
+      i1__YKKH= 0;
+      i2__ZKKH= 0;
+      if ((((__STRING_CONSTANT *)(&__string_159))->count__DD <= Self__0KKH->count__DD)) {
+        i1__YKKH=(__INTEGER)((__INTEGER)(Self__0KKH->count__DD - ((__STRING_CONSTANT *)(&__string_159))->count__DD) +  1);
+        i2__ZKKH= 1;
+        while ((! (((i1__YKKH > Self__0KKH->count__DD) || (i2__ZKKH > ((__STRING_CONSTANT *)(&__string_159))->count__DD)) || (((__CHARACTER *)Self__0KKH->storage__FRO)[(__INTEGER)(i1__YKKH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_159))->storage__FRO)[(__INTEGER)(i2__ZKKH -  1)])))) {
+          i1__YKKH=(__INTEGER)(i1__YKKH +  1);
+          i2__ZKKH=(__INTEGER)(i2__ZKKH +  1);
         };
-        result__YCKH=(i1__ZCKH > Self__1CKH->count__DD);
+        result__XKKH=(i1__YKKH > Self__0KKH->count__DD);
       };
-      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;
+      if (result__XKKH) {
+        if (((struct ___OBJ *)entry__VCXF)->__id==__DIRECTORY_UNIX__) {
+          __tmp__DEXF=((__DIRECTORY_UNIX *)entry__VCXF)->parent_entry_unix__GGD.parent_entry__FGD.path__BD;
         } else {
-          __tmp__24WF=((__FILE_UNIX *)entry__O3WF)->parent_entry_unix__DBF.parent_entry__FFD.path__BD;
+          __tmp__DEXF=((__FILE_UNIX *)entry__VCXF)->parent_entry_unix__HEF.parent_entry__FGD.path__BD;
         };
-        add_last__35OD(path_file__04WF,__tmp__24WF);
-        __tmp__54WF=TRUE__;
+        add_last__LDPD(path_file__BEXF,__tmp__DEXF);
+        __tmp__GEXF=TRUE__;
       } else {
-        __tmp__54WF=FALSE__;
+        __tmp__GEXF=FALSE__;
       };
-      if ((! __tmp__54WF)) {
-        if (is_rec__N3WF) {
-          if (((struct ___OBJ *)entry__O3WF)->__id==__DIRECTORY_UNIX__) {
-            __tmp__J5WF=((void *)((__DIRECTORY_UNIX *)entry__O3WF) != (void *)NULL);
+      if ((! __tmp__GEXF)) {
+        if (is_rec__UCXF) {
+          if (((struct ___OBJ *)entry__VCXF)->__id==__DIRECTORY_UNIX__) {
+            __tmp__QEXF=((void *)((__DIRECTORY_UNIX *)entry__VCXF) != (void *)NULL);
           } else {
-            __tmp__J5WF=FALSE__;
+            __tmp__QEXF=FALSE__;
           };
-          __tmp__M5WF=__tmp__J5WF;
+          __tmp__TEXF=__tmp__QEXF;
         } else {
-          __tmp__M5WF=FALSE__;
+          __tmp__TEXF=FALSE__;
         };
-        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;
+        if (__tmp__TEXF) {
+          if (((struct ___OBJ *)entry__VCXF)->__id==__DIRECTORY_UNIX__) {
+            __tmp__0EXF=((__DIRECTORY_UNIX *)entry__VCXF)->parent_entry_unix__GGD.parent_entry__FGD.path__BD;
           } else {
-            __tmp__T5WF=((__FILE_UNIX *)entry__O3WF)->parent_entry_unix__DBF.parent_entry__FFD.path__BD;
+            __tmp__0EXF=((__FILE_UNIX *)entry__VCXF)->parent_entry_unix__HEF.parent_entry__FGD.path__BD;
           };
-          load_directory__is_recursive__K3WF(Self__L3WF,__tmp__T5WF,TRUE__);
+          load_directory__is_recursive__RCXF(Self__SCXF,__tmp__0EXF,TRUE__);
         };
       };
-      Self__B0NG=(__INTEGER)(Self__B0NG +  1);
+      Self__I5NG=(__INTEGER)(Self__I5NG +  1);
     };
   } else {
-    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)) {
+    copy__JDS(string_tmp__VH,(&__string_332));
+    append__ROS(string_tmp__VH,path__TCXF);
+    append__ROS(string_tmp__VH,(&__string_293));
+    __tmp__IFXF=Self__SCXF->parent_lip_code__K34B.parent_itm_object__0EE.position__GFJ;
+    put_error__text__NPG( 2,string_tmp__VH);
+    put_position__XQG(__tmp__IFXF);
+    put_string__P3F(msg_err__SPG);
+    if ((type_error__RPG !=  2)) {
       exit(( 1));
     };
   };
 }
 
-static void append_in__EIIG(__LIP_STRING *Self__FIIG,void *str__GIIG)
+static void append_in__LNIG(__LIP_STRING *Self__MNIG,void *str__NNIG)
 // ({LIP_STRING},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __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');
+  __INTEGER i__ONIG;
+  __CHARACTER car__PNIG;
+  car__PNIG='\0';
+  i__ONIG= 1;
+  while ((i__ONIG <= ((__STRING_CONSTANT *)Self__MNIG->value__FSUE)->count__DD)) {
+    car__PNIG=((__CHARACTER *)((__STRING_CONSTANT *)Self__MNIG->value__FSUE)->storage__FRO)[(__INTEGER)(i__ONIG -  1)];
+    if ((car__PNIG == '\\')) {
+      i__ONIG=(__INTEGER)(i__ONIG +  1);
+      if ((i__ONIG <= ((__STRING_CONSTANT *)Self__MNIG->value__FSUE)->count__DD)) {
+        car__PNIG=((__CHARACTER *)((__STRING_CONSTANT *)Self__MNIG->value__FSUE)->storage__FRO)[(__INTEGER)(i__ONIG -  1)];
+        if ((car__PNIG == 'a')) {
+          add_last__GOT(str__NNIG,'\a');
         };
-        if ((car__IIIG == 'b')) {
-          add_last__3IT(str__GIIG,'\b');
+        if ((car__PNIG == 'b')) {
+          add_last__GOT(str__NNIG,'\b');
         };
-        if ((car__IIIG == 'f')) {
-          add_last__3IT(str__GIIG,'\f');
+        if ((car__PNIG == 'f')) {
+          add_last__GOT(str__NNIG,'\f');
         };
-        if ((car__IIIG == 'n')) {
-          add_last__3IT(str__GIIG,'\n');
+        if ((car__PNIG == 'n')) {
+          add_last__GOT(str__NNIG,'\n');
         };
-        if ((car__IIIG == 'r')) {
-          add_last__3IT(str__GIIG,'\r');
+        if ((car__PNIG == 'r')) {
+          add_last__GOT(str__NNIG,'\r');
         };
-        if ((car__IIIG == 't')) {
-          add_last__3IT(str__GIIG,'\t');
+        if ((car__PNIG == 't')) {
+          add_last__GOT(str__NNIG,'\t');
         };
-        if ((car__IIIG == 'v')) {
-          add_last__3IT(str__GIIG,'\v');
+        if ((car__PNIG == 'v')) {
+          add_last__GOT(str__NNIG,'\v');
         };
-        if ((car__IIIG == '\\')) {
-          add_last__3IT(str__GIIG,'\\');
+        if ((car__PNIG == '\\')) {
+          add_last__GOT(str__NNIG,'\\');
         };
-        if ((car__IIIG == '?')) {
-          add_last__3IT(str__GIIG,'\?');
+        if ((car__PNIG == '?')) {
+          add_last__GOT(str__NNIG,'\?');
         };
-        if ((car__IIIG == '\'')) {
-          add_last__3IT(str__GIIG,'\'');
+        if ((car__PNIG == '\'')) {
+          add_last__GOT(str__NNIG,'\'');
         };
-        if ((car__IIIG == '\"')) {
-          add_last__3IT(str__GIIG,'\"');
+        if ((car__PNIG == '\"')) {
+          add_last__GOT(str__NNIG,'\"');
         };
       } else {
-        add_last__3IT(str__GIIG,car__IIIG);
+        add_last__GOT(str__NNIG,car__PNIG);
       };
     } else {
-      add_last__3IT(str__GIIG,car__IIIG);
+      add_last__GOT(str__NNIG,car__PNIG);
     };
-    i__HIIG=(__INTEGER)(i__HIIG +  1);
+    i__ONIG=(__INTEGER)(i__ONIG +  1);
   };
 }
 
-static void print_positif__UALG(__INTEGER Self__VALG)
+static void print_positif__1FLG(__INTEGER Self__2FLG)
 // ({INTEGER}) VoidRecursive, No inlinable.
 {
-  __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);
+  __INTEGER val__FGLG;
+  __CHARACTER char__EGLG;
+  char__EGLG=((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )(__INTEGER)(Self__2FLG %  10)) + ((__INTEGER_8 )'0')))));
+  val__FGLG=(__INTEGER)(Self__2FLG /  10);
+  if ((val__FGLG !=  0)) {
+    print_positif__1FLG(val__FGLG);
+  };
+  fputc((int)(char__EGLG),stdout);
 }
 
-static __BOOLEAN has__RIMB(__HASHED_SEToSTRING_CONSTANTo *Self__SIMB,void *e__TIMB)
+static __BOOLEAN has__3LMB(__HASHED_SEToSTRING_CONSTANTo *Self__4LMB,void *e__5LMB)
 // ({HASHED_SEToSTRING_CONSTANTo},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __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));
+  __STRING_CONSTANT *Self__GMIH;
+  __INTEGER result__FMIH,__tmp__HMIH,Self__IMIH;
+  void *node__IMMB;
+  Self__GMIH=((__STRING_CONSTANT *)e__5LMB);
+  result__FMIH= 0;
+  __tmp__HMIH=Self__GMIH->count__DD;
+  Self__IMIH= 1;
+  while ((Self__IMIH <= __tmp__HMIH)) {
+    result__FMIH=(__INTEGER)((__INTEGER)( 5 * result__FMIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__GMIH->storage__FRO)[(__INTEGER)(Self__IMIH -  1)])));
+    Self__IMIH=(__INTEGER)(Self__IMIH +  1);
+  };
+  if ((result__FMIH <  0)) {
+    result__FMIH=(__INTEGER)(~ result__FMIH);
+  };
+  node__IMMB=((void **)Self__4LMB->buckets__XEV)[(__INTEGER)(result__FMIH % Self__4LMB->capacity__0IT)];
+  while ((! (((void *)node__IMMB == (void *)NULL) || __infix_equal_equal__GAEB(((__HASHED_SET_NODEoSTRING_CONSTANTo *)node__IMMB)->item__DFV,e__5LMB)))) {
+    node__IMMB=((__HASHED_SET_NODEoSTRING_CONSTANTo *)node__IMMB)->next__OFV;
+  };
+  return(((void *)node__IMMB != (void *)NULL));
 }
 
-static __FAST_ARRAYoITM_LOCALo* create_with_capacity__THK(__INTEGER new_count__VHK)
+static __FAST_ARRAYoITM_LOCALo* create_with_capacity__5KK(__INTEGER new_count__BLK)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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__;
+  __POINTER ptr__34K,ptr_table__3KKH,next__2KKH,result__4KKH;
+  __POINTER ptr_table__CLKH,next__BLKH,result__DLKH;
+  __INTEGER typ_id__C5K;
+  __UINTEGER_32 sz__54K,a__CDHH,new_size__DDHH,t__HDHH,a__GDHH;
+  __UINTEGER_32 new_size__FLKH,lab_type__ELKH;
+  __FAST_ARRAYoITM_LOCALo *result__24K,*Self__4OU;
+  result__24K=NULL;
+  ptr__34K=((__POINTER )(NULL));
+  typ_id__C5K= 0;
+  sz__54K=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_LOCALo));
+  if ((sz__54K ==  0)) {
+    result__24K=FAST_ARRAYoITM_LOCALo__;
   } else {
-    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);
+    typ_id__C5K=__FAST_ARRAYoITM_LOCALo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__54K);
+    if ((typ_id__C5K == (__INTEGER)(-  1))) {
+      a__CDHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__DDHH=(__UINTEGER_32)((__UINTEGER_32)(sz__54K + a__CDHH) & (__UINTEGER_32)(~ a__CDHH));
+      ptr_table__3KKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__DDHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__2KKH=((__POINTER )(NULL));
+      result__4KKH=((__POINTER *)ptr_table__3KKH)[ 0];
+      if ((result__4KKH == (void *)NULL)) {
+        result__4KKH=new_lab__FTJ(new_size__DDHH);
+        next__2KKH=(void *)((unsigned long)result__4KKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DDHH)));
+        ((__POINTER *)next__2KKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__3KKH)[ 0]=next__2KKH;
+      } else {
+        next__2KKH=((__POINTER *)result__4KKH)[ 0];
+        if ((next__2KKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4KKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__DDHH <<  1)) <=  4096)) {
+            next__2KKH=(void *)((unsigned long)result__4KKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DDHH)));
+          } else {
+            next__2KKH=new_lab__FTJ(new_size__DDHH);
+          };
+          ((__POINTER *)next__2KKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__3KKH)[ 0]=next__2KKH;
+        } else {
+          ((__POINTER *)result__4KKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2KKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__4KKH=next__2KKH;
+        };
+      };
+      ptr__34K=result__4KKH;
+    } else {
+      t__HDHH=((__UINTEGER_32 )typ_id__C5K);
+      a__GDHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__FLKH=(__UINTEGER_32)((__UINTEGER_32)(sz__54K + a__GDHH) & (__UINTEGER_32)(~ a__GDHH));
+      ptr_table__CLKH=((__POINTER )(&(table_type[(t__HDHH)])));
+      lab_type__ELKH=(__UINTEGER_32)(t__HDHH |  1);
+      next__BLKH=((__POINTER )(NULL));
+      result__DLKH=((__POINTER *)ptr_table__CLKH)[ 0];
+      if ((result__DLKH == (void *)NULL)) {
+        result__DLKH=new_lab__FTJ(lab_type__ELKH);
+        next__BLKH=(void *)((unsigned long)result__DLKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FLKH)));
+        ((__POINTER *)next__BLKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__CLKH)[ 0]=next__BLKH;
+      } else {
+        next__BLKH=((__POINTER *)result__DLKH)[ 0];
+        if ((next__BLKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DLKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__FLKH <<  1)) <=  4096)) {
+            next__BLKH=(void *)((unsigned long)result__DLKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FLKH)));
+          } else {
+            next__BLKH=new_lab__FTJ(lab_type__ELKH);
+          };
+          ((__POINTER *)next__BLKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__CLKH)[ 0]=next__BLKH;
+        } else {
+          ((__POINTER *)result__DLKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BLKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__DLKH=next__BLKH;
+        };
+      };
+      ptr__34K=result__DLKH;
+    };
+    result__24K=((__FAST_ARRAYoITM_LOCALo *)ptr__34K);
+    *(result__24K) = *(FAST_ARRAYoITM_LOCALo__);
+  };
+  Self__4OU=((__FAST_ARRAYoITM_LOCALo *)result__24K);
+  if ((Self__4OU->parent_arrayed_collection__H3H.capacity__2MU < new_count__BLK)) {
+    Self__4OU->parent_arrayed_collection__H3H.storage__HNU=create__3SQB(new_count__BLK);
+    Self__4OU->parent_arrayed_collection__H3H.capacity__2MU=new_count__BLK;
+  };
+  Self__4OU->parent_arrayed_collection__H3H.upper__A2K=(__INTEGER)(-  1);
+  return(result__24K);
 }
 
-static void add_last__BZU(__FAST_ARRAYoITM_LOCALo *Self__CZU,void *element__DZU)
+static void add_last__N2U(__FAST_ARRAYoITM_LOCALo *Self__O2U,void *element__P2U)
 // ({FAST_ARRAYoITM_LOCALo},{NULLxITM_LOCAL}) VoidNo recursive, No inlinable.
 {
-  __INTEGER new_capacity__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__;
+  __INTEGER new_capacity__Q2U,__tmp__U3U,__tmp__JFEC,Self__DJVD;
+  __BOOLEAN __tmp__42U;
+  void **__tmp__T3U,**new__VEEC;
+  new_capacity__Q2U= 0;
+  if (((__INTEGER)(Self__O2U->parent_arrayed_collection__H3H.upper__A2K +  1) <= (__INTEGER)(Self__O2U->parent_arrayed_collection__H3H.capacity__2MU -  1))) {
+    Self__O2U->parent_arrayed_collection__H3H.upper__A2K=(__INTEGER)(Self__O2U->parent_arrayed_collection__H3H.upper__A2K +  1);
+    __tmp__42U=TRUE__;
   } else {
-    __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;
+    __tmp__42U=FALSE__;
+  };
+  if ((! __tmp__42U)) {
+    if ((Self__O2U->parent_arrayed_collection__H3H.capacity__2MU ==  0)) {
+      Self__O2U->parent_arrayed_collection__H3H.storage__HNU=create__3SQB( 2);
+      Self__O2U->parent_arrayed_collection__H3H.capacity__2MU= 2;
+      Self__O2U->parent_arrayed_collection__H3H.upper__A2K= 0;
+    } else {
+      new_capacity__Q2U=(__INTEGER)(Self__O2U->parent_arrayed_collection__H3H.capacity__2MU <<  1);
+      __tmp__T3U=Self__O2U->parent_arrayed_collection__H3H.storage__HNU;
+      __tmp__U3U=Self__O2U->parent_arrayed_collection__H3H.capacity__2MU;
+      new__VEEC=((void **)realloc_dynamic__old_size__new_size__ZHLC(((__POINTER )((void **)__tmp__T3U)),((__UINTEGER_32 )(__INTEGER)(__tmp__U3U * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__Q2U * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__JFEC=(__INTEGER)(new_capacity__Q2U -  1);
+      Self__DJVD=__tmp__U3U;
+      while ((Self__DJVD <= __tmp__JFEC)) {
+        new__VEEC[Self__DJVD]=NULL;
+        Self__DJVD=(__INTEGER)(Self__DJVD +  1);
+      };
+      Self__O2U->parent_arrayed_collection__H3H.storage__HNU=new__VEEC;
+      Self__O2U->parent_arrayed_collection__H3H.capacity__2MU=new_capacity__Q2U;
+      Self__O2U->parent_arrayed_collection__H3H.upper__A2K=(__INTEGER)(Self__O2U->parent_arrayed_collection__H3H.upper__A2K +  1);
+    };
+  };
+  ((void **)Self__O2U->parent_arrayed_collection__H3H.storage__HNU)[Self__O2U->parent_arrayed_collection__H3H.upper__A2K]=element__P2U;
 }
 
-static void free__ZHK(void *tmp__1HK)
+static void free__FLK(void *tmp__HLK)
 // ({NULLxFAST_ARRAYoITM_LOCALo}) VoidNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER new_capacity__XQU,__tmp__1RU,__tmp__3CEC,Self__EHVD;
+  __FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *Self__VQU;
+  __BOOLEAN __tmp__FRU;
+  void **__tmp__0RU,**new__JCEC;
+  ((__FAST_ARRAYoITM_LOCALo *)tmp__HLK)->parent_arrayed_collection__H3H.upper__A2K=(__INTEGER)(-  1);
+  Self__VQU=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__OTI);
+  new_capacity__XQU= 0;
+  if (((__INTEGER)(Self__VQU->parent_arrayed_collection__NTI.upper__W3T +  1) <= (__INTEGER)(Self__VQU->parent_arrayed_collection__NTI.capacity__BLU -  1))) {
+    Self__VQU->parent_arrayed_collection__NTI.upper__W3T=(__INTEGER)(Self__VQU->parent_arrayed_collection__NTI.upper__W3T +  1);
+    __tmp__FRU=TRUE__;
   } else {
-    __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;
+    __tmp__FRU=FALSE__;
+  };
+  if ((! __tmp__FRU)) {
+    if ((Self__VQU->parent_arrayed_collection__NTI.capacity__BLU ==  0)) {
+      Self__VQU->parent_arrayed_collection__NTI.storage__MLU=create__AJQB( 2);
+      Self__VQU->parent_arrayed_collection__NTI.capacity__BLU= 2;
+      Self__VQU->parent_arrayed_collection__NTI.upper__W3T= 0;
+    } else {
+      new_capacity__XQU=(__INTEGER)(Self__VQU->parent_arrayed_collection__NTI.capacity__BLU <<  1);
+      __tmp__0RU=Self__VQU->parent_arrayed_collection__NTI.storage__MLU;
+      __tmp__1RU=Self__VQU->parent_arrayed_collection__NTI.capacity__BLU;
+      new__JCEC=((void **)realloc_dynamic__old_size__new_size__ZHLC(((__POINTER )((void **)__tmp__0RU)),((__UINTEGER_32 )(__INTEGER)(__tmp__1RU * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__XQU * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__3CEC=(__INTEGER)(new_capacity__XQU -  1);
+      Self__EHVD=__tmp__1RU;
+      while ((Self__EHVD <= __tmp__3CEC)) {
+        new__JCEC[Self__EHVD]=NULL;
+        Self__EHVD=(__INTEGER)(Self__EHVD +  1);
+      };
+      Self__VQU->parent_arrayed_collection__NTI.storage__MLU=new__JCEC;
+      Self__VQU->parent_arrayed_collection__NTI.capacity__BLU=new_capacity__XQU;
+      Self__VQU->parent_arrayed_collection__NTI.upper__W3T=(__INTEGER)(Self__VQU->parent_arrayed_collection__NTI.upper__W3T +  1);
+    };
+  };
+  ((void **)Self__VQU->parent_arrayed_collection__NTI.storage__MLU)[Self__VQU->parent_arrayed_collection__NTI.upper__W3T]=tmp__HLK;
 }
 
-static void* copy__C2J(void *tmp__E2J)
+static void* copy__O5J(void *tmp__Q5J)
 // ({NULLxFAST_ARRAYoITM_LOCALo}) With resultNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER new_capacity__TMU,other_upper__SMU,Self__OCKC;
+  void *result__S5J;
+  __FAST_ARRAYoITM_LOCALo *Self__QMU;
+  void **__tmp__KNU,**__tmp__MNU,**Self__EWCC;
+  result__S5J=create_with_capacity__5KK((__INTEGER)(((__FAST_ARRAYoITM_LOCALo *)tmp__Q5J)->parent_arrayed_collection__H3H.upper__A2K +  1));
+  Self__QMU=((__FAST_ARRAYoITM_LOCALo *)result__S5J);
+  new_capacity__TMU= 0;
+  other_upper__SMU=((__FAST_ARRAYoITM_LOCALo *)tmp__Q5J)->parent_arrayed_collection__H3H.upper__A2K;
+  if ((other_upper__SMU >=  0)) {
+    new_capacity__TMU=(__INTEGER)(other_upper__SMU +  1);
+    if ((Self__QMU->parent_arrayed_collection__H3H.capacity__2MU < new_capacity__TMU)) {
+      Self__QMU->parent_arrayed_collection__H3H.storage__HNU=create__3SQB(new_capacity__TMU);
+      Self__QMU->parent_arrayed_collection__H3H.capacity__2MU=new_capacity__TMU;
+    };
+    __tmp__KNU=Self__QMU->parent_arrayed_collection__H3H.storage__HNU;
+    __tmp__MNU=((__FAST_ARRAYoITM_LOCALo *)tmp__Q5J)->parent_arrayed_collection__H3H.storage__HNU;
+    Self__EWCC=((void **)__tmp__KNU);
+    Self__OCKC=other_upper__SMU;
+    while ((Self__OCKC >=  0)) {
+      Self__EWCC[Self__OCKC]=((void **)__tmp__MNU)[Self__OCKC];
+      Self__OCKC=(__INTEGER)(Self__OCKC -  1);
+    };
+  };
+  Self__QMU->parent_arrayed_collection__H3H.upper__A2K=other_upper__SMU;
+  free__FLK(tmp__Q5J);
+  return(result__S5J);
 }
 
-static void** create__RRQB(__INTEGER nb_elements__TRQB)
+static void** create__3UQB(__INTEGER nb_elements__5UQB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__T4EH,a__Y4EH,new_size__U4EH,new_size2__V4EH,a__FAHH;
+  __UINTEGER_32 new_size__GAHH;
+  __POINTER result__S4EH,ptr_table__HLKH,next__GLKH,result__ILKH;
+  void *result__LLKH;
+  __INTEGER Self__C5MC;
+  void **Result__CQTB;
+  sz__T4EH=((__UINTEGER_32 )(__INTEGER)(nb_elements__5UQB * ((__INTEGER )(sizeof(void *)))));
+  result__S4EH=((__POINTER )(NULL));
+  a__Y4EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__U4EH=(__UINTEGER_32)((__UINTEGER_32)(sz__T4EH + a__Y4EH) & (__UINTEGER_32)(~ a__Y4EH));
+  new_size2__V4EH=(__UINTEGER_32)(new_size__U4EH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__V4EH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__FAHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__GAHH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__V4EH + a__FAHH) & (__UINTEGER_32)(~ a__FAHH));
+    ptr_table__HLKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__GAHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__GLKH=((__POINTER )(NULL));
+    result__ILKH=((__POINTER *)ptr_table__HLKH)[ 0];
+    if ((result__ILKH == (void *)NULL)) {
+      result__ILKH=new_lab__FTJ(new_size__GAHH);
+      next__GLKH=(void *)((unsigned long)result__ILKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GAHH)));
+      ((__POINTER *)next__GLKH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__HLKH)[ 0]=next__GLKH;
+    } else {
+      next__GLKH=((__POINTER *)result__ILKH)[ 0];
+      if ((next__GLKH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ILKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__GAHH <<  1)) <=  4096)) {
+          next__GLKH=(void *)((unsigned long)result__ILKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GAHH)));
+        } else {
+          next__GLKH=new_lab__FTJ(new_size__GAHH);
+        };
+        ((__POINTER *)next__GLKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__HLKH)[ 0]=next__GLKH;
+      } else {
+        ((__POINTER *)result__ILKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GLKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__ILKH=next__GLKH;
+      };
+    };
+    ((__POINTER *)result__ILKH)[ 0]=((__POINTER ) 3);
+    result__S4EH=(void *)((unsigned long)result__ILKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__LLKH=first_free__NFVB;
+    while ((((void *)result__LLKH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__LLKH)->map_size_and_id__YTB &  4294967292LU) < new_size__U4EH))) {
+      result__LLKH=((__MEMORY *)result__LLKH)->map_next_free__ZTB;
     };
-    if (((void *)result__MDKH == (void *)NULL)) {
-      result__MDKH=new_page__K34();
+    if (((void *)result__LLKH == (void *)NULL)) {
+      result__LLKH=new_page__YC5();
     };
-    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)));
+    to_busy__index__MWFC(result__LLKH,new_size__U4EH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__LLKH)) - (unsigned long)begin_memory__SXH)))) >>  26));
+    result__S4EH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__LLKH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__CQTB=((void **)result__S4EH);
+  Self__C5MC=(__INTEGER)(nb_elements__5UQB -  1);
+  while ((Self__C5MC >=  0)) {
+    Result__CQTB[Self__C5MC]=NULL;
+    Self__C5MC=(__INTEGER)(Self__C5MC -  1);
   };
-  return(Result__WMTB);
+  return(Result__CQTB);
 }
 
-static void* read_send_msg__Q1N(__PARSER *Self__R1N,void *first_arg__S1N)
+static void* read_send_msg__24N(__PARSER *Self__34N,void *first_arg__44N)
 // ({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__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__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)) {
+  void *result__A5N,*arg__E5N,*tmp__BQRB;
+  void *n__C5N,*result__KAHH;
+  __INTEGER p1__F5N,p2__G5N,old_derive__H5N,sav_derive__I5N;
+  __INTEGER typ_id__MMIH,typ_id__VMIH,typ_id__4MIH,Self__K5YC;
+  __INTEGER typ_id__ADR;
+  __POSITION pos__SV0G,p__SMIH,p__1MIH,p__ENIH,p__N5Q;
+  __ITM_READ *result__KMIH;
+  __POINTER ptr__LMIH,ptr_table__PLKH,next__OLKH,result__QLKH;
+  __POINTER ptr_table__ULKH,next__TLKH,result__VLKH,ptr__UMIH;
+  __POINTER ptr_table__ZLKH,next__YLKH,result__0LKH,ptr_table__4LKH;
+  __POINTER next__3LKH,result__5LKH,ptr__3MIH,ptr_table__DMKH;
+  __POINTER next__CMKH,result__EMKH,ptr_table__IMKH,next__HMKH;
+  __POINTER result__JMKH,ptr__1CR,ptr_table__NMKH,next__MMKH;
+  __POINTER result__OMKH,ptr_table__SMKH,next__RMKH,result__TMKH;
+  __UINTEGER_32 sz__NMIH,a__OMIH,new_size__PMIH,t__QMIH,a__RMIH;
+  __UINTEGER_32 new_size__XLKH,lab_type__WLKH,sz__WMIH,a__XMIH;
+  __UINTEGER_32 new_size__YMIH,t__ZMIH,a__0MIH,new_size__BMKH;
+  __UINTEGER_32 lab_type__AMKH,sz__5MIH,a__ANIH,new_size__BNIH,t__CNIH;
+  __UINTEGER_32 a__DNIH,new_size__LMKH,lab_type__KMKH,sz__3CR,a__LBHH;
+  __UINTEGER_32 new_size__MBHH,t__QBHH,a__PBHH,new_size__VMKH;
+  __UINTEGER_32 lab_type__UMKH;
+  __ITM_READ_ARG1 *result__TMIH;
+  __ITM_READ_ARG2 *result__2MIH;
+  __ITM_READ_ARGS *result__0CR;
+  void *l_arg__D5N,*result__E0HH;
+  __FAST_ARRAYoSTRINGo *Self__LAHH,*Self__NAHH;
+  __FAST_ARRAYoFAST_ARRAYoITM_CODEoo *Self__F0HH,*Self__G0HH;
+  __BOOLEAN __tmp__CDO;
+  __FAST_ARRAYoITM_CODEo *Self__FDW;
+  result__A5N=NULL;
+  n__C5N=NULL;
+  l_arg__D5N=NULL;
+  arg__E5N=NULL;
+  p1__F5N= 0;
+  p2__G5N= 0;
+  old_derive__H5N= 0;
+  sav_derive__I5N= 0;
+  if (read_identifier__QBL()) {
+    p1__F5N=(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V1C)->count__DD);
+    p2__G5N=position__CCC;
+    old_derive__H5N=short_derive__PCC;
+    result__KAHH=NULL;
+    if ((((__FAST_ARRAYoSTRINGo *)free__ROP)->parent_arrayed_collection__RKC.upper__UKC <  0)) {
+      result__KAHH=create__ZBB( 128);
+    } else {
+      Self__LAHH=((__FAST_ARRAYoSTRINGo *)free__ROP);
+      result__KAHH=((void **)Self__LAHH->parent_arrayed_collection__RKC.storage__HHT)[Self__LAHH->parent_arrayed_collection__RKC.upper__UKC];
+      Self__NAHH=((__FAST_ARRAYoSTRINGo *)free__ROP);
+      Self__NAHH->parent_arrayed_collection__RKC.upper__UKC=(__INTEGER)(Self__NAHH->parent_arrayed_collection__RKC.upper__UKC -  1);
+    };
+    n__C5N=result__KAHH;
+    copy__JDS(result__KAHH,last_string__V1C);
+    result__E0HH=NULL;
+    if ((((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__EAI)->parent_arrayed_collection__DAI.upper__VYT <  0)) {
+      result__E0HH=create_with_capacity__LXI( 16);
+    } else {
+      Self__F0HH=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__EAI);
+      result__E0HH=((void **)Self__F0HH->parent_arrayed_collection__DAI.storage__DDU)[Self__F0HH->parent_arrayed_collection__DAI.upper__VYT];
+      Self__G0HH=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__EAI);
+      Self__G0HH->parent_arrayed_collection__DAI.upper__VYT=(__INTEGER)(Self__G0HH->parent_arrayed_collection__DAI.upper__VYT -  1);
+    };
+    l_arg__D5N=result__E0HH;
+    arg__E5N=read_argument__DPP(Self__34N);
+    if (((void *)arg__E5N != (void *)NULL)) {
+      add_last__25U(result__E0HH,arg__E5N);
+      while (read_identifier__QBL()) {
+        short__token__to__YCD((&__string_131),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V1C)->count__DD),position__CCC);
+        append__ROS(n__C5N,(&__string_112));
+        append__ROS(n__C5N,last_string__V1C);
+        arg__E5N=read_argument__DPP(Self__34N);
+        if (((void *)arg__E5N == (void *)NULL)) {
+          pos__SV0G=current_position__EZF();
+          put_error__text__NPG( 0,(&__string_333));
+          put_position__XQG(pos__SV0G);
+          put_string__P3F(msg_err__SPG);
+          if ((type_error__RPG !=  2)) {
             exit(( 1));
           };
         };
-        add_last__Q2U(l_arg__X1N,arg__Y1N);
+        add_last__25U(l_arg__D5N,arg__E5N);
       };
     };
-    get__YWB(result__PZGH);
-    add_last__2OV(free__FLP,result__PZGH);
-    ((__STRING *)result__PZGH)->count__EGC= 0;
+    get__YWB(result__KAHH);
+    add_last__ISV(free__ROP,result__KAHH);
+    ((__STRING *)result__KAHH)->count__EGC= 0;
     if (is_shorter__LZ) {
-      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;
+      if ((((! (((__FAST_ARRAYoITM_CODEo *)result__E0HH)->parent_arrayed_collection__MVF.upper__BJL <  0)) || ((void *)first_arg__44N != (void *)NULL)) || (! fast_has__FEV(short_local__XCC,last_string__V1C)))) {
+        sav_derive__I5N=short_derive__PCC;
+        short_derive__PCC=old_derive__H5N;
+        short__token__to__YCD((&__string_131),p1__F5N,p2__G5N);
+        short_derive__PCC=(__INTEGER)(sav_derive__I5N + (__INTEGER)(short_derive__PCC - old_derive__H5N));
+      };
+    };
+    if ((((__FAST_ARRAYoITM_CODEo *)result__E0HH)->parent_arrayed_collection__MVF.upper__BJL <  0)) {
+      if (((void *)first_arg__44N == (void *)NULL)) {
+        p__SMIH=current_position__EZF();
+        result__KMIH=NULL;
+        ptr__LMIH=((__POINTER )(NULL));
+        typ_id__MMIH= 0;
+        sz__NMIH=((__UINTEGER_32 )sizeof(__ITM_READ));
+        if ((sz__NMIH ==  0)) {
+          result__KMIH=ITM_READ__;
+        } else {
+          typ_id__MMIH=-1;
+          clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__NMIH);
+          if ((typ_id__MMIH == (__INTEGER)(-  1))) {
+            a__OMIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__PMIH=(__UINTEGER_32)((__UINTEGER_32)(sz__NMIH + a__OMIH) & (__UINTEGER_32)(~ a__OMIH));
+            ptr_table__PLKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__PMIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__OLKH=((__POINTER )(NULL));
+            result__QLKH=((__POINTER *)ptr_table__PLKH)[ 0];
+            if ((result__QLKH == (void *)NULL)) {
+              result__QLKH=new_lab__FTJ(new_size__PMIH);
+              next__OLKH=(void *)((unsigned long)result__QLKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PMIH)));
+              ((__POINTER *)next__OLKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__PLKH)[ 0]=next__OLKH;
             } else {
-              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)));
+              next__OLKH=((__POINTER *)result__QLKH)[ 0];
+              if ((next__OLKH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__QLKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__PMIH <<  1)) <=  4096)) {
+                  next__OLKH=(void *)((unsigned long)result__QLKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PMIH)));
                 } else {
-                  next__PDKH=new_lab__ZPJ(new_size__1EIH);
+                  next__OLKH=new_lab__FTJ(new_size__PMIH);
                 };
-                ((__POINTER *)next__PDKH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__QDKH)[ 0]=next__PDKH;
+                ((__POINTER *)next__OLKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__PLKH)[ 0]=next__OLKH;
               } else {
-                ((__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;
+                ((__POINTER *)result__QLKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OLKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__QLKH=next__OLKH;
+              };
+            };
+            ptr__LMIH=result__QLKH;
+          } else {
+            t__QMIH=((__UINTEGER_32 )typ_id__MMIH);
+            a__RMIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__XLKH=(__UINTEGER_32)((__UINTEGER_32)(sz__NMIH + a__RMIH) & (__UINTEGER_32)(~ a__RMIH));
+            ptr_table__ULKH=((__POINTER )(&(table_type[(t__QMIH)])));
+            lab_type__WLKH=(__UINTEGER_32)(t__QMIH |  1);
+            next__TLKH=((__POINTER )(NULL));
+            result__VLKH=((__POINTER *)ptr_table__ULKH)[ 0];
+            if ((result__VLKH == (void *)NULL)) {
+              result__VLKH=new_lab__FTJ(lab_type__WLKH);
+              next__TLKH=(void *)((unsigned long)result__VLKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XLKH)));
+              ((__POINTER *)next__TLKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__ULKH)[ 0]=next__TLKH;
             } else {
-              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)));
+              next__TLKH=((__POINTER *)result__VLKH)[ 0];
+              if ((next__TLKH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__VLKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__XLKH <<  1)) <=  4096)) {
+                  next__TLKH=(void *)((unsigned long)result__VLKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XLKH)));
                 } else {
-                  next__UDKH=new_lab__ZPJ(lab_type__XDKH);
+                  next__TLKH=new_lab__FTJ(lab_type__WLKH);
                 };
-                ((__POINTER *)next__UDKH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__VDKH)[ 0]=next__UDKH;
+                ((__POINTER *)next__TLKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__ULKH)[ 0]=next__TLKH;
               } else {
-                ((__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;
+                ((__POINTER *)result__VLKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TLKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__VLKH=next__TLKH;
+              };
+            };
+            ptr__LMIH=result__VLKH;
+          };
+          result__KMIH=((__ITM_READ *)ptr__LMIH);
+          *(result__KMIH) = *(ITM_READ__);
+        };
+        ((__ITM_READ *)result__KMIH)->parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ=p__SMIH;
+        result__A5N=result__KMIH;
+      } else {
+        p__1MIH=current_position__EZF();
+        result__TMIH=NULL;
+        ptr__UMIH=((__POINTER )(NULL));
+        typ_id__VMIH= 0;
+        sz__WMIH=((__UINTEGER_32 )sizeof(__ITM_READ_ARG1));
+        if ((sz__WMIH ==  0)) {
+          result__TMIH=ITM_READ_ARG1__;
+        } else {
+          typ_id__VMIH=-1;
+          clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__WMIH);
+          if ((typ_id__VMIH == (__INTEGER)(-  1))) {
+            a__XMIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__YMIH=(__UINTEGER_32)((__UINTEGER_32)(sz__WMIH + a__XMIH) & (__UINTEGER_32)(~ a__XMIH));
+            ptr_table__ZLKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__YMIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__YLKH=((__POINTER )(NULL));
+            result__0LKH=((__POINTER *)ptr_table__ZLKH)[ 0];
+            if ((result__0LKH == (void *)NULL)) {
+              result__0LKH=new_lab__FTJ(new_size__YMIH);
+              next__YLKH=(void *)((unsigned long)result__0LKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YMIH)));
+              ((__POINTER *)next__YLKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__ZLKH)[ 0]=next__YLKH;
             } else {
-              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)));
+              next__YLKH=((__POINTER *)result__0LKH)[ 0];
+              if ((next__YLKH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__0LKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__YMIH <<  1)) <=  4096)) {
+                  next__YLKH=(void *)((unsigned long)result__0LKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YMIH)));
                 } else {
-                  next__ZDKH=new_lab__ZPJ(new_size__EFIH);
+                  next__YLKH=new_lab__FTJ(new_size__YMIH);
                 };
-                ((__POINTER *)next__ZDKH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__0DKH)[ 0]=next__ZDKH;
+                ((__POINTER *)next__YLKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__ZLKH)[ 0]=next__YLKH;
               } else {
-                ((__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;
+                ((__POINTER *)result__0LKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YLKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__0LKH=next__YLKH;
+              };
+            };
+            ptr__UMIH=result__0LKH;
+          } else {
+            t__ZMIH=((__UINTEGER_32 )typ_id__VMIH);
+            a__0MIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__BMKH=(__UINTEGER_32)((__UINTEGER_32)(sz__WMIH + a__0MIH) & (__UINTEGER_32)(~ a__0MIH));
+            ptr_table__4LKH=((__POINTER )(&(table_type[(t__ZMIH)])));
+            lab_type__AMKH=(__UINTEGER_32)(t__ZMIH |  1);
+            next__3LKH=((__POINTER )(NULL));
+            result__5LKH=((__POINTER *)ptr_table__4LKH)[ 0];
+            if ((result__5LKH == (void *)NULL)) {
+              result__5LKH=new_lab__FTJ(lab_type__AMKH);
+              next__3LKH=(void *)((unsigned long)result__5LKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BMKH)));
+              ((__POINTER *)next__3LKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__4LKH)[ 0]=next__3LKH;
             } else {
-              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)));
+              next__3LKH=((__POINTER *)result__5LKH)[ 0];
+              if ((next__3LKH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__5LKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__BMKH <<  1)) <=  4096)) {
+                  next__3LKH=(void *)((unsigned long)result__5LKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BMKH)));
                 } else {
-                  next__4DKH=new_lab__ZPJ(lab_type__BEKH);
+                  next__3LKH=new_lab__FTJ(lab_type__AMKH);
                 };
-                ((__POINTER *)next__4DKH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__5DKH)[ 0]=next__4DKH;
+                ((__POINTER *)next__3LKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__4LKH)[ 0]=next__3LKH;
               } else {
-                ((__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;
+                ((__POINTER *)result__5LKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3LKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__5LKH=next__3LKH;
+              };
+            };
+            ptr__UMIH=result__5LKH;
+          };
+          result__TMIH=((__ITM_READ_ARG1 *)ptr__UMIH);
+          *(result__TMIH) = *(ITM_READ_ARG1__);
+        };
+        ((__ITM_READ_ARG1 *)result__TMIH)->parent_itm_read__PJL.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ=p__1MIH;
+        result__A5N=result__TMIH;
+      };
+      free__RXI(result__E0HH);
+      __tmp__CDO=TRUE__;
+    } else {
+      __tmp__CDO=FALSE__;
+    };
+    if ((! __tmp__CDO)) {
+      if (((__INTEGER)(((__FAST_ARRAYoITM_CODEo *)result__E0HH)->parent_arrayed_collection__MVF.upper__BJL +  1) ==  1)) {
+        p__ENIH=current_position__EZF();
+        result__2MIH=NULL;
+        ptr__3MIH=((__POINTER )(NULL));
+        typ_id__4MIH= 0;
+        sz__5MIH=((__UINTEGER_32 )sizeof(__ITM_READ_ARG2));
+        if ((sz__5MIH ==  0)) {
+          result__2MIH=ITM_READ_ARG2__;
+        } else {
+          typ_id__4MIH=-1;
+          clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__5MIH);
+          if ((typ_id__4MIH == (__INTEGER)(-  1))) {
+            a__ANIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__BNIH=(__UINTEGER_32)((__UINTEGER_32)(sz__5MIH + a__ANIH) & (__UINTEGER_32)(~ a__ANIH));
+            ptr_table__DMKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__BNIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__CMKH=((__POINTER )(NULL));
+            result__EMKH=((__POINTER *)ptr_table__DMKH)[ 0];
+            if ((result__EMKH == (void *)NULL)) {
+              result__EMKH=new_lab__FTJ(new_size__BNIH);
+              next__CMKH=(void *)((unsigned long)result__EMKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BNIH)));
+              ((__POINTER *)next__CMKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__DMKH)[ 0]=next__CMKH;
             } else {
-              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)));
+              next__CMKH=((__POINTER *)result__EMKH)[ 0];
+              if ((next__CMKH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__EMKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__BNIH <<  1)) <=  4096)) {
+                  next__CMKH=(void *)((unsigned long)result__EMKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BNIH)));
                 } else {
-                  next__DEKH=new_lab__ZPJ(new_size__NFIH);
+                  next__CMKH=new_lab__FTJ(new_size__BNIH);
                 };
-                ((__POINTER *)next__DEKH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__EEKH)[ 0]=next__DEKH;
+                ((__POINTER *)next__CMKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__DMKH)[ 0]=next__CMKH;
               } else {
-                ((__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;
+                ((__POINTER *)result__EMKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CMKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__EMKH=next__CMKH;
+              };
+            };
+            ptr__3MIH=result__EMKH;
+          } else {
+            t__CNIH=((__UINTEGER_32 )typ_id__4MIH);
+            a__DNIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__LMKH=(__UINTEGER_32)((__UINTEGER_32)(sz__5MIH + a__DNIH) & (__UINTEGER_32)(~ a__DNIH));
+            ptr_table__IMKH=((__POINTER )(&(table_type[(t__CNIH)])));
+            lab_type__KMKH=(__UINTEGER_32)(t__CNIH |  1);
+            next__HMKH=((__POINTER )(NULL));
+            result__JMKH=((__POINTER *)ptr_table__IMKH)[ 0];
+            if ((result__JMKH == (void *)NULL)) {
+              result__JMKH=new_lab__FTJ(lab_type__KMKH);
+              next__HMKH=(void *)((unsigned long)result__JMKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LMKH)));
+              ((__POINTER *)next__HMKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__IMKH)[ 0]=next__HMKH;
             } else {
-              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)));
+              next__HMKH=((__POINTER *)result__JMKH)[ 0];
+              if ((next__HMKH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__JMKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__LMKH <<  1)) <=  4096)) {
+                  next__HMKH=(void *)((unsigned long)result__JMKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LMKH)));
                 } else {
-                  next__IEKH=new_lab__ZPJ(lab_type__LEKH);
+                  next__HMKH=new_lab__FTJ(lab_type__KMKH);
                 };
-                ((__POINTER *)next__IEKH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__JEKH)[ 0]=next__IEKH;
+                ((__POINTER *)next__HMKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__IMKH)[ 0]=next__HMKH;
               } else {
-                ((__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;
+                ((__POINTER *)result__JMKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HMKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__JMKH=next__HMKH;
+              };
+            };
+            ptr__3MIH=result__JMKH;
+          };
+          result__2MIH=((__ITM_READ_ARG2 *)ptr__3MIH);
+          *(result__2MIH) = *(ITM_READ_ARG2__);
+        };
+        ((__ITM_READ_ARG2 *)result__2MIH)->parent_itm_read__2LL.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ=p__ENIH;
+        result__A5N=result__2MIH;
+        free__RXI(result__E0HH);
+      } else {
+        Self__FDW=((__FAST_ARRAYoITM_CODEo *)result__E0HH);
+        add_last__25U(Self__FDW,first_arg__44N);
+        if ((Self__FDW->parent_arrayed_collection__MVF.upper__BJL !=  0)) {
+          if ((Self__FDW->parent_arrayed_collection__MVF.upper__BJL ==  1)) {
+            tmp__BQRB=((void **)Self__FDW->parent_arrayed_collection__MVF.storage__S0T)[ 0];
+            ((void **)Self__FDW->parent_arrayed_collection__MVF.storage__S0T)[ 0]=((void **)Self__FDW->parent_arrayed_collection__MVF.storage__S0T)[ 1];
+            ((void **)Self__FDW->parent_arrayed_collection__MVF.storage__S0T)[ 1]=tmp__BQRB;
+          } else {
+            Self__K5YC=(__INTEGER)(Self__FDW->parent_arrayed_collection__MVF.upper__BJL -  1);
+            while ((Self__K5YC >=  0)) {
+              ((void **)Self__FDW->parent_arrayed_collection__MVF.storage__S0T)[(__INTEGER)(Self__K5YC +  1)]=((void **)Self__FDW->parent_arrayed_collection__MVF.storage__S0T)[Self__K5YC];
+              ((void **)Self__FDW->parent_arrayed_collection__MVF.storage__S0T)[Self__K5YC]=NULL;
+              Self__K5YC=(__INTEGER)(Self__K5YC -  1);
+            };
+            ((void **)Self__FDW->parent_arrayed_collection__MVF.storage__S0T)[ 0]=first_arg__44N;
+          };
+        };
+        l_arg__D5N=copy__TBI(result__E0HH);
+        p__N5Q=current_position__EZF();
+        result__0CR=NULL;
+        ptr__1CR=((__POINTER )(NULL));
+        typ_id__ADR= 0;
+        sz__3CR=((__UINTEGER_32 )sizeof(__ITM_READ_ARGS));
+        if ((sz__3CR ==  0)) {
+          result__0CR=ITM_READ_ARGS__;
+        } else {
+          typ_id__ADR=-1;
+          clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__3CR);
+          if ((typ_id__ADR == (__INTEGER)(-  1))) {
+            a__LBHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__MBHH=(__UINTEGER_32)((__UINTEGER_32)(sz__3CR + a__LBHH) & (__UINTEGER_32)(~ a__LBHH));
+            ptr_table__NMKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__MBHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__MMKH=((__POINTER )(NULL));
+            result__OMKH=((__POINTER *)ptr_table__NMKH)[ 0];
+            if ((result__OMKH == (void *)NULL)) {
+              result__OMKH=new_lab__FTJ(new_size__MBHH);
+              next__MMKH=(void *)((unsigned long)result__OMKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MBHH)));
+              ((__POINTER *)next__MMKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__NMKH)[ 0]=next__MMKH;
             } else {
-              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)));
+              next__MMKH=((__POINTER *)result__OMKH)[ 0];
+              if ((next__MMKH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__OMKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__MBHH <<  1)) <=  4096)) {
+                  next__MMKH=(void *)((unsigned long)result__OMKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MBHH)));
                 } else {
-                  next__NEKH=new_lab__ZPJ(new_size__R0GH);
+                  next__MMKH=new_lab__FTJ(new_size__MBHH);
                 };
-                ((__POINTER *)next__NEKH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__OEKH)[ 0]=next__NEKH;
+                ((__POINTER *)next__MMKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__NMKH)[ 0]=next__MMKH;
               } else {
-                ((__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;
+                ((__POINTER *)result__OMKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MMKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__OMKH=next__MMKH;
+              };
+            };
+            ptr__1CR=result__OMKH;
+          } else {
+            t__QBHH=((__UINTEGER_32 )typ_id__ADR);
+            a__PBHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__VMKH=(__UINTEGER_32)((__UINTEGER_32)(sz__3CR + a__PBHH) & (__UINTEGER_32)(~ a__PBHH));
+            ptr_table__SMKH=((__POINTER )(&(table_type[(t__QBHH)])));
+            lab_type__UMKH=(__UINTEGER_32)(t__QBHH |  1);
+            next__RMKH=((__POINTER )(NULL));
+            result__TMKH=((__POINTER *)ptr_table__SMKH)[ 0];
+            if ((result__TMKH == (void *)NULL)) {
+              result__TMKH=new_lab__FTJ(lab_type__UMKH);
+              next__RMKH=(void *)((unsigned long)result__TMKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VMKH)));
+              ((__POINTER *)next__RMKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__SMKH)[ 0]=next__RMKH;
             } else {
-              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)));
+              next__RMKH=((__POINTER *)result__TMKH)[ 0];
+              if ((next__RMKH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TMKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__VMKH <<  1)) <=  4096)) {
+                  next__RMKH=(void *)((unsigned long)result__TMKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VMKH)));
                 } else {
-                  next__SEKH=new_lab__ZPJ(lab_type__VEKH);
+                  next__RMKH=new_lab__FTJ(lab_type__UMKH);
                 };
-                ((__POINTER *)next__SEKH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__TEKH)[ 0]=next__SEKH;
+                ((__POINTER *)next__RMKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__SMKH)[ 0]=next__RMKH;
               } else {
-                ((__POINTER *)result__UEKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__SEKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__UEKH=next__SEKH;
+                ((__POINTER *)result__TMKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RMKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__TMKH=next__RMKH;
               };
             };
-            ptr__P5Q=result__UEKH;
+            ptr__1CR=result__TMKH;
           };
-          result__O5Q=((__ITM_READ_ARGS *)ptr__P5Q);
-          *(result__O5Q) = *(ITM_READ_ARGS__);
+          result__0CR=((__ITM_READ_ARGS *)ptr__1CR);
+          *(result__0CR) = *(ITM_READ_ARGS__);
         };
-        ((__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;
+        ((__ITM_READ_ARGS *)result__0CR)->parent_itm_read__0DO.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ=p__N5Q;
+        result__A5N=result__0CR;
       };
     };
   };
-  return(result__U1N);
+  return(result__A5N);
 }
 
-static void* readlip_expr_cmp__BZ1B(__PARSER *Self__CZ1B)
+static void* readlip_expr_cmp__N21B(__PARSER *Self__O21B)
 // ({PARSER}) With resultNo recursive, No inlinable.
 {
-  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)) {
+  void *right__R21B,*result__Q21B;
+  void *op__S21B;
+  __POSITION pos__PY0G,p__2YBD;
+  __STRING_CONSTANT *Self__MXBD;
+  __LIP_BINARY *result__WLGD,*Self__BZSD;
+  __POINTER ptr__XLGD,ptr_table__XMKH,next__WMKH,result__YMKH;
+  __POINTER ptr_table__2MKH,next__1MKH,result__3MKH;
+  __INTEGER typ_id__2LGD;
+  __UINTEGER_32 sz__ZLGD,a__1BHH,new_size__2BHH,t__ACHH,a__5BHH;
+  __UINTEGER_32 new_size__5MKH,lab_type__4MKH;
+  __CHARACTER type__T21B;
+  right__R21B=NULL;
+  op__S21B=NULL;
+  type__T21B='\0';
+  result__Q21B=readlip_expr_binary__KP3B(Self__O21B);
+  if (((void *)result__Q21B != (void *)NULL)) {
+    while ((((((read_symbol__SYJ((&__string_19)) || read_symbol__SYJ((&__string_21))) || read_symbol__SYJ((&__string_17))) || read_symbol__SYJ((&__string_16))) || read_symbol__SYJ((&__string_18))) || read_symbol__SYJ((&__string_20)))) {
+      op__S21B=last_string__V1C;
+      right__R21B=readlip_expr_binary__KP3B(Self__O21B);
+      if (((void *)right__R21B == (void *)NULL)) {
+        pos__PY0G=current_position__EZF();
+        put_error__text__NPG( 0,(&__string_240));
+        put_position__XQG(pos__PY0G);
+        put_string__P3F(msg_err__SPG);
+        if ((type_error__RPG !=  2)) {
           exit(( 1));
         };
       };
-      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)));
+      Self__MXBD=((__STRING_CONSTANT *)op__S21B);
+      if (((void *)Self__MXBD == (void *)(&__string_19))) {
+        type__T21B='S';
+      };
+      if (((void *)Self__MXBD == (void *)(&__string_21))) {
+        type__T21B='I';
+      };
+      if (((void *)Self__MXBD == (void *)(&__string_17))) {
+        type__T21B='E';
+      };
+      if (((void *)Self__MXBD == (void *)(&__string_16))) {
+        type__T21B='=';
+      };
+      if (((void *)Self__MXBD == (void *)(&__string_18))) {
+        type__T21B='>';
+      };
+      if (((void *)Self__MXBD == (void *)(&__string_20))) {
+        type__T21B='<';
+      };
+      p__2YBD=current_position__EZF();
+      result__WLGD=NULL;
+      ptr__XLGD=((__POINTER )(NULL));
+      typ_id__2LGD= 0;
+      sz__ZLGD=((__UINTEGER_32 )sizeof(__LIP_BINARY));
+      if ((sz__ZLGD ==  0)) {
+        result__WLGD=LIP_BINARY__;
+      } else {
+        typ_id__2LGD=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__ZLGD);
+        if ((typ_id__2LGD == (__INTEGER)(-  1))) {
+          a__1BHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__2BHH=(__UINTEGER_32)((__UINTEGER_32)(sz__ZLGD + a__1BHH) & (__UINTEGER_32)(~ a__1BHH));
+          ptr_table__XMKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__2BHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__WMKH=((__POINTER )(NULL));
+          result__YMKH=((__POINTER *)ptr_table__XMKH)[ 0];
+          if ((result__YMKH == (void *)NULL)) {
+            result__YMKH=new_lab__FTJ(new_size__2BHH);
+            next__WMKH=(void *)((unsigned long)result__YMKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2BHH)));
+            ((__POINTER *)next__WMKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__XMKH)[ 0]=next__WMKH;
+          } else {
+            next__WMKH=((__POINTER *)result__YMKH)[ 0];
+            if ((next__WMKH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YMKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__2BHH <<  1)) <=  4096)) {
+                next__WMKH=(void *)((unsigned long)result__YMKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2BHH)));
               } else {
-                next__XEKH=new_lab__ZPJ(new_size__B1GH);
+                next__WMKH=new_lab__FTJ(new_size__2BHH);
               };
-              ((__POINTER *)next__XEKH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__YEKH)[ 0]=next__XEKH;
+              ((__POINTER *)next__WMKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__XMKH)[ 0]=next__WMKH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__YMKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WMKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__YMKH=next__WMKH;
+            };
+          };
+          ptr__XLGD=result__YMKH;
+        } else {
+          t__ACHH=((__UINTEGER_32 )typ_id__2LGD);
+          a__5BHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__5MKH=(__UINTEGER_32)((__UINTEGER_32)(sz__ZLGD + a__5BHH) & (__UINTEGER_32)(~ a__5BHH));
+          ptr_table__2MKH=((__POINTER )(&(table_type[(t__ACHH)])));
+          lab_type__4MKH=(__UINTEGER_32)(t__ACHH |  1);
+          next__1MKH=((__POINTER )(NULL));
+          result__3MKH=((__POINTER *)ptr_table__2MKH)[ 0];
+          if ((result__3MKH == (void *)NULL)) {
+            result__3MKH=new_lab__FTJ(lab_type__4MKH);
+            next__1MKH=(void *)((unsigned long)result__3MKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5MKH)));
+            ((__POINTER *)next__1MKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__2MKH)[ 0]=next__1MKH;
+          } else {
+            next__1MKH=((__POINTER *)result__3MKH)[ 0];
+            if ((next__1MKH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__3MKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__5MKH <<  1)) <=  4096)) {
+                next__1MKH=(void *)((unsigned long)result__3MKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5MKH)));
               } else {
-                next__2EKH=new_lab__ZPJ(lab_type__5EKH);
+                next__1MKH=new_lab__FTJ(lab_type__4MKH);
               };
-              ((__POINTER *)next__2EKH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__3EKH)[ 0]=next__2EKH;
+              ((__POINTER *)next__1MKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__2MKH)[ 0]=next__1MKH;
             } else {
-              ((__POINTER *)result__4EKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2EKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__4EKH=next__2EKH;
+              ((__POINTER *)result__3MKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1MKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__3MKH=next__1MKH;
             };
           };
-          ptr__JIGD=result__4EKH;
+          ptr__XLGD=result__3MKH;
         };
-        result__IIGD=((__LIP_BINARY *)ptr__JIGD);
-        *(result__IIGD) = *(LIP_BINARY__);
+        result__WLGD=((__LIP_BINARY *)ptr__XLGD);
+        *(result__WLGD) = *(LIP_BINARY__);
       };
-      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;
+      Self__BZSD=((__LIP_BINARY *)result__WLGD);
+      Self__BZSD->parent_lip_code__JRZB.parent_itm_object__0EE.position__GFJ=p__2YBD;
+      Self__BZSD->left__G1QD=result__Q21B;
+      Self__BZSD->right__J1QD=right__R21B;
+      Self__BZSD->operator__M1QD=type__T21B;
+      result__Q21B=result__WLGD;
     };
   };
-  return(result__EZ1B);
+  return(result__Q21B);
 }
 
-static void** create__ATIE(__INTEGER nb_elements__CTIE)
+static void** create__OWIE(__INTEGER nb_elements__QWIE)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__SAFH,a__XAFH,new_size__TAFH,new_size2__UAFH,a__LCHH;
+  __UINTEGER_32 new_size__MCHH;
+  __POINTER result__RAFH,ptr_table__BNKH,next__ANKH,result__CNKH;
+  void *result__FNKH;
+  __INTEGER Self__IWYE;
+  void **Result__X0NE;
+  sz__SAFH=((__UINTEGER_32 )(__INTEGER)(nb_elements__QWIE * ((__INTEGER )(sizeof(void *)))));
+  result__RAFH=((__POINTER )(NULL));
+  a__XAFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__TAFH=(__UINTEGER_32)((__UINTEGER_32)(sz__SAFH + a__XAFH) & (__UINTEGER_32)(~ a__XAFH));
+  new_size2__UAFH=(__UINTEGER_32)(new_size__TAFH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__UAFH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__LCHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__MCHH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__UAFH + a__LCHH) & (__UINTEGER_32)(~ a__LCHH));
+    ptr_table__BNKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__MCHH / ((__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__FTJ(new_size__MCHH);
+      next__ANKH=(void *)((unsigned long)result__CNKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MCHH)));
+      ((__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__SXH)))) &  4095) + (__UINTEGER_32)(new_size__MCHH <<  1)) <=  4096)) {
+          next__ANKH=(void *)((unsigned long)result__CNKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MCHH)));
+        } else {
+          next__ANKH=new_lab__FTJ(new_size__MCHH);
+        };
+        ((__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;
+      };
+    };
+    ((__POINTER *)result__CNKH)[ 0]=((__POINTER ) 3);
+    result__RAFH=(void *)((unsigned long)result__CNKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__FNKH=first_free__NFVB;
+    while ((((void *)result__FNKH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__FNKH)->map_size_and_id__YTB &  4294967292LU) < new_size__TAFH))) {
+      result__FNKH=((__MEMORY *)result__FNKH)->map_next_free__ZTB;
     };
-    if (((void *)result__GFKH == (void *)NULL)) {
-      result__GFKH=new_page__K34();
+    if (((void *)result__FNKH == (void *)NULL)) {
+      result__FNKH=new_page__YC5();
     };
-    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)));
+    to_busy__index__MWFC(result__FNKH,new_size__TAFH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__FNKH)) - (unsigned long)begin_memory__SXH)))) >>  26));
+    result__RAFH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__FNKH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__X0NE=((void **)result__RAFH);
+  Self__IWYE=(__INTEGER)(nb_elements__QWIE -  1);
+  while ((Self__IWYE >=  0)) {
+    Result__X0NE[Self__IWYE]=NULL;
+    Self__IWYE=(__INTEGER)(Self__IWYE -  1);
   };
-  return(Result__PWNE);
+  return(Result__X0NE);
 }
 
-static void** create__RPQB(__INTEGER nb_elements__TPQB)
+static void** create__3SQB(__INTEGER nb_elements__5SQB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__DBFH,a__IBFH,new_size__EBFH,new_size2__FBFH,a__KDHH;
+  __UINTEGER_32 new_size__LDHH;
+  __POINTER result__CBFH,ptr_table__JNKH,next__INKH,result__KNKH;
+  void *result__NNKH;
+  __INTEGER Self__13MC;
+  void **Result__ZMTB;
+  sz__DBFH=((__UINTEGER_32 )(__INTEGER)(nb_elements__5SQB * ((__INTEGER )(sizeof(void *)))));
+  result__CBFH=((__POINTER )(NULL));
+  a__IBFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__EBFH=(__UINTEGER_32)((__UINTEGER_32)(sz__DBFH + a__IBFH) & (__UINTEGER_32)(~ a__IBFH));
+  new_size2__FBFH=(__UINTEGER_32)(new_size__EBFH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__FBFH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__KDHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__LDHH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__FBFH + a__KDHH) & (__UINTEGER_32)(~ a__KDHH));
+    ptr_table__JNKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__LDHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__INKH=((__POINTER )(NULL));
+    result__KNKH=((__POINTER *)ptr_table__JNKH)[ 0];
+    if ((result__KNKH == (void *)NULL)) {
+      result__KNKH=new_lab__FTJ(new_size__LDHH);
+      next__INKH=(void *)((unsigned long)result__KNKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LDHH)));
+      ((__POINTER *)next__INKH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__JNKH)[ 0]=next__INKH;
+    } else {
+      next__INKH=((__POINTER *)result__KNKH)[ 0];
+      if ((next__INKH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__KNKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__LDHH <<  1)) <=  4096)) {
+          next__INKH=(void *)((unsigned long)result__KNKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LDHH)));
+        } else {
+          next__INKH=new_lab__FTJ(new_size__LDHH);
+        };
+        ((__POINTER *)next__INKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__JNKH)[ 0]=next__INKH;
+      } else {
+        ((__POINTER *)result__KNKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__INKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__KNKH=next__INKH;
+      };
+    };
+    ((__POINTER *)result__KNKH)[ 0]=((__POINTER ) 3);
+    result__CBFH=(void *)((unsigned long)result__KNKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__NNKH=first_free__NFVB;
+    while ((((void *)result__NNKH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__NNKH)->map_size_and_id__YTB &  4294967292LU) < new_size__EBFH))) {
+      result__NNKH=((__MEMORY *)result__NNKH)->map_next_free__ZTB;
     };
-    if (((void *)result__OFKH == (void *)NULL)) {
-      result__OFKH=new_page__K34();
+    if (((void *)result__NNKH == (void *)NULL)) {
+      result__NNKH=new_page__YC5();
     };
-    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)));
+    to_busy__index__MWFC(result__NNKH,new_size__EBFH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__NNKH)) - (unsigned long)begin_memory__SXH)))) >>  26));
+    result__CBFH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__NNKH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__ZMTB=((void **)result__CBFH);
+  Self__13MC=(__INTEGER)(nb_elements__5SQB -  1);
+  while ((Self__13MC >=  0)) {
+    Result__ZMTB[Self__13MC]=NULL;
+    Self__13MC=(__INTEGER)(Self__13MC -  1);
   };
-  return(Result__NJTB);
+  return(Result__ZMTB);
 }
 
-static void* read_argument__XLP(__PARSER *Self__YLP)
+static void* read_argument__DPP(__PARSER *Self__EPP)
 // ({PARSER}) With resultNo recursive, No inlinable.
 {
-  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())) {
+  void *result__GPP;
+  __POSITION p__NNIH;
+  __ITM_READ *result__FNIH;
+  __POINTER ptr__GNIH,ptr_table__RNKH,next__QNKH,result__SNKH;
+  __POINTER ptr_table__WNKH,next__VNKH,result__XNKH;
+  __INTEGER typ_id__HNIH;
+  __UINTEGER_32 sz__INIH,a__JNIH,new_size__KNIH,t__LNIH,a__MNIH;
+  __UINTEGER_32 new_size__ZNKH,lab_type__YNKH;
+  result__GPP=read_expr_primary__Y4M(Self__EPP);
+  if ((((void *)result__GPP == (void *)NULL) && read_identifier__QBL())) {
     if (is_shorter__LZ) {
-      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__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)));
+      if ((! fast_has__FEV(short_local__XCC,last_string__V1C))) {
+        short__token__to__YCD((&__string_131),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V1C)->count__DD),position__CCC);
+      };
+    };
+    p__NNIH=current_position__EZF();
+    result__FNIH=NULL;
+    ptr__GNIH=((__POINTER )(NULL));
+    typ_id__HNIH= 0;
+    sz__INIH=((__UINTEGER_32 )sizeof(__ITM_READ));
+    if ((sz__INIH ==  0)) {
+      result__FNIH=ITM_READ__;
+    } else {
+      typ_id__HNIH=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__INIH);
+      if ((typ_id__HNIH == (__INTEGER)(-  1))) {
+        a__JNIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__KNIH=(__UINTEGER_32)((__UINTEGER_32)(sz__INIH + a__JNIH) & (__UINTEGER_32)(~ a__JNIH));
+        ptr_table__RNKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__KNIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__QNKH=((__POINTER )(NULL));
+        result__SNKH=((__POINTER *)ptr_table__RNKH)[ 0];
+        if ((result__SNKH == (void *)NULL)) {
+          result__SNKH=new_lab__FTJ(new_size__KNIH);
+          next__QNKH=(void *)((unsigned long)result__SNKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KNIH)));
+          ((__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__SXH)))) &  4095) + (__UINTEGER_32)(new_size__KNIH <<  1)) <=  4096)) {
+              next__QNKH=(void *)((unsigned long)result__SNKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KNIH)));
             } else {
-              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)));
+              next__QNKH=new_lab__FTJ(new_size__KNIH);
+            };
+            ((__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__GNIH=result__SNKH;
+      } else {
+        t__LNIH=((__UINTEGER_32 )typ_id__HNIH);
+        a__MNIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__ZNKH=(__UINTEGER_32)((__UINTEGER_32)(sz__INIH + a__MNIH) & (__UINTEGER_32)(~ a__MNIH));
+        ptr_table__WNKH=((__POINTER )(&(table_type[(t__LNIH)])));
+        lab_type__YNKH=(__UINTEGER_32)(t__LNIH |  1);
+        next__VNKH=((__POINTER )(NULL));
+        result__XNKH=((__POINTER *)ptr_table__WNKH)[ 0];
+        if ((result__XNKH == (void *)NULL)) {
+          result__XNKH=new_lab__FTJ(lab_type__YNKH);
+          next__VNKH=(void *)((unsigned long)result__XNKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZNKH)));
+          ((__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__SXH)))) &  4095) + (__UINTEGER_32)(new_size__ZNKH <<  1)) <=  4096)) {
+              next__VNKH=(void *)((unsigned long)result__XNKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZNKH)));
             } else {
-              next__WFKH=new_lab__ZPJ(lab_type__ZFKH);
+              next__VNKH=new_lab__FTJ(lab_type__YNKH);
             };
-            ((__POINTER *)next__WFKH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__XFKH)[ 0]=next__WFKH;
+            ((__POINTER *)next__VNKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__WNKH)[ 0]=next__VNKH;
           } else {
-            ((__POINTER *)result__YFKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WFKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__YFKH=next__WFKH;
+            ((__POINTER *)result__XNKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VNKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__XNKH=next__VNKH;
           };
         };
-        ptr__SFIH=result__YFKH;
+        ptr__GNIH=result__XNKH;
       };
-      result__RFIH=((__ITM_READ *)ptr__SFIH);
-      *(result__RFIH) = *(ITM_READ__);
+      result__FNIH=((__ITM_READ *)ptr__GNIH);
+      *(result__FNIH) = *(ITM_READ__);
     };
-    ((__ITM_READ *)result__RFIH)->parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ=p__ZFIH;
-    result__0LP=result__RFIH;
+    ((__ITM_READ *)result__FNIH)->parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ=p__NNIH;
+    result__GPP=result__FNIH;
   };
-  return(result__0LP);
+  return(result__GPP);
 }
 
-static void* readlip_expr_binary__4L3B(__PARSER *Self__5L3B)
+static void* readlip_expr_binary__KP3B(__PARSER *Self__LP3B)
 // ({PARSER}) With resultNo recursive, No inlinable.
 {
-  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:
+  void *right__OP3B,*result__NP3B;
+  __POSITION pos__T40G,p__XNIH,p__EOIH;
+  __LIP_BINARY *result__ONIH,*Self__WNIH,*result__1NIH,*Self__DOIH;
+  __POINTER ptr__PNIH,ptr_table__BOKH,next__AOKH,result__COKH;
+  __POINTER ptr_table__GOKH,next__FOKH,result__HOKH,ptr__2NIH;
+  __POINTER ptr_table__LOKH,next__KOKH,result__MOKH,ptr_table__QOKH;
+  __POINTER next__POKH,result__ROKH;
+  __INTEGER typ_id__QNIH,typ_id__3NIH;
+  __UINTEGER_32 sz__RNIH,a__SNIH,new_size__TNIH,t__UNIH,a__VNIH;
+  __UINTEGER_32 new_size__JOKH,lab_type__IOKH,sz__4NIH,a__5NIH;
+  __UINTEGER_32 new_size__AOIH,t__BOIH,a__COIH,new_size__TOKH;
+  __UINTEGER_32 lab_type__SOKH;
+  __BOOLEAN result__0NKH,__tmp__DQ3B,result__3NKH;
+  __CHARACTER result__1NKH,result__4NKH;
+  right__OP3B=NULL;
+  result__NP3B=readlip_expr_unary__L14B(Self__LP3B);
+  if (((void *)result__NP3B != (void *)NULL)) {
+    while_do__BAAC:
     {
-      result__1FKH=FALSE__;
-      if ((! read_space__KSD())) {
-        result__1FKH=FALSE__;
+      result__0NKH=FALSE__;
+      if ((! read_space__MTD())) {
+        result__0NKH=FALSE__;
       } else {
-        result__2FKH='\0';
+        result__1NKH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__2FKH=((__CHARACTER )(( 0)));
+          result__1NKH=((__CHARACTER )(( 0)));
         } else {
-          result__2FKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+          result__1NKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__2FKH == '-')) {
+        if ((result__1NKH == '-')) {
           position__CCC=(__INTEGER)(position__CCC +  1);
-          result__1FKH=TRUE__;
+          result__0NKH=TRUE__;
         };
       };
-      if (result__1FKH) {
-        __tmp__XM3B=TRUE__;
+      if (result__0NKH) {
+        __tmp__DQ3B=TRUE__;
       } else {
-        result__4FKH=FALSE__;
-        if ((! read_space__KSD())) {
-          result__4FKH=FALSE__;
+        result__3NKH=FALSE__;
+        if ((! read_space__MTD())) {
+          result__3NKH=FALSE__;
         } else {
-          result__5FKH='\0';
+          result__4NKH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__5FKH=((__CHARACTER )(( 0)));
+            result__4NKH=((__CHARACTER )(( 0)));
           } else {
-            result__5FKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+            result__4NKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__5FKH == '+')) {
+          if ((result__4NKH == '+')) {
             position__CCC=(__INTEGER)(position__CCC +  1);
-            result__4FKH=TRUE__;
+            result__3NKH=TRUE__;
           };
         };
-        __tmp__XM3B=result__4FKH;
+        __tmp__DQ3B=result__3NKH;
       };
-      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)) {
+      if (__tmp__DQ3B) {
+        right__OP3B=readlip_expr_unary__L14B(Self__LP3B);
+        if (((void *)right__OP3B == (void *)NULL)) {
+          pos__T40G=current_position__EZF();
+          put_error__text__NPG( 0,(&__string_240));
+          put_position__XQG(pos__T40G);
+          put_string__P3F(msg_err__SPG);
+          if ((type_error__RPG !=  2)) {
             exit(( 1));
           };
         };
-        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;
+        if (result__0NKH) {
+          p__XNIH=current_position__EZF();
+          result__ONIH=NULL;
+          ptr__PNIH=((__POINTER )(NULL));
+          typ_id__QNIH= 0;
+          sz__RNIH=((__UINTEGER_32 )sizeof(__LIP_BINARY));
+          if ((sz__RNIH ==  0)) {
+            result__ONIH=LIP_BINARY__;
+          } else {
+            typ_id__QNIH=-1;
+            clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__RNIH);
+            if ((typ_id__QNIH == (__INTEGER)(-  1))) {
+              a__SNIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__TNIH=(__UINTEGER_32)((__UINTEGER_32)(sz__RNIH + a__SNIH) & (__UINTEGER_32)(~ a__SNIH));
+              ptr_table__BOKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__TNIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__AOKH=((__POINTER )(NULL));
+              result__COKH=((__POINTER *)ptr_table__BOKH)[ 0];
+              if ((result__COKH == (void *)NULL)) {
+                result__COKH=new_lab__FTJ(new_size__TNIH);
+                next__AOKH=(void *)((unsigned long)result__COKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TNIH)));
+                ((__POINTER *)next__AOKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__BOKH)[ 0]=next__AOKH;
               } else {
-                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)));
+                next__AOKH=((__POINTER *)result__COKH)[ 0];
+                if ((next__AOKH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__COKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__TNIH <<  1)) <=  4096)) {
+                    next__AOKH=(void *)((unsigned long)result__COKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TNIH)));
                   } else {
-                    next__BGKH=new_lab__ZPJ(new_size__5FIH);
+                    next__AOKH=new_lab__FTJ(new_size__TNIH);
                   };
-                  ((__POINTER *)next__BGKH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__CGKH)[ 0]=next__BGKH;
+                  ((__POINTER *)next__AOKH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__BOKH)[ 0]=next__AOKH;
                 } else {
-                  ((__POINTER *)result__DGKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BGKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__DGKH=next__BGKH;
+                  ((__POINTER *)result__COKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__AOKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__COKH=next__AOKH;
                 };
               };
-              ptr__1FIH=result__DGKH;
+              ptr__PNIH=result__COKH;
             } else {
-              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;
+              t__UNIH=((__UINTEGER_32 )typ_id__QNIH);
+              a__VNIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__JOKH=(__UINTEGER_32)((__UINTEGER_32)(sz__RNIH + a__VNIH) & (__UINTEGER_32)(~ a__VNIH));
+              ptr_table__GOKH=((__POINTER )(&(table_type[(t__UNIH)])));
+              lab_type__IOKH=(__UINTEGER_32)(t__UNIH |  1);
+              next__FOKH=((__POINTER )(NULL));
+              result__HOKH=((__POINTER *)ptr_table__GOKH)[ 0];
+              if ((result__HOKH == (void *)NULL)) {
+                result__HOKH=new_lab__FTJ(lab_type__IOKH);
+                next__FOKH=(void *)((unsigned long)result__HOKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JOKH)));
+                ((__POINTER *)next__FOKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__GOKH)[ 0]=next__FOKH;
               } else {
-                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)));
+                next__FOKH=((__POINTER *)result__HOKH)[ 0];
+                if ((next__FOKH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HOKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__JOKH <<  1)) <=  4096)) {
+                    next__FOKH=(void *)((unsigned long)result__HOKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JOKH)));
                   } else {
-                    next__GGKH=new_lab__ZPJ(lab_type__JGKH);
+                    next__FOKH=new_lab__FTJ(lab_type__IOKH);
                   };
-                  ((__POINTER *)next__GGKH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__HGKH)[ 0]=next__GGKH;
+                  ((__POINTER *)next__FOKH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__GOKH)[ 0]=next__FOKH;
                 } else {
-                  ((__POINTER *)result__IGKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GGKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__IGKH=next__GGKH;
+                  ((__POINTER *)result__HOKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FOKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__HOKH=next__FOKH;
                 };
               };
-              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;
+              ptr__PNIH=result__HOKH;
+            };
+            result__ONIH=((__LIP_BINARY *)ptr__PNIH);
+            *(result__ONIH) = *(LIP_BINARY__);
+          };
+          Self__WNIH=((__LIP_BINARY *)result__ONIH);
+          Self__WNIH->parent_lip_code__JRZB.parent_itm_object__0EE.position__GFJ=p__XNIH;
+          Self__WNIH->left__G1QD=result__NP3B;
+          Self__WNIH->right__J1QD=right__OP3B;
+          Self__WNIH->operator__M1QD='-';
+          result__NP3B=result__ONIH;
+        } else {
+          p__EOIH=current_position__EZF();
+          result__1NIH=NULL;
+          ptr__2NIH=((__POINTER )(NULL));
+          typ_id__3NIH= 0;
+          sz__4NIH=((__UINTEGER_32 )sizeof(__LIP_BINARY));
+          if ((sz__4NIH ==  0)) {
+            result__1NIH=LIP_BINARY__;
+          } else {
+            typ_id__3NIH=-1;
+            clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__4NIH);
+            if ((typ_id__3NIH == (__INTEGER)(-  1))) {
+              a__5NIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__AOIH=(__UINTEGER_32)((__UINTEGER_32)(sz__4NIH + a__5NIH) & (__UINTEGER_32)(~ a__5NIH));
+              ptr_table__LOKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__AOIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__KOKH=((__POINTER )(NULL));
+              result__MOKH=((__POINTER *)ptr_table__LOKH)[ 0];
+              if ((result__MOKH == (void *)NULL)) {
+                result__MOKH=new_lab__FTJ(new_size__AOIH);
+                next__KOKH=(void *)((unsigned long)result__MOKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AOIH)));
+                ((__POINTER *)next__KOKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__LOKH)[ 0]=next__KOKH;
               } else {
-                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)));
+                next__KOKH=((__POINTER *)result__MOKH)[ 0];
+                if ((next__KOKH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MOKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__AOIH <<  1)) <=  4096)) {
+                    next__KOKH=(void *)((unsigned long)result__MOKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AOIH)));
                   } else {
-                    next__LGKH=new_lab__ZPJ(new_size__MGIH);
+                    next__KOKH=new_lab__FTJ(new_size__AOIH);
                   };
-                  ((__POINTER *)next__LGKH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__MGKH)[ 0]=next__LGKH;
+                  ((__POINTER *)next__KOKH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__LOKH)[ 0]=next__KOKH;
                 } else {
-                  ((__POINTER *)result__NGKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LGKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__NGKH=next__LGKH;
+                  ((__POINTER *)result__MOKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KOKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__MOKH=next__KOKH;
                 };
               };
-              ptr__IGIH=result__NGKH;
+              ptr__2NIH=result__MOKH;
             } else {
-              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;
+              t__BOIH=((__UINTEGER_32 )typ_id__3NIH);
+              a__COIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__TOKH=(__UINTEGER_32)((__UINTEGER_32)(sz__4NIH + a__COIH) & (__UINTEGER_32)(~ a__COIH));
+              ptr_table__QOKH=((__POINTER )(&(table_type[(t__BOIH)])));
+              lab_type__SOKH=(__UINTEGER_32)(t__BOIH |  1);
+              next__POKH=((__POINTER )(NULL));
+              result__ROKH=((__POINTER *)ptr_table__QOKH)[ 0];
+              if ((result__ROKH == (void *)NULL)) {
+                result__ROKH=new_lab__FTJ(lab_type__SOKH);
+                next__POKH=(void *)((unsigned long)result__ROKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TOKH)));
+                ((__POINTER *)next__POKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__QOKH)[ 0]=next__POKH;
               } else {
-                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)));
+                next__POKH=((__POINTER *)result__ROKH)[ 0];
+                if ((next__POKH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ROKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__TOKH <<  1)) <=  4096)) {
+                    next__POKH=(void *)((unsigned long)result__ROKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TOKH)));
                   } else {
-                    next__QGKH=new_lab__ZPJ(lab_type__TGKH);
+                    next__POKH=new_lab__FTJ(lab_type__SOKH);
                   };
-                  ((__POINTER *)next__QGKH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__RGKH)[ 0]=next__QGKH;
+                  ((__POINTER *)next__POKH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__QOKH)[ 0]=next__POKH;
                 } else {
-                  ((__POINTER *)result__SGKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QGKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__SGKH=next__QGKH;
+                  ((__POINTER *)result__ROKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__POKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__ROKH=next__POKH;
                 };
               };
-              ptr__IGIH=result__SGKH;
+              ptr__2NIH=result__ROKH;
             };
-            result__HGIH=((__LIP_BINARY *)ptr__IGIH);
-            *(result__HGIH) = *(LIP_BINARY__);
+            result__1NIH=((__LIP_BINARY *)ptr__2NIH);
+            *(result__1NIH) = *(LIP_BINARY__);
           };
-          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;
+          Self__DOIH=((__LIP_BINARY *)result__1NIH);
+          Self__DOIH->parent_lip_code__JRZB.parent_itm_object__0EE.position__GFJ=p__EOIH;
+          Self__DOIH->left__G1QD=result__NP3B;
+          Self__DOIH->right__J1QD=right__OP3B;
+          Self__DOIH->operator__M1QD='+';
+          result__NP3B=result__1NIH;
         };
-        goto while_do__V25B;
+        goto while_do__BAAC;
       };
     };
   };
-  return(result__BM3B);
+  return(result__NP3B);
 }
 
-static void* readlip_expr_unary__5X4B(__PARSER *Self__AY4B)
+static void* readlip_expr_unary__L14B(__PARSER *Self__M14B)
 // ({PARSER}) With resultRecursive, No inlinable.
 {
-  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__VGKH=FALSE__;
+  void *result__O14B,*result__IGFE;
+  void *nam__R14B,*n__OPKH;
+  __POSITION pos__FA1G,p__3D0C,p__NPKH,p__1GFE;
+  __LIP_UNARY *result__1SBD,*Self__0JSD;
+  __POINTER ptr__2SBD,ptr_table__1OKH,next__0OKH,result__2OKH;
+  __POINTER ptr_table__APKH,next__5OKH,result__BPKH,ptr__FPKH;
+  __POINTER ptr_table__RPKH,next__QPKH,result__SPKH,ptr_table__WPKH;
+  __POINTER next__VPKH,result__XPKH,ptr__IVLE,ptr_table__1PKH;
+  __POINTER next__0PKH,result__2PKH,ptr_table__AQKH,next__5PKH;
+  __POINTER result__BQKH;
+  __INTEGER typ_id__BTBD,typ_id__GPKH,typ_id__NVLE;
+  __UINTEGER_32 sz__4SBD,a__RDHH,new_size__SDHH,t__WDHH,a__VDHH;
+  __UINTEGER_32 new_size__DPKH,lab_type__CPKH,sz__HPKH,a__IPKH;
+  __UINTEGER_32 new_size__JPKH,t__KPKH,a__LPKH,new_size__ZPKH;
+  __UINTEGER_32 lab_type__YPKH,sz__KVLE,a__ZDHH,new_size__0DHH,t__4DHH;
+  __UINTEGER_32 a__3DHH,new_size__DQKH,lab_type__CQKH;
+  __LIP_CALL *result__EPKH,*Self__MPKH,*result__HVLE,*Self__HRWE;
+  __CHARACTER type__Q14B,result__VOKH,result__YOKH;
+  __BOOLEAN result__UOKH,__tmp__214B,result__XOKH,__tmp__224B;
+  result__O14B=NULL;
+  type__Q14B='\0';
+  nam__R14B=NULL;
+  result__UOKH=FALSE__;
+  if ((! read_space__MTD())) {
+    result__UOKH=FALSE__;
   } else {
-    result__WGKH='\0';
+    result__VOKH='\0';
     if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-      result__WGKH=((__CHARACTER )(( 0)));
+      result__VOKH=((__CHARACTER )(( 0)));
     } else {
-      result__WGKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+      result__VOKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
     };
-    if ((result__WGKH == '-')) {
+    if ((result__VOKH == '-')) {
       position__CCC=(__INTEGER)(position__CCC +  1);
-      result__VGKH=TRUE__;
+      result__UOKH=TRUE__;
     };
   };
-  if (result__VGKH) {
-    __tmp__QY4B=TRUE__;
+  if (result__UOKH) {
+    __tmp__214B=TRUE__;
   } else {
-    result__YGKH=FALSE__;
-    if ((! read_space__KSD())) {
-      result__YGKH=FALSE__;
+    result__XOKH=FALSE__;
+    if ((! read_space__MTD())) {
+      result__XOKH=FALSE__;
     } else {
-      result__ZGKH='\0';
+      result__YOKH='\0';
       if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__ZGKH=((__CHARACTER )(( 0)));
+        result__YOKH=((__CHARACTER )(( 0)));
       } else {
-        result__ZGKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+        result__YOKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__ZGKH == '!')) {
+      if ((result__YOKH == '!')) {
         position__CCC=(__INTEGER)(position__CCC +  1);
-        result__YGKH=TRUE__;
+        result__XOKH=TRUE__;
       };
     };
-    __tmp__QY4B=result__YGKH;
+    __tmp__214B=result__XOKH;
   };
-  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)) {
+  if (__tmp__214B) {
+    result__O14B=readlip_expr_unary__L14B(Self__M14B);
+    if (((void *)result__O14B == (void *)NULL)) {
+      pos__FA1G=current_position__EZF();
+      put_error__text__NPG( 0,(&__string_240));
+      put_position__XQG(pos__FA1G);
+      put_string__P3F(msg_err__SPG);
+      if ((type_error__RPG !=  2)) {
         exit(( 1));
       };
     };
-    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)));
+    if (result__UOKH) {
+      type__Q14B='-';
+    } else {
+      type__Q14B='!';
+    };
+    p__3D0C=current_position__EZF();
+    result__1SBD=NULL;
+    ptr__2SBD=((__POINTER )(NULL));
+    typ_id__BTBD= 0;
+    sz__4SBD=((__UINTEGER_32 )sizeof(__LIP_UNARY));
+    if ((sz__4SBD ==  0)) {
+      result__1SBD=LIP_UNARY__;
+    } else {
+      typ_id__BTBD=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__4SBD);
+      if ((typ_id__BTBD == (__INTEGER)(-  1))) {
+        a__RDHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__SDHH=(__UINTEGER_32)((__UINTEGER_32)(sz__4SBD + a__RDHH) & (__UINTEGER_32)(~ a__RDHH));
+        ptr_table__1OKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__SDHH / ((__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__FTJ(new_size__SDHH);
+          next__0OKH=(void *)((unsigned long)result__2OKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SDHH)));
+          ((__POINTER *)next__0OKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__1OKH)[ 0]=next__0OKH;
+        } else {
+          next__0OKH=((__POINTER *)result__2OKH)[ 0];
+          if ((next__0OKH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2OKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__SDHH <<  1)) <=  4096)) {
+              next__0OKH=(void *)((unsigned long)result__2OKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SDHH)));
             } else {
-              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)));
+              next__0OKH=new_lab__FTJ(new_size__SDHH);
+            };
+            ((__POINTER *)next__0OKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__1OKH)[ 0]=next__0OKH;
+          } else {
+            ((__POINTER *)result__2OKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0OKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__2OKH=next__0OKH;
+          };
+        };
+        ptr__2SBD=result__2OKH;
+      } else {
+        t__WDHH=((__UINTEGER_32 )typ_id__BTBD);
+        a__VDHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__DPKH=(__UINTEGER_32)((__UINTEGER_32)(sz__4SBD + a__VDHH) & (__UINTEGER_32)(~ a__VDHH));
+        ptr_table__APKH=((__POINTER )(&(table_type[(t__WDHH)])));
+        lab_type__CPKH=(__UINTEGER_32)(t__WDHH |  1);
+        next__5OKH=((__POINTER )(NULL));
+        result__BPKH=((__POINTER *)ptr_table__APKH)[ 0];
+        if ((result__BPKH == (void *)NULL)) {
+          result__BPKH=new_lab__FTJ(lab_type__CPKH);
+          next__5OKH=(void *)((unsigned long)result__BPKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DPKH)));
+          ((__POINTER *)next__5OKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__APKH)[ 0]=next__5OKH;
+        } else {
+          next__5OKH=((__POINTER *)result__BPKH)[ 0];
+          if ((next__5OKH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BPKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__DPKH <<  1)) <=  4096)) {
+              next__5OKH=(void *)((unsigned long)result__BPKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DPKH)));
             } else {
-              next__AHKH=new_lab__ZPJ(lab_type__DHKH);
+              next__5OKH=new_lab__FTJ(lab_type__CPKH);
             };
-            ((__POINTER *)next__AHKH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__BHKH)[ 0]=next__AHKH;
+            ((__POINTER *)next__5OKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__APKH)[ 0]=next__5OKH;
           } else {
-            ((__POINTER *)result__CHKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__AHKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__CHKH=next__AHKH;
+            ((__POINTER *)result__BPKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5OKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__BPKH=next__5OKH;
           };
         };
-        ptr__OPBD=result__CHKH;
+        ptr__2SBD=result__BPKH;
       };
-      result__NPBD=((__LIP_UNARY *)ptr__OPBD);
-      *(result__NPBD) = *(LIP_UNARY__);
+      result__1SBD=((__LIP_UNARY *)ptr__2SBD);
+      *(result__1SBD) = *(LIP_UNARY__);
     };
-    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__;
+    Self__0JSD=((__LIP_UNARY *)result__1SBD);
+    Self__0JSD->parent_lip_code__Y24B.parent_itm_object__0EE.position__GFJ=p__3D0C;
+    Self__0JSD->operator__G4QD=type__Q14B;
+    Self__0JSD->value__D4QD=result__O14B;
+    result__O14B=result__1SBD;
+    __tmp__224B=TRUE__;
   } else {
-    __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;
+    __tmp__224B=FALSE__;
+  };
+  if ((! __tmp__224B)) {
+    if (read_identifier__QBL()) {
+      nam__R14B=last_string__V1C;
+      result__IGFE=NULL;
+      if (read_identifier__QBL()) {
+        p__NPKH=current_position__EZF();
+        n__OPKH=last_string__V1C;
+        result__EPKH=NULL;
+        ptr__FPKH=((__POINTER )(NULL));
+        typ_id__GPKH= 0;
+        sz__HPKH=((__UINTEGER_32 )sizeof(__LIP_CALL));
+        if ((sz__HPKH ==  0)) {
+          result__EPKH=LIP_CALL__;
+        } else {
+          typ_id__GPKH=-1;
+          clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__HPKH);
+          if ((typ_id__GPKH == (__INTEGER)(-  1))) {
+            a__IPKH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__JPKH=(__UINTEGER_32)((__UINTEGER_32)(sz__HPKH + a__IPKH) & (__UINTEGER_32)(~ a__IPKH));
+            ptr_table__RPKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__JPKH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__QPKH=((__POINTER )(NULL));
+            result__SPKH=((__POINTER *)ptr_table__RPKH)[ 0];
+            if ((result__SPKH == (void *)NULL)) {
+              result__SPKH=new_lab__FTJ(new_size__JPKH);
+              next__QPKH=(void *)((unsigned long)result__SPKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JPKH)));
+              ((__POINTER *)next__QPKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__RPKH)[ 0]=next__QPKH;
             } else {
-              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)));
+              next__QPKH=((__POINTER *)result__SPKH)[ 0];
+              if ((next__QPKH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__SPKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__JPKH <<  1)) <=  4096)) {
+                  next__QPKH=(void *)((unsigned long)result__SPKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JPKH)));
                 } else {
-                  next__RHKH=new_lab__ZPJ(new_size__KHKH);
+                  next__QPKH=new_lab__FTJ(new_size__JPKH);
                 };
-                ((__POINTER *)next__RHKH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__SHKH)[ 0]=next__RHKH;
+                ((__POINTER *)next__QPKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__RPKH)[ 0]=next__QPKH;
               } else {
-                ((__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;
+                ((__POINTER *)result__SPKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QPKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__SPKH=next__QPKH;
+              };
+            };
+            ptr__FPKH=result__SPKH;
+          } else {
+            t__KPKH=((__UINTEGER_32 )typ_id__GPKH);
+            a__LPKH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__ZPKH=(__UINTEGER_32)((__UINTEGER_32)(sz__HPKH + a__LPKH) & (__UINTEGER_32)(~ a__LPKH));
+            ptr_table__WPKH=((__POINTER )(&(table_type[(t__KPKH)])));
+            lab_type__YPKH=(__UINTEGER_32)(t__KPKH |  1);
+            next__VPKH=((__POINTER )(NULL));
+            result__XPKH=((__POINTER *)ptr_table__WPKH)[ 0];
+            if ((result__XPKH == (void *)NULL)) {
+              result__XPKH=new_lab__FTJ(lab_type__YPKH);
+              next__VPKH=(void *)((unsigned long)result__XPKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZPKH)));
+              ((__POINTER *)next__VPKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__WPKH)[ 0]=next__VPKH;
             } else {
-              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)));
+              next__VPKH=((__POINTER *)result__XPKH)[ 0];
+              if ((next__VPKH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XPKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__ZPKH <<  1)) <=  4096)) {
+                  next__VPKH=(void *)((unsigned long)result__XPKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZPKH)));
                 } else {
-                  next__WHKH=new_lab__ZPJ(lab_type__ZHKH);
+                  next__VPKH=new_lab__FTJ(lab_type__YPKH);
                 };
-                ((__POINTER *)next__WHKH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__XHKH)[ 0]=next__WHKH;
+                ((__POINTER *)next__VPKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__WPKH)[ 0]=next__VPKH;
               } else {
-                ((__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)));
+                ((__POINTER *)result__XPKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VPKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__XPKH=next__VPKH;
+              };
+            };
+            ptr__FPKH=result__XPKH;
+          };
+          result__EPKH=((__LIP_CALL *)ptr__FPKH);
+          *(result__EPKH) = *(LIP_CALL__);
+        };
+        Self__MPKH=((__LIP_CALL *)result__EPKH);
+        Self__MPKH->parent_lip_code__K34B.parent_itm_object__0EE.position__GFJ=p__NPKH;
+        Self__MPKH->name__YQUE=n__OPKH;
+        Self__MPKH->argument__NQUE=NULL;
+        result__IGFE=result__EPKH;
+      } else {
+        result__IGFE=readlip_expr_base__BHFE(Self__M14B);
+      };
+      p__1GFE=current_position__EZF();
+      result__HVLE=NULL;
+      ptr__IVLE=((__POINTER )(NULL));
+      typ_id__NVLE= 0;
+      sz__KVLE=((__UINTEGER_32 )sizeof(__LIP_CALL));
+      if ((sz__KVLE ==  0)) {
+        result__HVLE=LIP_CALL__;
+      } else {
+        typ_id__NVLE=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__KVLE);
+        if ((typ_id__NVLE == (__INTEGER)(-  1))) {
+          a__ZDHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__0DHH=(__UINTEGER_32)((__UINTEGER_32)(sz__KVLE + a__ZDHH) & (__UINTEGER_32)(~ a__ZDHH));
+          ptr_table__1PKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__0DHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__0PKH=((__POINTER )(NULL));
+          result__2PKH=((__POINTER *)ptr_table__1PKH)[ 0];
+          if ((result__2PKH == (void *)NULL)) {
+            result__2PKH=new_lab__FTJ(new_size__0DHH);
+            next__0PKH=(void *)((unsigned long)result__2PKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0DHH)));
+            ((__POINTER *)next__0PKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__1PKH)[ 0]=next__0PKH;
+          } else {
+            next__0PKH=((__POINTER *)result__2PKH)[ 0];
+            if ((next__0PKH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2PKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__0DHH <<  1)) <=  4096)) {
+                next__0PKH=(void *)((unsigned long)result__2PKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0DHH)));
               } else {
-                next__1HKH=new_lab__ZPJ(new_size__52GH);
+                next__0PKH=new_lab__FTJ(new_size__0DHH);
               };
-              ((__POINTER *)next__1HKH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__2HKH)[ 0]=next__1HKH;
+              ((__POINTER *)next__0PKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__1PKH)[ 0]=next__0PKH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__2PKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0PKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__2PKH=next__0PKH;
+            };
+          };
+          ptr__IVLE=result__2PKH;
+        } else {
+          t__4DHH=((__UINTEGER_32 )typ_id__NVLE);
+          a__3DHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__DQKH=(__UINTEGER_32)((__UINTEGER_32)(sz__KVLE + a__3DHH) & (__UINTEGER_32)(~ a__3DHH));
+          ptr_table__AQKH=((__POINTER )(&(table_type[(t__4DHH)])));
+          lab_type__CQKH=(__UINTEGER_32)(t__4DHH |  1);
+          next__5PKH=((__POINTER )(NULL));
+          result__BQKH=((__POINTER *)ptr_table__AQKH)[ 0];
+          if ((result__BQKH == (void *)NULL)) {
+            result__BQKH=new_lab__FTJ(lab_type__CQKH);
+            next__5PKH=(void *)((unsigned long)result__BQKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DQKH)));
+            ((__POINTER *)next__5PKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__AQKH)[ 0]=next__5PKH;
+          } else {
+            next__5PKH=((__POINTER *)result__BQKH)[ 0];
+            if ((next__5PKH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BQKH - (unsigned long)begin_memory__SXH)))) &  4095) + (__UINTEGER_32)(new_size__DQKH <<  1)) <=  4096)) {
+                next__5PKH=(void *)((unsigned long)result__BQKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DQKH)));
               } else {
-                next__AIKH=new_lab__ZPJ(lab_type__DIKH);
+                next__5PKH=new_lab__FTJ(lab_type__CQKH);
               };
-              ((__POINTER *)next__AIKH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__BIKH)[ 0]=next__AIKH;
+              ((__POINTER *)next__5PKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__AQKH)[ 0]=next__5PKH;
             } else {
-              ((__POINTER *)result__CIKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__AIKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__CIKH=next__AIKH;
+              ((__POINTER *)result__BQKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5PKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__BQKH=next__5PKH;
             };
           };
-          ptr__0RLE=result__CIKH;
+          ptr__IVLE=result__BQKH;
         };
-        result__ZRLE=((__LIP_CALL *)ptr__0RLE);
-        *(result__ZRLE) = *(LIP_CALL__);
+        result__HVLE=((__LIP_CALL *)ptr__IVLE);
+        *(result__HVLE) = *(LIP_CALL__);
       };
-      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;
+      Self__HRWE=((__LIP_CALL *)result__HVLE);
+      Self__HRWE->parent_lip_code__K34B.parent_itm_object__0EE.position__GFJ=p__1GFE;
+      Self__HRWE->name__YQUE=nam__R14B;
+      Self__HRWE->argument__NQUE=result__IGFE;
+      result__O14B=result__HVLE;
     } else {
-      result__CY4B=readlip_expr_base__TDFE(Self__AY4B);
+      result__O14B=readlip_expr_base__BHFE(Self__M14B);
     };
   };
-  return(result__CY4B);
+  return(result__O14B);
 }
 
-static void* readlip_expr_base__TDFE(__PARSER *Self__UDFE)
+static void* readlip_expr_base__BHFE(__PARSER *Self__CHFE)
 // ({PARSER}) With resultNo recursive, No inlinable.
 {
-  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__FIKH=FALSE__;
+  void *result__EHFE;
+  __POSITION pos__VA1G,pos__XA1G,pos__ZA1G,p__VASE;
+  void *result__1YPE;
+  __LIP_VALUE *result__EZSE,*Self__1FXE;
+  __POINTER ptr__FZSE,ptr_table__LQKH,next__KQKH,result__MQKH;
+  __POINTER ptr_table__QQKH,next__PQKH,result__RQKH;
+  __INTEGER typ_id__KZSE;
+  __UINTEGER_32 sz__HZSE,a__BEHH,new_size__CEHH,t__GEHH,a__FEHH;
+  __UINTEGER_32 new_size__TQKH,lab_type__SQKH;
+  __BOOLEAN result__EQKH,result__HQKH,__tmp__IZPE,__tmp__YZPE;
+  __BOOLEAN result__2VQE,__tmp__N0PE;
+  __CHARACTER result__FQKH,result__IQKH;
+  result__EHFE=NULL;
+  result__EQKH=FALSE__;
+  if ((! read_space__MTD())) {
+    result__EQKH=FALSE__;
   } else {
-    result__GIKH='\0';
+    result__FQKH='\0';
     if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-      result__GIKH=((__CHARACTER )(( 0)));
+      result__FQKH=((__CHARACTER )(( 0)));
     } else {
-      result__GIKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+      result__FQKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
     };
-    if ((result__GIKH == '(')) {
+    if ((result__FQKH == '(')) {
       position__CCC=(__INTEGER)(position__CCC +  1);
-      result__FIKH=TRUE__;
+      result__EQKH=TRUE__;
     };
   };
-  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)) {
+  if (result__EQKH) {
+    result__EHFE=readlip_expr_operator__ZPZB(Self__CHFE);
+    if (((void *)result__EHFE == (void *)NULL)) {
+      pos__VA1G=current_position__EZF();
+      put_error__text__NPG( 0,(&__string_240));
+      put_position__XQG(pos__VA1G);
+      put_string__P3F(msg_err__SPG);
+      if ((type_error__RPG !=  2)) {
         exit(( 1));
       };
     };
-    result__IIKH=FALSE__;
-    if ((! read_space__KSD())) {
-      result__IIKH=FALSE__;
+    result__HQKH=FALSE__;
+    if ((! read_space__MTD())) {
+      result__HQKH=FALSE__;
     } else {
-      result__JIKH='\0';
+      result__IQKH='\0';
       if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__JIKH=((__CHARACTER )(( 0)));
+        result__IQKH=((__CHARACTER )(( 0)));
       } else {
-        result__JIKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+        result__IQKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__JIKH == ')')) {
+      if ((result__IQKH == ')')) {
         position__CCC=(__INTEGER)(position__CCC +  1);
-        result__IIKH=TRUE__;
+        result__HQKH=TRUE__;
       };
     };
-    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)) {
+    if ((! result__HQKH)) {
+      pos__XA1G=current_position__EZF();
+      put_error__text__NPG( 2,(&__string_238));
+      put_position__XQG(pos__XA1G);
+      put_string__P3F(msg_err__SPG);
+      if ((type_error__RPG !=  2)) {
         exit(( 1));
       };
     };
   } else {
-    result__TUPE=NULL;
-    if (read_integer__EZP()) {
-      result__TUPE=get__LTSE(LIP_INTEGER__,((__INTEGER )last_integer__3OO));
-      __tmp__AVPE=TRUE__;
+    result__1YPE=NULL;
+    if (read_integer__Q2P()) {
+      result__1YPE=get__5XSE(LIP_INTEGER__,((__INTEGER )last_integer__JSO));
+      __tmp__IZPE=TRUE__;
     } else {
-      __tmp__AVPE=FALSE__;
+      __tmp__IZPE=FALSE__;
     };
-    if (__tmp__AVPE) {
-      __tmp__QVPE=TRUE__;
+    if (__tmp__IZPE) {
+      __tmp__YZPE=TRUE__;
     } else {
-      result__JRQE=read_string__PCQ();
-      if (result__JRQE) {
-        result__TUPE=get__GYFF(LIP_STRING__,last_string__V0C);
+      result__2VQE=read_string__1FQ();
+      if (result__2VQE) {
+        result__1YPE=get__M3FF(LIP_STRING__,last_string__V1C);
       };
-      __tmp__QVPE=result__JRQE;
+      __tmp__YZPE=result__2VQE;
     };
-    if ((! __tmp__QVPE)) {
-      if (read_cap_identifier__VXJ()) {
-        if (((void *)last_string__V0C == (void *)(&__string_42))) {
-          result__TUPE=true__4RLF;
-          __tmp__FWPE=TRUE__;
+    if ((! __tmp__YZPE)) {
+      if (read_cap_identifier__B1J()) {
+        if (((void *)last_string__V1C == (void *)(&__string_42))) {
+          result__1YPE=true__FXLF;
+          __tmp__N0PE=TRUE__;
         } else {
-          __tmp__FWPE=FALSE__;
+          __tmp__N0PE=FALSE__;
         };
-        if ((! __tmp__FWPE)) {
-          if (((void *)last_string__V0C == (void *)(&__string_43))) {
-            result__TUPE=LIP_BOOLEAN__;
+        if ((! __tmp__N0PE)) {
+          if (((void *)last_string__V1C == (void *)(&__string_43))) {
+            result__1YPE=LIP_BOOLEAN__;
           } else {
-            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)) {
+            pos__ZA1G=current_position__EZF();
+            put_error__text__NPG( 0,(&__string_334));
+            put_position__XQG(pos__ZA1G);
+            put_string__P3F(msg_err__SPG);
+            if ((type_error__RPG !=  2)) {
               exit(( 1));
             };
           };
         };
       };
     };
-    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)));
+    if (((void *)result__1YPE != (void *)NULL)) {
+      p__VASE=current_position__EZF();
+      result__EZSE=NULL;
+      ptr__FZSE=((__POINTER )(NULL));
+      typ_id__KZSE= 0;
+      sz__HZSE=((__UINTEGER_32 )sizeof(__LIP_VALUE));
+      if ((sz__HZSE ==  0)) {
+        result__EZSE=LIP_VALUE__;
+      } else {
+        typ_id__KZSE=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__HZSE);
+        if ((typ_id__KZSE == (__INTEGER)(-  1))) {
+          a__BEHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__CEHH=(__UINTEGER_32)((__UINTEGER_32)(sz__HZSE + a__BEHH) & (__UINTEGER_32)(~ a__BEHH));
+          ptr_table__LQKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__CEHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__KQKH=((__POINTER )(NULL));
+          result__MQKH=((__POINTER *)ptr_table__LQKH)[ 0];
+          if ((result__MQKH == (void *)NULL)) {
+            result__MQKH=new_lab__FTJ(new_size__CEHH);
+            next__KQKH=(void *)((unsigned long)result__MQKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CEHH)));
+            ((__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__SXH)))) &  4095) + (__UINTEGER_32)(new_size__CEHH <<  1)) <=  4096)) {
+                next__KQKH=(void *)((unsigned long)result__MQKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CEHH)));
               } else {
-                next__LIKH=new_lab__ZPJ(new_size__H3GH);
+                next__KQKH=new_lab__FTJ(new_size__CEHH);
               };
-              ((__POINTER *)next__LIKH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__MIKH)[ 0]=next__LIKH;
+              ((__POINTER *)next__KQKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__LQKH)[ 0]=next__KQKH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__MQKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KQKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__MQKH=next__KQKH;
+            };
+          };
+          ptr__FZSE=result__MQKH;
+        } else {
+          t__GEHH=((__UINTEGER_32 )typ_id__KZSE);
+          a__FEHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__TQKH=(__UINTEGER_32)((__UINTEGER_32)(sz__HZSE + a__FEHH) & (__UINTEGER_32)(~ a__FEHH));
+          ptr_table__QQKH=((__POINTER )(&(table_type[(t__GEHH)])));
+          lab_type__SQKH=(__UINTEGER_32)(t__GEHH |  1);
+          next__PQKH=((__POINTER )(NULL));
+          result__RQKH=((__POINTER *)ptr_table__QQKH)[ 0];
+          if ((result__RQKH == (void *)NULL)) {
+            result__RQKH=new_lab__FTJ(lab_type__SQKH);
+            next__PQKH=(void *)((unsigned long)result__RQKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TQKH)));
+            ((__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__SXH)))) &  4095) + (__UINTEGER_32)(new_size__TQKH <<  1)) <=  4096)) {
+                next__PQKH=(void *)((unsigned long)result__RQKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TQKH)));
               } else {
-                next__QIKH=new_lab__ZPJ(lab_type__TIKH);
+                next__PQKH=new_lab__FTJ(lab_type__SQKH);
               };
-              ((__POINTER *)next__QIKH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__RIKH)[ 0]=next__QIKH;
+              ((__POINTER *)next__PQKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__QQKH)[ 0]=next__PQKH;
             } else {
-              ((__POINTER *)result__SIKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QIKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__SIKH=next__QIKH;
+              ((__POINTER *)result__RQKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PQKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__RQKH=next__PQKH;
             };
           };
-          ptr__RUSE=result__SIKH;
+          ptr__FZSE=result__RQKH;
         };
-        result__QUSE=((__LIP_VALUE *)ptr__RUSE);
-        *(result__QUSE) = *(LIP_VALUE__);
+        result__EZSE=((__LIP_VALUE *)ptr__FZSE);
+        *(result__EZSE) = *(LIP_VALUE__);
       };
-      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;
+      Self__1FXE=((__LIP_VALUE *)result__EZSE);
+      Self__1FXE->parent_lip_code__MIFE.parent_itm_object__0EE.position__GFJ=p__VASE;
+      Self__1FXE->value__X0UE=result__1YPE;
+      result__EHFE=result__EZSE;
     };
   };
-  return(result__WDFE);
+  return(result__EHFE);
 }
 
 //==========================//
diff --git a/src/item/itm_external.li b/src/item/itm_external.li
index fe30dd2..28dfcc1 100644
--- a/src/item/itm_external.li
+++ b/src/item/itm_external.li
@@ -65,8 +65,8 @@ Section Public
         
     extern.is_integer.if {
       num := extern.to_integer;
-      (num > 15).if {
-	syntax_error (position,"Unknown external lisaac code (0..15).");
+      (num > 31).if {
+	syntax_error (position,"Unknown external lisaac code (0..31).");
       };
       num
       .when 0 then { // is_expanded_type:BOOLEAN
@@ -150,7 +150,16 @@ Section Public
         } else {
           result := PROTOTYPE_CST.create position type (type_false.default);	
         };
-      };            
+      }     
+      .when 16 then { // LIST.upper:INTEGER
+        not_yet_implemented;
+      }
+      .when 17 then { // LIST.item index:INTEGER :E
+        not_yet_implemented;
+      }
+      .when 18 to 31 then { // FREE
+        syntax_error (position,"Free external lisaac code.");
+      };
     } else {
       lst_acc := get_access;
       result  := EXTERNAL_C.create position text last_code 
diff --git a/src/make.lip b/src/make.lip
deleted file mode 100755
index 570ba11..0000000
--- a/src/make.lip
+++ /dev/null
@@ -1,86 +0,0 @@
-///////////////////////////////////////////////////////////////////////////////
-//                            Lisaac Compiler                                //
-//                                                                           //
-//                   LSIIT - ULP - CNRS - INRIA - FRANCE                     //
-//                                                                           //
-//   This program is free software: you can redistribute it and/or modify    //
-//   it under the terms of the GNU General Public License as published by    //
-//   the Free Software Foundation, either version 3 of the License, or       //
-//   (at your option) any later version.                                     //
-//                                                                           //
-//   This program is distributed in the hope that it will be useful,         //
-//   but WITHOUT ANY WARRANTY; without even the implied warranty of          //
-//   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the           //
-//   GNU General Public License for more details.                            //
-//                                                                           //
-//   You should have received a copy of the GNU General Public License       //
-//   along with this program.  If not, see <http://www.gnu.org/licenses/>.   //
-//                                                                           //
-//                     http://isaacproject.u-strasbg.fr/                     //
-///////////////////////////////////////////////////////////////////////////////
-Section Inherit
-  
-  + parent:STRING;
-
-Section Private
-    
-  - src_path <-
-  ( 
-    path (lisaac + "src/");
-    path (lisaac + "src/tools/");
-    path (lisaac + "src/type/");
-    path (lisaac + "src/item/");
-    path (lisaac + "src/constant/");
-    path (lisaac + "src/variable/");
-    path (lisaac + "src/external/");
-    path (lisaac + "src/external/logic/");
-    path (lisaac + "src/external/arithmetic/");
-    path (lisaac + "src/external/comparison/");
-    path (lisaac + "src/dispatcher/");
-    path (lisaac + "src/code_life/");    
-    path (lisaac + "src/lip/");    
-  );
-  
-  - compiler_path <-
-  (
-    src_path;    
-    input_file := "lisaac";
-    path (lisaac + "src/compiler_any/");
-  );
-    
-  - shorter_path <-
-  (
-    src_path;    
-    input_file := "shorter";
-    path (lisaac + "src/shorter_any/");
-  );
-    
-  //
-  // Execute function.
-  //
-  
-  - front_end <-
-  (    
-    general_front_end;    
-    ((input_file = "") | (input_file = "lisaac")).if {    
-      compiler_path;
-    };         
-  );
-    
-Section Public
-  
-  - compiler <-
-  // Compile the Lisaac compiler.
-  (
-    compiler_path;
-  );
-  
-  - shorter <-
-  // Compile the shorter.
-  (
-    shorter_path;
-  );
-  
-  
-  
-  
\ No newline at end of file
diff --git a/src/parser.li b/src/parser.li
index 9d7f0e8..981d1de 100644
--- a/src/parser.li
+++ b/src/parser.li
@@ -252,6 +252,21 @@ Section Private
             .when 2      then { string_tmp4.add_last '\n'; };
           };
           (is_shorter).if {
+            output_code.remove_between (pos2-2+short_derive) to (pos2-1+short_derive);
+            short_derive := short_derive - 2;
+            // Bug ?
+            ( + nb,p:INTEGER;
+              p := pos2 - 3;
+              {(p >= source.lower) && {source.item p <= ' '}}.while_do {
+                (source.item p = '\n').if {
+                  nb := nb + 1;
+                };
+                p := p - 1;
+              };
+              (nb > 1).if {
+                stat := 2;
+              };
+            );
             (stat)
             .when 0 or 1 then {
               short (ALIAS_STR.short_comment_slot_line) token pos2 to position;
@@ -864,13 +879,21 @@ Section Private
     
     result := TRUE;
     
+    pos_sec := position;
+    old_derive := short_derive;
+    
     read_space;
+    
+    (is_shorter).if {
+      output_code.remove_between (source.lower+old_derive) to (position-1+short_derive);
+      short_derive := short_derive - ((position+short_derive) - (source.lower+old_derive));
+    };    
     pos_sec := position;
     old_derive := short_derive;
     last_comment_extern := NULL;
     //
     // Read Section Header.
-    //    
+    //            
     (read_this_keyword (ALIAS_STR.keyword_section)).if_false {
       syntax_error (current_position,"`Section' is needed.");
     };
diff --git a/src/shorter.li b/src/shorter.li
index 9b20d47..fc721f5 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    <DEPRECATED> \n\
+  \  -o <output>      : output file or directory               \n\
   \                     (default: <input_file.ext>)            \n\
   \  -p               : include `Section Private'              \n\
-  \  -c               : include code source         <DEPRECATED> \n\
-  \  -r               : recursive builder documentation <DEPRECATED> \n\
+  \  -c               : include 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\
   \                                                            \n\
   \Examples:                                                   \n\
   \  * Output format file:                                     \n\
-  \    shorter -c -p -f latex hello_world.li  <DEPRECATED>     \n\ 
+  \    shorter -c -p -f latex hello_world.li                   \n\ 
   \                                                            \n\
   \  * Build html documentation:                               \n\
-  \    shorter -r -f html ~/lisaac/lib        <DEPRECATED>     \n\
+  \    shorter -r -f html ~/lisaac/lib                         \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