[SCM] Lisaac compiler branch, master, updated. 6c0af2ea125d8baf754ab742a9a7c9529828332d

Benoit Sonntag sonntag at icps.u-strasbg.fr
Sat Aug 1 21:47:49 UTC 2009


The following commit has been merged in the master branch:
commit 6c0af2ea125d8baf754ab742a9a7c9529828332d
Author: Benoit Sonntag <sonntag at icps.u-strasbg.fr>
Date:   Sat Aug 1 23:47:35 2009 +0200

    Shorter debug OK

diff --git a/bin/shorter.c b/bin/shorter.c
index 6cfd67d..8fb1814 100644
--- a/bin/shorter.c
+++ b/bin/shorter.c
@@ -7,14 +7,7 @@ char **arg_vector;
 //==========================//
 
 // SHORTER
-
 #include "path.h"
-struct BLOCK_struct {
-  int __id;
-  void *self;
-};
-#define BLOCK_struct BLOCK_struct_bug
-
 // FILE_SYSTEM
 #include <unistd.h>
 // SYSTEM
@@ -79,9 +72,9 @@ typedef char __CHARACTER;
 typedef struct STRING_struct __STRING;
 struct STRING_struct {
   unsigned long __id;
-  __INTEGER count__EGC;
-  __INTEGER capacity__ICS;
-  __CHARACTER *storage__RCS;
+  __INTEGER count__SGC;
+  __INTEGER capacity__UCS;
+  __CHARACTER *storage__3CS;
 };
 __STRING STRING_={__STRING__};
 #define STRING__ (&STRING_)
@@ -96,9 +89,9 @@ typedef unsigned long __UINTEGER_32;
 #define __ARRAYED_COLLECTIONoSTRINGo__ 0
 typedef struct ARRAYED_COLLECTIONoSTRINGo_struct __ARRAYED_COLLECTIONoSTRINGo;
 struct ARRAYED_COLLECTIONoSTRINGo_struct {
-  __INTEGER upper__UKC;
-  __INTEGER capacity__2GT;
-  void **storage__HHT;
+  __INTEGER upper__CLC;
+  __INTEGER capacity__JGT;
+  void **storage__UGT;
 };
 __ARRAYED_COLLECTIONoSTRINGo ARRAYED_COLLECTIONoSTRINGo_;
 #define ARRAYED_COLLECTIONoSTRINGo__ (&ARRAYED_COLLECTIONoSTRINGo_)
@@ -107,7 +100,7 @@ __ARRAYED_COLLECTIONoSTRINGo ARRAYED_COLLECTIONoSTRINGo_;
 #define __FAST_ARRAYoSTRINGo__ 1
 typedef struct FAST_ARRAYoSTRINGo_struct __FAST_ARRAYoSTRINGo;
 struct FAST_ARRAYoSTRINGo_struct {
-  __ARRAYED_COLLECTIONoSTRINGo parent_arrayed_collection__RKC;
+  __ARRAYED_COLLECTIONoSTRINGo parent_arrayed_collection__5KC;
 };
 __FAST_ARRAYoSTRINGo FAST_ARRAYoSTRINGo_;
 #define FAST_ARRAYoSTRINGo__ (&FAST_ARRAYoSTRINGo_)
@@ -125,9 +118,9 @@ __ITM_TYPE_MONO ITM_TYPE_MONO_;
 #define __ARRAYED_COLLECTIONoITM_TYPE_MONOo__ 3
 typedef struct ARRAYED_COLLECTIONoITM_TYPE_MONOo_struct __ARRAYED_COLLECTIONoITM_TYPE_MONOo;
 struct ARRAYED_COLLECTIONoITM_TYPE_MONOo_struct {
-  __INTEGER upper__SIV;
-  __INTEGER capacity__HOV;
-  void **storage__ZMV;
+  __INTEGER upper__4HV;
+  __INTEGER capacity__TNV;
+  void **storage__FMV;
 };
 __ARRAYED_COLLECTIONoITM_TYPE_MONOo ARRAYED_COLLECTIONoITM_TYPE_MONOo_;
 #define ARRAYED_COLLECTIONoITM_TYPE_MONOo__ (&ARRAYED_COLLECTIONoITM_TYPE_MONOo_)
@@ -136,7 +129,7 @@ __ARRAYED_COLLECTIONoITM_TYPE_MONOo ARRAYED_COLLECTIONoITM_TYPE_MONOo_;
 #define __FAST_ARRAYoITM_TYPE_MONOo__ 4
 typedef struct FAST_ARRAYoITM_TYPE_MONOo_struct __FAST_ARRAYoITM_TYPE_MONOo;
 struct FAST_ARRAYoITM_TYPE_MONOo_struct {
-  __ARRAYED_COLLECTIONoITM_TYPE_MONOo parent_arrayed_collection__EYC;
+  __ARRAYED_COLLECTIONoITM_TYPE_MONOo parent_arrayed_collection__SYC;
 };
 __FAST_ARRAYoITM_TYPE_MONOo FAST_ARRAYoITM_TYPE_MONOo_;
 #define FAST_ARRAYoITM_TYPE_MONOo__ (&FAST_ARRAYoITM_TYPE_MONOo_)
@@ -145,9 +138,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__F5T;
-  void *item__Y5T;
-  void *next__Q5T;
+  void *key__R4T;
+  void *item__E5T;
+  void *next__24T;
 };
 __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 +149,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__U4T;
-  __INTEGER count__HIZ;
-  void **buckets__Z4T;
+  __INTEGER capacity__A4T;
+  __INTEGER count__CGZ;
+  void **buckets__F4T;
 };
 __HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo_;
 #define HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo__ (&HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo_)
@@ -169,7 +162,7 @@ typedef struct STRING_CONSTANT_struct __STRING_CONSTANT;
 struct STRING_CONSTANT_struct {
   unsigned long __id;
   __INTEGER count__DD;
-  __CHARACTER *storage__FRO;
+  __CHARACTER *storage__RRO;
 };
 __STRING_CONSTANT STRING_CONSTANT_={__STRING_CONSTANT__};
 #define STRING_CONSTANT__ (&STRING_CONSTANT_)
@@ -178,9 +171,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__VBPD;
-  __INTEGER capacity__QDPD;
-  void **storage__LEPD;
+  __INTEGER upper__2CPD;
+  __INTEGER capacity__XEPD;
+  void **storage__SFPD;
 };
 __ARRAYED_COLLECTIONoSTRING_CONSTANTo ARRAYED_COLLECTIONoSTRING_CONSTANTo_;
 #define ARRAYED_COLLECTIONoSTRING_CONSTANTo__ (&ARRAYED_COLLECTIONoSTRING_CONSTANTo_)
@@ -189,40 +182,28 @@ __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__ABJ;
+  __ARRAYED_COLLECTIONoSTRING_CONSTANTo parent_arrayed_collection__MBJ;
 };
 __FAST_ARRAYoSTRING_CONSTANTo FAST_ARRAYoSTRING_CONSTANTo_;
 #define FAST_ARRAYoSTRING_CONSTANTo__ (&FAST_ARRAYoSTRING_CONSTANTo_)
 
-// MEMORY
-#define __MEMORY__ 9
-typedef struct MEMORY_struct __MEMORY;
-struct MEMORY_struct {
-  volatile __UINTEGER_32 map_previous_linear__XTB;
-  volatile __UINTEGER_32 map_size_and_id__YTB;
-  void *map_next_free__ZTB;
-  void *map_previous_free__0TB;
-} __attribute__ ((packed));
-__MEMORY MEMORY_;
-#define MEMORY__ (&MEMORY_)
-
 // HASHED_SET_NODE[ABSTRACT_STRING]
-#define __HASHED_SET_NODEoABSTRACT_STRINGo__ 10
+#define __HASHED_SET_NODEoABSTRACT_STRINGo__ 9
 typedef struct HASHED_SET_NODEoABSTRACT_STRINGo_struct __HASHED_SET_NODEoABSTRACT_STRINGo;
 struct HASHED_SET_NODEoABSTRACT_STRINGo_struct {
-  void *item__0ZR;
-  void *next__G0R;
+  void *item__G0R;
+  void *next__S0R;
 };
 __HASHED_SET_NODEoABSTRACT_STRINGo HASHED_SET_NODEoABSTRACT_STRINGo_;
 #define HASHED_SET_NODEoABSTRACT_STRINGo__ (&HASHED_SET_NODEoABSTRACT_STRINGo_)
 
 // HASHED_SET[ABSTRACT_STRING]
-#define __HASHED_SEToABSTRACT_STRINGo__ 11
+#define __HASHED_SEToABSTRACT_STRINGo__ 10
 typedef struct HASHED_SEToABSTRACT_STRINGo_struct __HASHED_SEToABSTRACT_STRINGo;
 struct HASHED_SEToABSTRACT_STRINGo_struct {
-  __INTEGER capacity__JZR;
-  __INTEGER count__P0R;
-  void **buckets__OZR;
+  __INTEGER capacity__VZR;
+  __INTEGER count__10R;
+  void **buckets__0ZR;
 };
 __HASHED_SEToABSTRACT_STRINGo HASHED_SEToABSTRACT_STRINGo_;
 #define HASHED_SEToABSTRACT_STRINGo__ (&HASHED_SEToABSTRACT_STRINGo_)
@@ -231,43 +212,43 @@ __HASHED_SEToABSTRACT_STRINGo HASHED_SEToABSTRACT_STRINGo_;
 typedef unsigned long __POSITION;
 
 // ITM_OBJECT
-#define __ITM_OBJECT__ 12
+#define __ITM_OBJECT__ 11
 typedef struct ITM_OBJECT_struct __ITM_OBJECT;
 struct ITM_OBJECT_struct {
-  __POSITION position__GFJ;
+  __POSITION position__SFJ;
 };
 __ITM_OBJECT ITM_OBJECT_;
 #define ITM_OBJECT__ (&ITM_OBJECT_)
 
 // NAMED
-#define __NAMED__ 13
+#define __NAMED__ 12
 typedef struct NAMED_struct __NAMED;
 struct NAMED_struct {
   __ITM_OBJECT parent_itm_object__4;
   void *name__LI;
-  __CHARACTER style__OGU;
+  __CHARACTER style__0FU;
 };
 __NAMED NAMED_;
 #define NAMED__ (&NAMED_)
 
 // PROTOTYPE
-#define __PROTOTYPE__ 14
+#define __PROTOTYPE__ 13
 typedef struct PROTOTYPE_struct __PROTOTYPE;
 struct PROTOTYPE_struct {
   __NAMED parent_named__5;
   void *source__3BC;
-  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;
+  void *last_slot__J3C;
+  void *type_style__S4C;
+  void *shortname__3JE;
+  void *default_value__LWE;
+  void *type_c__GYE;
+  __INTEGER index__GPG;
+  void *filename__FSG;
+  void *first_slot__2DZB;
+  void *comment_header__Q4QC;
+  void *comment_slot__YRTC;
+  void *idf_generic_list__MOE;
+  void *slot_list__YVS;
 };
 __PROTOTYPE PROTOTYPE_;
 #define PROTOTYPE__ (&PROTOTYPE_)
@@ -275,23 +256,45 @@ __PROTOTYPE PROTOTYPE_;
 // BOOLEAN
 typedef char __BOOLEAN;
 
+// HASHED_DICTIONARY_NODE[LINKED_LIST[STRING_CONSTANT],STRING_CONSTANT]
+#define __HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__ 14
+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__HET;
+  void *next__SET;
+  void *item__KW3;
+};
+__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_)
+
+// HASHED_DICTIONARY[LINKED_LIST[STRING_CONSTANT],STRING_CONSTANT]
+#define __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__ 15
+typedef struct HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo_struct __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo;
+struct HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo_struct {
+  __INTEGER capacity__WDT;
+  __INTEGER count__4MY;
+  void **buckets__1DT;
+};
+__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo_;
+#define HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__ (&HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo_)
+
 // HASHED_DICTIONARY_NODE[TYPE,STRING_CONSTANT]
-#define __HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo__ 15
+#define __HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo__ 16
 typedef struct HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo_struct __HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo;
 struct HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo_struct {
-  void *key__J3R;
-  void *next__U3R;
+  void *key__V3R;
+  void *next__A4R;
 };
 __HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo_;
 #define HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo__ (&HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo_)
 
 // HASHED_DICTIONARY[TYPE,STRING_CONSTANT]
-#define __HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__ 16
+#define __HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__ 17
 typedef struct HASHED_DICTIONARYoTYPExSTRING_CONSTANTo_struct __HASHED_DICTIONARYoTYPExSTRING_CONSTANTo;
 struct HASHED_DICTIONARYoTYPExSTRING_CONSTANTo_struct {
-  __INTEGER capacity__Y2R;
-  __INTEGER count__33R;
-  void **buckets__32R;
+  __INTEGER capacity__E3R;
+  __INTEGER count__J4R;
+  void **buckets__J3R;
 };
 __HASHED_DICTIONARYoTYPExSTRING_CONSTANTo HASHED_DICTIONARYoTYPExSTRING_CONSTANTo_;
 #define HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__ (&HASHED_DICTIONARYoTYPExSTRING_CONSTANTo_)
@@ -300,10 +303,10 @@ __HASHED_DICTIONARYoTYPExSTRING_CONSTANTo HASHED_DICTIONARYoTYPExSTRING_CONSTANT
 typedef unsigned char __UINTEGER_8;
 
 // TYPE_FULL
-#define __TYPE_FULL__ 17
+#define __TYPE_FULL__ 18
 typedef struct TYPE_FULL_struct __TYPE_FULL;
 struct TYPE_FULL_struct {
-  __UINTEGER_8 flag__IGS;
+  __UINTEGER_8 flag__UGS;
 };
 __TYPE_FULL TYPE_FULL_;
 #define TYPE_FULL__ (&TYPE_FULL_)
@@ -318,18 +321,18 @@ __TYPE_ID TYPE_ID_={__TYPE_ID__};
 #define TYPE_ID__ (&TYPE_ID_)
 
 // ARRAYED_COLLECTION[TYPE_ID]
-#define __ARRAYED_COLLECTIONoTYPE_IDo__ 18
+#define __ARRAYED_COLLECTIONoTYPE_IDo__ 19
 typedef struct ARRAYED_COLLECTIONoTYPE_IDo_struct __ARRAYED_COLLECTIONoTYPE_IDo;
 struct ARRAYED_COLLECTIONoTYPE_IDo_struct {
-  __INTEGER upper__C5R;
-  __INTEGER capacity__E5R;
-  void **storage__AAS;
+  __INTEGER upper__O5R;
+  __INTEGER capacity__Q5R;
+  void **storage__MAS;
 };
 __ARRAYED_COLLECTIONoTYPE_IDo ARRAYED_COLLECTIONoTYPE_IDo_;
 #define ARRAYED_COLLECTIONoTYPE_IDo__ (&ARRAYED_COLLECTIONoTYPE_IDo_)
 
 // FAST_ARRAY[TYPE_ID]
-#define __FAST_ARRAYoTYPE_IDo__ 19
+#define __FAST_ARRAYoTYPE_IDo__ 20
 typedef struct FAST_ARRAYoTYPE_IDo_struct __FAST_ARRAYoTYPE_IDo;
 struct FAST_ARRAYoTYPE_IDo_struct {
   __ARRAYED_COLLECTIONoTYPE_IDo parent_arrayed_collection__ABB;
@@ -338,29 +341,29 @@ __FAST_ARRAYoTYPE_IDo FAST_ARRAYoTYPE_IDo_;
 #define FAST_ARRAYoTYPE_IDo__ (&FAST_ARRAYoTYPE_IDo_)
 
 // ENTRY
-#define __ENTRY__ 20
+#define __ENTRY__ 21
 typedef struct ENTRY_struct __ENTRY;
 struct ENTRY_struct {
   void *path__BD;
-  void *name__CQT;
+  void *name__OPT;
 };
 __ENTRY ENTRY_;
 #define ENTRY__ (&ENTRY_)
 
 // ENTRY_UNIX
-#define __ENTRY_UNIX__ 21
+#define __ENTRY_UNIX__ 22
 typedef struct ENTRY_UNIX_struct __ENTRY_UNIX;
 struct ENTRY_UNIX_struct {
-  __ENTRY parent_entry__FGD;
+  __ENTRY parent_entry__QGD;
 };
 __ENTRY_UNIX ENTRY_UNIX_;
 #define ENTRY_UNIX__ (&ENTRY_UNIX_)
 
 // DIRECTORY
-#define __DIRECTORY__ 22
+#define __DIRECTORY__ 23
 typedef struct DIRECTORY_struct __DIRECTORY;
 struct DIRECTORY_struct {
-  void *list__CHRD;
+  void *list__FIRD;
 };
 __DIRECTORY DIRECTORY_;
 #define DIRECTORY__ (&DIRECTORY_)
@@ -370,34 +373,12 @@ __DIRECTORY DIRECTORY_;
 typedef struct DIRECTORY_UNIX_struct __DIRECTORY_UNIX;
 struct DIRECTORY_UNIX_struct {
   unsigned long __id;
-  __ENTRY_UNIX parent_entry_unix__GGD;
-  __DIRECTORY parent_directory__HGD;
+  __ENTRY_UNIX parent_entry_unix__RGD;
+  __DIRECTORY parent_directory__SGD;
 };
 __DIRECTORY_UNIX DIRECTORY_UNIX_={__DIRECTORY_UNIX__};
 #define DIRECTORY_UNIX__ (&DIRECTORY_UNIX_)
 
-// HASHED_DICTIONARY_NODE[LINKED_LIST[STRING_CONSTANT],STRING_CONSTANT]
-#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__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_)
-
-// HASHED_DICTIONARY[LINKED_LIST[STRING_CONSTANT],STRING_CONSTANT]
-#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__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_)
-
 // INTEGER_8
 typedef signed char __INTEGER_8;
 
@@ -407,14 +388,14 @@ typedef struct ITM_SLOT_struct __ITM_SLOT;
 struct ITM_SLOT_struct {
   unsigned long __id;
   __NAMED parent_named__15;
-  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;
+  void *id_section__T3C;
+  void *comment__WZOB;
+  void *result_type__A4FC;
+  void *next__YGHC;
+  void *comment_chapter__S0HC;
+  __CHARACTER affect__P5FC;
+  void *argument_list__QDHC;
+  __INTEGER_8 stat_shorter__4OTD;
 };
 __ITM_SLOT ITM_SLOT_={__ITM_SLOT__};
 #define ITM_SLOT__ (&ITM_SLOT_)
@@ -424,30 +405,42 @@ __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__NW5B;
-  __INTEGER priority_and_level__D3HC;
-  void *pretty_name__O3HC;
+  __ITM_SLOT parent_itm_slot__0S5B;
+  __INTEGER priority_and_level__UZHC;
+  void *pretty_name__5ZHC;
 };
 __ITM_SLOT_OPERATOR ITM_SLOT_OPERATOR_={__ITM_SLOT_OPERATOR__};
 #define ITM_SLOT_OPERATOR__ (&ITM_SLOT_OPERATOR_)
 
 // SECTION_
-#define __SECTION___ 25
+#define __SECTION___ 24
 typedef struct SECTION__struct __SECTION_;
 struct SECTION__struct {
-  void *name__11DC;
-  void *type_list__K0FC;
+  void *name__MYDC;
+  void *type_list__1WFC;
 };
 __SECTION_ SECTION__;
 #define SECTION___ (&SECTION__)
 
+// MEMORY
+#define __MEMORY__ 25
+typedef struct MEMORY_struct __MEMORY;
+struct MEMORY_struct {
+  volatile __UINTEGER_32 map_previous_linear__XTB;
+  volatile __UINTEGER_32 map_size_and_id__YTB;
+  void *map_next_free__ZTB;
+  void *map_previous_free__0TB;
+} __attribute__ ((packed));
+__MEMORY MEMORY_;
+#define MEMORY__ (&MEMORY_)
+
 // HASHED_DICTIONARY_NODE[ENTRY,ABSTRACT_STRING]
 #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__B2S;
-  void *item__ETOB;
-  void *next__N2S;
+  void *key__N2S;
+  void *item__TPOB;
+  void *next__Z2S;
 };
 __HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo_;
 #define HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo__ (&HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo_)
@@ -456,9 +449,9 @@ __HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo HASHED_DICTIONARY_NODEoENTRYxABS
 #define __HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo__ 27
 typedef struct HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo_struct __HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo;
 struct HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo_struct {
-  __INTEGER capacity__Q1S;
-  __INTEGER count__W2S;
-  void **buckets__V1S;
+  __INTEGER capacity__21S;
+  __INTEGER count__C3S;
+  void **buckets__B2S;
 };
 __HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo_;
 #define HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo__ (&HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo_)
@@ -467,7 +460,7 @@ __HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo HASHED_DICTIONARYoENTRYxABSTRACT_STRI
 #define __LINKED_COLLECTIONoSTRING_CONSTANTo__ 28
 typedef struct LINKED_COLLECTIONoSTRING_CONSTANTo_struct __LINKED_COLLECTIONoSTRING_CONSTANTo;
 struct LINKED_COLLECTIONoSTRING_CONSTANTo_struct {
-  __INTEGER upper__MED;
+  __INTEGER upper__0ED;
 };
 __LINKED_COLLECTIONoSTRING_CONSTANTo LINKED_COLLECTIONoSTRING_CONSTANTo_;
 #define LINKED_COLLECTIONoSTRING_CONSTANTo__ (&LINKED_COLLECTIONoSTRING_CONSTANTo_)
@@ -477,10 +470,10 @@ __LINKED_COLLECTIONoSTRING_CONSTANTo LINKED_COLLECTIONoSTRING_CONSTANTo_;
 typedef struct LINKED_LISToSTRING_CONSTANTo_struct __LINKED_LISToSTRING_CONSTANTo;
 struct LINKED_LISToSTRING_CONSTANTo_struct {
   __LINKED_COLLECTIONoSTRING_CONSTANTo parent_linked_collection__LD;
-  __INTEGER mem_idx__HXEC;
-  void *first_link__3WEC;
-  void *last_link__GXEC;
-  void *mem_lnk__JXEC;
+  __INTEGER mem_idx__YTEC;
+  void *first_link__OTEC;
+  void *last_link__XTEC;
+  void *mem_lnk__0TEC;
 };
 __LINKED_LISToSTRING_CONSTANTo LINKED_LISToSTRING_CONSTANTo_;
 #define LINKED_LISToSTRING_CONSTANTo__ (&LINKED_LISToSTRING_CONSTANTo_)
@@ -498,7 +491,7 @@ __PARSER PARSER_;
 #define __ITM_ARGUMENT__ 31
 typedef struct ITM_ARGUMENT_struct __ITM_ARGUMENT;
 struct ITM_ARGUMENT_struct {
-  __ITM_OBJECT parent_itm_code__C5M;
+  __ITM_OBJECT parent_itm_code__O5M;
 };
 __ITM_ARGUMENT ITM_ARGUMENT_;
 #define ITM_ARGUMENT__ (&ITM_ARGUMENT_)
@@ -507,9 +500,9 @@ __ITM_ARGUMENT ITM_ARGUMENT_;
 #define __ARRAYED_COLLECTIONoITM_ARGUMENTo__ 32
 typedef struct ARRAYED_COLLECTIONoITM_ARGUMENTo_struct __ARRAYED_COLLECTIONoITM_ARGUMENTo;
 struct ARRAYED_COLLECTIONoITM_ARGUMENTo_struct {
-  __INTEGER upper__XCHC;
-  __INTEGER capacity__ZCHC;
-  void **storage__VDHC;
+  __INTEGER upper__I5GC;
+  __INTEGER capacity__K5GC;
+  void **storage__GAHC;
 };
 __ARRAYED_COLLECTIONoITM_ARGUMENTo ARRAYED_COLLECTIONoITM_ARGUMENTo_;
 #define ARRAYED_COLLECTIONoITM_ARGUMENTo__ (&ARRAYED_COLLECTIONoITM_ARGUMENTo_)
@@ -518,7 +511,7 @@ __ARRAYED_COLLECTIONoITM_ARGUMENTo ARRAYED_COLLECTIONoITM_ARGUMENTo_;
 #define __FAST_ARRAYoITM_ARGUMENTo__ 33
 typedef struct FAST_ARRAYoITM_ARGUMENTo_struct __FAST_ARRAYoITM_ARGUMENTo;
 struct FAST_ARRAYoITM_ARGUMENTo_struct {
-  __ARRAYED_COLLECTIONoITM_ARGUMENTo parent_arrayed_collection__MDZB;
+  __ARRAYED_COLLECTIONoITM_ARGUMENTo parent_arrayed_collection__Z5YB;
 };
 __FAST_ARRAYoITM_ARGUMENTo FAST_ARRAYoITM_ARGUMENTo_;
 #define FAST_ARRAYoITM_ARGUMENTo__ (&FAST_ARRAYoITM_ARGUMENTo_)
@@ -528,7 +521,7 @@ __FAST_ARRAYoITM_ARGUMENTo FAST_ARRAYoITM_ARGUMENTo_;
 typedef struct ITM_TYPE_MULTI_struct __ITM_TYPE_MULTI;
 struct ITM_TYPE_MULTI_struct {
   unsigned long __id;
-  void *list_type__QKP;
+  void *list_type__2KP;
 };
 __ITM_TYPE_MULTI ITM_TYPE_MULTI_={__ITM_TYPE_MULTI__};
 #define ITM_TYPE_MULTI__ (&ITM_TYPE_MULTI_)
@@ -538,7 +531,7 @@ __ITM_TYPE_MULTI ITM_TYPE_MULTI_={__ITM_TYPE_MULTI__};
 typedef struct ITM_EXPRESSION_struct __ITM_EXPRESSION;
 struct ITM_EXPRESSION_struct {
   unsigned long __id;
-  void *value_list__DKV;
+  void *value_list__PJV;
 };
 __ITM_EXPRESSION ITM_EXPRESSION_={__ITM_EXPRESSION__};
 #define ITM_EXPRESSION__ (&ITM_EXPRESSION_)
@@ -548,7 +541,7 @@ __ITM_EXPRESSION ITM_EXPRESSION_={__ITM_EXPRESSION__};
 typedef struct ITM_RESULT_struct __ITM_RESULT;
 struct ITM_RESULT_struct {
   unsigned long __id;
-  void *value__FOFC;
+  void *value__WKFC;
 };
 __ITM_RESULT ITM_RESULT_={__ITM_RESULT__};
 #define ITM_RESULT__ (&ITM_RESULT_)
@@ -557,9 +550,9 @@ __ITM_RESULT ITM_RESULT_={__ITM_RESULT__};
 #define __HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__ 34
 typedef struct HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo_struct __HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo;
 struct HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo_struct {
-  void *key__IEGC;
-  void *item__1EGC;
-  void *next__TEGC;
+  void *key__ZAGC;
+  void *item__MBGC;
+  void *next__EBGC;
 };
 __HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo_;
 #define HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__ (&HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo_)
@@ -568,9 +561,9 @@ __HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo HASHED_DICTIONARY_NODEoITM_SL
 #define __HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo__ 35
 typedef struct HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo_struct __HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo;
 struct HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo_struct {
-  __INTEGER capacity__FBCC;
-  __INTEGER count__HSGC;
-  void **buckets__2DGC;
+  __INTEGER capacity__W3BC;
+  __INTEGER count__YOGC;
+  void **buckets__NAGC;
 };
 __HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo_;
 #define HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo__ (&HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo_)
@@ -580,8 +573,8 @@ __HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo HASHED_DICTIONARYoITM_SLOTxSTRING_
 typedef struct ITM_TYPE_BLOCK_struct __ITM_TYPE_BLOCK;
 struct ITM_TYPE_BLOCK_struct {
   unsigned long __id;
-  void *type_argument__GNN;
-  void *type_result__QNN;
+  void *type_argument__SNN;
+  void *type_result__2NN;
 };
 __ITM_TYPE_BLOCK ITM_TYPE_BLOCK_={__ITM_TYPE_BLOCK__};
 #define ITM_TYPE_BLOCK__ (&ITM_TYPE_BLOCK_)
@@ -591,7 +584,7 @@ __ITM_TYPE_BLOCK ITM_TYPE_BLOCK_={__ITM_TYPE_BLOCK__};
 typedef struct ITM_TYPE_SIMPLE_struct __ITM_TYPE_SIMPLE;
 struct ITM_TYPE_SIMPLE_struct {
   unsigned long __id;
-  void *name__0YP;
+  void *name__GZP;
 };
 __ITM_TYPE_SIMPLE ITM_TYPE_SIMPLE_={__ITM_TYPE_SIMPLE__};
 #define ITM_TYPE_SIMPLE__ (&ITM_TYPE_SIMPLE_)
@@ -601,8 +594,8 @@ __ITM_TYPE_SIMPLE ITM_TYPE_SIMPLE_={__ITM_TYPE_SIMPLE__};
 typedef struct ITM_TYPE_STYLE_struct __ITM_TYPE_STYLE;
 struct ITM_TYPE_STYLE_struct {
   unsigned long __id;
-  __ITM_TYPE_SIMPLE parent_itm_type_simple__RSN;
-  void *style__DZP;
+  __ITM_TYPE_SIMPLE parent_itm_type_simple__3SN;
+  void *style__PZP;
 };
 __ITM_TYPE_STYLE ITM_TYPE_STYLE_={__ITM_TYPE_STYLE__};
 #define ITM_TYPE_STYLE__ (&ITM_TYPE_STYLE_)
@@ -612,8 +605,8 @@ __ITM_TYPE_STYLE ITM_TYPE_STYLE_={__ITM_TYPE_STYLE__};
 typedef struct ITM_TYPE_GENERIC_struct __ITM_TYPE_GENERIC;
 struct ITM_TYPE_GENERIC_struct {
   unsigned long __id;
-  __ITM_TYPE_STYLE parent_itm_type_style__SSN;
-  void *list_type__NZP;
+  __ITM_TYPE_STYLE parent_itm_type_style__4SN;
+  void *list_type__ZZP;
 };
 __ITM_TYPE_GENERIC ITM_TYPE_GENERIC_={__ITM_TYPE_GENERIC__};
 #define ITM_TYPE_GENERIC__ (&ITM_TYPE_GENERIC_)
@@ -623,9 +616,9 @@ __ITM_TYPE_GENERIC ITM_TYPE_GENERIC_={__ITM_TYPE_GENERIC__};
 typedef struct ITM_ARG_struct __ITM_ARG;
 struct ITM_ARG_struct {
   unsigned long __id;
-  __ITM_ARGUMENT parent_itm_argument__DIHB;
-  void *name__U3HC;
-  void *type__V3HC;
+  __ITM_ARGUMENT parent_itm_argument__SEHB;
+  void *name__F0HC;
+  void *type__G0HC;
 };
 __ITM_ARG ITM_ARG_={__ITM_ARG__};
 #define ITM_ARG__ (&ITM_ARG_)
@@ -635,9 +628,9 @@ __ITM_ARG ITM_ARG_={__ITM_ARG__};
 typedef struct ITM_ARGS_struct __ITM_ARGS;
 struct ITM_ARGS_struct {
   unsigned long __id;
-  __ITM_ARGUMENT parent_itm_argument__TDFE;
-  void *type__4BQF;
-  void *name__3BQF;
+  __ITM_ARGUMENT parent_itm_argument__CEFE;
+  void *type__YDQF;
+  void *name__XDQF;
 };
 __ITM_ARGS ITM_ARGS_={__ITM_ARGS__};
 #define ITM_ARGS__ (&ITM_ARGS_)
@@ -647,7 +640,7 @@ __ITM_ARGS ITM_ARGS_={__ITM_ARGS__};
 typedef struct ITM_TYPE_PARAMETER_struct __ITM_TYPE_PARAMETER;
 struct ITM_TYPE_PARAMETER_struct {
   unsigned long __id;
-  __ITM_TYPE_SIMPLE parent_itm_type__YEE;
+  __ITM_TYPE_SIMPLE parent_itm_type__VFE;
 };
 __ITM_TYPE_PARAMETER ITM_TYPE_PARAMETER_={__ITM_TYPE_PARAMETER__};
 #define ITM_TYPE_PARAMETER__ (&ITM_TYPE_PARAMETER_)
@@ -657,8 +650,8 @@ __ITM_TYPE_PARAMETER ITM_TYPE_PARAMETER_={__ITM_TYPE_PARAMETER__};
 typedef struct FILE_UNIX_struct __FILE_UNIX;
 struct FILE_UNIX_struct {
   unsigned long __id;
-  __ENTRY_UNIX parent_entry_unix__HEF;
-  __POINTER stream__4KRD;
+  __ENTRY_UNIX parent_entry_unix__EFF;
+  __POINTER stream__BMRD;
 };
 __FILE_UNIX FILE_UNIX_={__FILE_UNIX__};
 #define FILE_UNIX__ (&FILE_UNIX_)
@@ -667,9 +660,9 @@ __FILE_UNIX FILE_UNIX_={__FILE_UNIX__};
 #define __ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo__ 36
 typedef struct ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo_struct __ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo;
 struct ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo_struct {
-  __INTEGER upper__AEBC;
-  __INTEGER capacity__CEBC;
-  void **storage__4EBC;
+  __INTEGER upper__RABC;
+  __INTEGER capacity__TABC;
+  void **storage__PBBC;
 };
 __ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo_;
 #define ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo__ (&ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo_)
@@ -678,7 +671,7 @@ __ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo_
 #define __FAST_ARRAYoITM_TYPE_PARAMETERo__ 37
 typedef struct FAST_ARRAYoITM_TYPE_PARAMETERo_struct __FAST_ARRAYoITM_TYPE_PARAMETERo;
 struct FAST_ARRAYoITM_TYPE_PARAMETERo_struct {
-  __ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo parent_arrayed_collection__ONE;
+  __ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo parent_arrayed_collection__LOE;
 };
 __FAST_ARRAYoITM_TYPE_PARAMETERo FAST_ARRAYoITM_TYPE_PARAMETERo_;
 #define FAST_ARRAYoITM_TYPE_PARAMETERo__ (&FAST_ARRAYoITM_TYPE_PARAMETERo_)
@@ -687,7 +680,7 @@ __FAST_ARRAYoITM_TYPE_PARAMETERo FAST_ARRAYoITM_TYPE_PARAMETERo_;
 #define __LIP_CODE__ 38
 typedef struct LIP_CODE_struct __LIP_CODE;
 struct LIP_CODE_struct {
-  __ITM_OBJECT parent_itm_object__0EE;
+  __ITM_OBJECT parent_itm_object__XFE;
 };
 __LIP_CODE LIP_CODE_;
 #define LIP_CODE__ (&LIP_CODE_)
@@ -697,9 +690,9 @@ __LIP_CODE LIP_CODE_;
 typedef struct LIP_AFFECT_struct __LIP_AFFECT;
 struct LIP_AFFECT_struct {
   unsigned long __id;
-  __LIP_CODE parent_lip_code__LWPB;
-  void *name__PJFC;
-  void *value__BKFC;
+  __LIP_CODE parent_lip_code__YSPB;
+  void *name__AGFC;
+  void *value__SGFC;
 };
 __LIP_AFFECT LIP_AFFECT_={__LIP_AFFECT__};
 #define LIP_AFFECT__ (&LIP_AFFECT_)
@@ -709,9 +702,9 @@ __LIP_AFFECT LIP_AFFECT_={__LIP_AFFECT__};
 typedef struct LIP_CALL_struct __LIP_CALL;
 struct LIP_CALL_struct {
   unsigned long __id;
-  __LIP_CODE parent_lip_code__K34B;
-  void *argument__NQUE;
-  void *name__YQUE;
+  __LIP_CODE parent_lip_code__XZ4B;
+  void *argument__4QUE;
+  void *name__JRUE;
 };
 __LIP_CALL LIP_CALL_={__LIP_CALL__};
 #define LIP_CALL__ (&LIP_CALL_)
@@ -721,10 +714,10 @@ __LIP_CALL LIP_CALL_={__LIP_CALL__};
 typedef struct LIP_IF_struct __LIP_IF;
 struct LIP_IF_struct {
   unsigned long __id;
-  __LIP_CODE parent_lip_code__VTYC;
-  void *condition__0EQD;
-  void *then__QFQD;
-  void *else__HGQD;
+  __LIP_CODE parent_lip_code__PQYC;
+  void *condition__3FQD;
+  void *then__TGQD;
+  void *else__KHQD;
 };
 __LIP_IF LIP_IF_={__LIP_IF__};
 #define LIP_IF__ (&LIP_IF_)
@@ -734,8 +727,8 @@ __LIP_IF LIP_IF_={__LIP_IF__};
 typedef struct LIP_PRINT_struct __LIP_PRINT;
 struct LIP_PRINT_struct {
   unsigned long __id;
-  __LIP_CODE parent_lip_code__HUYC;
-  void *message__2UUE;
+  __LIP_CODE parent_lip_code__BRYC;
+  void *message__NVUE;
 };
 __LIP_PRINT LIP_PRINT_={__LIP_PRINT__};
 #define LIP_PRINT__ (&LIP_PRINT_)
@@ -744,8 +737,8 @@ __LIP_PRINT LIP_PRINT_={__LIP_PRINT__};
 #define __HASHED_SET_NODEoSTRING_CONSTANTo__ 39
 typedef struct HASHED_SET_NODEoSTRING_CONSTANTo_struct __HASHED_SET_NODEoSTRING_CONSTANTo;
 struct HASHED_SET_NODEoSTRING_CONSTANTo_struct {
-  void *item__DFV;
-  void *next__OFV;
+  void *item__PEV;
+  void *next__0EV;
 };
 __HASHED_SET_NODEoSTRING_CONSTANTo HASHED_SET_NODEoSTRING_CONSTANTo_;
 #define HASHED_SET_NODEoSTRING_CONSTANTo__ (&HASHED_SET_NODEoSTRING_CONSTANTo_)
@@ -754,64 +747,85 @@ __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__0IT;
-  __INTEGER count__AIY;
-  void **buckets__XEV;
+  __INTEGER capacity__HIT;
+  __INTEGER count__1FY;
+  void **buckets__DEV;
 };
 __HASHED_SEToSTRING_CONSTANTo HASHED_SEToSTRING_CONSTANTo_;
 #define HASHED_SEToSTRING_CONSTANTo__ (&HASHED_SEToSTRING_CONSTANTo_)
 
+// HASHED_SET_NODE[FAST_ARRAY[STRING_CONSTANT]]
+#define __HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo__ 41
+typedef struct HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo_struct __HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo;
+struct HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo_struct {
+  void *item__3LQF;
+  void *next__JMQF;
+};
+__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo_;
+#define HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo__ (&HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo_)
+
+// HASHED_SET[FAST_ARRAY[STRING_CONSTANT]]
+#define __HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo__ 42
+typedef struct HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo_struct __HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo;
+struct HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo_struct {
+  __INTEGER capacity__MLQF;
+  __INTEGER count__DQQF;
+  void **buckets__RLQF;
+};
+__HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo_;
+#define HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo__ (&HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo_)
+
 // ITM_CODE
-#define __ITM_CODE__ 41
+#define __ITM_CODE__ 43
 typedef struct ITM_CODE_struct __ITM_CODE;
 struct ITM_CODE_struct {
-  __ITM_OBJECT parent_itm_object__SEE;
+  __ITM_OBJECT parent_itm_object__PFE;
 };
 __ITM_CODE ITM_CODE_;
 #define ITM_CODE__ (&ITM_CODE_)
 
 // ARRAYED_COLLECTION[ITM_CODE]
-#define __ARRAYED_COLLECTIONoITM_CODEo__ 42
+#define __ARRAYED_COLLECTIONoITM_CODEo__ 44
 typedef struct ARRAYED_COLLECTIONoITM_CODEo_struct __ARRAYED_COLLECTIONoITM_CODEo;
 struct ARRAYED_COLLECTIONoITM_CODEo_struct {
-  __INTEGER upper__BJL;
-  __INTEGER capacity__H0T;
-  void **storage__S0T;
+  __INTEGER upper__NJL;
+  __INTEGER capacity__TZT;
+  void **storage__4ZT;
 };
 __ARRAYED_COLLECTIONoITM_CODEo ARRAYED_COLLECTIONoITM_CODEo_;
 #define ARRAYED_COLLECTIONoITM_CODEo__ (&ARRAYED_COLLECTIONoITM_CODEo_)
 
 // FAST_ARRAY[ITM_CODE]
-#define __FAST_ARRAYoITM_CODEo__ 43
+#define __FAST_ARRAYoITM_CODEo__ 45
 typedef struct FAST_ARRAYoITM_CODEo_struct __FAST_ARRAYoITM_CODEo;
 struct FAST_ARRAYoITM_CODEo_struct {
-  __ARRAYED_COLLECTIONoITM_CODEo parent_arrayed_collection__MVF;
+  __ARRAYED_COLLECTIONoITM_CODEo parent_arrayed_collection__JWF;
 };
 __FAST_ARRAYoITM_CODEo FAST_ARRAYoITM_CODEo_;
 #define FAST_ARRAYoITM_CODEo__ (&FAST_ARRAYoITM_CODEo_)
 
 // ARRAYED_COLLECTION[LIP_CODE]
-#define __ARRAYED_COLLECTIONoLIP_CODEo__ 44
+#define __ARRAYED_COLLECTIONoLIP_CODEo__ 46
 typedef struct ARRAYED_COLLECTIONoLIP_CODEo_struct __ARRAYED_COLLECTIONoLIP_CODEo;
 struct ARRAYED_COLLECTIONoLIP_CODEo_struct {
-  __INTEGER upper__WFQD;
-  __INTEGER capacity__UTTD;
-  void **storage__5TTD;
+  __INTEGER upper__ZGQD;
+  __INTEGER capacity__1UTD;
+  void **storage__GVTD;
 };
 __ARRAYED_COLLECTIONoLIP_CODEo ARRAYED_COLLECTIONoLIP_CODEo_;
 #define ARRAYED_COLLECTIONoLIP_CODEo__ (&ARRAYED_COLLECTIONoLIP_CODEo_)
 
 // FAST_ARRAY[LIP_CODE]
-#define __FAST_ARRAYoLIP_CODEo__ 45
+#define __FAST_ARRAYoLIP_CODEo__ 47
 typedef struct FAST_ARRAYoLIP_CODEo_struct __FAST_ARRAYoLIP_CODEo;
 struct FAST_ARRAYoLIP_CODEo_struct {
-  __ARRAYED_COLLECTIONoLIP_CODEo parent_arrayed_collection__EQYC;
+  __ARRAYED_COLLECTIONoLIP_CODEo parent_arrayed_collection__4MYC;
 };
 __FAST_ARRAYoLIP_CODEo FAST_ARRAYoLIP_CODEo_;
 #define FAST_ARRAYoLIP_CODEo__ (&FAST_ARRAYoLIP_CODEo_)
 
 // HASHED_DICTIONARY_NODE[LIP_SLOT_DATA,STRING_CONSTANT]
-#define __HASHED_DICTIONARY_NODEoLIP_SLOT_DATAxSTRING_CONSTANTo__ 46
+#define __HASHED_DICTIONARY_NODEoLIP_SLOT_DATAxSTRING_CONSTANTo__ 48
 typedef struct HASHED_DICTIONARY_NODEoLIP_SLOT_DATAxSTRING_CONSTANTo_struct __HASHED_DICTIONARY_NODEoLIP_SLOT_DATAxSTRING_CONSTANTo;
 struct HASHED_DICTIONARY_NODEoLIP_SLOT_DATAxSTRING_CONSTANTo_struct {
   void *Nothing;
@@ -820,11 +834,11 @@ __HASHED_DICTIONARY_NODEoLIP_SLOT_DATAxSTRING_CONSTANTo HASHED_DICTIONARY_NODEoL
 #define HASHED_DICTIONARY_NODEoLIP_SLOT_DATAxSTRING_CONSTANTo__ (&HASHED_DICTIONARY_NODEoLIP_SLOT_DATAxSTRING_CONSTANTo_)
 
 // HASHED_DICTIONARY[LIP_SLOT_DATA,STRING_CONSTANT]
-#define __HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo__ 47
+#define __HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo__ 49
 typedef struct HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo_struct __HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo;
 struct HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo_struct {
-  __INTEGER capacity__1WRD;
-  void **buckets__AXRD;
+  __INTEGER capacity__4XRD;
+  void **buckets__DYRD;
 };
 __HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo_;
 #define HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo__ (&HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo_)
@@ -834,10 +848,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__JRZB;
-  void *left__G1QD;
-  void *right__J1QD;
-  __CHARACTER operator__M1QD;
+  __LIP_CODE parent_lip_code__WNZB;
+  void *left__J2QD;
+  void *right__M2QD;
+  __CHARACTER operator__P2QD;
 };
 __LIP_BINARY LIP_BINARY_={__LIP_BINARY__};
 #define LIP_BINARY__ (&LIP_BINARY_)
@@ -847,9 +861,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__Y24B;
-  void *value__D4QD;
-  __CHARACTER operator__G4QD;
+  __LIP_CODE parent_lip_code__FZ4B;
+  void *value__G5QD;
+  __CHARACTER operator__J5QD;
 };
 __LIP_UNARY LIP_UNARY_={__LIP_UNARY__};
 #define LIP_UNARY__ (&LIP_UNARY_)
@@ -859,7 +873,7 @@ __LIP_UNARY LIP_UNARY_={__LIP_UNARY__};
 typedef struct LIP_INTEGER_struct __LIP_INTEGER;
 struct LIP_INTEGER_struct {
   unsigned long __id;
-  __INTEGER value__LN4F;
+  __INTEGER value__FP4F;
 };
 __LIP_INTEGER LIP_INTEGER_={__LIP_INTEGER__};
 #define LIP_INTEGER__ (&LIP_INTEGER_)
@@ -869,43 +883,64 @@ __LIP_INTEGER LIP_INTEGER_={__LIP_INTEGER__};
 typedef struct LIP_STRING_struct __LIP_STRING;
 struct LIP_STRING_struct {
   unsigned long __id;
-  void *value__FSUE;
+  void *value__WSUE;
 };
 __LIP_STRING LIP_STRING_={__LIP_STRING__};
 #define LIP_STRING__ (&LIP_STRING_)
 
+// HASHED_SET_NODE[FAST_ARRAY[ITM_TYPE_MONO]]
+#define __HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo__ 50
+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__W5V;
+  void *next__CAW;
+};
+__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo_;
+#define HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo__ (&HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo_)
+
+// HASHED_SET[FAST_ARRAY[ITM_TYPE_MONO]]
+#define __HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo__ 51
+typedef struct HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo_struct __HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo;
+struct HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo_struct {
+  __INTEGER capacity__F5V;
+  __INTEGER count__ZHW;
+  void **buckets__K5V;
+};
+__HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo_;
+#define HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo__ (&HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo_)
+
 // ITM_LOCAL
-#define __ITM_LOCAL__ 48
+#define __ITM_LOCAL__ 52
 typedef struct ITM_LOCAL_struct __ITM_LOCAL;
 struct ITM_LOCAL_struct {
-  __ITM_OBJECT parent_itm_object__C3H;
-  void *name__D4K;
+  __ITM_OBJECT parent_itm_object__O3H;
+  void *name__P4K;
 };
 __ITM_LOCAL ITM_LOCAL_;
 #define ITM_LOCAL__ (&ITM_LOCAL_)
 
 // ARRAYED_COLLECTION[ITM_LOCAL]
-#define __ARRAYED_COLLECTIONoITM_LOCALo__ 49
+#define __ARRAYED_COLLECTIONoITM_LOCALo__ 53
 typedef struct ARRAYED_COLLECTIONoITM_LOCALo_struct __ARRAYED_COLLECTIONoITM_LOCALo;
 struct ARRAYED_COLLECTIONoITM_LOCALo_struct {
-  __INTEGER upper__A2K;
-  __INTEGER capacity__2MU;
-  void **storage__HNU;
+  __INTEGER upper__M2K;
+  __INTEGER capacity__IMU;
+  void **storage__TMU;
 };
 __ARRAYED_COLLECTIONoITM_LOCALo ARRAYED_COLLECTIONoITM_LOCALo_;
 #define ARRAYED_COLLECTIONoITM_LOCALo__ (&ARRAYED_COLLECTIONoITM_LOCALo_)
 
 // FAST_ARRAY[ITM_LOCAL]
-#define __FAST_ARRAYoITM_LOCALo__ 50
+#define __FAST_ARRAYoITM_LOCALo__ 54
 typedef struct FAST_ARRAYoITM_LOCALo_struct __FAST_ARRAYoITM_LOCALo;
 struct FAST_ARRAYoITM_LOCALo_struct {
-  __ARRAYED_COLLECTIONoITM_LOCALo parent_arrayed_collection__H3H;
+  __ARRAYED_COLLECTIONoITM_LOCALo parent_arrayed_collection__T3H;
 };
 __FAST_ARRAYoITM_LOCALo FAST_ARRAYoITM_LOCALo_;
 #define FAST_ARRAYoITM_LOCALo__ (&FAST_ARRAYoITM_LOCALo_)
 
 // NUMERIC
-#define __NUMERIC__ 51
+#define __NUMERIC__ 55
 typedef struct NUMERIC_struct __NUMERIC;
 struct NUMERIC_struct {
   void *Nothing;
@@ -914,7 +949,7 @@ __NUMERIC NUMERIC_;
 #define NUMERIC__ (&NUMERIC_)
 
 // OBJECT
-#define __OBJECT__ 52
+#define __OBJECT__ 56
 typedef struct OBJECT_struct __OBJECT;
 struct OBJECT_struct {
   void *Nothing;
@@ -923,7 +958,7 @@ __OBJECT OBJECT_;
 #define OBJECT__ (&OBJECT_)
 
 // SYSTEM
-#define __SYSTEM__ 53
+#define __SYSTEM__ 57
 typedef struct SYSTEM_struct __SYSTEM;
 struct SYSTEM_struct {
   void *Nothing;
@@ -932,7 +967,7 @@ __SYSTEM SYSTEM_;
 #define SYSTEM__ (&SYSTEM_)
 
 // ALIAS_STR
-#define __ALIAS_STR__ 54
+#define __ALIAS_STR__ 58
 typedef struct ALIAS_STR_struct __ALIAS_STR;
 struct ALIAS_STR_struct {
   void *Nothing;
@@ -941,7 +976,7 @@ __ALIAS_STR ALIAS_STR_;
 #define ALIAS_STR__ (&ALIAS_STR_)
 
 // ANY
-#define __ANY__ 55
+#define __ANY__ 59
 typedef struct ANY_struct __ANY;
 struct ANY_struct {
   void *Nothing;
@@ -950,7 +985,7 @@ __ANY ANY_;
 #define ANY__ (&ANY_)
 
 // ANY_OPTION
-#define __ANY_OPTION__ 56
+#define __ANY_OPTION__ 60
 typedef struct ANY_OPTION_struct __ANY_OPTION;
 struct ANY_OPTION_struct {
   void *Nothing;
@@ -962,7 +997,7 @@ __ANY_OPTION ANY_OPTION_;
 #define FALSE__ 0
 
 // SHORTER
-#define __SHORTER__ 57
+#define __SHORTER__ 61
 typedef struct SHORTER_struct __SHORTER;
 struct SHORTER_struct {
   void *Nothing;
@@ -971,50 +1006,50 @@ __SHORTER SHORTER_;
 #define SHORTER__ (&SHORTER_)
 
 // FILE_SYSTEM
-#define __FILE_SYSTEM__ 58
+#define __FILE_SYSTEM__ 62
 typedef struct FILE_SYSTEM_struct __FILE_SYSTEM;
 struct FILE_SYSTEM_struct {
-  void *parent_directory__1GD;
-  int parent_directory__2GD;
+  void *parent_directory__GHD;
+  int parent_directory__HHD;
 };
 __FILE_SYSTEM FILE_SYSTEM_;
 #define FILE_SYSTEM__ (&FILE_SYSTEM_)
 
 // HASHED_DICTIONARY_NODE[PROTOTYPE,STRING_CONSTANT]
-#define __HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__ 59
+#define __HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__ 63
 typedef struct HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo_struct __HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo;
 struct HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo_struct {
-  void *key__KQBC;
-  void *item__XBHD;
-  void *next__VQBC;
+  void *key__1MBC;
+  void *item__NBHD;
+  void *next__GNBC;
 };
 __HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo_;
 #define HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__ (&HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo_)
 
 // HASHED_DICTIONARY[PROTOTYPE,STRING_CONSTANT]
-#define __HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo__ 60
+#define __HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo__ 64
 typedef struct HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo_struct __HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo;
 struct HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo_struct {
-  __INTEGER capacity__ZPBC;
-  __INTEGER count__4QBC;
-  void **buckets__4PBC;
+  __INTEGER capacity__KMBC;
+  __INTEGER count__PNBC;
+  void **buckets__PMBC;
 };
 __HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo_;
 #define HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo__ (&HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo_)
 
 // ARRAYED_COLLECTION[PROTOTYPE]
-#define __ARRAYED_COLLECTIONoPROTOTYPEo__ 61
+#define __ARRAYED_COLLECTIONoPROTOTYPEo__ 65
 typedef struct ARRAYED_COLLECTIONoPROTOTYPEo_struct __ARRAYED_COLLECTIONoPROTOTYPEo;
 struct ARRAYED_COLLECTIONoPROTOTYPEo_struct {
   __INTEGER upper__HJ;
-  __INTEGER capacity__KFU;
-  void **storage__XVT;
+  __INTEGER capacity__WEU;
+  void **storage__DVT;
 };
 __ARRAYED_COLLECTIONoPROTOTYPEo ARRAYED_COLLECTIONoPROTOTYPEo_;
 #define ARRAYED_COLLECTIONoPROTOTYPEo__ (&ARRAYED_COLLECTIONoPROTOTYPEo_)
 
 // FAST_ARRAY[PROTOTYPE]
-#define __FAST_ARRAYoPROTOTYPEo__ 62
+#define __FAST_ARRAYoPROTOTYPEo__ 66
 typedef struct FAST_ARRAYoPROTOTYPEo_struct __FAST_ARRAYoPROTOTYPEo;
 struct FAST_ARRAYoPROTOTYPEo_struct {
   __ARRAYED_COLLECTIONoPROTOTYPEo parent_arrayed_collection__AJ;
@@ -1023,7 +1058,7 @@ __FAST_ARRAYoPROTOTYPEo FAST_ARRAYoPROTOTYPEo_;
 #define FAST_ARRAYoPROTOTYPEo__ (&FAST_ARRAYoPROTOTYPEo_)
 
 // FS_MIN
-#define __FS_MIN__ 63
+#define __FS_MIN__ 67
 typedef struct FS_MIN_struct __FS_MIN;
 struct FS_MIN_struct {
   void *Nothing;
@@ -1032,17 +1067,17 @@ __FS_MIN FS_MIN_;
 #define FS_MIN__ (&FS_MIN_)
 
 // LINKED_LIST_NODE[STRING_CONSTANT]
-#define __LINKED_LIST_NODEoSTRING_CONSTANTo__ 64
+#define __LINKED_LIST_NODEoSTRING_CONSTANTo__ 68
 typedef struct LINKED_LIST_NODEoSTRING_CONSTANTo_struct __LINKED_LIST_NODEoSTRING_CONSTANTo;
 struct LINKED_LIST_NODEoSTRING_CONSTANTo_struct {
-  void *item__V0HD;
-  void *next__CQOD;
+  void *item__L0HD;
+  void *next__JROD;
 };
 __LINKED_LIST_NODEoSTRING_CONSTANTo LINKED_LIST_NODEoSTRING_CONSTANTo_;
 #define LINKED_LIST_NODEoSTRING_CONSTANTo__ (&LINKED_LIST_NODEoSTRING_CONSTANTo_)
 
 // TYPE
-#define __TYPE__ 65
+#define __TYPE__ 69
 typedef struct TYPE_struct __TYPE;
 struct TYPE_struct {
   void *Nothing;
@@ -1051,16 +1086,16 @@ __TYPE TYPE_;
 #define TYPE__ (&TYPE_)
 
 // ARRAYED_COLLECTION[SLOT]
-#define __ARRAYED_COLLECTIONoSLOTo__ 66
+#define __ARRAYED_COLLECTIONoSLOTo__ 70
 typedef struct ARRAYED_COLLECTIONoSLOTo_struct __ARRAYED_COLLECTIONoSLOTo;
 struct ARRAYED_COLLECTIONoSLOTo_struct {
-  __INTEGER capacity__EFS;
+  __INTEGER capacity__QFS;
 };
 __ARRAYED_COLLECTIONoSLOTo ARRAYED_COLLECTIONoSLOTo_;
 #define ARRAYED_COLLECTIONoSLOTo__ (&ARRAYED_COLLECTIONoSLOTo_)
 
 // FAST_ARRAY[SLOT]
-#define __FAST_ARRAYoSLOTo__ 67
+#define __FAST_ARRAYoSLOTo__ 71
 typedef struct FAST_ARRAYoSLOTo_struct __FAST_ARRAYoSLOTo;
 struct FAST_ARRAYoSLOTo_struct {
   __ARRAYED_COLLECTIONoSLOTo parent_arrayed_collection__BAB;
@@ -1069,59 +1104,59 @@ __FAST_ARRAYoSLOTo FAST_ARRAYoSLOTo_;
 #define FAST_ARRAYoSLOTo__ (&FAST_ARRAYoSLOTo_)
 
 // LINKED_COLLECTION[ENTRY]
-#define __LINKED_COLLECTIONoENTRYo__ 68
+#define __LINKED_COLLECTIONoENTRYo__ 72
 typedef struct LINKED_COLLECTIONoENTRYo_struct __LINKED_COLLECTIONoENTRYo;
 struct LINKED_COLLECTIONoENTRYo_struct {
-  __INTEGER upper__GQ3D;
+  __INTEGER upper__HR3D;
 };
 __LINKED_COLLECTIONoENTRYo LINKED_COLLECTIONoENTRYo_;
 #define LINKED_COLLECTIONoENTRYo__ (&LINKED_COLLECTIONoENTRYo_)
 
 // LINKED_LIST[ENTRY]
-#define __LINKED_LISToENTRYo__ 69
+#define __LINKED_LISToENTRYo__ 73
 typedef struct LINKED_LISToENTRYo_struct __LINKED_LISToENTRYo;
 struct LINKED_LISToENTRYo_struct {
-  __LINKED_COLLECTIONoENTRYo parent_linked_collection__BHRD;
-  __INTEGER mem_idx__2LWE;
-  void *first_link__VLWE;
-  void *mem_lnk__3LWE;
-  void *last_link__4LWE;
+  __LINKED_COLLECTIONoENTRYo parent_linked_collection__EIRD;
+  __INTEGER mem_idx__VMWE;
+  void *first_link__OMWE;
+  void *mem_lnk__WMWE;
+  void *last_link__XMWE;
 };
 __LINKED_LISToENTRYo LINKED_LISToENTRYo_;
 #define LINKED_LISToENTRYo__ (&LINKED_LISToENTRYo_)
 
 // LINKED_LIST_NODE[ENTRY]
-#define __LINKED_LIST_NODEoENTRYo__ 70
+#define __LINKED_LIST_NODEoENTRYo__ 74
 typedef struct LINKED_LIST_NODEoENTRYo_struct __LINKED_LIST_NODEoENTRYo;
 struct LINKED_LIST_NODEoENTRYo_struct {
-  void *item__P5WE;
-  void *next__V1FF;
+  void *item__IAXE;
+  void *next__G3FF;
 };
 __LINKED_LIST_NODEoENTRYo LINKED_LIST_NODEoENTRYo_;
 #define LINKED_LIST_NODEoENTRYo__ (&LINKED_LIST_NODEoENTRYo_)
 
 // ARRAYED_COLLECTION[FAST_ARRAY[ITM_TYPE_MONO]]
-#define __ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo__ 71
+#define __ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo__ 75
 typedef struct ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo_struct __ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo;
 struct ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo_struct {
-  __INTEGER upper__NVV;
-  __INTEGER capacity__IZV;
-  void **storage__D0V;
+  __INTEGER upper__ZUV;
+  __INTEGER capacity__UYV;
+  void **storage__PZV;
 };
 __ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo_;
 #define ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo__ (&ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo_)
 
 // FAST_ARRAY[FAST_ARRAY[ITM_TYPE_MONO]]
-#define __FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo__ 72
+#define __FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo__ 76
 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__ZUP;
+  __ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo parent_arrayed_collection__FVP;
 };
 __FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo_;
 #define FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo__ (&FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo_)
 
 // ALIAS_ARRAY[ITM_TYPE_MONO]
-#define __ALIAS_ARRAYoITM_TYPE_MONOo__ 73
+#define __ALIAS_ARRAYoITM_TYPE_MONOo__ 77
 typedef struct ALIAS_ARRAYoITM_TYPE_MONOo_struct __ALIAS_ARRAYoITM_TYPE_MONOo;
 struct ALIAS_ARRAYoITM_TYPE_MONOo_struct {
   void *Nothing;
@@ -1129,72 +1164,51 @@ struct ALIAS_ARRAYoITM_TYPE_MONOo_struct {
 __ALIAS_ARRAYoITM_TYPE_MONOo ALIAS_ARRAYoITM_TYPE_MONOo_;
 #define ALIAS_ARRAYoITM_TYPE_MONOo__ (&ALIAS_ARRAYoITM_TYPE_MONOo_)
 
-// HASHED_SET_NODE[FAST_ARRAY[ITM_TYPE_MONO]]
-#define __HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo__ 74
-typedef struct HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo_struct __HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo;
-struct HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo_struct {
-  void *item__KAW;
-  void *next__WAW;
-};
-__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo_;
-#define HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo__ (&HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo_)
-
-// HASHED_SET[FAST_ARRAY[ITM_TYPE_MONO]]
-#define __HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo__ 75
-typedef struct HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo_struct __HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo;
-struct HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo_struct {
-  __INTEGER capacity__Z5V;
-  __INTEGER count__NIW;
-  void **buckets__45V;
-};
-__HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo_;
-#define HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo__ (&HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo_)
-
 // ARRAYED_COLLECTION[ITM_TYPE_MULTI]
-#define __ARRAYED_COLLECTIONoITM_TYPE_MULTIo__ 76
+#define __ARRAYED_COLLECTIONoITM_TYPE_MULTIo__ 78
 typedef struct ARRAYED_COLLECTIONoITM_TYPE_MULTIo_struct __ARRAYED_COLLECTIONoITM_TYPE_MULTIo;
 struct ARRAYED_COLLECTIONoITM_TYPE_MULTIo_struct {
-  __INTEGER upper__GKP;
-  __INTEGER capacity__F2V;
-  void **storage__Q2V;
+  __INTEGER upper__SKP;
+  __INTEGER capacity__R1V;
+  void **storage__21V;
 };
 __ARRAYED_COLLECTIONoITM_TYPE_MULTIo ARRAYED_COLLECTIONoITM_TYPE_MULTIo_;
 #define ARRAYED_COLLECTIONoITM_TYPE_MULTIo__ (&ARRAYED_COLLECTIONoITM_TYPE_MULTIo_)
 
 // FAST_ARRAY[ITM_TYPE_MULTI]
-#define __FAST_ARRAYoITM_TYPE_MULTIo__ 77
+#define __FAST_ARRAYoITM_TYPE_MULTIo__ 79
 typedef struct FAST_ARRAYoITM_TYPE_MULTIo_struct __FAST_ARRAYoITM_TYPE_MULTIo;
 struct FAST_ARRAYoITM_TYPE_MULTIo_struct {
-  __ARRAYED_COLLECTIONoITM_TYPE_MULTIo parent_arrayed_collection__2JP;
+  __ARRAYED_COLLECTIONoITM_TYPE_MULTIo parent_arrayed_collection__IKP;
 };
 __FAST_ARRAYoITM_TYPE_MULTIo FAST_ARRAYoITM_TYPE_MULTIo_;
 #define FAST_ARRAYoITM_TYPE_MULTIo__ (&FAST_ARRAYoITM_TYPE_MULTIo_)
 
 // ARRAYED_COLLECTION[ITM_TYPE_BLOCK]
-#define __ARRAYED_COLLECTIONoITM_TYPE_BLOCKo__ 78
+#define __ARRAYED_COLLECTIONoITM_TYPE_BLOCKo__ 80
 typedef struct ARRAYED_COLLECTIONoITM_TYPE_BLOCKo_struct __ARRAYED_COLLECTIONoITM_TYPE_BLOCKo;
 struct ARRAYED_COLLECTIONoITM_TYPE_BLOCKo_struct {
-  __INTEGER upper__YMN;
-  __INTEGER capacity__OKV;
-  void **storage__ZKV;
+  __INTEGER upper__ENN;
+  __INTEGER capacity__0JV;
+  void **storage__FKV;
 };
 __ARRAYED_COLLECTIONoITM_TYPE_BLOCKo ARRAYED_COLLECTIONoITM_TYPE_BLOCKo_;
 #define ARRAYED_COLLECTIONoITM_TYPE_BLOCKo__ (&ARRAYED_COLLECTIONoITM_TYPE_BLOCKo_)
 
 // FAST_ARRAY[ITM_TYPE_BLOCK]
-#define __FAST_ARRAYoITM_TYPE_BLOCKo__ 79
+#define __FAST_ARRAYoITM_TYPE_BLOCKo__ 81
 typedef struct FAST_ARRAYoITM_TYPE_BLOCKo_struct __FAST_ARRAYoITM_TYPE_BLOCKo;
 struct FAST_ARRAYoITM_TYPE_BLOCKo_struct {
-  __ARRAYED_COLLECTIONoITM_TYPE_BLOCKo parent_arrayed_collection__OMN;
+  __ARRAYED_COLLECTIONoITM_TYPE_BLOCKo parent_arrayed_collection__0MN;
 };
 __FAST_ARRAYoITM_TYPE_BLOCKo FAST_ARRAYoITM_TYPE_BLOCKo_;
 #define FAST_ARRAYoITM_TYPE_BLOCKo__ (&FAST_ARRAYoITM_TYPE_BLOCKo_)
 
 // ITM_CONSTANT
-#define __ITM_CONSTANT__ 80
+#define __ITM_CONSTANT__ 82
 typedef struct ITM_CONSTANT_struct __ITM_CONSTANT;
 struct ITM_CONSTANT_struct {
-  __ITM_CODE parent_itm_code__WXF;
+  __ITM_CODE parent_itm_code__TYF;
 };
 __ITM_CONSTANT ITM_CONSTANT_;
 #define ITM_CONSTANT__ (&ITM_CONSTANT_)
@@ -1204,7 +1218,7 @@ __ITM_CONSTANT ITM_CONSTANT_;
 typedef struct ITM_REAL_struct __ITM_REAL;
 struct ITM_REAL_struct {
   unsigned long __id;
-  __ITM_CONSTANT parent_itm_constant__VRO;
+  __ITM_CONSTANT parent_itm_constant__BSO;
 };
 __ITM_REAL ITM_REAL_={__ITM_REAL__};
 #define ITM_REAL__ (&ITM_REAL_)
@@ -1214,7 +1228,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__HSO;
+  __ITM_CONSTANT parent_itm_constant__TSO;
 };
 __ITM_NUMBER ITM_NUMBER_={__ITM_NUMBER__};
 #define ITM_NUMBER__ (&ITM_NUMBER_)
@@ -1224,7 +1238,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__ZSO;
+  __ITM_CONSTANT parent_itm_constant__FTO;
 };
 __ITM_CHARACTER ITM_CHARACTER_={__ITM_CHARACTER__};
 #define ITM_CHARACTER__ (&ITM_CHARACTER_)
@@ -1234,47 +1248,47 @@ __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__KTO;
+  __ITM_CONSTANT parent_itm_constant__WTO;
 };
 __ITM_STRING ITM_STRING_={__ITM_STRING__};
 #define ITM_STRING__ (&ITM_STRING_)
 
 // ARRAYED_COLLECTION[ITM_TYPE_GENERIC]
-#define __ARRAYED_COLLECTIONoITM_TYPE_GENERICo__ 81
+#define __ARRAYED_COLLECTIONoITM_TYPE_GENERICo__ 83
 typedef struct ARRAYED_COLLECTIONoITM_TYPE_GENERICo_struct __ARRAYED_COLLECTIONoITM_TYPE_GENERICo;
 struct ARRAYED_COLLECTIONoITM_TYPE_GENERICo_struct {
-  __INTEGER upper__QYP;
-  __INTEGER capacity__1BW;
-  void **storage__GCW;
+  __INTEGER upper__2YP;
+  __INTEGER capacity__HBW;
+  void **storage__SBW;
 };
 __ARRAYED_COLLECTIONoITM_TYPE_GENERICo ARRAYED_COLLECTIONoITM_TYPE_GENERICo_;
 #define ARRAYED_COLLECTIONoITM_TYPE_GENERICo__ (&ARRAYED_COLLECTIONoITM_TYPE_GENERICo_)
 
 // FAST_ARRAY[ITM_TYPE_GENERIC]
-#define __FAST_ARRAYoITM_TYPE_GENERICo__ 82
+#define __FAST_ARRAYoITM_TYPE_GENERICo__ 84
 typedef struct FAST_ARRAYoITM_TYPE_GENERICo_struct __FAST_ARRAYoITM_TYPE_GENERICo;
 struct FAST_ARRAYoITM_TYPE_GENERICo_struct {
-  __ARRAYED_COLLECTIONoITM_TYPE_GENERICo parent_arrayed_collection__GYP;
+  __ARRAYED_COLLECTIONoITM_TYPE_GENERICo parent_arrayed_collection__SYP;
 };
 __FAST_ARRAYoITM_TYPE_GENERICo FAST_ARRAYoITM_TYPE_GENERICo_;
 #define FAST_ARRAYoITM_TYPE_GENERICo__ (&FAST_ARRAYoITM_TYPE_GENERICo_)
 
 // ARRAYED_COLLECTION[ITM_TYPE_STYLE]
-#define __ARRAYED_COLLECTIONoITM_TYPE_STYLEo__ 83
+#define __ARRAYED_COLLECTIONoITM_TYPE_STYLEo__ 85
 typedef struct ARRAYED_COLLECTIONoITM_TYPE_STYLEo_struct __ARRAYED_COLLECTIONoITM_TYPE_STYLEo;
 struct ARRAYED_COLLECTIONoITM_TYPE_STYLEo_struct {
-  __INTEGER upper__5OR;
-  __INTEGER capacity__DMW;
-  void **storage__OMW;
+  __INTEGER upper__LPR;
+  __INTEGER capacity__PLW;
+  void **storage__0LW;
 };
 __ARRAYED_COLLECTIONoITM_TYPE_STYLEo ARRAYED_COLLECTIONoITM_TYPE_STYLEo_;
 #define ARRAYED_COLLECTIONoITM_TYPE_STYLEo__ (&ARRAYED_COLLECTIONoITM_TYPE_STYLEo_)
 
 // FAST_ARRAY[ITM_TYPE_STYLE]
-#define __FAST_ARRAYoITM_TYPE_STYLEo__ 84
+#define __FAST_ARRAYoITM_TYPE_STYLEo__ 86
 typedef struct FAST_ARRAYoITM_TYPE_STYLEo_struct __FAST_ARRAYoITM_TYPE_STYLEo;
 struct FAST_ARRAYoITM_TYPE_STYLEo_struct {
-  __ARRAYED_COLLECTIONoITM_TYPE_STYLEo parent_arrayed_collection__VOR;
+  __ARRAYED_COLLECTIONoITM_TYPE_STYLEo parent_arrayed_collection__BPR;
 };
 __FAST_ARRAYoITM_TYPE_STYLEo FAST_ARRAYoITM_TYPE_STYLEo_;
 #define FAST_ARRAYoITM_TYPE_STYLEo__ (&FAST_ARRAYoITM_TYPE_STYLEo_)
@@ -1284,33 +1298,33 @@ __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__VAF;
+  __ITM_CODE parent_itm_code__SBF;
 };
 __ITM_LIST ITM_LIST_={__ITM_LIST__};
 #define ITM_LIST__ (&ITM_LIST_)
 
 // ARRAYED_COLLECTION[FAST_ARRAY[ITM_LOCAL]]
-#define __ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo__ 85
+#define __ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo__ 87
 typedef struct ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo_struct __ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo;
 struct ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo_struct {
-  __INTEGER upper__W3T;
-  __INTEGER capacity__BLU;
-  void **storage__MLU;
+  __INTEGER upper__C3T;
+  __INTEGER capacity__NKU;
+  void **storage__YKU;
 };
 __ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo_;
 #define ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo__ (&ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo_)
 
 // FAST_ARRAY[FAST_ARRAY[ITM_LOCAL]]
-#define __FAST_ARRAYoFAST_ARRAYoITM_LOCALoo__ 86
+#define __FAST_ARRAYoFAST_ARRAYoITM_LOCALoo__ 88
 typedef struct FAST_ARRAYoFAST_ARRAYoITM_LOCALoo_struct __FAST_ARRAYoFAST_ARRAYoITM_LOCALoo;
 struct FAST_ARRAYoFAST_ARRAYoITM_LOCALoo_struct {
-  __ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo parent_arrayed_collection__NTI;
+  __ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo parent_arrayed_collection__ZTI;
 };
 __FAST_ARRAYoFAST_ARRAYoITM_LOCALoo FAST_ARRAYoFAST_ARRAYoITM_LOCALoo_;
 #define FAST_ARRAYoFAST_ARRAYoITM_LOCALoo__ (&FAST_ARRAYoFAST_ARRAYoITM_LOCALoo_)
 
 // ALIAS_ARRAY[ITM_LOCAL]
-#define __ALIAS_ARRAYoITM_LOCALo__ 87
+#define __ALIAS_ARRAYoITM_LOCALo__ 89
 typedef struct ALIAS_ARRAYoITM_LOCALo_struct __ALIAS_ARRAYoITM_LOCALo;
 struct ALIAS_ARRAYoITM_LOCALo_struct {
   void *Nothing;
@@ -1319,27 +1333,27 @@ __ALIAS_ARRAYoITM_LOCALo ALIAS_ARRAYoITM_LOCALo_;
 #define ALIAS_ARRAYoITM_LOCALo__ (&ALIAS_ARRAYoITM_LOCALo_)
 
 // ARRAYED_COLLECTION[FAST_ARRAY[ITM_CODE]]
-#define __ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo__ 88
+#define __ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo__ 90
 typedef struct ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo_struct __ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo;
 struct ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo_struct {
-  __INTEGER upper__VYT;
-  __INTEGER capacity__HCU;
-  void **storage__DDU;
+  __INTEGER upper__BYT;
+  __INTEGER capacity__TBU;
+  void **storage__PCU;
 };
 __ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo_;
 #define ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo__ (&ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo_)
 
 // FAST_ARRAY[FAST_ARRAY[ITM_CODE]]
-#define __FAST_ARRAYoFAST_ARRAYoITM_CODEoo__ 89
+#define __FAST_ARRAYoFAST_ARRAYoITM_CODEoo__ 91
 typedef struct FAST_ARRAYoFAST_ARRAYoITM_CODEoo_struct __FAST_ARRAYoFAST_ARRAYoITM_CODEoo;
 struct FAST_ARRAYoFAST_ARRAYoITM_CODEoo_struct {
-  __ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo parent_arrayed_collection__DAI;
+  __ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo parent_arrayed_collection__PAI;
 };
 __FAST_ARRAYoFAST_ARRAYoITM_CODEoo FAST_ARRAYoFAST_ARRAYoITM_CODEoo_;
 #define FAST_ARRAYoFAST_ARRAYoITM_CODEoo__ (&FAST_ARRAYoFAST_ARRAYoITM_CODEoo_)
 
 // ALIAS_ARRAY[ITM_CODE]
-#define __ALIAS_ARRAYoITM_CODEo__ 90
+#define __ALIAS_ARRAYoITM_CODEo__ 92
 typedef struct ALIAS_ARRAYoITM_CODEo_struct __ALIAS_ARRAYoITM_CODEo;
 struct ALIAS_ARRAYoITM_CODEo_struct {
   void *Nothing;
@@ -1348,27 +1362,27 @@ __ALIAS_ARRAYoITM_CODEo ALIAS_ARRAYoITM_CODEo_;
 #define ALIAS_ARRAYoITM_CODEo__ (&ALIAS_ARRAYoITM_CODEo_)
 
 // ARRAYED_COLLECTION[FAST_ARRAY[STRING_CONSTANT]]
-#define __ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo__ 91
+#define __ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo__ 93
 typedef struct ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo_struct __ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo;
 struct ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo_struct {
-  __INTEGER upper__5UU;
-  __INTEGER capacity__EXU;
-  void **storage__PXU;
+  __INTEGER upper__LUU;
+  __INTEGER capacity__QWU;
+  void **storage__1WU;
 };
 __ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo_;
 #define ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo__ (&ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo_)
 
 // FAST_ARRAY[FAST_ARRAY[STRING_CONSTANT]]
-#define __FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo__ 92
+#define __FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo__ 94
 typedef struct FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo_struct __FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo;
 struct FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo_struct {
-  __ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo parent_arrayed_collection__OAL;
+  __ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo parent_arrayed_collection__0AL;
 };
 __FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo_;
 #define FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo__ (&FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo_)
 
 // ALIAS_ARRAY[STRING_CONSTANT]
-#define __ALIAS_ARRAYoSTRING_CONSTANTo__ 93
+#define __ALIAS_ARRAYoSTRING_CONSTANTo__ 95
 typedef struct ALIAS_ARRAYoSTRING_CONSTANTo_struct __ALIAS_ARRAYoSTRING_CONSTANTo;
 struct ALIAS_ARRAYoSTRING_CONSTANTo_struct {
   void *Nothing;
@@ -1381,7 +1395,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__PEJ;
+  __ITM_CODE parent_itm_code__1EJ;
 };
 __ITM_LIST_IDF ITM_LIST_IDF_={__ITM_LIST_IDF__};
 #define ITM_LIST_IDF__ (&ITM_LIST_IDF_)
@@ -1391,7 +1405,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__LWF;
+  __ITM_CODE parent_itm_constant__IXF;
 };
 __ITM_LDOTS ITM_LDOTS_={__ITM_LDOTS__};
 #define ITM_LDOTS__ (&ITM_LDOTS_)
@@ -1401,16 +1415,16 @@ __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__XXF;
+  __ITM_CONSTANT parent_itm_constant__UYF;
 };
 __ITM_PROTOTYPE ITM_PROTOTYPE_={__ITM_PROTOTYPE__};
 #define ITM_PROTOTYPE__ (&ITM_PROTOTYPE_)
 
 // ITM_WRITE
-#define __ITM_WRITE__ 94
+#define __ITM_WRITE__ 96
 typedef struct ITM_WRITE_struct __ITM_WRITE;
 struct ITM_WRITE_struct {
-  __ITM_CODE parent_itm_code__EFJ;
+  __ITM_CODE parent_itm_code__QFJ;
 };
 __ITM_WRITE ITM_WRITE_;
 #define ITM_WRITE__ (&ITM_WRITE_)
@@ -1420,7 +1434,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__FFJ;
+  __ITM_WRITE parent_itm_write__RFJ;
 };
 __ITM_WRITE_VALUE ITM_WRITE_VALUE_={__ITM_WRITE_VALUE__};
 #define ITM_WRITE_VALUE__ (&ITM_WRITE_VALUE_)
@@ -1430,7 +1444,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__2FJ;
+  __ITM_WRITE parent_itm_write__IGJ;
 };
 __ITM_WRITE_CAST ITM_WRITE_CAST_={__ITM_WRITE_CAST__};
 #define ITM_WRITE_CAST__ (&ITM_WRITE_CAST_)
@@ -1440,7 +1454,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__JIJ;
+  __ITM_CODE parent_itm_code__VIJ;
 };
 __ITM_READ ITM_READ_={__ITM_READ__};
 #define ITM_READ__ (&ITM_READ_)
@@ -1450,7 +1464,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__HJJ;
+  __ITM_WRITE parent_itm_write__TJJ;
 };
 __ITM_WRITE_CODE ITM_WRITE_CODE_={__ITM_WRITE_CODE__};
 #define ITM_WRITE_CODE__ (&ITM_WRITE_CODE_)
@@ -1460,8 +1474,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__JGL;
-  void *name__UJL;
+  __ITM_CODE parent_itm_code__VGL;
+  void *name__AKL;
 };
 __ITM_OPERATOR ITM_OPERATOR_={__ITM_OPERATOR__};
 #define ITM_OPERATOR__ (&ITM_OPERATOR_)
@@ -1471,7 +1485,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__PJL;
+  __ITM_READ parent_itm_read__1JL;
 };
 __ITM_READ_ARG1 ITM_READ_ARG1_={__ITM_READ_ARG1__};
 #define ITM_READ_ARG1__ (&ITM_READ_ARG1_)
@@ -1481,7 +1495,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__2LL;
+  __ITM_READ parent_itm_read__IML;
 };
 __ITM_READ_ARG2 ITM_READ_ARG2_={__ITM_READ_ARG2__};
 #define ITM_READ_ARG2__ (&ITM_READ_ARG2_)
@@ -1491,16 +1505,16 @@ __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__K3L;
+  __ITM_CODE parent_itm_code__W3L;
 };
 __ITM_OLD ITM_OLD_={__ITM_OLD__};
 #define ITM_OLD__ (&ITM_OLD_)
 
 // ITM_EXTERN
-#define __ITM_EXTERN__ 95
+#define __ITM_EXTERN__ 97
 typedef struct ITM_EXTERN_struct __ITM_EXTERN;
 struct ITM_EXTERN_struct {
-  __ITM_CODE parent_itm_code__44M;
+  __ITM_CODE parent_itm_code__K5M;
 };
 __ITM_EXTERN ITM_EXTERN_;
 #define ITM_EXTERN__ (&ITM_EXTERN_)
@@ -1510,8 +1524,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__54M;
-  __BOOLEAN is_persistant__2HN;
+  __ITM_EXTERN parent_itm_extern__L5M;
+  __BOOLEAN is_persistant__IIN;
 };
 __ITM_EXTERNAL_TYPE ITM_EXTERNAL_TYPE_={__ITM_EXTERNAL_TYPE__};
 #define ITM_EXTERNAL_TYPE__ (&ITM_EXTERNAL_TYPE_)
@@ -1521,7 +1535,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__ZPDC;
+  void *list__KMDC;
 };
 __ITM_BLOCK ITM_BLOCK_={__ITM_BLOCK__};
 #define ITM_BLOCK__ (&ITM_BLOCK_)
@@ -1531,7 +1545,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__EGN;
+  __ITM_EXTERN parent_itm_extern__QGN;
 };
 __ITM_EXTERNAL ITM_EXTERNAL_={__ITM_EXTERNAL__};
 #define ITM_EXTERNAL__ (&ITM_EXTERNAL_)
@@ -1541,39 +1555,18 @@ __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__0DO;
+  __ITM_READ parent_itm_read__GEO;
 };
 __ITM_READ_ARGS ITM_READ_ARGS_={__ITM_READ_ARGS__};
 #define ITM_READ_ARGS__ (&ITM_READ_ARGS_)
 
-// HASHED_SET_NODE[FAST_ARRAY[STRING_CONSTANT]]
-#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__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_)
-
-// HASHED_SET[FAST_ARRAY[STRING_CONSTANT]]
-#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__SJQF;
-  __INTEGER count__JOQF;
-  void **buckets__XJQF;
-};
-__HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo_;
-#define HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo__ (&HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo_)
-
 // ARRAYED_COLLECTION[LIP_INTEGER]
 #define __ARRAYED_COLLECTIONoLIP_INTEGERo__ 98
 typedef struct ARRAYED_COLLECTIONoLIP_INTEGERo_struct __ARRAYED_COLLECTIONoLIP_INTEGERo;
 struct ARRAYED_COLLECTIONoLIP_INTEGERo_struct {
-  __INTEGER upper__NHXE;
-  __INTEGER capacity__PLXE;
-  void **storage__0LXE;
+  __INTEGER upper__GIXE;
+  __INTEGER capacity__IMXE;
+  void **storage__TMXE;
 };
 __ARRAYED_COLLECTIONoLIP_INTEGERo ARRAYED_COLLECTIONoLIP_INTEGERo_;
 #define ARRAYED_COLLECTIONoLIP_INTEGERo__ (&ARRAYED_COLLECTIONoLIP_INTEGERo_)
@@ -1582,7 +1575,7 @@ __ARRAYED_COLLECTIONoLIP_INTEGERo ARRAYED_COLLECTIONoLIP_INTEGERo_;
 #define __FAST_ARRAYoLIP_INTEGERo__ 99
 typedef struct FAST_ARRAYoLIP_INTEGERo_struct __FAST_ARRAYoLIP_INTEGERo;
 struct FAST_ARRAYoLIP_INTEGERo_struct {
-  __ARRAYED_COLLECTIONoLIP_INTEGERo parent_arrayed_collection__IYSE;
+  __ARRAYED_COLLECTIONoLIP_INTEGERo parent_arrayed_collection__3YSE;
 };
 __FAST_ARRAYoLIP_INTEGERo FAST_ARRAYoLIP_INTEGERo_;
 #define FAST_ARRAYoLIP_INTEGERo__ (&FAST_ARRAYoLIP_INTEGERo_)
@@ -1591,9 +1584,9 @@ __FAST_ARRAYoLIP_INTEGERo FAST_ARRAYoLIP_INTEGERo_;
 #define __ARRAYED_COLLECTIONoLIP_STRINGo__ 100
 typedef struct ARRAYED_COLLECTIONoLIP_STRINGo_struct __ARRAYED_COLLECTIONoLIP_STRINGo;
 struct ARRAYED_COLLECTIONoLIP_STRINGo_struct {
-  __INTEGER upper__2XPF;
-  __INTEGER capacity__E5PF;
-  void **storage__P5PF;
+  __INTEGER upper__WZPF;
+  __INTEGER capacity__4AQF;
+  void **storage__JBQF;
 };
 __ARRAYED_COLLECTIONoLIP_STRINGo ARRAYED_COLLECTIONoLIP_STRINGo_;
 #define ARRAYED_COLLECTIONoLIP_STRINGo__ (&ARRAYED_COLLECTIONoLIP_STRINGo_)
@@ -1602,7 +1595,7 @@ __ARRAYED_COLLECTIONoLIP_STRINGo ARRAYED_COLLECTIONoLIP_STRINGo_;
 #define __FAST_ARRAYoLIP_STRINGo__ 101
 typedef struct FAST_ARRAYoLIP_STRINGo_struct __FAST_ARRAYoLIP_STRINGo;
 struct FAST_ARRAYoLIP_STRINGo_struct {
-  __ARRAYED_COLLECTIONoLIP_STRINGo parent_arrayed_collection__V3FF;
+  __ARRAYED_COLLECTIONoLIP_STRINGo parent_arrayed_collection__G5FF;
 };
 __FAST_ARRAYoLIP_STRINGo FAST_ARRAYoLIP_STRINGo_;
 #define FAST_ARRAYoLIP_STRINGo__ (&FAST_ARRAYoLIP_STRINGo_)
@@ -1612,7 +1605,7 @@ __FAST_ARRAYoLIP_STRINGo FAST_ARRAYoLIP_STRINGo_;
 typedef struct LIP_BOOLEAN_struct __LIP_BOOLEAN;
 struct LIP_BOOLEAN_struct {
   unsigned long __id;
-  __BOOLEAN value__JFQD;
+  __BOOLEAN value__MGQD;
 };
 __LIP_BOOLEAN LIP_BOOLEAN_={__LIP_BOOLEAN__};
 #define LIP_BOOLEAN__ (&LIP_BOOLEAN_)
@@ -1625,8 +1618,8 @@ __LIP_BOOLEAN LIP_BOOLEAN_={__LIP_BOOLEAN__};
 typedef struct LIP_VALUE_struct __LIP_VALUE;
 struct LIP_VALUE_struct {
   unsigned long __id;
-  __LIP_CODE parent_lip_code__MIFE;
-  void *value__X0UE;
+  __LIP_CODE parent_lip_code__1IFE;
+  void *value__I1UE;
 };
 __LIP_VALUE LIP_VALUE_={__LIP_VALUE__};
 #define LIP_VALUE__ (&LIP_VALUE_)
@@ -1635,9 +1628,9 @@ __LIP_VALUE LIP_VALUE_={__LIP_VALUE__};
 #define __ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo__ 102
 typedef struct ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo_struct __ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo;
 struct ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo_struct {
-  __INTEGER upper__ISTD;
-  __INTEGER capacity__JEUD;
-  void **storage__FFUD;
+  __INTEGER upper__PTTD;
+  __INTEGER capacity__QFUD;
+  void **storage__MGUD;
 };
 __ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo_;
 #define ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo__ (&ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo_)
@@ -1646,7 +1639,7 @@ __ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo ARRAYED_COLLECTIONoFAST_ARRAYoLIP_COD
 #define __FAST_ARRAYoFAST_ARRAYoLIP_CODEoo__ 103
 typedef struct FAST_ARRAYoFAST_ARRAYoLIP_CODEoo_struct __FAST_ARRAYoFAST_ARRAYoLIP_CODEoo;
 struct FAST_ARRAYoFAST_ARRAYoLIP_CODEoo_struct {
-  __ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo parent_arrayed_collection__APID;
+  __ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo parent_arrayed_collection__WOID;
 };
 __FAST_ARRAYoFAST_ARRAYoLIP_CODEoo FAST_ARRAYoFAST_ARRAYoLIP_CODEoo_;
 #define FAST_ARRAYoFAST_ARRAYoLIP_CODEoo__ (&FAST_ARRAYoFAST_ARRAYoLIP_CODEoo_)
@@ -1691,9 +1684,9 @@ __LIP_SLOT_DATA LIP_SLOT_DATA_;
 #define __ARRAYED_COLLECTIONoLIP_SLOT_DATAo__ 108
 typedef struct ARRAYED_COLLECTIONoLIP_SLOT_DATAo_struct __ARRAYED_COLLECTIONoLIP_SLOT_DATAo;
 struct ARRAYED_COLLECTIONoLIP_SLOT_DATAo_struct {
-  __INTEGER upper__GBQF;
-  __INTEGER capacity__NHQF;
-  void **storage__YHQF;
+  __INTEGER upper__ADQF;
+  __INTEGER capacity__HJQF;
+  void **storage__SJQF;
 };
 __ARRAYED_COLLECTIONoLIP_SLOT_DATAo ARRAYED_COLLECTIONoLIP_SLOT_DATAo_;
 #define ARRAYED_COLLECTIONoLIP_SLOT_DATAo__ (&ARRAYED_COLLECTIONoLIP_SLOT_DATAo_)
@@ -1702,7 +1695,7 @@ __ARRAYED_COLLECTIONoLIP_SLOT_DATAo ARRAYED_COLLECTIONoLIP_SLOT_DATAo_;
 #define __FAST_ARRAYoLIP_SLOT_DATAo__ 109
 typedef struct FAST_ARRAYoLIP_SLOT_DATAo_struct __FAST_ARRAYoLIP_SLOT_DATAo;
 struct FAST_ARRAYoLIP_SLOT_DATAo_struct {
-  __ARRAYED_COLLECTIONoLIP_SLOT_DATAo parent_arrayed_collection__WZUE;
+  __ARRAYED_COLLECTIONoLIP_SLOT_DATAo parent_arrayed_collection__H0UE;
 };
 __FAST_ARRAYoLIP_SLOT_DATAo FAST_ARRAYoLIP_SLOT_DATAo_;
 #define FAST_ARRAYoLIP_SLOT_DATAo__ (&FAST_ARRAYoLIP_SLOT_DATAo_)
@@ -1720,9 +1713,9 @@ __LIP_SLOT_CODE LIP_SLOT_CODE_;
 #define __ARRAYED_COLLECTIONoLIP_SLOT_CODEo__ 111
 typedef struct ARRAYED_COLLECTIONoLIP_SLOT_CODEo_struct __ARRAYED_COLLECTIONoLIP_SLOT_CODEo;
 struct ARRAYED_COLLECTIONoLIP_SLOT_CODEo_struct {
-  __INTEGER upper__S0KF;
-  __INTEGER capacity__OCQF;
-  void **storage__ZCQF;
+  __INTEGER upper__M2KF;
+  __INTEGER capacity__IEQF;
+  void **storage__TEQF;
 };
 __ARRAYED_COLLECTIONoLIP_SLOT_CODEo ARRAYED_COLLECTIONoLIP_SLOT_CODEo_;
 #define ARRAYED_COLLECTIONoLIP_SLOT_CODEo__ (&ARRAYED_COLLECTIONoLIP_SLOT_CODEo_)
@@ -1731,7 +1724,7 @@ __ARRAYED_COLLECTIONoLIP_SLOT_CODEo ARRAYED_COLLECTIONoLIP_SLOT_CODEo_;
 #define __FAST_ARRAYoLIP_SLOT_CODEo__ 112
 typedef struct FAST_ARRAYoLIP_SLOT_CODEo_struct __FAST_ARRAYoLIP_SLOT_CODEo;
 struct FAST_ARRAYoLIP_SLOT_CODEo_struct {
-  __ARRAYED_COLLECTIONoLIP_SLOT_CODEo parent_arrayed_collection__I0KF;
+  __ARRAYED_COLLECTIONoLIP_SLOT_CODEo parent_arrayed_collection__C2KF;
 };
 __FAST_ARRAYoLIP_SLOT_CODEo FAST_ARRAYoLIP_SLOT_CODEo_;
 #define FAST_ARRAYoLIP_SLOT_CODEo__ (&FAST_ARRAYoLIP_SLOT_CODEo_)
@@ -1740,9 +1733,9 @@ __FAST_ARRAYoLIP_SLOT_CODEo FAST_ARRAYoLIP_SLOT_CODEo_;
 #define __HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__ 113
 typedef struct HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo_struct __HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo;
 struct HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo_struct {
-  void *key__HSEC;
-  void *item__0SEC;
-  void *next__SSEC;
+  void *key__YOEC;
+  void *item__LPEC;
+  void *next__DPEC;
 };
 __HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo_;
 #define HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__ (&HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo_)
@@ -1751,9 +1744,9 @@ __HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo HASHED_DICTIONARY_NODEoSECTIO
 #define __HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo__ 114
 typedef struct HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo_struct __HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo;
 struct HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo_struct {
-  __INTEGER capacity__WREC;
-  __INTEGER count__Y1FC;
-  void **buckets__1REC;
+  __INTEGER capacity__HOEC;
+  __INTEGER count__JYFC;
+  void **buckets__MOEC;
 };
 __HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo_;
 #define HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo__ (&HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo_)
@@ -1762,9 +1755,9 @@ __HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo HASHED_DICTIONARYoSECTION_xSTRING_
 #define __HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__ 115
 typedef struct HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo_struct __HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo;
 struct HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo_struct {
-  void *item__AVEC;
-  void *key__NUEC;
-  void *next__YUEC;
+  void *item__RREC;
+  void *key__4QEC;
+  void *next__JREC;
 };
 __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 +1766,9 @@ __HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo HASHED_DICTIONARY_N
 #define __HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__ 116
 typedef struct HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo_struct __HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo;
 struct HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo_struct {
-  __INTEGER capacity__2TEC;
-  __INTEGER count__S4FC;
-  void **buckets__BUEC;
+  __INTEGER capacity__NQEC;
+  __INTEGER count__D1FC;
+  void **buckets__SQEC;
 };
 __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 +1777,9 @@ __HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo HASHED_DICTIONARYoSECTIO
 #define __ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo__ 117
 typedef struct ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo_struct __ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo;
 struct ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo_struct {
-  __INTEGER upper__JWGC;
-  __INTEGER capacity__RNHC;
-  void **storage__2NHC;
+  __INTEGER upper__0SGC;
+  __INTEGER capacity__CKHC;
+  void **storage__NKHC;
 };
 __ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo_;
 #define ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo__ (&ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo_)
@@ -1795,7 +1788,7 @@ __ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo ARRAYED_COLLECTIONoFAST_ARRAYoITM
 #define __FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo__ 118
 typedef struct FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo_struct __FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo;
 struct FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo_struct {
-  __ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo parent_arrayed_collection__CW1B;
+  __ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo parent_arrayed_collection__PS1B;
 };
 __FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo_;
 #define FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo__ (&FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo_)
@@ -1813,9 +1806,9 @@ __ALIAS_ARRAYoITM_ARGUMENTo ALIAS_ARRAYoITM_ARGUMENTo_;
 #define __ARRAYED_COLLECTIONoITM_SLOTo__ 120
 typedef struct ARRAYED_COLLECTIONoITM_SLOTo_struct __ARRAYED_COLLECTIONoITM_SLOTo;
 struct ARRAYED_COLLECTIONoITM_SLOTo_struct {
-  __INTEGER upper__NNTD;
-  __INTEGER capacity__YBWE;
-  void **storage__1OWE;
+  __INTEGER upper__UOTD;
+  __INTEGER capacity__RCWE;
+  void **storage__UPWE;
 };
 __ARRAYED_COLLECTIONoITM_SLOTo ARRAYED_COLLECTIONoITM_SLOTo_;
 #define ARRAYED_COLLECTIONoITM_SLOTo__ (&ARRAYED_COLLECTIONoITM_SLOTo_)
@@ -1824,7 +1817,7 @@ __ARRAYED_COLLECTIONoITM_SLOTo ARRAYED_COLLECTIONoITM_SLOTo_;
 #define __FAST_ARRAYoITM_SLOTo__ 121
 typedef struct FAST_ARRAYoITM_SLOTo_struct __FAST_ARRAYoITM_SLOTo;
 struct FAST_ARRAYoITM_SLOTo_struct {
-  __ARRAYED_COLLECTIONoITM_SLOTo parent_arrayed_collection__QMTD;
+  __ARRAYED_COLLECTIONoITM_SLOTo parent_arrayed_collection__XNTD;
 };
 __FAST_ARRAYoITM_SLOTo FAST_ARRAYoITM_SLOTo_;
 #define FAST_ARRAYoITM_SLOTo__ (&FAST_ARRAYoITM_SLOTo_)
@@ -1856,12 +1849,12 @@ struct TYPE_CONTEXT_struct {
 __TYPE_CONTEXT TYPE_CONTEXT_={__TYPE_CONTEXT__};
 #define TYPE_CONTEXT__ (&TYPE_CONTEXT_)
 
-// UINTEGER_64
-typedef unsigned long long __UINTEGER_64;
-
 // INTEGER_32
 typedef signed long __INTEGER_32;
 
+// UINTEGER_64
+typedef unsigned long long __UINTEGER_64;
+
 // INTEGER_64
 typedef signed long long __INTEGER_64;
 
@@ -1873,25 +1866,25 @@ void *table_type[122];
 //==========================//
 
 void *parent_numeric__J;
-__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;
+__INTEGER type_error__5PG;
+void *msg_err__AQG;
 void *prototype_list__BJ;
-void *prototype_dico__5TS;
-void *list_tmp__RMTD;
-void *str_tmp__QO4E;
-void *str_tmp2__SQ4E;
-void *str_tmp3__SU4E;
+void *prototype_dico__LUS;
+void *list_tmp__YNTD;
+void *str_tmp__PP4E;
+void *str_tmp2__RR4E;
+void *str_tmp3__RV4E;
 void *list_id__CBB;
-void *string_tmp__AGD;
-void *string_tmp2__Y2AC;
-void *alias__RGD;
-void *string_tmp3__42AC;
-void *bucket_name__NVOB;
-void *bucket_list__IXOB;
+void *string_tmp__LGD;
+void *string_tmp2__JZAC;
+void *alias__2GD;
+void *string_tmp3__PZAC;
+void *bucket_name__2ROB;
+void *bucket_list__XTOB;
+__POINTER begin_memory__4XH;
+__UINTEGER_32 nb_page__DUJ;
+__UINTEGER_64 capacity_max__R54;
+void *first_free__0BVB;
 void *short_dico__QD;
 void *object__ZBC;
 void *source__5BC;
@@ -1902,46 +1895,46 @@ __INTEGER pos_col__HCC;
 __BOOLEAN is_active_short__OCC;
 __INTEGER short_derive__PCC;
 void *short_local__XCC;
-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;
+void *last_comment_extern__XZC;
+void *last_string__D2C;
+void *last_section__S2C;
+void *token__BED;
+__BOOLEAN skip_comment__ZBE;
+void *last_comment_slot__LCE;
+__INTEGER begin_position__BDE;
+__BOOLEAN is_parameter_type__AME;
+void *last_group__TWF;
+__INTEGER old_position__ITI;
+__INTEGER old_pos_cur__KTI;
+__INTEGER old_pos_line__MTI;
+__INTEGER old_pos_col__OTI;
+__INTEGER old_short_derive__QTI;
+__INTEGER_64 last_integer__VSO;
+void *last_slot__VUOB;
+void *dico__JKP;
+void *dico__1MN;
+void *type_void__WYF;
+void *dico__XVI;
+void *type_self__DVN;
+void *type_null__1VN;
+void *dico__CPR;
+void *dico__TYP;
+void *list_data__HONC;
+void *stack__I0UE;
+void *list_method__D2KF;
+void *storage__4YSE;
+void *storage__H5FF;
 __UINTEGER_32 clone_allocation_size__NTB;
-__POINTER get_begin_memory__EEQB;
+__POINTER get_begin_memory__RAQB;
 void *list__FK;
-void *free__ROP;
+void *free__3OP;
 void *string_tmp__VH;
 void *output_code__SI;
-void *string_tmp3__2TD;
-void *string_tmp4__4TD;
-void *output_decl__YGE;
-void *string_tmp2__0BJ;
-void *path_file__BEXF;
+void *string_tmp3__HUD;
+void *string_tmp4__JUD;
+void *output_decl__VHE;
+void *string_tmp2__GCJ;
+void *path_file__1FXF;
 __BOOLEAN is_short_recursive__JB;
 __BOOLEAN is_shorter2__VI;
 __BOOLEAN is_shorter__LZ;
@@ -1954,23 +1947,23 @@ void *input_name__3B;
 void *proto_input__BI;
 void *output_name__DI;
 void *format_name__N1;
-void *string_tmp__SWX;
+void *string_tmp__4VX;
 __INTEGER index_count__P5;
-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;
+void *free_list__GVP;
+void *empty_list__NWP;
+void *bucket__YWP;
+void *free_list__0TI;
+void *free_list__QAI;
+void *free_list__1AL;
+void *empty_list__IOMF;
+void *bucket__SOMF;
+void *true__5YLF;
+void *free_list__XOID;
+__INTEGER last_integer__AZUE;
+void *last_string__SZUE;
+__BOOLEAN push_back_flag__P0MF;
+__CHARACTER memory__OGMF;
+void *free_list__QS1B;
 
 //==========================//
 // STRING CONSTANT          //
@@ -2137,7 +2130,7 @@ __STRING_CONSTANT __string_153={__STRING_CONSTANT__,18,"directory_list_end"};
 __STRING_CONSTANT __string_154={__STRING_CONSTANT__,15,"file_list_begin"};
 __STRING_CONSTANT __string_155={__STRING_CONSTANT__,14,"file_list_item"};
 __STRING_CONSTANT __string_156={__STRING_CONSTANT__,13,"file_list_end"};
-__STRING_CONSTANT __string_157={__STRING_CONSTANT__,1979,"------------------\
+__STRING_CONSTANT __string_157={__STRING_CONSTANT__,1976,"------------------\
 ----------------------------------------------\n--                   Lisaac \
 source Shorter                    --\n--            LORIA - LSIIT - ULP - CN\
 RS - FRANCE             --\n--         Benoit SONNTAG - sonntag at icps.u-stras\
@@ -2160,11 +2153,11 @@ lude code source                    \n  -r               : recursive builder\
 ml documentation:                               \n    shorter -r -f html ~/l\
 isaac/lib                         \n                                        \
                     \n  * Build html documentation style JavaDoc:           \
-      \n    shorter -d -f javadoc ~/lisaac/lib                         \n   \
-                                                         \nBug report:      \
-                                           \n            post in : https://g\
-na.org/bugs/?group=isaac     \n            mail to : sonntag at icps.u-strasbg.\
-fr             \n"};
+      \n    shorter -d -f belinda ~/lisaac/lib                      \n      \
+                                                      \nBug report:         \
+                                        \n            post in : https://gna.\
+org/bugs/?group=isaac     \n            mail to : sonntag at icps.u-strasbg.fr \
+            \n"};
 __STRING_CONSTANT __string_158={__STRING_CONSTANT__,8,"shorter/"};
 __STRING_CONSTANT __string_159={__STRING_CONSTANT__,3,".li"};
 __STRING_CONSTANT __string_160={__STRING_CONSTANT__,20,"Error: File format `"};
@@ -2183,23 +2176,23 @@ __STRING_CONSTANT __string_168={__STRING_CONSTANT__,17,"Incorrect symbol."};
 __STRING_CONSTANT __string_169={__STRING_CONSTANT__,18,"Error: directory `"};
 __STRING_CONSTANT __string_170={__STRING_CONSTANT__,13,"\' not found.\n"};
 __STRING_CONSTANT __string_171={__STRING_CONSTANT__,12,"\' not open.\n"};
-__STRING_CONSTANT __string_172={__STRING_CONSTANT__,14,"directory_list"};
-__STRING_CONSTANT __string_173={__STRING_CONSTANT__,9,"file_list"};
-__STRING_CONSTANT __string_174={__STRING_CONSTANT__,22,"Inherit/Insert Summa\
+__STRING_CONSTANT __string_172={__STRING_CONSTANT__,4,".txt"};
+__STRING_CONSTANT __string_173={__STRING_CONSTANT__,14,"directory_list"};
+__STRING_CONSTANT __string_174={__STRING_CONSTANT__,9,"file_list"};
+__STRING_CONSTANT __string_175={__STRING_CONSTANT__,22,"Inherit/Insert Summa\
 ry"};
-__STRING_CONSTANT __string_175={__STRING_CONSTANT__,12,"Slot Summary"};
-__STRING_CONSTANT __string_176={__STRING_CONSTANT__,7,"inherit"};
-__STRING_CONSTANT __string_177={__STRING_CONSTANT__,6,"insert"};
-__STRING_CONSTANT __string_178={__STRING_CONSTANT__,14," No developed."};
-__STRING_CONSTANT __string_179={__STRING_CONSTANT__,6,"create"};
-__STRING_CONSTANT __string_180={__STRING_CONSTANT__,19,"Constructor Summary"};
-__STRING_CONSTANT __string_181={__STRING_CONSTANT__,21,"Inherit/Insert Detail"};
-__STRING_CONSTANT __string_182={__STRING_CONSTANT__,11,"Detail slot"};
-__STRING_CONSTANT __string_183={__STRING_CONSTANT__,7," line #"};
-__STRING_CONSTANT __string_184={__STRING_CONSTANT__,8,"Section:"};
-__STRING_CONSTANT __string_185={__STRING_CONSTANT__,8,"Profile:"};
-__STRING_CONSTANT __string_186={__STRING_CONSTANT__,18,"Constructor Detail"};
-__STRING_CONSTANT __string_187={__STRING_CONSTANT__,19,"Not enough memory.\n"};
+__STRING_CONSTANT __string_176={__STRING_CONSTANT__,12,"Slot Summary"};
+__STRING_CONSTANT __string_177={__STRING_CONSTANT__,7,"inherit"};
+__STRING_CONSTANT __string_178={__STRING_CONSTANT__,6,"insert"};
+__STRING_CONSTANT __string_179={__STRING_CONSTANT__,14," No developed."};
+__STRING_CONSTANT __string_180={__STRING_CONSTANT__,6,"create"};
+__STRING_CONSTANT __string_181={__STRING_CONSTANT__,19,"Constructor Summary"};
+__STRING_CONSTANT __string_182={__STRING_CONSTANT__,21,"Inherit/Insert Detail"};
+__STRING_CONSTANT __string_183={__STRING_CONSTANT__,11,"Detail slot"};
+__STRING_CONSTANT __string_184={__STRING_CONSTANT__,7," line #"};
+__STRING_CONSTANT __string_185={__STRING_CONSTANT__,8,"Section:"};
+__STRING_CONSTANT __string_186={__STRING_CONSTANT__,8,"Profile:"};
+__STRING_CONSTANT __string_187={__STRING_CONSTANT__,18,"Constructor Detail"};
 __STRING_CONSTANT __string_188={__STRING_CONSTANT__,4,"_add"};
 __STRING_CONSTANT __string_189={__STRING_CONSTANT__,4,"_sub"};
 __STRING_CONSTANT __string_190={__STRING_CONSTANT__,9,"_logicnot"};
@@ -2241,45 +2234,45 @@ __STRING_CONSTANT __string_221={__STRING_CONSTANT__,1,"."};
 __STRING_CONSTANT __string_222={__STRING_CONSTANT__,20,"Warning: directory `"};
 __STRING_CONSTANT __string_223={__STRING_CONSTANT__,36,"Error: Double defini\
 tion prototype:\n"};
-__STRING_CONSTANT __string_224={__STRING_CONSTANT__,4,".txt"};
-__STRING_CONSTANT __string_225={__STRING_CONSTANT__,12,"Error: File "};
-__STRING_CONSTANT __string_226={__STRING_CONSTANT__,18," is not created !\n"};
-__STRING_CONSTANT __string_227={__STRING_CONSTANT__,15," is not open !\n"};
-__STRING_CONSTANT __string_228={__STRING_CONSTANT__,20,"`Section' is needed."};
-__STRING_CONSTANT __string_229={__STRING_CONSTANT__,27,"Section `Header' is \
+__STRING_CONSTANT __string_224={__STRING_CONSTANT__,12,"Error: File "};
+__STRING_CONSTANT __string_225={__STRING_CONSTANT__,18," is not created !\n"};
+__STRING_CONSTANT __string_226={__STRING_CONSTANT__,15," is not open !\n"};
+__STRING_CONSTANT __string_227={__STRING_CONSTANT__,20,"`Section' is needed."};
+__STRING_CONSTANT __string_228={__STRING_CONSTANT__,27,"Section `Header' is \
 needed."};
-__STRING_CONSTANT __string_230={__STRING_CONSTANT__,22,"Slot `name' not foun\
+__STRING_CONSTANT __string_229={__STRING_CONSTANT__,22,"Slot `name' not foun\
 d."};
-__STRING_CONSTANT __string_231={__STRING_CONSTANT__,23,"Incorrect type secti\
+__STRING_CONSTANT __string_230={__STRING_CONSTANT__,23,"Incorrect type secti\
 on."};
-__STRING_CONSTANT __string_232={__STRING_CONSTANT__,50,"`Section Inherit/Ins\
+__STRING_CONSTANT __string_231={__STRING_CONSTANT__,50,"`Section Inherit/Ins\
 ert' must to be first section."};
-__STRING_CONSTANT __string_233={__STRING_CONSTANT__,78,"`Section Inherit' is\
+__STRING_CONSTANT __string_232={__STRING_CONSTANT__,78,"`Section Inherit' is\
  not possible with Expanded object (Use `Section Insert')."};
-__STRING_CONSTANT __string_234={__STRING_CONSTANT__,31,"No argument for inte\
+__STRING_CONSTANT __string_233={__STRING_CONSTANT__,31,"No argument for inte\
 rrupt slot."};
-__STRING_CONSTANT __string_235={__STRING_CONSTANT__,33,"No argument for inhe\
+__STRING_CONSTANT __string_234={__STRING_CONSTANT__,33,"No argument for inhe\
 ritance slot."};
-__STRING_CONSTANT __string_236={__STRING_CONSTANT__,27,"Incorrect slot decla\
+__STRING_CONSTANT __string_235={__STRING_CONSTANT__,27,"Incorrect slot decla\
 ration."};
-__STRING_CONSTANT __string_237={__STRING_CONSTANT__,22,"Incorrect result typ\
+__STRING_CONSTANT __string_236={__STRING_CONSTANT__,22,"Incorrect result typ\
 e."};
-__STRING_CONSTANT __string_238={__STRING_CONSTANT__,20,"Added ')' is needed."};
-__STRING_CONSTANT __string_239={__STRING_CONSTANT__,36,"Incorrect type for i\
+__STRING_CONSTANT __string_237={__STRING_CONSTANT__,20,"Added ')' is needed."};
+__STRING_CONSTANT __string_238={__STRING_CONSTANT__,36,"Incorrect type for i\
 nheritance slot."};
-__STRING_CONSTANT __string_240={__STRING_CONSTANT__,21,"Incorrect expression."};
-__STRING_CONSTANT __string_241={__STRING_CONSTANT__,7,"__init_"};
-__STRING_CONSTANT __string_242={__STRING_CONSTANT__,10,"Added ';'."};
-__STRING_CONSTANT __string_243={__STRING_CONSTANT__,24,"Double slot declarat\
+__STRING_CONSTANT __string_239={__STRING_CONSTANT__,21,"Incorrect expression."};
+__STRING_CONSTANT __string_240={__STRING_CONSTANT__,7,"__init_"};
+__STRING_CONSTANT __string_241={__STRING_CONSTANT__,10,"Added ';'."};
+__STRING_CONSTANT __string_242={__STRING_CONSTANT__,24,"Double slot declarat\
 ion."};
-__STRING_CONSTANT __string_244={__STRING_CONSTANT__,38,"Invariant: Sorry, No\
+__STRING_CONSTANT __string_243={__STRING_CONSTANT__,38,"Invariant: Sorry, No\
 t yet implemented."};
-__STRING_CONSTANT __string_245={__STRING_CONSTANT__,9,"Postfix '"};
-__STRING_CONSTANT __string_246={__STRING_CONSTANT__,7,"Infix '"};
-__STRING_CONSTANT __string_247={__STRING_CONSTANT__,8,"Prefix '"};
-__STRING_CONSTANT __string_248={__STRING_CONSTANT__,12,"Description:"};
-__STRING_CONSTANT __string_249={__STRING_CONSTANT__,1,"+"};
-__STRING_CONSTANT __string_250={__STRING_CONSTANT__,1,"-"};
+__STRING_CONSTANT __string_244={__STRING_CONSTANT__,9,"Postfix '"};
+__STRING_CONSTANT __string_245={__STRING_CONSTANT__,7,"Infix '"};
+__STRING_CONSTANT __string_246={__STRING_CONSTANT__,8,"Prefix '"};
+__STRING_CONSTANT __string_247={__STRING_CONSTANT__,12,"Description:"};
+__STRING_CONSTANT __string_248={__STRING_CONSTANT__,1,"+"};
+__STRING_CONSTANT __string_249={__STRING_CONSTANT__,1,"-"};
+__STRING_CONSTANT __string_250={__STRING_CONSTANT__,19,"Not enough memory.\n"};
 __STRING_CONSTANT __string_251={__STRING_CONSTANT__,29,"Unterminated string \
 constant."};
 __STRING_CONSTANT __string_252={__STRING_CONSTANT__,27,"Incorrect style slot\
@@ -2451,211 +2444,228 @@ __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__FTJ(__UINTEGER_32 t__HTJ);
+static __POINTER new_lab__RTJ(__UINTEGER_32 t__TTJ);
+static void** create__2DRB(__INTEGER nb_elements__4DRB);
+static __INTEGER fast_first_index_of__until__OLC(__CHARACTER *Self__PLC);
+static __CHARACTER* create__YIEB(__INTEGER nb_elements__0IEB);
+static __POINTER realloc_dynamic__old_size__new_size__KELC(__POINTER p__MELC,__UINTEGER_32 old_sz__NELC,__UINTEGER_32 new_sz__OELC);
+static void add_last__URV(__FAST_ARRAYoSTRINGo *Self__VRV,void *element__WRV);
+static __INTEGER prime_number_ceiling__021(__INTEGER integer__221);
+static void** create__QA4(__INTEGER nb_elements__SA4);
+static void** create__ZITC(__INTEGER nb_elements__1ITC);
+static void** create__JDSB(__INTEGER nb_elements__LDSB);
+static void** create__0E4(__INTEGER nb_elements__2E4);
+static void** create__PX2(__INTEGER nb_elements__RX2);
 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 __FAST_ARRAYoITM_TYPE_MONOo* create_with_capacity__EGR(__INTEGER new_count__GGR);
+static void** create__SWBB(__INTEGER nb_elements__UWBB);
+static void** create__PJXB(__INTEGER nb_elements__RJXB);
+static void** create__KSWB(__INTEGER nb_elements__MSWB);
+static void** create__JQXB(__INTEGER nb_elements__LQXB);
+static void** create__OG5(__INTEGER nb_elements__QG5);
+static void fast_put__to__JPZ(__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *Self__KPZ,void *v__LPZ,void *k__MPZ);
+static void** create__VFYB(__INTEGER nb_elements__XFYB);
+static void* get__IVI(void *n__KVI);
+static void** create__NFQB(__INTEGER nb_elements__PFQB);
+static void** create__3ZPB(__INTEGER nb_elements__5ZPB);
+static void** create__Z1ZB(__INTEGER nb_elements__11ZB);
+static __FAST_ARRAYoSTRING_CONSTANTo* create_with_capacity__THRC(__INTEGER new_count__VHRC);
+static void** create__FNUF(__INTEGER nb_elements__HNUF);
+static void** create__JPGF(__INTEGER nb_elements__LPGF);
+static void** create__ARYF(__INTEGER nb_elements__CRYF);
+static void** create__R2IE(__INTEGER nb_elements__T2IE);
+static void* search__XAVB(__UINTEGER_32 new_size__ZAVB);
+static void** create__C3XC(__INTEGER nb_elements__E3XC);
+static void** create__FCYC(__INTEGER nb_elements__HCYC);
+static void** create__3MBD(__INTEGER nb_elements__5MBD);
+static void** create__BJFF(__INTEGER nb_elements__DJFF);
+static void** create__EI2(__INTEGER nb_elements__GI2);
+static void add__EZR(__HASHED_SEToABSTRACT_STRINGo *Self__FZR,void *e__GZR);
 static void* operator__name__GHB(void *op__JHB);
-static void print__DJD(__STRING_CONSTANT *Self__EJD);
+static void print__OJD(__STRING_CONSTANT *Self__PJD);
 static void* get__YWB(void *str__0WB);
-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 void copy__VDS(__STRING *Self__WDS,void *other__XDS);
+static void append__3OS(__STRING *Self__4OS,void *other__5OS);
+static void* parent_directory__GGD();
+static void* get_entry__DZAC(void *p__FZAC);
+static void put_string__33F(void *s__53F);
 static __PROTOTYPE* create__name__generic_count__JBC(void *f__LBC,void *n__MBC);
-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 __BOOLEAN read_space__XTD();
+static __BOOLEAN read_identifier__2BL();
+static __POSITION current_position__B0F();
+static void put_error__text__1PG(__INTEGER type__3PG,void *txt__4PG);
+static void put_position__FRG(__POSITION Self__GRG);
+static __BOOLEAN fast_has__IDT(__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__JDT,void *k__KDT);
+static __INTEGER hash_code__RNW(__STRING_CONSTANT *Self__SNW);
+static __BOOLEAN read_symbol__4YJ(void *st__AZJ);
+static __BOOLEAN read_short_elt__EIKB();
+static void fast_put__to__U2R(__HASHED_DICTIONARYoTYPExSTRING_CONSTANTo *Self__V2R,void *k__X2R);
 static __TYPE_FULL* create__with__CRB(void *typ__ERB,__UINTEGER_8 code__FRB);
-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** create__1VNB(__INTEGER nb_elements__3VNB);
+static void add_last__K5R(__FAST_ARRAYoTYPE_IDo *Self__L5R,void *element__M5R);
+static __BOOLEAN open__WHRD(__DIRECTORY_UNIX *Self__XHRD);
+static void check_in__begin__ZQQC(void *entry__1QQC,__INTEGER n__2QQC);
+static void* fast_at__LV3(__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__MV3,void *k__NV3);
 static void save_file__with__3DC(void *n__5DC,void *buf__AEC);
-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 resize__1VZ(__STRING *Self__2VZ,__INTEGER new_count__3VZ);
+static void move__to__by__LVCC(__CHARACTER *Self__MVCC,__INTEGER lower__NVCC,__INTEGER upper__OVCC,__INTEGER offset__PVCC);
+static __BOOLEAN __infix_equal_equal__V2DB(__STRING_CONSTANT *Self__W2DB,void *other__X2DB);
+static void* at__JK4(__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__KK4,void *k__LK4);
+static __BOOLEAN has_suffix__QJS(__STRING_CONSTANT *Self__RJS);
+static void replace_all__with__CRS(__STRING *Self__DRS,__CHARACTER old_char__ERS,__CHARACTER new_char__FRS);
+static __INTEGER last_index__NTC(void *n__PTC,__CHARACTER c__QTC);
+static void remove_between__to__MIT(__STRING *Self__NIT,__INTEGER start__OIT,__INTEGER end__PIT);
+static void to_upper__PTS(__STRING *Self__QTS);
 static void go_on__SBC(void *obj__UBC);
-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);
+static void put__to__like__X4XD(void *tok__Z4XD,void *buf__04XD,void *key__14XD);
+static void shorter_get_all_slot_in__ZAYD(__PROTOTYPE *Self__0AYD,void *lst__1AYD);
+static void pretty_name_in__FY4F(__ITM_SLOT *Self__GY4F,void *buffer__HY4F);
+static void pretty_name_in__0Z4F(__ITM_SLOT_OPERATOR *Self__1Z4F,void *buffer__2Z4F);
+static __BOOLEAN has_prefix__OTTF(__STRING_CONSTANT *Self__PTTF,void *p__QTTF);
+static void get_all_comment_slot__in__PL4E(__PROTOTYPE *Self__QL4E,void *n__RL4E,void *buf__SL4E);
+static void shorter_comment__in__light__CP4E(void *str__EP4E,void *buf__FP4E,__BOOLEAN is_light__GP4E);
+static void append_in__5KH(__UINTEGER_32 Self__ALH,void *buffer__BLH);
+static void append_in__S14F(__SECTION_ *Self__T14F,void *buf__U14F);
+static void shorter_profile_in__U24F(__ITM_SLOT *Self__V24F,void *buf__W24F);
+static void shorter_profile_in__R34F(__ITM_SLOT_OPERATOR *Self__S34F,void *buf__T34F);
+static void* new_page__H54();
+static void to_busy__index__3SFC(__MEMORY *Self__4SFC,__UINTEGER_32 sz__5SFC,__UINTEGER_32 idx__ATFC);
+static void** create__W5QB(__INTEGER nb_elements__Y5QB);
+static void* fast_reference_at__R3T(__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *Self__S3T,void *k__T3T);
+static void** create__QMHE(__INTEGER nb_elements__SMHE);
+static __BOOLEAN has__PPW(__HASHED_SEToABSTRACT_STRINGo *Self__QPW,void *e__RPW);
+static void increase_capacity__XONB(__HASHED_SEToABSTRACT_STRINGo *Self__YONB);
+static void put_string__AKF(void *s__CKF);
+static __INTEGER hash_code__UFX(__STRING *Self__VFX);
+static __BOOLEAN fast_has__CAY(__HASHED_SEToABSTRACT_STRINGo *Self__DAY,void *e__EAY);
+static void from_external__YZS(__STRING *Self__ZZS,__CHARACTER *p__0ZS);
+static void* physical_get_entry__REF(void *new_path__TEF);
+static void put__to__N1S(__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *Self__O1S,void *v__P1S,void *k__Q1S);
+static void reduce_path__J3HC(void *st__L3HC);
+static void* reference_at__VV0C(__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *Self__WV0C,void *k__XV0C);
+static __INTEGER fast_reverse_index_of__from__KA3(__CHARACTER *Self__LA3,__CHARACTER element__MA3,__INTEGER upper__NA3);
+static void* physical_get_entry__JY0C(void *new_path__LY0C);
+static void** create__G01C(__INTEGER nb_elements__I01C);
+static void** create__PRSC(__INTEGER nb_elements__RRSC);
+static void short__token__to__GDD(void *key__IDD,__INTEGER beg__JDD,__INTEGER end__KDD);
+static __INTEGER first_substring_index__W0ZE(__STRING *Self__X0ZE);
+static __BOOLEAN read_string__HGQ();
+static __BOOLEAN fast_memcmp__until__FYYB(__CHARACTER *Self__GYYB,__CHARACTER *other__HYYB,__INTEGER capacity__IYYB);
+static void reduce_path__UO3E(void *st__WO3E);
+static void* item__V3PE(__DIRECTORY_UNIX *Self__W3PE,__INTEGER i__X3PE);
+static void* item__X3ND(__LINKED_LISToSTRING_CONSTANTo *Self__Y3ND,__INTEGER i__Z3ND);
+static void** create__KZ3(__INTEGER nb_elements__MZ3);
+static __BOOLEAN read_word__ISF(void *st__KSF);
+static __BOOLEAN read_slot_header__KFE(__BOOLEAN first__MFE);
+static void* get_name__TROB(void *n__VROB);
+static void* read_type_list__ENO(__PARSER *Self__FNO,__BOOLEAN is_section__GNO);
+static __INTEGER hash_code__S30(__FAST_ARRAYoITM_TYPE_MONOo *Self__T30);
+static __CHARACTER read_style__PUF();
+static __FAST_ARRAYoITM_ARGUMENTo* create_with_capacity__LJ5B(__INTEGER new_count__NJ5B);
+static void* read_loc_arg__with_self__BBHB(__PARSER *Self__CBHB,__BOOLEAN mute__DBHB,__BOOLEAN self_first__EBHB);
+static void* read_slot_operator__RS5B(void *list_arg__TS5B);
+static void add_last__E5GC(__FAST_ARRAYoITM_ARGUMENTo *Self__F5GC,void *element__G5GC);
+static void* read_slot_keyword__4X5B(void *list_arg__AY5B);
+static void** create__PRBD(__INTEGER nb_elements__RRBD);
+static void set_argument_list__5BHC(__ITM_SLOT *Self__ACHC,void *p__BCHC);
+static __ITM_TYPE_MULTI* get__4JP(void *lt__AKP);
+static void* read_type__CDM(__PARSER *Self__DDM,__BOOLEAN is_local__EDM);
+static void set_result_type__W2FC(__ITM_SLOT *Self__X2FC,void *t__Y2FC);
+static void* read_contract__5VF(__PARSER *Self__AWF);
+static void* read_expr__DBJ(__PARSER *Self__EBJ);
+static void set_value__type__DFHC(__ITM_SLOT *Self__EFHC,void *e__FFHC,void *p__GFHC);
+static __POSITION position__5A5B(__ITM_EXPRESSION *Self__AB5B);
+static __POSITION position__PIHC(__ITM_RESULT *Self__QIHC);
+static void fast_put__to__LNGC(__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *Self__MNGC,void *v__NNGC,void *k__ONGC);
+static void* fast_reference_at__05FC(__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *Self__15FC,void *k__25FC);
+static void* fast_reference_at__CMNE(__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__DMNE,void *k__EMNE);
+static void append_in__PJPD(__ITM_TYPE_BLOCK *Self__QJPD,void *buffer__RJPD);
+static void append_in__TKPD(__ITM_TYPE_GENERIC *Self__UKPD,void *buffer__VKPD);
+static void put__to__like__JNBG(void *tok__LNBG,void *buf__MNBG,void *key__NNBG);
+static void shorter_in__KKBG(__ITM_ARG *Self__LKBG,void *buf__MKBG);
+static void shorter_in__BLBG(__ITM_ARGS *Self__CLBG,void *buf__DLBG);
+static void shorter_in__0TDG(__ITM_TYPE_PARAMETER *Self__1TDG,void *buf__2TDG);
+static void shorter_in__LUDG(__ITM_TYPE_SIMPLE *Self__MUDG,void *buf__NUDG);
+static void shorter_raw_in__M2FG(__ITM_TYPE_MULTI *Self__N2FG,void *buf__O2FG);
+static void shorter_in__2UDG(__ITM_TYPE_BLOCK *Self__3UDG,void *buf__4UDG);
+static void shorter_in__EWDG(__ITM_TYPE_GENERIC *Self__FWDG,void *buf__GWDG);
+static void put__to__like__I0FG(void *tok__K0FG,void *buf__L0FG,void *key__M0FG);
+static void put__to__like__S0DG(void *tok__U0DG,void *buf__V0DG,void *key__W0DG);
+static void set_path__HPT(__DIRECTORY_UNIX *Self__IPT,void *n__JPT);
+static void set_path__CQT(__FILE_UNIX *Self__DQT,void *n__EQT);
+static __INTEGER last_index_of__since__KPGD(__STRING *Self__LPGD,__INTEGER start_index__NPGD);
+static void insert_string__to__OXU(__STRING *Self__PXU,void *s__QXU,__INTEGER i__RXU);
+static void read_escape_character__AALF();
+static __BOOLEAN read_cap_identifier__N1J();
+static void add_last__NABC(__FAST_ARRAYoITM_TYPE_PARAMETERo *Self__OABC,void *element__PABC);
+static __BOOLEAN read_external__2TO();
+static void* read_expr_primary__E5M(__PARSER *Self__F5M);
+static __BOOLEAN read_integer__22P();
+static void* readlip_expr__YRPB();
+static void run__0FFC(__LIP_AFFECT *Self__1FFC);
+static void run__WQUE(__LIP_CALL *Self__XQUE);
+static void run__ZFQD(__LIP_IF *Self__0FQD);
+static void run__KVUE(__LIP_PRINT *Self__LVUE);
+static void add_last__ONV(__FAST_ARRAYoITM_TYPE_MONOo *Self__PNV,void *element__QNV);
+static void* alias__CWP(void *tmp__EWP);
+static void add__1IHB(__HASHED_SEToSTRING_CONSTANTo *Self__2IHB,void *e__3IHB);
+static void add_last__SEPD(__FAST_ARRAYoSTRING_CONSTANTo *Self__TEPD,void *element__UEPD);
+static void free__TR5(void *tmp__VR5);
+static void free__YNQ(void *tmp__0NQ);
+static __INTEGER hash_code__NVRF(__FAST_ARRAYoSTRING_CONSTANTo *Self__OVRF);
+static void copy__BASD(__FAST_ARRAYoSTRING_CONSTANTo *Self__CASD,void *other__DASD);
+static __BOOLEAN fast_has__H4RF(__HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo *Self__I4RF,void *e__J4RF);
+static __BOOLEAN read_operator__GOM();
+static void* operator__name__ZEO(void *typ__1EO,void *op__2EO);
+static void append_in__MHBC(__ITM_TYPE_MULTI *Self__NHBC,void *buffer__OHBC);
+static void* read_prototype__DPN(__PARSER *Self__EPN,void *styl__FPN);
+static void read_def_local__M3H(__PARSER *Self__N3H);
+static __FAST_ARRAYoITM_CODEo* create_with_capacity__XXI(__INTEGER new_count__ZXI);
+static void add_last__I5U(__FAST_ARRAYoITM_CODEo *Self__J5U,void *element__K5U);
+static void* copy__5BI(void *tmp__BCI);
+static __BOOLEAN fast_has__RDV(__HASHED_SEToSTRING_CONSTANTo *Self__SDV,void *e__TDV);
+static void restore_context__EFL();
+static void* read_expr_message__LXL(__PARSER *Self__MXL);
+static void free__3XI(void *tmp__5XI);
+static void display_raw__MLIC(__ITM_TYPE_MULTI *Self__NLIC,void *buffer__OLIC);
+static void put__to__like__URGG(void *tok__WRGG,void *buf__XRGG,void *key__YRGG);
+static void put__to__like__NYDG(void *tok__PYDG,void *buf__QYDG,void *key__RYDG);
+static void put__to__like__GVFG(void *tok__IVFG,void *buf__JVFG);
+static void put__to__like__ZXFG(void *tok__1XFG,void *buf__2XFG,void *key__3XFG);
+static __BOOLEAN is_hexadecimal_digit__DQJE(__CHARACTER Self__EQJE);
+static void* read_constant__XRO();
+static void* read_group__C4GB(__PARSER *Self__D4GB);
+static void* readlip_expr_operator__GMZB(__PARSER *Self__HMZB);
+static __FAST_ARRAYoLIP_CODEo* create_with_capacity__DWKD(__INTEGER new_count__FWKD);
+static void add_last__JOUD(__FAST_ARRAYoLIP_CODEo *Self__KOUD,void *element__LOUD);
+static void* copy__ZPID(void *tmp__1PID);
+static void* fast_reference_at__PXRD(__HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo *Self__QXRD,void *k__RXRD);
+static void* run_expr__D2QD(__LIP_BINARY *Self__E2QD);
+static void* run_expr__C5QD(__LIP_UNARY *Self__D5QD);
+static void* run_expr__IXUE(__LIP_CALL *Self__JXUE);
+static void* get__UYSE(__LIP_INTEGER *Self__VYSE,__INTEGER i__WYSE);
+static void* get__34FF(__LIP_STRING *Self__44FF,void *str__54FF);
+static void free__3D4F(__LIP_INTEGER *Self__4D4F);
+static void free__LIIG(__LIP_STRING *Self__MIIG);
+static void load_directory__is_recursive__LEXF(__LIP_CALL *Self__MEXF,void *path__NEXF,__BOOLEAN is_rec__OEXF);
+static void append_in__FPIG(__LIP_STRING *Self__GPIG,void *str__HPIG);
+static void print_positif__VHLG(__INTEGER Self__WHLG);
+static __BOOLEAN fast_has__1K1(__HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo *Self__2K1,void *e__3K1);
+static __BOOLEAN has__MIMB(__HASHED_SEToSTRING_CONSTANTo *Self__NIMB,void *e__OIMB);
+static __FAST_ARRAYoITM_LOCALo* create_with_capacity__LLK(__INTEGER new_count__NLK);
+static void add_last__Z1U(__FAST_ARRAYoITM_LOCALo *Self__01U,void *element__11U);
+static void free__RLK(void *tmp__TLK);
+static void* copy__05J(void *tmp__25J);
+static void append_collection__RDPD(__FAST_ARRAYoITM_LOCALo *Self__SDPD,void *other__TDPD);
+static void** create__KRQB(__INTEGER nb_elements__MRQB);
+static void* read_send_msg__I5N(__PARSER *Self__J5N,void *first_arg__K5N);
+static void* readlip_expr_cmp__0Y1B(__PARSER *Self__1Y1B);
+static void** create__3WIE(__INTEGER nb_elements__5WIE);
+static void** create__KPQB(__INTEGER nb_elements__MPQB);
+static void* read_argument__PPP(__PARSER *Self__QPP);
+static void* readlip_expr_binary__XL3B(__PARSER *Self__YL3B);
+static void* readlip_expr_unary__YX4B(__PARSER *Self__ZX4B);
+static void* readlip_expr_base__QHFE(__PARSER *Self__RHFE);
 
 //==========================//
 // SOURCE CODE              //
@@ -2663,440 +2673,426 @@ static void* readlip_expr_base__BHFE(__PARSER *Self__CHFE);
 
 int main(int argc,char **argv)
 {
-  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 *str__1ID,*cmd__HZ;
+  __INTEGER new_count__DNLH,typ_id__2MLH,Self__PJF,limit_up__QJF;
+  __INTEGER i__5KEB,new_capacity__UUIH,old_nb_elts__XUIH,upper__RNLH;
+  __INTEGER Self__PNLH,typ_id__SWG,new_capacity__ZKY,typ_id__50DB;
+  __INTEGER new_capacity__DVJC,typ_id__PPJ,typ_id__CQH;
+  __INTEGER new_capacity__ZMY,typ_id__PPC,new_capacity__UKX,typ_id__D1Q;
+  __INTEGER typ_id__AFR,new_capacity__3G1,typ_id__QTQ,typ_id__W1O;
+  __INTEGER typ_id__33Q,typ_id__KNK,new_capacity__3FZ,typ_id__NXQ;
+  __INTEGER typ_id__JWR,typ_id__HKK,typ_id__QAK,typ_id__KMM;
+  __INTEGER typ_id__ZJOF,new_capacity__U0RF,typ_id__QAG,typ_id__SVTE;
+  __INTEGER typ_id__MTMF,typ_id__W5NF,typ_id__BZMD,typ_id__YXED;
+  __INTEGER new_capacity__PFXD,Self__EPYE,typ_id__S0NF,Self__HQAG;
+  __INTEGER typ_id__PLNF,Self__APAG,typ_id__E1YB,new_capacity__ZFOC;
+  __INTEGER typ_id__J4YB,new_capacity__UJOC,typ_id__DI5B,typ_id__3CIE;
+  __INTEGER typ_id__ZUB,new_capacity__QZW,j__IZ,__tmp__P4,typ_id__2UIH;
+  __INTEGER new_capacity__WNT,old_nb_elts__WBFH,upper__CQ3C,Self__KWDD;
+  __INTEGER typ_id__DEKB,h__WMEB,idx__XMEB,idx__YFZB,new_capacity__ZFZB;
+  __INTEGER i__0FZB,typ_id__HIZB,typ_id__EVIH,typ_id__OVIH,typ_id__YVIH;
+  __INTEGER typ_id__ORED,typ_id__CZB,Self__BQWD,typ_id__E3B;
+  __INTEGER typ_id__CWIH,typ_id__W4B,i__QHHH,j__SHHH,Self__I1LH,i__UHHH;
+  __INTEGER j__WHHH,Self__N1LH,i__BAC,n__3VGH,Self__30QC,limit_up__40QC;
+  __INTEGER __tmp__GHYD,Self__2G5D,__tmp__5LYD,Self__OH5D,__tmp__WOTD;
+  __INTEGER Self__PQYD,__tmp__2BRE,Self__GKSE,__tmp__HRYD,Self__JI5D;
+  __INTEGER __tmp__DUYD,Self__YI5D,__tmp__LQTD,Self__WWYD,__tmp__VGRE;
+  __INTEGER Self__YKSE,__tmp__LRTD,Self__FXYD;
+  __POINTER ptr__1MLH,ptr_table__FNLH,next__ENLH,result__GNLH;
+  __POINTER ptr_table__KNLH,next__JNLH,result__LNLH,ptr__NWG;
+  __POINTER ptr_table__UNLH,next__TNLH,result__VNLH,ptr_table__ZNLH;
+  __POINTER next__YNLH,result__0NLH,ptr__00DB,ptr_table__4NLH;
+  __POINTER next__3NLH,result__5NLH,ptr_table__DOLH,next__COLH;
+  __POINTER result__EOLH,ptr__KPJ,ptr_table__IOLH,next__HOLH;
+  __POINTER result__JOLH,ptr_table__NOLH,next__MOLH,result__OOLH;
+  __POINTER ptr__3PH,ptr_table__SOLH,next__ROLH,result__TOLH;
+  __POINTER ptr_table__XOLH,next__WOLH,result__YOLH,ptr__KPC;
+  __POINTER ptr_table__2OLH,next__1OLH,result__3OLH,ptr_table__BPLH;
+  __POINTER next__APLH,result__CPLH,ptr__40Q,ptr_table__GPLH,next__FPLH;
+  __POINTER result__HPLH,ptr_table__LPLH,next__KPLH,result__MPLH;
+  __POINTER ptr__1ER,ptr_table__QPLH,next__PPLH,result__RPLH;
+  __POINTER ptr_table__VPLH,next__UPLH,result__WPLH,ptr__LTQ;
+  __POINTER ptr_table__0PLH,next__ZPLH,result__1PLH,ptr_table__5PLH;
+  __POINTER next__4PLH,result__AQLH,ptr__R1O,ptr_table__EQLH,next__DQLH;
+  __POINTER result__FQLH,ptr_table__JQLH,next__IQLH,result__KQLH;
+  __POINTER ptr__Y3Q,ptr_table__OQLH,next__NQLH,result__PQLH;
+  __POINTER ptr_table__TQLH,next__SQLH,result__UQLH,ptr__FNK;
+  __POINTER ptr_table__YQLH,next__XQLH,result__ZQLH,ptr_table__3QLH;
+  __POINTER next__2QLH,result__4QLH,ptr__IXQ,ptr_table__CRLH,next__BRLH;
+  __POINTER result__DRLH,ptr_table__HRLH,next__GRLH,result__IRLH;
+  __POINTER ptr__EWR,ptr_table__MRLH,next__LRLH,result__NRLH;
+  __POINTER ptr_table__RRLH,next__QRLH,result__SRLH,ptr__CKK;
+  __POINTER ptr_table__WRLH,next__VRLH,result__XRLH,ptr_table__1RLH;
+  __POINTER next__0RLH,result__2RLH,ptr__LAK,ptr_table__ASLH,next__5RLH;
+  __POINTER result__BSLH,ptr_table__FSLH,next__ESLH,result__GSLH;
+  __POINTER ptr__FMM,ptr_table__KSLH,next__JSLH,result__LSLH;
+  __POINTER ptr_table__PSLH,next__OSLH,result__QSLH,ptr__UJOF;
+  __POINTER ptr_table__USLH,next__TSLH,result__VSLH,ptr_table__ZSLH;
+  __POINTER next__YSLH,result__0SLH,ptr__LAG,ptr_table__4SLH,next__3SLH;
+  __POINTER result__5SLH,ptr_table__DTLH,next__CTLH,result__ETLH;
+  __POINTER ptr__NVTE,ptr_table__ITLH,next__HTLH,result__JTLH;
+  __POINTER ptr_table__NTLH,next__MTLH,result__OTLH,ptr__HTMF;
+  __POINTER ptr_table__STLH,next__RTLH,result__TTLH,ptr_table__XTLH;
+  __POINTER next__WTLH,result__YTLH,ptr__R5NF,ptr_table__2TLH;
+  __POINTER next__1TLH,result__3TLH,ptr_table__BULH,next__AULH;
+  __POINTER result__CULH,ptr__2YMD,ptr_table__GULH,next__FULH;
+  __POINTER result__HULH,ptr_table__LULH,next__KULH,result__MULH;
+  __POINTER ptr__TXED,ptr_table__QULH,next__PULH,result__RULH;
+  __POINTER ptr_table__VULH,next__UULH,result__WULH,result__PGHH;
+  __POINTER ptr_table__0ULH,next__ZULH,result__1ULH,ptr__N0NF;
+  __POINTER ptr_table__5ULH,next__4ULH,result__AVLH,ptr_table__EVLH;
+  __POINTER next__DVLH,result__FVLH,result__XGHH,ptr_table__JVLH;
+  __POINTER next__IVLH,result__KVLH,ptr__KLNF,ptr_table__OVLH;
+  __POINTER next__NVLH,result__PVLH,ptr_table__TVLH,next__SVLH;
+  __POINTER result__UVLH,result__5GHH,ptr_table__YVLH,next__XVLH;
+  __POINTER result__ZVLH,ptr__50YB,ptr_table__3VLH,next__2VLH;
+  __POINTER result__4VLH,ptr_table__CWLH,next__BWLH,result__DWLH;
+  __POINTER ptr__E4YB,ptr_table__HWLH,next__GWLH,result__IWLH;
+  __POINTER ptr_table__MWLH,next__LWLH,result__NWLH,ptr__4H5B;
+  __POINTER ptr_table__RWLH,next__QWLH,result__SWLH,ptr_table__WWLH;
+  __POINTER next__VWLH,result__XWLH,ptr__YCIE,ptr_table__1WLH;
+  __POINTER next__0WLH,result__2WLH,ptr_table__AXLH,next__5WLH;
+  __POINTER result__BXLH,ptr__UUB,ptr_table__FXLH,next__EXLH;
+  __POINTER result__GXLH,ptr_table__KXLH,next__JXLH,result__LXLH;
+  __POINTER ptr__1UIH,ptr_table__PXLH,next__OXLH,result__QXLH;
+  __POINTER ptr_table__UXLH,next__TXLH,result__VXLH,ptr__4DKB;
+  __POINTER ptr_table__2XLH,next__1XLH,result__3XLH,ptr_table__BYLH;
+  __POINTER next__AYLH,result__CYLH,ptr__CIZB,ptr_table__GYLH;
+  __POINTER next__FYLH,result__HYLH,ptr_table__LYLH,next__KYLH;
+  __POINTER result__MYLH,ptr__DVIH,ptr_table__QYLH,next__PYLH;
+  __POINTER result__RYLH,ptr_table__VYLH,next__UYLH,result__WYLH;
+  __POINTER ptr__NVIH,ptr_table__0YLH,next__ZYLH,result__1YLH;
+  __POINTER ptr_table__5YLH,next__4YLH,result__AZLH,ptr__XVIH;
+  __POINTER ptr_table__HZLH,next__GZLH,result__IZLH,ptr_table__MZLH;
+  __POINTER next__LZLH,result__NZLH,ptr__JRED,ptr_table__RZLH;
+  __POINTER next__QZLH,result__SZLH,ptr_table__WZLH,next__VZLH;
+  __POINTER result__XZLH,ptr__3YB,ptr_table__1ZLH,next__0ZLH;
+  __POINTER result__2ZLH,ptr_table__A0LH,next__5ZLH,result__B0LH;
+  __POINTER result__HHHH,ptr_table__F0LH,next__E0LH,result__G0LH;
+  __POINTER ptr__52B,ptr_table__K0LH,next__J0LH,result__L0LH;
+  __POINTER ptr_table__P0LH,next__O0LH,result__Q0LH,ptr__BWIH;
+  __POINTER ptr_table__U0LH,next__T0LH,result__V0LH,ptr_table__Z0LH;
+  __POINTER next__Y0LH,result__00LH,ptr__R4B,ptr_table__40LH,next__30LH;
+  __POINTER result__50LH,ptr_table__D1LH,next__C1LH,result__E1LH;
+  __UINTEGER_32 sz__3MLH,a__4MLH,new_size__5MLH,t__ANLH,a__BNLH;
+  __UINTEGER_32 new_size__NNLH,lab_type__MNLH,sz__PWG,a__ONGH;
+  __UINTEGER_32 new_size__PNGH,t__TNGH,a__SNGH,new_size__2NLH;
+  __UINTEGER_32 lab_type__1NLH,sz__20DB,a__WNGH,new_size__XNGH,t__1NGH;
+  __UINTEGER_32 a__0NGH,new_size__GOLH,lab_type__FOLH,sz__MPJ,a__4NGH;
+  __UINTEGER_32 new_size__5NGH,t__DOGH,a__COGH,new_size__QOLH;
+  __UINTEGER_32 lab_type__POLH,sz__5PH,a__GOGH,new_size__HOGH,t__LOGH;
+  __UINTEGER_32 a__KOGH,new_size__0OLH,lab_type__ZOLH,sz__MPC,a__OOGH;
+  __UINTEGER_32 new_size__POGH,t__TOGH,a__SOGH,new_size__EPLH;
+  __UINTEGER_32 lab_type__DPLH,sz__A1Q,a__WOGH,new_size__XOGH,t__1OGH;
+  __UINTEGER_32 a__0OGH,new_size__OPLH,lab_type__NPLH,sz__3ER,a__4OGH;
+  __UINTEGER_32 new_size__5OGH,t__DPGH,a__CPGH,new_size__YPLH;
+  __UINTEGER_32 lab_type__XPLH,sz__NTQ,a__GPGH,new_size__HPGH,t__LPGH;
+  __UINTEGER_32 a__KPGH,new_size__CQLH,lab_type__BQLH,sz__T1O,a__OPGH;
+  __UINTEGER_32 new_size__PPGH,t__TPGH,a__SPGH,new_size__MQLH;
+  __UINTEGER_32 lab_type__LQLH,sz__03Q,a__WPGH,new_size__XPGH,t__1PGH;
+  __UINTEGER_32 a__0PGH,new_size__WQLH,lab_type__VQLH,sz__HNK,a__4PGH;
+  __UINTEGER_32 new_size__5PGH,t__DQGH,a__CQGH,new_size__ARLH;
+  __UINTEGER_32 lab_type__5QLH,sz__KXQ,a__NCFH,new_size__OCFH,t__SCFH;
+  __UINTEGER_32 a__RCFH,new_size__KRLH,lab_type__JRLH,sz__GWR,a__GQGH;
+  __UINTEGER_32 new_size__HQGH,t__LQGH,a__KQGH,new_size__URLH;
+  __UINTEGER_32 lab_type__TRLH,sz__EKK,a__OQGH,new_size__PQGH,t__TQGH;
+  __UINTEGER_32 a__SQGH,new_size__4RLH,lab_type__3RLH,sz__NAK,a__WQGH;
+  __UINTEGER_32 new_size__XQGH,t__1QGH,a__0QGH,new_size__ISLH;
+  __UINTEGER_32 lab_type__HSLH,sz__HMM,a__4QGH,new_size__5QGH,t__DRGH;
+  __UINTEGER_32 a__CRGH,new_size__SSLH,lab_type__RSLH,sz__WJOF,a__GRGH;
+  __UINTEGER_32 new_size__HRGH,t__LRGH,a__KRGH,new_size__2SLH;
+  __UINTEGER_32 lab_type__1SLH,sz__NAG,a__1BFH,new_size__L0G,t__U1G;
+  __UINTEGER_32 a__BCFH,new_size__GTLH,lab_type__FTLH,sz__PVTE,a__ORGH;
+  __UINTEGER_32 new_size__PRGH,t__TRGH,a__SRGH,new_size__QTLH;
+  __UINTEGER_32 lab_type__PTLH,sz__JTMF,a__WRGH,new_size__XRGH,t__1RGH;
+  __UINTEGER_32 a__0RGH,new_size__0TLH,lab_type__ZTLH,sz__T5NF,a__4RGH;
+  __UINTEGER_32 new_size__5RGH,t__DSGH,a__CSGH,new_size__EULH;
+  __UINTEGER_32 lab_type__DULH,sz__4YMD,a__GSGH,new_size__HSGH,t__LSGH;
+  __UINTEGER_32 a__KSGH,new_size__OULH,lab_type__NULH,sz__VXED,a__OSGH;
+  __UINTEGER_32 new_size__PSGH,t__TSGH,a__SSGH,new_size__YULH;
+  __UINTEGER_32 lab_type__XULH,sz__RGHH,a__QGHH,new_size__SGHH;
+  __UINTEGER_32 new_size2__TGHH,a__UGHH,new_size__VGHH,sz__P0NF,a__WSGH;
+  __UINTEGER_32 new_size__XSGH,t__1SGH,a__0SGH,new_size__HVLH;
+  __UINTEGER_32 lab_type__GVLH,sz__ZGHH,a__YGHH,new_size__0GHH;
+  __UINTEGER_32 new_size2__1GHH,a__2GHH,new_size__3GHH,sz__MLNF,a__4SGH;
+  __UINTEGER_32 new_size__5SGH,t__DTGH,a__CTGH,new_size__WVLH;
+  __UINTEGER_32 lab_type__VVLH,sz__BHHH,a__AHHH,new_size__CHHH;
+  __UINTEGER_32 new_size2__DHHH,a__EHHH,new_size__FHHH,sz__B1YB,a__GTGH;
+  __UINTEGER_32 new_size__HTGH,t__LTGH,a__KTGH,new_size__FWLH;
+  __UINTEGER_32 lab_type__EWLH,sz__G4YB,a__OTGH,new_size__PTGH,t__TTGH;
+  __UINTEGER_32 a__STGH,new_size__PWLH,lab_type__OWLH,sz__AI5B,a__WTGH;
+  __UINTEGER_32 new_size__XTGH,t__1TGH,a__0TGH,new_size__ZWLH;
+  __UINTEGER_32 lab_type__YWLH,sz__0CIE,a__4TGH,new_size__5TGH,t__DUGH;
+  __UINTEGER_32 a__CUGH,new_size__DXLH,lab_type__CXLH,sz__WUB,a__GUGH;
+  __UINTEGER_32 new_size__HUGH,t__LUGH,a__KUGH,new_size__NXLH;
+  __UINTEGER_32 lab_type__MXLH,sz__3UIH,a__4UIH,new_size__5UIH,t__AVIH;
+  __UINTEGER_32 a__BVIH,new_size__XXLH,lab_type__WXLH,sz__AEKB,a__PUGH;
+  __UINTEGER_32 new_size__QUGH,t__UUGH,a__TUGH,new_size__EYLH;
+  __UINTEGER_32 lab_type__DYLH,sz__EIZB,a__0UGH,new_size__1UGH,t__5UGH;
+  __UINTEGER_32 a__4UGH,new_size__OYLH,lab_type__NYLH,sz__FVIH,a__GVIH;
+  __UINTEGER_32 new_size__HVIH,t__IVIH,a__JVIH,new_size__YYLH;
+  __UINTEGER_32 lab_type__XYLH,sz__PVIH,a__QVIH,new_size__RVIH,t__SVIH;
+  __UINTEGER_32 a__TVIH,new_size__CZLH,lab_type__BZLH,sz__ZVIH,a__0VIH;
+  __UINTEGER_32 new_size__1VIH,t__2VIH,a__3VIH,new_size__PZLH;
+  __UINTEGER_32 lab_type__OZLH,sz__LRED,a__QQFH,new_size__RQFH,t__VQFH;
+  __UINTEGER_32 a__UQFH,new_size__ZZLH,lab_type__YZLH,sz__5YB,a__IVGH;
+  __UINTEGER_32 new_size__JVGH,t__NVGH,a__MVGH,new_size__D0LH;
+  __UINTEGER_32 lab_type__C0LH,sz__JHHH,a__IHHH,new_size__KHHH;
+  __UINTEGER_32 new_size2__LHHH,a__MHHH,new_size__NHHH,sz__B3B,a__QVGH;
+  __UINTEGER_32 new_size__RVGH,t__VVGH,a__UVGH,new_size__S0LH;
+  __UINTEGER_32 lab_type__R0LH,sz__DWIH,a__EWIH,new_size__FWIH,t__GWIH;
+  __UINTEGER_32 a__HWIH,new_size__20LH,lab_type__10LH,sz__T4B,a__MIFH;
+  __UINTEGER_32 new_size__NIFH,t__RIFH,a__QIFH,new_size__G1LH;
+  __UINTEGER_32 lab_type__F1LH;
+  __STRING *Self__3KEB,*Self__UNT,*new__IX1G,*new__KX1G,*Self__PHHH;
+  __STRING *Self__THHH,*Self__XHHH,*Self__2VGH;
+  __ITM_TYPE_PARAMETER *result__HXQ,*Self__52V;
+  __LIP_BOOLEAN *result__Q5NF;
+  void *txt__1,*fmt_name__GOC,*__tmp__UPD,*k__PMEB,*element__EVGH;
+  void *i__LVIH,*element__KTEC,*i__5VIH,*__tmp__4B,*__tmp__2H;
+  void *title__ZMTD,*__tmp__RJYD,*__tmp__4JYD,*__tmp__HKYD,*__tmp__2KYD;
+  void *__tmp__LOTD,*__tmp__KOYD,*__tmp__XOYD,*__tmp__APYD,*__tmp__VPYD;
+  void *__tmp__FPTD,*t__VBRE,*__tmp__MPTD,*__tmp__HERE,*__tmp__UERE;
+  void *__tmp__3ERE,*__tmp__SFRE,*__tmp__RTYD,*__tmp__CQTD,*__tmp__NWYD;
+  void *__tmp__ZQTD,*t__OGRE,*__tmp__ARTD,*__tmp__5IRE;
   void *p__AB;
-  __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;
+  __STRING_CONSTANT *result__0UIH,*Self__JXS,*Self__MUGH,*Self__AOS;
+  __STRING_CONSTANT *Self__HX1G,*Self__JX1G;
+  __POSITION pos__2S1G,pos__GT1G,pos__YU1G,pos__0U1G,pos__2U1G;
+  __POSITION pos__4U1G,pos__AV1G,__tmp__1SYD,__tmp__ATYD,__tmp__XVYD;
+  __POSITION __tmp__2VYD,__tmp__JIRE,__tmp__OIRE;
+  __TYPE_ID *result__AWIH,*result__Q4B;
   void *ent__TB;
-  __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;
+  __DIRECTORY_UNIX *Self__NLSD;
+  void *dir__PLSD,*dir__XLSD,*__tmp__AD,*dir__SB;
+  __FILE_UNIX *Self__1LRD;
+  __PROTOTYPE *Self__XMTD;
+  void *s__0MTD,*s__CHYD,*s__1LYD,*s__YBRE,*s__DRYD,*s__5TYD,*s__RGRE;
+  void *__tmp__SRTD;
+  void *__tmp__BOTD,*__tmp__1IYD,*__tmp__UNYD,*__tmp__RDRE,*__tmp__YPTD;
+  void *__tmp__JTYD,*__tmp__FWYD,*__tmp__XIRE;
+  __SECTION_ *Self__RL2G,*Self__SL2G,*Self__TL2G,*Self__UL2G,*Self__VL2G;
+  void *__tmp__JJYD,*__tmp__COYD,*__tmp__5DRE;
+  void *__tmp__LJYD,*ts__IJYD,*__tmp__EOYD,*ts__BOYD,*__tmp__BERE;
+  void *ts__4DRE;
+  __CHARACTER *arg__0ID,*p__4KEB,*Self__WUIH,*new__YUIH,*path__KZ;
+  __CHARACTER *Self__VBFH,*new__YBFH,*Self__J1LH,*model__K1LH;
+  __CHARACTER *Self__O1LH,*model__P1LH;
+  __FAST_ARRAYoSTRINGo *result__0MLH,*Self__CNLH,*result__KAG,*Self__AGT;
+  void *result__ZID;
+  __CHARACTER ch__ZUIH,result__ZXLH,result__EZLH,result__4VDH;
+  __CHARACTER result__BMDH,__tmp__CJYD,__tmp__1NYD,__tmp__YDRE;
+  __HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *result__MWG,*Self__SKT;
+  __HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *result__Z0DB;
+  __HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *Self__ULCC;
+  __FAST_ARRAYoPROTOTYPEo *result__JPJ,*Self__NEU;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *result__2PH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__ZOT;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__NMEB;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__CUVB;
+  __HASHED_DICTIONARYoTYPExSTRING_CONSTANTo *result__JPC,*Self__KQS;
+  __FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *result__30Q,*Self__L3V;
+  __HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo *result__0ER,*Self__3EW;
+  __FAST_ARRAYoITM_TYPE_MULTIo *result__KTQ,*Self__I1V;
+  __FAST_ARRAYoITM_TYPE_BLOCKo *result__Q1O,*Self__RJV;
+  __FAST_ARRAYoITM_TYPE_GENERICo *result__X3Q,*Self__4AW;
+  __HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *result__ENK;
+  __HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *Self__ANU;
+  __FAST_ARRAYoITM_TYPE_STYLEo *result__DWR,*Self__GLW;
+  __FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *result__BKK,*Self__EKU;
+  __FAST_ARRAYoFAST_ARRAYoITM_CODEoo *result__KAK,*Self__BHU;
+  __FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *result__EMM,*Self__HWU;
+  __HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo *result__TJOF,*Self__DOQF;
+  __FAST_ARRAYoLIP_INTEGERo *result__MVTE,*Self__5LXE;
+  __FAST_ARRAYoLIP_STRINGo *result__GTMF,*Self__VAQF;
+  __FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *result__1YMD,*Self__KKUD;
+  __HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo *result__SXED;
+  __HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo *Self__1OSD;
+  void **Result__UWHE;
+  __FAST_ARRAYoLIP_SLOT_DATAo *result__M0NF,*Self__4IQF;
+  void **Result__SK1F;
+  __FAST_ARRAYoLIP_SLOT_CODEo *result__JLNF,*Self__5DQF;
+  void **Result__ZF1F;
+  __HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo *result__40YB;
+  __HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo *Self__MWFC;
+  __HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *result__D4YB;
+  __HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *Self__LZFC;
+  __FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *result__3H5B,*Self__ZJHC;
+  __FAST_ARRAYoITM_SLOTo *result__XCIE,*Self__BPWE;
+  __HASHED_SEToABSTRACT_STRINGo *result__TUB,*Self__DDS;
+  __BOOLEAN __tmp__U0,__tmp__P1,result__Y2NB,__tmp__31,result__K3NB;
+  __BOOLEAN __tmp__L2,result__23NB,__tmp__Y2,result__O4NB,__tmp__14;
+  __BOOLEAN result__YXLH,result__5OEB,result__DZLH,result__MJG;
+  __BOOLEAN __tmp__JC,__tmp__FC,__tmp__UC,is_first_cur__BHYD;
+  __BOOLEAN __tmp__WHYD,__tmp__YJYD,__tmp__VJYD,__tmp__MKYD,__tmp__NKYD;
+  __BOOLEAN __tmp__QKYD,is_first_cur__0LYD,__tmp__PMYD,__tmp__ROYD;
+  __BOOLEAN __tmp__OOYD,__tmp__FPYD,__tmp__GPYD,__tmp__JPYD;
+  __BOOLEAN is_first_cur__XBRE,__tmp__MCRE,__tmp__OERE,__tmp__LERE;
+  __BOOLEAN __tmp__CFRE,__tmp__DFRE,__tmp__GFRE,is_first__CRYD;
+  __BOOLEAN __tmp__XRYD,is_first__4TYD,__tmp__TUYD,is_first__QGRE;
+  __BOOLEAN __tmp__FHRE;
+  __LINKED_LISToSTRING_CONSTANTo *result__3DKB,*Self__FVGH,*Self__JTEC;
+  void *node__YMEB,*node1__2FZB,*node2__3FZB,*__tmp__FOEB,*node__MUVB;
+  void **old_buckets__1FZB;
+  __HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *result__BIZB;
+  __HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__FDGC;
+  void *def__3OEB;
+  __LINKED_LIST_NODEoSTRING_CONSTANTo *result__CVIH,*Self__KVIH;
+  __LINKED_LIST_NODEoSTRING_CONSTANTo *result__MVIH,*Self__UVIH;
+  __LINKED_LIST_NODEoSTRING_CONSTANTo *result__WVIH,*Self__4VIH;
+  __LINKED_LIST_NODEoSTRING_CONSTANTo *result__IRED,*Self__JOSD;
+  __FAST_ARRAYoSLOTo *result__2YB,*Self__HFS;
+  void **Result__3J1C;
+  __FAST_ARRAYoTYPE_IDo *result__42B,*Self__GIS;
+  __INTEGER_8 __tmp__THYD,__tmp__MMYD,__tmp__5OTD,__tmp__JCRE;
+  __INTEGER_8 __tmp__URYD,__tmp__QUYD,__tmp__TQTD,__tmp__CHRE;
+  void **__tmp__4VGH;
   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__FRO=((__CHARACTER *)(NULL));
-  STRING__->storage__RCS=NULL;
-  nb_page__XTJ= 0;
+  STRING__->count__SGC= 0;
+  STRING_CONSTANT__->storage__RRO=((__CHARACTER *)(NULL));
+  STRING__->storage__3CS=NULL;
+  nb_page__DUJ= 0;
   MEMORY__->map_size_and_id__YTB= 0;
-  capacity_max__CD5= 0;
-  get_begin_memory__EEQB=((__POINTER )(NULL));
-  begin_memory__SXH=((__POINTER )(NULL));
+  capacity_max__R54= 0;
+  get_begin_memory__RAQB=((__POINTER )(NULL));
+  begin_memory__4XH=((__POINTER )(NULL));
   MEMORY__->map_previous_linear__XTB= 0;
-  first_free__NFVB=NULL;
+  first_free__0BVB=NULL;
   MEMORY__->map_next_free__ZTB=NULL;
   MEMORY__->map_previous_free__0TB=NULL;
-  STRING__->capacity__ICS= 0;
-  HASHED_SEToABSTRACT_STRINGo__->buckets__OZR=NULL;
-  HASHED_SEToABSTRACT_STRINGo__->capacity__JZR= 0;
-  HASHED_SEToABSTRACT_STRINGo__->count__P0R= 0;
+  STRING__->capacity__UCS= 0;
+  HASHED_SEToABSTRACT_STRINGo__->buckets__0ZR=NULL;
+  HASHED_SEToABSTRACT_STRINGo__->capacity__VZR= 0;
+  HASHED_SEToABSTRACT_STRINGo__->count__10R= 0;
   list__FK=NULL;
-  HASHED_SET_NODEoABSTRACT_STRINGo__->item__0ZR=NULL;
-  HASHED_SET_NODEoABSTRACT_STRINGo__->next__G0R=NULL;
+  HASHED_SET_NODEoABSTRACT_STRINGo__->item__G0R=NULL;
+  HASHED_SET_NODEoABSTRACT_STRINGo__->next__S0R=NULL;
   string_tmp__VH=create__ZBB( 256);
   is_shorter__LZ=FALSE__;
-  ARRAYED_COLLECTIONoSTRINGo__->upper__UKC= 0;
-  ARRAYED_COLLECTIONoSTRINGo__->capacity__2GT= 0;
-  ARRAYED_COLLECTIONoSTRINGo__->storage__HHT=NULL;
-  FAST_ARRAYoSTRINGo__->parent_arrayed_collection__RKC=(*ARRAYED_COLLECTIONoSTRINGo__);
-  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__;
+  ARRAYED_COLLECTIONoSTRINGo__->upper__CLC= 0;
+  ARRAYED_COLLECTIONoSTRINGo__->capacity__JGT= 0;
+  ARRAYED_COLLECTIONoSTRINGo__->storage__UGT=NULL;
+  FAST_ARRAYoSTRINGo__->parent_arrayed_collection__5KC=(*ARRAYED_COLLECTIONoSTRINGo__);
+  arg__0ID=NULL;
+  str__1ID=NULL;
+  new_count__DNLH=((__INTEGER )(arg_count));
+  result__0MLH=NULL;
+  ptr__1MLH=((__POINTER )(NULL));
+  typ_id__2MLH= 0;
+  sz__3MLH=((__UINTEGER_32 )sizeof(__FAST_ARRAYoSTRINGo));
+  if ((sz__3MLH ==  0)) {
+    result__0MLH=FAST_ARRAYoSTRINGo__;
   } else {
-    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);
+    typ_id__2MLH=__FAST_ARRAYoSTRINGo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__3MLH);
+    if ((typ_id__2MLH == (__INTEGER)(-  1))) {
+      a__4MLH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__5MLH=(__UINTEGER_32)((__UINTEGER_32)(sz__3MLH + a__4MLH) & (__UINTEGER_32)(~ a__4MLH));
+      ptr_table__FNLH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__5MLH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__ENLH=((__POINTER )(NULL));
+      result__GNLH=((__POINTER *)ptr_table__FNLH)[ 0];
+      if ((result__GNLH == (void *)NULL)) {
+        result__GNLH=new_lab__RTJ(new_size__5MLH);
+        next__ENLH=(void *)((unsigned long)result__GNLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5MLH)));
+        ((__POINTER *)next__ENLH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__FNLH)[ 0]=next__ENLH;
+      } else {
+        next__ENLH=((__POINTER *)result__GNLH)[ 0];
+        if ((next__ENLH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GNLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__5MLH <<  1)) <=  4096)) {
+            next__ENLH=(void *)((unsigned long)result__GNLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5MLH)));
+          } else {
+            next__ENLH=new_lab__RTJ(new_size__5MLH);
+          };
+          ((__POINTER *)next__ENLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__FNLH)[ 0]=next__ENLH;
+        } else {
+          ((__POINTER *)result__GNLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ENLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__GNLH=next__ENLH;
+        };
+      };
+      ptr__1MLH=result__GNLH;
+    } else {
+      t__ANLH=((__UINTEGER_32 )typ_id__2MLH);
+      a__BNLH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__NNLH=(__UINTEGER_32)((__UINTEGER_32)(sz__3MLH + a__BNLH) & (__UINTEGER_32)(~ a__BNLH));
+      ptr_table__KNLH=((__POINTER )(&(table_type[(t__ANLH)])));
+      lab_type__MNLH=(__UINTEGER_32)(t__ANLH |  1);
+      next__JNLH=((__POINTER )(NULL));
+      result__LNLH=((__POINTER *)ptr_table__KNLH)[ 0];
+      if ((result__LNLH == (void *)NULL)) {
+        result__LNLH=new_lab__RTJ(lab_type__MNLH);
+        next__JNLH=(void *)((unsigned long)result__LNLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NNLH)));
+        ((__POINTER *)next__JNLH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__KNLH)[ 0]=next__JNLH;
+      } else {
+        next__JNLH=((__POINTER *)result__LNLH)[ 0];
+        if ((next__JNLH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LNLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__NNLH <<  1)) <=  4096)) {
+            next__JNLH=(void *)((unsigned long)result__LNLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NNLH)));
+          } else {
+            next__JNLH=new_lab__RTJ(lab_type__MNLH);
+          };
+          ((__POINTER *)next__JNLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__KNLH)[ 0]=next__JNLH;
+        } else {
+          ((__POINTER *)result__LNLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JNLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__LNLH=next__JNLH;
+        };
+      };
+      ptr__1MLH=result__LNLH;
+    };
+    result__0MLH=((__FAST_ARRAYoSTRINGo *)ptr__1MLH);
+    *(result__0MLH) = *(FAST_ARRAYoSTRINGo__);
+  };
+  Self__CNLH=((__FAST_ARRAYoSTRINGo *)result__0MLH);
+  if ((Self__CNLH->parent_arrayed_collection__5KC.capacity__JGT < new_count__DNLH)) {
+    Self__CNLH->parent_arrayed_collection__5KC.storage__UGT=create__2DRB(new_count__DNLH);
+    Self__CNLH->parent_arrayed_collection__5KC.capacity__JGT=new_count__DNLH;
+  };
+  Self__CNLH->parent_arrayed_collection__5KC.upper__CLC=(__INTEGER)(-  1);
+  result__ZID=result__0MLH;
+  Self__PJF= 0;
+  limit_up__QJF=(__INTEGER)(((__INTEGER )(arg_count)) -  1);
+  while ((Self__PJF <= limit_up__QJF)) {
+    arg__0ID=((__CHARACTER *)(arg_vector[(Self__PJF)]));
+    str__1ID=create__ZBB(fast_first_index_of__until__OLC(arg__0ID));
+    Self__3KEB=((__STRING *)str__1ID);
+    p__4KEB=arg__0ID;
+    i__5KEB= 0;
+    Self__3KEB->count__SGC= 0;
+    while ((((__CHARACTER *)p__4KEB)[i__5KEB] != '\0')) {
+      ch__ZUIH=((__CHARACTER *)p__4KEB)[i__5KEB];
+      new_capacity__UUIH= 0;
+      if ((Self__3KEB->capacity__UCS <= Self__3KEB->count__SGC)) {
+        if ((Self__3KEB->capacity__UCS ==  0)) {
+          Self__3KEB->capacity__UCS= 32;
+          Self__3KEB->storage__3CS=create__YIEB( 32);
+        } else {
+          new_capacity__UUIH=(__INTEGER)(Self__3KEB->capacity__UCS <<  1);
+          Self__WUIH=((__CHARACTER *)Self__3KEB->storage__3CS);
+          old_nb_elts__XUIH=Self__3KEB->capacity__UCS;
+          new__YUIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__WUIH),((__UINTEGER_32 )old_nb_elts__XUIH),((__UINTEGER_32 )new_capacity__UUIH)));
+          upper__RNLH=(__INTEGER)(new_capacity__UUIH -  1);
+          Self__PNLH=old_nb_elts__XUIH;
+          while ((Self__PNLH <= upper__RNLH)) {
+            new__YUIH[Self__PNLH]='\0';
+            Self__PNLH=(__INTEGER)(Self__PNLH +  1);
+          };
+          Self__3KEB->storage__3CS=new__YUIH;
+          Self__3KEB->capacity__UCS=new_capacity__UUIH;
+        };
+      };
+      ((__CHARACTER *)Self__3KEB->storage__3CS)[Self__3KEB->count__SGC]=ch__ZUIH;
+      Self__3KEB->count__SGC=(__INTEGER)(Self__3KEB->count__SGC +  1);
+      i__5KEB=(__INTEGER)(i__5KEB +  1);
+    };
+    add_last__URV(result__ZID,str__1ID);
+    Self__PJF=(__INTEGER)(Self__PJF +  1);
   };
   output_name__DI=NULL;
   format_name__N1=NULL;
@@ -3105,2685 +3101,2661 @@ int main(int argc,char **argv)
   is_short_recursive__JB=FALSE__;
   is_shorter2__VI=FALSE__;
   input_name__3B=NULL;
-  FILE_SYSTEM__->parent_directory__2GD=1;
-  string_tmp__AGD=create__ZBB( 255);
+  FILE_SYSTEM__->parent_directory__HHD=1;
+  string_tmp__LGD=create__ZBB( 255);
   ENTRY__->path__BD=NULL;
-  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__;
+  ENTRY__->name__OPT=NULL;
+  ENTRY_UNIX__->parent_entry__QGD=(*ENTRY__);
+  FILE_UNIX__->parent_entry_unix__EFF=(*ENTRY_UNIX__);
+  DIRECTORY_UNIX__->parent_entry_unix__RGD=(*ENTRY_UNIX__);
+  DIRECTORY__->list__FIRD=NULL;
+  DIRECTORY_UNIX__->parent_directory__SGD=(*DIRECTORY__);
+  HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo__->buckets__B2S=NULL;
+  HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo__->capacity__21S= 0;
+  HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo__->count__C3S= 0;
+  result__MWG=NULL;
+  ptr__NWG=((__POINTER )(NULL));
+  typ_id__SWG= 0;
+  sz__PWG=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo));
+  if ((sz__PWG ==  0)) {
+    result__MWG=HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo__;
   } else {
-    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);
+    typ_id__SWG=__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__PWG);
+    if ((typ_id__SWG == (__INTEGER)(-  1))) {
+      a__ONGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__PNGH=(__UINTEGER_32)((__UINTEGER_32)(sz__PWG + a__ONGH) & (__UINTEGER_32)(~ a__ONGH));
+      ptr_table__UNLH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__PNGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__TNLH=((__POINTER )(NULL));
+      result__VNLH=((__POINTER *)ptr_table__UNLH)[ 0];
+      if ((result__VNLH == (void *)NULL)) {
+        result__VNLH=new_lab__RTJ(new_size__PNGH);
+        next__TNLH=(void *)((unsigned long)result__VNLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PNGH)));
+        ((__POINTER *)next__TNLH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__UNLH)[ 0]=next__TNLH;
+      } else {
+        next__TNLH=((__POINTER *)result__VNLH)[ 0];
+        if ((next__TNLH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__VNLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__PNGH <<  1)) <=  4096)) {
+            next__TNLH=(void *)((unsigned long)result__VNLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PNGH)));
+          } else {
+            next__TNLH=new_lab__RTJ(new_size__PNGH);
+          };
+          ((__POINTER *)next__TNLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__UNLH)[ 0]=next__TNLH;
+        } else {
+          ((__POINTER *)result__VNLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TNLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__VNLH=next__TNLH;
+        };
+      };
+      ptr__NWG=result__VNLH;
+    } else {
+      t__TNGH=((__UINTEGER_32 )typ_id__SWG);
+      a__SNGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__2NLH=(__UINTEGER_32)((__UINTEGER_32)(sz__PWG + a__SNGH) & (__UINTEGER_32)(~ a__SNGH));
+      ptr_table__ZNLH=((__POINTER )(&(table_type[(t__TNGH)])));
+      lab_type__1NLH=(__UINTEGER_32)(t__TNGH |  1);
+      next__YNLH=((__POINTER )(NULL));
+      result__0NLH=((__POINTER *)ptr_table__ZNLH)[ 0];
+      if ((result__0NLH == (void *)NULL)) {
+        result__0NLH=new_lab__RTJ(lab_type__1NLH);
+        next__YNLH=(void *)((unsigned long)result__0NLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2NLH)));
+        ((__POINTER *)next__YNLH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__ZNLH)[ 0]=next__YNLH;
+      } else {
+        next__YNLH=((__POINTER *)result__0NLH)[ 0];
+        if ((next__YNLH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__0NLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__2NLH <<  1)) <=  4096)) {
+            next__YNLH=(void *)((unsigned long)result__0NLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2NLH)));
+          } else {
+            next__YNLH=new_lab__RTJ(lab_type__1NLH);
+          };
+          ((__POINTER *)next__YNLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__ZNLH)[ 0]=next__YNLH;
+        } else {
+          ((__POINTER *)result__0NLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YNLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__0NLH=next__YNLH;
+        };
+      };
+      ptr__NWG=result__0NLH;
+    };
+    result__MWG=((__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *)ptr__NWG);
+    *(result__MWG) = *(HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo__);
+  };
+  Self__SKT=((__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *)result__MWG);
+  new_capacity__ZKY=prime_number_ceiling__021( 193);
+  Self__SKT->buckets__B2S=create__QA4(new_capacity__ZKY);
+  Self__SKT->capacity__21S=new_capacity__ZKY;
+  Self__SKT->count__C3S= 0;
+  alias__2GD=result__MWG;
+  HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo__->key__N2S=NULL;
+  HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo__->next__Z2S=NULL;
+  HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo__->item__TPOB=NULL;
+  string_tmp2__JZAC=create__ZBB( 255);
+  string_tmp3__PZAC=create__ZBB( 255);
+  ITM_OBJECT__->position__SFJ=((__POSITION ) 0);
   NAMED__->parent_itm_object__4=(*ITM_OBJECT__);
   NAMED__->name__LI=NULL;
-  NAMED__->style__OGU='\0';
+  NAMED__->style__0FU='\0';
   PROTOTYPE__->parent_named__5=(*NAMED__);
-  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__;
+  HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo__->buckets__PMBC=NULL;
+  HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo__->capacity__KMBC= 0;
+  HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo__->count__PNBC= 0;
+  result__Z0DB=NULL;
+  ptr__00DB=((__POINTER )(NULL));
+  typ_id__50DB= 0;
+  sz__20DB=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo));
+  if ((sz__20DB ==  0)) {
+    result__Z0DB=HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo__;
   } else {
-    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;
+    typ_id__50DB=__HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__20DB);
+    if ((typ_id__50DB == (__INTEGER)(-  1))) {
+      a__WNGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__XNGH=(__UINTEGER_32)((__UINTEGER_32)(sz__20DB + a__WNGH) & (__UINTEGER_32)(~ a__WNGH));
+      ptr_table__4NLH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__XNGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__3NLH=((__POINTER )(NULL));
+      result__5NLH=((__POINTER *)ptr_table__4NLH)[ 0];
+      if ((result__5NLH == (void *)NULL)) {
+        result__5NLH=new_lab__RTJ(new_size__XNGH);
+        next__3NLH=(void *)((unsigned long)result__5NLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XNGH)));
+        ((__POINTER *)next__3NLH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__4NLH)[ 0]=next__3NLH;
+      } else {
+        next__3NLH=((__POINTER *)result__5NLH)[ 0];
+        if ((next__3NLH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__5NLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__XNGH <<  1)) <=  4096)) {
+            next__3NLH=(void *)((unsigned long)result__5NLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XNGH)));
+          } else {
+            next__3NLH=new_lab__RTJ(new_size__XNGH);
+          };
+          ((__POINTER *)next__3NLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__4NLH)[ 0]=next__3NLH;
+        } else {
+          ((__POINTER *)result__5NLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3NLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__5NLH=next__3NLH;
+        };
+      };
+      ptr__00DB=result__5NLH;
+    } else {
+      t__1NGH=((__UINTEGER_32 )typ_id__50DB);
+      a__0NGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__GOLH=(__UINTEGER_32)((__UINTEGER_32)(sz__20DB + a__0NGH) & (__UINTEGER_32)(~ a__0NGH));
+      ptr_table__DOLH=((__POINTER )(&(table_type[(t__1NGH)])));
+      lab_type__FOLH=(__UINTEGER_32)(t__1NGH |  1);
+      next__COLH=((__POINTER )(NULL));
+      result__EOLH=((__POINTER *)ptr_table__DOLH)[ 0];
+      if ((result__EOLH == (void *)NULL)) {
+        result__EOLH=new_lab__RTJ(lab_type__FOLH);
+        next__COLH=(void *)((unsigned long)result__EOLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GOLH)));
+        ((__POINTER *)next__COLH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__DOLH)[ 0]=next__COLH;
+      } else {
+        next__COLH=((__POINTER *)result__EOLH)[ 0];
+        if ((next__COLH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__EOLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__GOLH <<  1)) <=  4096)) {
+            next__COLH=(void *)((unsigned long)result__EOLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GOLH)));
+          } else {
+            next__COLH=new_lab__RTJ(lab_type__FOLH);
+          };
+          ((__POINTER *)next__COLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__DOLH)[ 0]=next__COLH;
+        } else {
+          ((__POINTER *)result__EOLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__COLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__EOLH=next__COLH;
+        };
+      };
+      ptr__00DB=result__EOLH;
+    };
+    result__Z0DB=((__HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *)ptr__00DB);
+    *(result__Z0DB) = *(HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo__);
+  };
+  Self__ULCC=((__HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *)result__Z0DB);
+  new_capacity__DVJC=prime_number_ceiling__021( 193);
+  Self__ULCC->buckets__PMBC=create__ZITC(new_capacity__DVJC);
+  Self__ULCC->capacity__KMBC=new_capacity__DVJC;
+  Self__ULCC->count__PNBC= 0;
+  prototype_dico__LUS=result__Z0DB;
+  HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__->key__1MBC=NULL;
+  HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__->next__GNBC=NULL;
+  PROTOTYPE__->filename__FSG=NULL;
+  PROTOTYPE__->shortname__3JE=NULL;
+  ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo__->upper__RABC= 0;
+  ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo__->capacity__TABC= 0;
+  ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo__->storage__PBBC=NULL;
+  FAST_ARRAYoITM_TYPE_PARAMETERo__->parent_arrayed_collection__LOE=(*ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo__);
+  ITM_TYPE_SIMPLE__->name__GZP=NULL;
+  ITM_TYPE_PARAMETER__->parent_itm_type__VFE=(*ITM_TYPE_SIMPLE__);
+  PROTOTYPE__->idf_generic_list__MOE=NULL;
   ARRAYED_COLLECTIONoPROTOTYPEo__->upper__HJ= 0;
-  ARRAYED_COLLECTIONoPROTOTYPEo__->storage__XVT=NULL;
-  ARRAYED_COLLECTIONoPROTOTYPEo__->capacity__KFU= 0;
+  ARRAYED_COLLECTIONoPROTOTYPEo__->storage__DVT=NULL;
+  ARRAYED_COLLECTIONoPROTOTYPEo__->capacity__WEU= 0;
   FAST_ARRAYoPROTOTYPEo__->parent_arrayed_collection__AJ=(*ARRAYED_COLLECTIONoPROTOTYPEo__);
-  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__;
+  result__JPJ=NULL;
+  ptr__KPJ=((__POINTER )(NULL));
+  typ_id__PPJ= 0;
+  sz__MPJ=((__UINTEGER_32 )sizeof(__FAST_ARRAYoPROTOTYPEo));
+  if ((sz__MPJ ==  0)) {
+    result__JPJ=FAST_ARRAYoPROTOTYPEo__;
   } else {
-    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);
+    typ_id__PPJ=__FAST_ARRAYoPROTOTYPEo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__MPJ);
+    if ((typ_id__PPJ == (__INTEGER)(-  1))) {
+      a__4NGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__5NGH=(__UINTEGER_32)((__UINTEGER_32)(sz__MPJ + a__4NGH) & (__UINTEGER_32)(~ a__4NGH));
+      ptr_table__IOLH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__5NGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__HOLH=((__POINTER )(NULL));
+      result__JOLH=((__POINTER *)ptr_table__IOLH)[ 0];
+      if ((result__JOLH == (void *)NULL)) {
+        result__JOLH=new_lab__RTJ(new_size__5NGH);
+        next__HOLH=(void *)((unsigned long)result__JOLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5NGH)));
+        ((__POINTER *)next__HOLH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__IOLH)[ 0]=next__HOLH;
+      } else {
+        next__HOLH=((__POINTER *)result__JOLH)[ 0];
+        if ((next__HOLH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__JOLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__5NGH <<  1)) <=  4096)) {
+            next__HOLH=(void *)((unsigned long)result__JOLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5NGH)));
+          } else {
+            next__HOLH=new_lab__RTJ(new_size__5NGH);
+          };
+          ((__POINTER *)next__HOLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__IOLH)[ 0]=next__HOLH;
+        } else {
+          ((__POINTER *)result__JOLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HOLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__JOLH=next__HOLH;
+        };
+      };
+      ptr__KPJ=result__JOLH;
+    } else {
+      t__DOGH=((__UINTEGER_32 )typ_id__PPJ);
+      a__COGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__QOLH=(__UINTEGER_32)((__UINTEGER_32)(sz__MPJ + a__COGH) & (__UINTEGER_32)(~ a__COGH));
+      ptr_table__NOLH=((__POINTER )(&(table_type[(t__DOGH)])));
+      lab_type__POLH=(__UINTEGER_32)(t__DOGH |  1);
+      next__MOLH=((__POINTER )(NULL));
+      result__OOLH=((__POINTER *)ptr_table__NOLH)[ 0];
+      if ((result__OOLH == (void *)NULL)) {
+        result__OOLH=new_lab__RTJ(lab_type__POLH);
+        next__MOLH=(void *)((unsigned long)result__OOLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QOLH)));
+        ((__POINTER *)next__MOLH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__NOLH)[ 0]=next__MOLH;
+      } else {
+        next__MOLH=((__POINTER *)result__OOLH)[ 0];
+        if ((next__MOLH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__OOLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__QOLH <<  1)) <=  4096)) {
+            next__MOLH=(void *)((unsigned long)result__OOLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QOLH)));
+          } else {
+            next__MOLH=new_lab__RTJ(lab_type__POLH);
+          };
+          ((__POINTER *)next__MOLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__NOLH)[ 0]=next__MOLH;
+        } else {
+          ((__POINTER *)result__OOLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MOLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__OOLH=next__MOLH;
+        };
+      };
+      ptr__KPJ=result__OOLH;
+    };
+    result__JPJ=((__FAST_ARRAYoPROTOTYPEo *)ptr__KPJ);
+    *(result__JPJ) = *(FAST_ARRAYoPROTOTYPEo__);
+  };
+  Self__NEU=((__FAST_ARRAYoPROTOTYPEo *)result__JPJ);
+  if ((Self__NEU->parent_arrayed_collection__AJ.capacity__WEU <  512)) {
+    Self__NEU->parent_arrayed_collection__AJ.storage__DVT=create__JDSB( 512);
+    Self__NEU->parent_arrayed_collection__AJ.capacity__WEU= 512;
+  };
+  Self__NEU->parent_arrayed_collection__AJ.upper__HJ=(__INTEGER)(-  1);
+  prototype_list__BJ=result__JPJ;
+  PROTOTYPE__->index__GPG= 0;
+  HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__->item__NBHD=NULL;
+  string_tmp__4VX=create__ZBB( 128);
   PROTOTYPE__->source__3BC=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;
+  HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo__->buckets__NAGC=NULL;
+  HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo__->capacity__W3BC= 0;
+  HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo__->count__YOGC= 0;
+  PROTOTYPE__->slot_list__YVS=NULL;
   object__ZBC=NULL;
   source__5BC=NULL;
   position__CCC= 0;
   pos_cur__FCC= 0;
   pos_line__GCC= 0;
   pos_col__HCC= 0;
-  string_tmp3__2TD=create__ZBB( 256);
-  string_tmp4__4TD=create__ZBB( 256);
-  output_code__SI=create__ZBB( 4000000);
+  string_tmp3__HUD=create__ZBB( 256);
+  string_tmp4__JUD=create__ZBB( 256);
   short_derive__PCC= 0;
+  output_code__SI=create__ZBB( 4000000);
   is_active_short__OCC=FALSE__;
-  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__;
+  HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__->buckets__1DT=NULL;
+  HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__->capacity__WDT= 0;
+  HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__->count__4MY= 0;
+  result__2PH=NULL;
+  ptr__3PH=((__POINTER )(NULL));
+  typ_id__CQH= 0;
+  sz__5PH=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo));
+  if ((sz__5PH ==  0)) {
+    result__2PH=HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__;
   } else {
-    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;
+    typ_id__CQH=__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__5PH);
+    if ((typ_id__CQH == (__INTEGER)(-  1))) {
+      a__GOGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__HOGH=(__UINTEGER_32)((__UINTEGER_32)(sz__5PH + a__GOGH) & (__UINTEGER_32)(~ a__GOGH));
+      ptr_table__SOLH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__HOGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__ROLH=((__POINTER )(NULL));
+      result__TOLH=((__POINTER *)ptr_table__SOLH)[ 0];
+      if ((result__TOLH == (void *)NULL)) {
+        result__TOLH=new_lab__RTJ(new_size__HOGH);
+        next__ROLH=(void *)((unsigned long)result__TOLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HOGH)));
+        ((__POINTER *)next__ROLH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__SOLH)[ 0]=next__ROLH;
+      } else {
+        next__ROLH=((__POINTER *)result__TOLH)[ 0];
+        if ((next__ROLH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TOLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__HOGH <<  1)) <=  4096)) {
+            next__ROLH=(void *)((unsigned long)result__TOLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HOGH)));
+          } else {
+            next__ROLH=new_lab__RTJ(new_size__HOGH);
+          };
+          ((__POINTER *)next__ROLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__SOLH)[ 0]=next__ROLH;
+        } else {
+          ((__POINTER *)result__TOLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ROLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__TOLH=next__ROLH;
+        };
+      };
+      ptr__3PH=result__TOLH;
+    } else {
+      t__LOGH=((__UINTEGER_32 )typ_id__CQH);
+      a__KOGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__0OLH=(__UINTEGER_32)((__UINTEGER_32)(sz__5PH + a__KOGH) & (__UINTEGER_32)(~ a__KOGH));
+      ptr_table__XOLH=((__POINTER )(&(table_type[(t__LOGH)])));
+      lab_type__ZOLH=(__UINTEGER_32)(t__LOGH |  1);
+      next__WOLH=((__POINTER )(NULL));
+      result__YOLH=((__POINTER *)ptr_table__XOLH)[ 0];
+      if ((result__YOLH == (void *)NULL)) {
+        result__YOLH=new_lab__RTJ(lab_type__ZOLH);
+        next__WOLH=(void *)((unsigned long)result__YOLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0OLH)));
+        ((__POINTER *)next__WOLH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__XOLH)[ 0]=next__WOLH;
+      } else {
+        next__WOLH=((__POINTER *)result__YOLH)[ 0];
+        if ((next__WOLH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YOLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__0OLH <<  1)) <=  4096)) {
+            next__WOLH=(void *)((unsigned long)result__YOLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0OLH)));
+          } else {
+            next__WOLH=new_lab__RTJ(lab_type__ZOLH);
+          };
+          ((__POINTER *)next__WOLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__XOLH)[ 0]=next__WOLH;
+        } else {
+          ((__POINTER *)result__YOLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WOLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__YOLH=next__WOLH;
+        };
+      };
+      ptr__3PH=result__YOLH;
+    };
+    result__2PH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)ptr__3PH);
+    *(result__2PH) = *(HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__);
+  };
+  Self__ZOT=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__2PH);
+  new_capacity__ZMY=prime_number_ceiling__021( 193);
+  Self__ZOT->buckets__1DT=create__0E4(new_capacity__ZMY);
+  Self__ZOT->capacity__WDT=new_capacity__ZMY;
+  Self__ZOT->count__4MY= 0;
+  short_dico__QD=result__2PH;
+  HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__->key__HET=NULL;
+  HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__->next__SET=NULL;
+  token__BED=create__ZBB( 100);
+  HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__->item__KW3=NULL;
+  LINKED_COLLECTIONoSTRING_CONSTANTo__->upper__0ED= 0;
   LINKED_LISToSTRING_CONSTANTo__->parent_linked_collection__LD=(*LINKED_COLLECTIONoSTRING_CONSTANTo__);
-  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;
+  LINKED_LISToSTRING_CONSTANTo__->mem_idx__YTEC= 0;
+  LINKED_LISToSTRING_CONSTANTo__->mem_lnk__0TEC=NULL;
+  LINKED_LISToSTRING_CONSTANTo__->first_link__OTEC=NULL;
+  LINKED_LIST_NODEoSTRING_CONSTANTo__->next__JROD=NULL;
+  LINKED_LIST_NODEoSTRING_CONSTANTo__->item__L0HD=NULL;
+  type_error__5PG= 0;
+  msg_err__AQG=create__ZBB( 256);
+  skip_comment__ZBE=FALSE__;
+  last_comment_slot__LCE=NULL;
+  last_comment_extern__XZC=NULL;
+  begin_position__BDE= 0;
+  last_string__D2C=NULL;
+  string_tmp2__GCJ=create__ZBB( 256);
+  last_integer__VSO= 0;
+  LINKED_LISToSTRING_CONSTANTo__->last_link__XTEC=NULL;
   index_count__P5= 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;
-  sz__4OC=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoTYPExSTRING_CONSTANTo));
-  if ((sz__4OC ==  0)) {
-    result__1OC=HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__;
+  HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__->buckets__J3R=NULL;
+  HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__->capacity__E3R= 0;
+  HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__->count__J4R= 0;
+  result__JPC=NULL;
+  ptr__KPC=((__POINTER )(NULL));
+  typ_id__PPC= 0;
+  sz__MPC=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoTYPExSTRING_CONSTANTo));
+  if ((sz__MPC ==  0)) {
+    result__JPC=HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__;
   } else {
-    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__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__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__QSKH=new_lab__FTJ(new_size__KFHH);
-          };
-          ((__POINTER *)next__QSKH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__RSKH)[ 0]=next__QSKH;
-        } else {
-          ((__POINTER *)result__SSKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QSKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__SSKH=next__QSKH;
-        };
-      };
-      ptr__2OC=result__SSKH;
-    } else {
-      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__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__VSKH=new_lab__FTJ(lab_type__YSKH);
-          };
-          ((__POINTER *)next__VSKH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__WSKH)[ 0]=next__VSKH;
-        } else {
-          ((__POINTER *)result__XSKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VSKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__XSKH=next__VSKH;
-        };
-      };
-      ptr__2OC=result__XSKH;
-    };
-    result__1OC=((__HASHED_DICTIONARYoTYPExSTRING_CONSTANTo *)ptr__2OC);
-    *(result__1OC) = *(HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__);
-  };
-  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;
+    typ_id__PPC=__HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__MPC);
+    if ((typ_id__PPC == (__INTEGER)(-  1))) {
+      a__OOGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__POGH=(__UINTEGER_32)((__UINTEGER_32)(sz__MPC + a__OOGH) & (__UINTEGER_32)(~ a__OOGH));
+      ptr_table__2OLH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__POGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__1OLH=((__POINTER )(NULL));
+      result__3OLH=((__POINTER *)ptr_table__2OLH)[ 0];
+      if ((result__3OLH == (void *)NULL)) {
+        result__3OLH=new_lab__RTJ(new_size__POGH);
+        next__1OLH=(void *)((unsigned long)result__3OLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__POGH)));
+        ((__POINTER *)next__1OLH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__2OLH)[ 0]=next__1OLH;
+      } else {
+        next__1OLH=((__POINTER *)result__3OLH)[ 0];
+        if ((next__1OLH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__3OLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__POGH <<  1)) <=  4096)) {
+            next__1OLH=(void *)((unsigned long)result__3OLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__POGH)));
+          } else {
+            next__1OLH=new_lab__RTJ(new_size__POGH);
+          };
+          ((__POINTER *)next__1OLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__2OLH)[ 0]=next__1OLH;
+        } else {
+          ((__POINTER *)result__3OLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1OLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__3OLH=next__1OLH;
+        };
+      };
+      ptr__KPC=result__3OLH;
+    } else {
+      t__TOGH=((__UINTEGER_32 )typ_id__PPC);
+      a__SOGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__EPLH=(__UINTEGER_32)((__UINTEGER_32)(sz__MPC + a__SOGH) & (__UINTEGER_32)(~ a__SOGH));
+      ptr_table__BPLH=((__POINTER )(&(table_type[(t__TOGH)])));
+      lab_type__DPLH=(__UINTEGER_32)(t__TOGH |  1);
+      next__APLH=((__POINTER )(NULL));
+      result__CPLH=((__POINTER *)ptr_table__BPLH)[ 0];
+      if ((result__CPLH == (void *)NULL)) {
+        result__CPLH=new_lab__RTJ(lab_type__DPLH);
+        next__APLH=(void *)((unsigned long)result__CPLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EPLH)));
+        ((__POINTER *)next__APLH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__BPLH)[ 0]=next__APLH;
+      } else {
+        next__APLH=((__POINTER *)result__CPLH)[ 0];
+        if ((next__APLH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__CPLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__EPLH <<  1)) <=  4096)) {
+            next__APLH=(void *)((unsigned long)result__CPLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EPLH)));
+          } else {
+            next__APLH=new_lab__RTJ(lab_type__DPLH);
+          };
+          ((__POINTER *)next__APLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__BPLH)[ 0]=next__APLH;
+        } else {
+          ((__POINTER *)result__CPLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__APLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__CPLH=next__APLH;
+        };
+      };
+      ptr__KPC=result__CPLH;
+    };
+    result__JPC=((__HASHED_DICTIONARYoTYPExSTRING_CONSTANTo *)ptr__KPC);
+    *(result__JPC) = *(HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__);
+  };
+  Self__KQS=((__HASHED_DICTIONARYoTYPExSTRING_CONSTANTo *)result__JPC);
+  new_capacity__UKX=prime_number_ceiling__021( 193);
+  Self__KQS->buckets__J3R=create__PX2(new_capacity__UKX);
+  Self__KQS->capacity__E3R=new_capacity__UKX;
+  Self__KQS->count__J4R= 0;
+  HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo__->key__V3R=NULL;
+  HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo__->next__A4R=NULL;
+  ARRAYED_COLLECTIONoSLOTo__->capacity__QFS= 0;
   FAST_ARRAYoSLOTo__->parent_arrayed_collection__BAB=(*ARRAYED_COLLECTIONoSLOTo__);
   ITM_SLOT__->parent_named__15=(*NAMED__);
-  TYPE_FULL__->flag__IGS= 0;
-  ARRAYED_COLLECTIONoTYPE_IDo__->upper__C5R= 0;
-  ARRAYED_COLLECTIONoTYPE_IDo__->capacity__E5R= 0;
-  ARRAYED_COLLECTIONoTYPE_IDo__->storage__AAS=NULL;
+  TYPE_FULL__->flag__UGS= 0;
+  ARRAYED_COLLECTIONoTYPE_IDo__->upper__O5R= 0;
+  ARRAYED_COLLECTIONoTYPE_IDo__->capacity__Q5R= 0;
+  ARRAYED_COLLECTIONoTYPE_IDo__->storage__MAS=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__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));
+  LINKED_COLLECTIONoENTRYo__->upper__HR3D= 0;
+  LINKED_LISToENTRYo__->parent_linked_collection__EIRD=(*LINKED_COLLECTIONoENTRYo__);
+  LINKED_LISToENTRYo__->first_link__OMWE=NULL;
+  LINKED_LISToENTRYo__->mem_idx__VMWE= 0;
+  LINKED_LISToENTRYo__->mem_lnk__WMWE=NULL;
+  LINKED_LISToENTRYo__->last_link__XMWE=NULL;
+  LINKED_LIST_NODEoENTRYo__->item__IAXE=NULL;
+  LINKED_LIST_NODEoENTRYo__->next__G3FF=NULL;
+  FILE_UNIX__->stream__BMRD=((__POINTER )(NULL));
   proto_input__BI=NULL;
-  HASHED_SEToSTRING_CONSTANTo__->buckets__XEV=NULL;
-  HASHED_SEToSTRING_CONSTANTo__->capacity__0IT= 0;
-  HASHED_SEToSTRING_CONSTANTo__->count__AIY= 0;
+  HASHED_SEToSTRING_CONSTANTo__->buckets__DEV=NULL;
+  HASHED_SEToSTRING_CONSTANTo__->capacity__HIT= 0;
+  HASHED_SEToSTRING_CONSTANTo__->count__1FY= 0;
   short_local__XCC=NULL;
-  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__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__;
+  output_decl__VHE=create__ZBB( 60000);
+  PROTOTYPE__->type_style__S4C=NULL;
+  is_parameter_type__AME=FALSE__;
+  ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo__->upper__ZUV= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo__->capacity__UYV= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo__->storage__PZV=NULL;
+  FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo__->parent_arrayed_collection__FVP=(*ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo__);
+  ARRAYED_COLLECTIONoITM_TYPE_MONOo__->upper__4HV= 0;
+  ARRAYED_COLLECTIONoITM_TYPE_MONOo__->storage__FMV=NULL;
+  ARRAYED_COLLECTIONoITM_TYPE_MONOo__->capacity__TNV= 0;
+  FAST_ARRAYoITM_TYPE_MONOo__->parent_arrayed_collection__SYC=(*ARRAYED_COLLECTIONoITM_TYPE_MONOo__);
+  result__30Q=NULL;
+  ptr__40Q=((__POINTER )(NULL));
+  typ_id__D1Q= 0;
+  sz__A1Q=((__UINTEGER_32 )sizeof(__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo));
+  if ((sz__A1Q ==  0)) {
+    result__30Q=FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo__;
   } else {
-    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__;
+    typ_id__D1Q=__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__A1Q);
+    if ((typ_id__D1Q == (__INTEGER)(-  1))) {
+      a__WOGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__XOGH=(__UINTEGER_32)((__UINTEGER_32)(sz__A1Q + a__WOGH) & (__UINTEGER_32)(~ a__WOGH));
+      ptr_table__GPLH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__XOGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__FPLH=((__POINTER )(NULL));
+      result__HPLH=((__POINTER *)ptr_table__GPLH)[ 0];
+      if ((result__HPLH == (void *)NULL)) {
+        result__HPLH=new_lab__RTJ(new_size__XOGH);
+        next__FPLH=(void *)((unsigned long)result__HPLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XOGH)));
+        ((__POINTER *)next__FPLH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__GPLH)[ 0]=next__FPLH;
+      } else {
+        next__FPLH=((__POINTER *)result__HPLH)[ 0];
+        if ((next__FPLH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HPLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__XOGH <<  1)) <=  4096)) {
+            next__FPLH=(void *)((unsigned long)result__HPLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XOGH)));
+          } else {
+            next__FPLH=new_lab__RTJ(new_size__XOGH);
+          };
+          ((__POINTER *)next__FPLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__GPLH)[ 0]=next__FPLH;
+        } else {
+          ((__POINTER *)result__HPLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FPLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__HPLH=next__FPLH;
+        };
+      };
+      ptr__40Q=result__HPLH;
+    } else {
+      t__1OGH=((__UINTEGER_32 )typ_id__D1Q);
+      a__0OGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__OPLH=(__UINTEGER_32)((__UINTEGER_32)(sz__A1Q + a__0OGH) & (__UINTEGER_32)(~ a__0OGH));
+      ptr_table__LPLH=((__POINTER )(&(table_type[(t__1OGH)])));
+      lab_type__NPLH=(__UINTEGER_32)(t__1OGH |  1);
+      next__KPLH=((__POINTER )(NULL));
+      result__MPLH=((__POINTER *)ptr_table__LPLH)[ 0];
+      if ((result__MPLH == (void *)NULL)) {
+        result__MPLH=new_lab__RTJ(lab_type__NPLH);
+        next__KPLH=(void *)((unsigned long)result__MPLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OPLH)));
+        ((__POINTER *)next__KPLH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__LPLH)[ 0]=next__KPLH;
+      } else {
+        next__KPLH=((__POINTER *)result__MPLH)[ 0];
+        if ((next__KPLH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MPLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__OPLH <<  1)) <=  4096)) {
+            next__KPLH=(void *)((unsigned long)result__MPLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OPLH)));
+          } else {
+            next__KPLH=new_lab__RTJ(lab_type__NPLH);
+          };
+          ((__POINTER *)next__KPLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__LPLH)[ 0]=next__KPLH;
+        } else {
+          ((__POINTER *)result__MPLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KPLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__MPLH=next__KPLH;
+        };
+      };
+      ptr__40Q=result__MPLH;
+    };
+    result__30Q=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)ptr__40Q);
+    *(result__30Q) = *(FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo__);
+  };
+  Self__L3V=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)result__30Q);
+  if ((Self__L3V->parent_arrayed_collection__FVP.capacity__UYV <  5)) {
+    Self__L3V->parent_arrayed_collection__FVP.storage__PZV=create__PHRB( 5);
+    Self__L3V->parent_arrayed_collection__FVP.capacity__UYV= 5;
+  };
+  Self__L3V->parent_arrayed_collection__FVP.upper__ZUV=(__INTEGER)(-  1);
+  free_list__GVP=result__30Q;
+  empty_list__NWP=create_with_capacity__EGR( 0);
+  HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo__->buckets__K5V=NULL;
+  HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo__->capacity__F5V= 0;
+  HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo__->count__ZHW= 0;
+  result__0ER=NULL;
+  ptr__1ER=((__POINTER )(NULL));
+  typ_id__AFR= 0;
+  sz__3ER=((__UINTEGER_32 )sizeof(__HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo));
+  if ((sz__3ER ==  0)) {
+    result__0ER=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__;
+    typ_id__AFR=__HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__3ER);
+    if ((typ_id__AFR == (__INTEGER)(-  1))) {
+      a__4OGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__5OGH=(__UINTEGER_32)((__UINTEGER_32)(sz__3ER + a__4OGH) & (__UINTEGER_32)(~ a__4OGH));
+      ptr_table__QPLH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__5OGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__PPLH=((__POINTER )(NULL));
+      result__RPLH=((__POINTER *)ptr_table__QPLH)[ 0];
+      if ((result__RPLH == (void *)NULL)) {
+        result__RPLH=new_lab__RTJ(new_size__5OGH);
+        next__PPLH=(void *)((unsigned long)result__RPLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5OGH)));
+        ((__POINTER *)next__PPLH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__QPLH)[ 0]=next__PPLH;
+      } else {
+        next__PPLH=((__POINTER *)result__RPLH)[ 0];
+        if ((next__PPLH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__RPLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__5OGH <<  1)) <=  4096)) {
+            next__PPLH=(void *)((unsigned long)result__RPLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5OGH)));
+          } else {
+            next__PPLH=new_lab__RTJ(new_size__5OGH);
+          };
+          ((__POINTER *)next__PPLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__QPLH)[ 0]=next__PPLH;
+        } else {
+          ((__POINTER *)result__RPLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PPLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__RPLH=next__PPLH;
+        };
+      };
+      ptr__1ER=result__RPLH;
+    } else {
+      t__DPGH=((__UINTEGER_32 )typ_id__AFR);
+      a__CPGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__YPLH=(__UINTEGER_32)((__UINTEGER_32)(sz__3ER + a__CPGH) & (__UINTEGER_32)(~ a__CPGH));
+      ptr_table__VPLH=((__POINTER )(&(table_type[(t__DPGH)])));
+      lab_type__XPLH=(__UINTEGER_32)(t__DPGH |  1);
+      next__UPLH=((__POINTER )(NULL));
+      result__WPLH=((__POINTER *)ptr_table__VPLH)[ 0];
+      if ((result__WPLH == (void *)NULL)) {
+        result__WPLH=new_lab__RTJ(lab_type__XPLH);
+        next__UPLH=(void *)((unsigned long)result__WPLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YPLH)));
+        ((__POINTER *)next__UPLH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__VPLH)[ 0]=next__UPLH;
+      } else {
+        next__UPLH=((__POINTER *)result__WPLH)[ 0];
+        if ((next__UPLH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__WPLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__YPLH <<  1)) <=  4096)) {
+            next__UPLH=(void *)((unsigned long)result__WPLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YPLH)));
+          } else {
+            next__UPLH=new_lab__RTJ(lab_type__XPLH);
+          };
+          ((__POINTER *)next__UPLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__VPLH)[ 0]=next__UPLH;
+        } else {
+          ((__POINTER *)result__WPLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UPLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__WPLH=next__UPLH;
+        };
+      };
+      ptr__1ER=result__WPLH;
+    };
+    result__0ER=((__HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo *)ptr__1ER);
+    *(result__0ER) = *(HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo__);
+  };
+  Self__3EW=((__HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo *)result__0ER);
+  new_capacity__3G1=prime_number_ceiling__021( 53);
+  Self__3EW->buckets__K5V=create__SWBB(new_capacity__3G1);
+  Self__3EW->capacity__F5V=new_capacity__3G1;
+  Self__3EW->count__ZHW= 0;
+  bucket__YWP=result__0ER;
+  ITM_TYPE_STYLE__->parent_itm_type_simple__3SN=(*ITM_TYPE_SIMPLE__);
+  ITM_TYPE_STYLE__->style__PZP=NULL;
+  ITM_TYPE_GENERIC__->parent_itm_type_style__4SN=(*ITM_TYPE_STYLE__);
+  HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo__->item__W5V=NULL;
+  HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo__->next__CAW=NULL;
+  ARRAYED_COLLECTIONoITM_TYPE_MULTIo__->upper__SKP= 0;
+  ARRAYED_COLLECTIONoITM_TYPE_MULTIo__->capacity__R1V= 0;
+  ARRAYED_COLLECTIONoITM_TYPE_MULTIo__->storage__21V=NULL;
+  FAST_ARRAYoITM_TYPE_MULTIo__->parent_arrayed_collection__IKP=(*ARRAYED_COLLECTIONoITM_TYPE_MULTIo__);
+  result__KTQ=NULL;
+  ptr__LTQ=((__POINTER )(NULL));
+  typ_id__QTQ= 0;
+  sz__NTQ=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_TYPE_MULTIo));
+  if ((sz__NTQ ==  0)) {
+    result__KTQ=FAST_ARRAYoITM_TYPE_MULTIo__;
   } else {
-    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__;
+    typ_id__QTQ=__FAST_ARRAYoITM_TYPE_MULTIo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__NTQ);
+    if ((typ_id__QTQ == (__INTEGER)(-  1))) {
+      a__GPGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__HPGH=(__UINTEGER_32)((__UINTEGER_32)(sz__NTQ + a__GPGH) & (__UINTEGER_32)(~ a__GPGH));
+      ptr_table__0PLH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__HPGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__ZPLH=((__POINTER )(NULL));
+      result__1PLH=((__POINTER *)ptr_table__0PLH)[ 0];
+      if ((result__1PLH == (void *)NULL)) {
+        result__1PLH=new_lab__RTJ(new_size__HPGH);
+        next__ZPLH=(void *)((unsigned long)result__1PLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HPGH)));
+        ((__POINTER *)next__ZPLH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__0PLH)[ 0]=next__ZPLH;
+      } else {
+        next__ZPLH=((__POINTER *)result__1PLH)[ 0];
+        if ((next__ZPLH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1PLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__HPGH <<  1)) <=  4096)) {
+            next__ZPLH=(void *)((unsigned long)result__1PLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HPGH)));
+          } else {
+            next__ZPLH=new_lab__RTJ(new_size__HPGH);
+          };
+          ((__POINTER *)next__ZPLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__0PLH)[ 0]=next__ZPLH;
+        } else {
+          ((__POINTER *)result__1PLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZPLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__1PLH=next__ZPLH;
+        };
+      };
+      ptr__LTQ=result__1PLH;
+    } else {
+      t__LPGH=((__UINTEGER_32 )typ_id__QTQ);
+      a__KPGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__CQLH=(__UINTEGER_32)((__UINTEGER_32)(sz__NTQ + a__KPGH) & (__UINTEGER_32)(~ a__KPGH));
+      ptr_table__5PLH=((__POINTER )(&(table_type[(t__LPGH)])));
+      lab_type__BQLH=(__UINTEGER_32)(t__LPGH |  1);
+      next__4PLH=((__POINTER )(NULL));
+      result__AQLH=((__POINTER *)ptr_table__5PLH)[ 0];
+      if ((result__AQLH == (void *)NULL)) {
+        result__AQLH=new_lab__RTJ(lab_type__BQLH);
+        next__4PLH=(void *)((unsigned long)result__AQLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CQLH)));
+        ((__POINTER *)next__4PLH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__5PLH)[ 0]=next__4PLH;
+      } else {
+        next__4PLH=((__POINTER *)result__AQLH)[ 0];
+        if ((next__4PLH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__AQLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__CQLH <<  1)) <=  4096)) {
+            next__4PLH=(void *)((unsigned long)result__AQLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CQLH)));
+          } else {
+            next__4PLH=new_lab__RTJ(lab_type__BQLH);
+          };
+          ((__POINTER *)next__4PLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__5PLH)[ 0]=next__4PLH;
+        } else {
+          ((__POINTER *)result__AQLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4PLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__AQLH=next__4PLH;
+        };
+      };
+      ptr__LTQ=result__AQLH;
+    };
+    result__KTQ=((__FAST_ARRAYoITM_TYPE_MULTIo *)ptr__LTQ);
+    *(result__KTQ) = *(FAST_ARRAYoITM_TYPE_MULTIo__);
+  };
+  Self__I1V=((__FAST_ARRAYoITM_TYPE_MULTIo *)result__KTQ);
+  if ((Self__I1V->parent_arrayed_collection__IKP.capacity__R1V <  32)) {
+    Self__I1V->parent_arrayed_collection__IKP.storage__21V=create__PJXB( 32);
+    Self__I1V->parent_arrayed_collection__IKP.capacity__R1V= 32;
+  };
+  Self__I1V->parent_arrayed_collection__IKP.upper__SKP=(__INTEGER)(-  1);
+  dico__JKP=result__KTQ;
+  ITM_TYPE_MULTI__->list_type__2KP=NULL;
+  ITM_TYPE_BLOCK__->type_argument__SNN=NULL;
+  ITM_TYPE_GENERIC__->list_type__ZZP=NULL;
+  ITM_TYPE_BLOCK__->type_result__2NN=NULL;
+  ARRAYED_COLLECTIONoITM_TYPE_BLOCKo__->upper__ENN= 0;
+  ARRAYED_COLLECTIONoITM_TYPE_BLOCKo__->capacity__0JV= 0;
+  ARRAYED_COLLECTIONoITM_TYPE_BLOCKo__->storage__FKV=NULL;
+  FAST_ARRAYoITM_TYPE_BLOCKo__->parent_arrayed_collection__0MN=(*ARRAYED_COLLECTIONoITM_TYPE_BLOCKo__);
+  result__Q1O=NULL;
+  ptr__R1O=((__POINTER )(NULL));
+  typ_id__W1O= 0;
+  sz__T1O=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_TYPE_BLOCKo));
+  if ((sz__T1O ==  0)) {
+    result__Q1O=FAST_ARRAYoITM_TYPE_BLOCKo__;
   } else {
-    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__;
+    typ_id__W1O=__FAST_ARRAYoITM_TYPE_BLOCKo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__T1O);
+    if ((typ_id__W1O == (__INTEGER)(-  1))) {
+      a__OPGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__PPGH=(__UINTEGER_32)((__UINTEGER_32)(sz__T1O + a__OPGH) & (__UINTEGER_32)(~ a__OPGH));
+      ptr_table__EQLH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__PPGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__DQLH=((__POINTER )(NULL));
+      result__FQLH=((__POINTER *)ptr_table__EQLH)[ 0];
+      if ((result__FQLH == (void *)NULL)) {
+        result__FQLH=new_lab__RTJ(new_size__PPGH);
+        next__DQLH=(void *)((unsigned long)result__FQLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PPGH)));
+        ((__POINTER *)next__DQLH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__EQLH)[ 0]=next__DQLH;
+      } else {
+        next__DQLH=((__POINTER *)result__FQLH)[ 0];
+        if ((next__DQLH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__FQLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__PPGH <<  1)) <=  4096)) {
+            next__DQLH=(void *)((unsigned long)result__FQLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PPGH)));
+          } else {
+            next__DQLH=new_lab__RTJ(new_size__PPGH);
+          };
+          ((__POINTER *)next__DQLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__EQLH)[ 0]=next__DQLH;
+        } else {
+          ((__POINTER *)result__FQLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DQLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__FQLH=next__DQLH;
+        };
+      };
+      ptr__R1O=result__FQLH;
+    } else {
+      t__TPGH=((__UINTEGER_32 )typ_id__W1O);
+      a__SPGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__MQLH=(__UINTEGER_32)((__UINTEGER_32)(sz__T1O + a__SPGH) & (__UINTEGER_32)(~ a__SPGH));
+      ptr_table__JQLH=((__POINTER )(&(table_type[(t__TPGH)])));
+      lab_type__LQLH=(__UINTEGER_32)(t__TPGH |  1);
+      next__IQLH=((__POINTER )(NULL));
+      result__KQLH=((__POINTER *)ptr_table__JQLH)[ 0];
+      if ((result__KQLH == (void *)NULL)) {
+        result__KQLH=new_lab__RTJ(lab_type__LQLH);
+        next__IQLH=(void *)((unsigned long)result__KQLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MQLH)));
+        ((__POINTER *)next__IQLH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__JQLH)[ 0]=next__IQLH;
+      } else {
+        next__IQLH=((__POINTER *)result__KQLH)[ 0];
+        if ((next__IQLH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__KQLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__MQLH <<  1)) <=  4096)) {
+            next__IQLH=(void *)((unsigned long)result__KQLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MQLH)));
+          } else {
+            next__IQLH=new_lab__RTJ(lab_type__LQLH);
+          };
+          ((__POINTER *)next__IQLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__JQLH)[ 0]=next__IQLH;
+        } else {
+          ((__POINTER *)result__KQLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__IQLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__KQLH=next__IQLH;
+        };
+      };
+      ptr__R1O=result__KQLH;
+    };
+    result__Q1O=((__FAST_ARRAYoITM_TYPE_BLOCKo *)ptr__R1O);
+    *(result__Q1O) = *(FAST_ARRAYoITM_TYPE_BLOCKo__);
+  };
+  Self__RJV=((__FAST_ARRAYoITM_TYPE_BLOCKo *)result__Q1O);
+  if ((Self__RJV->parent_arrayed_collection__0MN.capacity__0JV <  32)) {
+    Self__RJV->parent_arrayed_collection__0MN.storage__FKV=create__KSWB( 32);
+    Self__RJV->parent_arrayed_collection__0MN.capacity__0JV= 32;
+  };
+  Self__RJV->parent_arrayed_collection__0MN.upper__ENN=(__INTEGER)(-  1);
+  dico__1MN=result__Q1O;
+  ITM_CODE__->parent_itm_object__PFE=(*ITM_OBJECT__);
+  ITM_CONSTANT__->parent_itm_code__TYF=(*ITM_CODE__);
+  ITM_REAL__->parent_itm_constant__BSO=(*ITM_CONSTANT__);
+  ITM_NUMBER__->parent_itm_constant__TSO=(*ITM_CONSTANT__);
+  ITM_CHARACTER__->parent_itm_constant__FTO=(*ITM_CONSTANT__);
+  ITM_STRING__->parent_itm_constant__WTO=(*ITM_CONSTANT__);
+  ARRAYED_COLLECTIONoITM_TYPE_GENERICo__->upper__2YP= 0;
+  ARRAYED_COLLECTIONoITM_TYPE_GENERICo__->capacity__HBW= 0;
+  ARRAYED_COLLECTIONoITM_TYPE_GENERICo__->storage__SBW=NULL;
+  FAST_ARRAYoITM_TYPE_GENERICo__->parent_arrayed_collection__SYP=(*ARRAYED_COLLECTIONoITM_TYPE_GENERICo__);
+  result__X3Q=NULL;
+  ptr__Y3Q=((__POINTER )(NULL));
+  typ_id__33Q= 0;
+  sz__03Q=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_TYPE_GENERICo));
+  if ((sz__03Q ==  0)) {
+    result__X3Q=FAST_ARRAYoITM_TYPE_GENERICo__;
   } else {
-    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__;
+    typ_id__33Q=__FAST_ARRAYoITM_TYPE_GENERICo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__03Q);
+    if ((typ_id__33Q == (__INTEGER)(-  1))) {
+      a__WPGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__XPGH=(__UINTEGER_32)((__UINTEGER_32)(sz__03Q + a__WPGH) & (__UINTEGER_32)(~ a__WPGH));
+      ptr_table__OQLH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__XPGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__NQLH=((__POINTER )(NULL));
+      result__PQLH=((__POINTER *)ptr_table__OQLH)[ 0];
+      if ((result__PQLH == (void *)NULL)) {
+        result__PQLH=new_lab__RTJ(new_size__XPGH);
+        next__NQLH=(void *)((unsigned long)result__PQLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XPGH)));
+        ((__POINTER *)next__NQLH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__OQLH)[ 0]=next__NQLH;
+      } else {
+        next__NQLH=((__POINTER *)result__PQLH)[ 0];
+        if ((next__NQLH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__PQLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__XPGH <<  1)) <=  4096)) {
+            next__NQLH=(void *)((unsigned long)result__PQLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XPGH)));
+          } else {
+            next__NQLH=new_lab__RTJ(new_size__XPGH);
+          };
+          ((__POINTER *)next__NQLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__OQLH)[ 0]=next__NQLH;
+        } else {
+          ((__POINTER *)result__PQLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NQLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__PQLH=next__NQLH;
+        };
+      };
+      ptr__Y3Q=result__PQLH;
+    } else {
+      t__1PGH=((__UINTEGER_32 )typ_id__33Q);
+      a__0PGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__WQLH=(__UINTEGER_32)((__UINTEGER_32)(sz__03Q + a__0PGH) & (__UINTEGER_32)(~ a__0PGH));
+      ptr_table__TQLH=((__POINTER )(&(table_type[(t__1PGH)])));
+      lab_type__VQLH=(__UINTEGER_32)(t__1PGH |  1);
+      next__SQLH=((__POINTER )(NULL));
+      result__UQLH=((__POINTER *)ptr_table__TQLH)[ 0];
+      if ((result__UQLH == (void *)NULL)) {
+        result__UQLH=new_lab__RTJ(lab_type__VQLH);
+        next__SQLH=(void *)((unsigned long)result__UQLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WQLH)));
+        ((__POINTER *)next__SQLH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__TQLH)[ 0]=next__SQLH;
+      } else {
+        next__SQLH=((__POINTER *)result__UQLH)[ 0];
+        if ((next__SQLH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__UQLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__WQLH <<  1)) <=  4096)) {
+            next__SQLH=(void *)((unsigned long)result__UQLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WQLH)));
+          } else {
+            next__SQLH=new_lab__RTJ(lab_type__VQLH);
+          };
+          ((__POINTER *)next__SQLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__TQLH)[ 0]=next__SQLH;
+        } else {
+          ((__POINTER *)result__UQLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__SQLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__UQLH=next__SQLH;
+        };
+      };
+      ptr__Y3Q=result__UQLH;
+    };
+    result__X3Q=((__FAST_ARRAYoITM_TYPE_GENERICo *)ptr__Y3Q);
+    *(result__X3Q) = *(FAST_ARRAYoITM_TYPE_GENERICo__);
+  };
+  Self__4AW=((__FAST_ARRAYoITM_TYPE_GENERICo *)result__X3Q);
+  if ((Self__4AW->parent_arrayed_collection__SYP.capacity__HBW <  32)) {
+    Self__4AW->parent_arrayed_collection__SYP.storage__SBW=create__JQXB( 32);
+    Self__4AW->parent_arrayed_collection__SYP.capacity__HBW= 32;
+  };
+  Self__4AW->parent_arrayed_collection__SYP.upper__2YP=(__INTEGER)(-  1);
+  dico__TYP=result__X3Q;
+  HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo__->buckets__F4T=NULL;
+  HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo__->capacity__A4T= 0;
+  HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo__->count__CGZ= 0;
+  result__ENK=NULL;
+  ptr__FNK=((__POINTER )(NULL));
+  typ_id__KNK= 0;
+  sz__HNK=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo));
+  if ((sz__HNK ==  0)) {
+    result__ENK=HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo__;
   } else {
-    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__;
+    typ_id__KNK=__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__HNK);
+    if ((typ_id__KNK == (__INTEGER)(-  1))) {
+      a__4PGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__5PGH=(__UINTEGER_32)((__UINTEGER_32)(sz__HNK + a__4PGH) & (__UINTEGER_32)(~ a__4PGH));
+      ptr_table__YQLH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__5PGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__XQLH=((__POINTER )(NULL));
+      result__ZQLH=((__POINTER *)ptr_table__YQLH)[ 0];
+      if ((result__ZQLH == (void *)NULL)) {
+        result__ZQLH=new_lab__RTJ(new_size__5PGH);
+        next__XQLH=(void *)((unsigned long)result__ZQLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5PGH)));
+        ((__POINTER *)next__XQLH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__YQLH)[ 0]=next__XQLH;
+      } else {
+        next__XQLH=((__POINTER *)result__ZQLH)[ 0];
+        if ((next__XQLH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ZQLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__5PGH <<  1)) <=  4096)) {
+            next__XQLH=(void *)((unsigned long)result__ZQLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5PGH)));
+          } else {
+            next__XQLH=new_lab__RTJ(new_size__5PGH);
+          };
+          ((__POINTER *)next__XQLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__YQLH)[ 0]=next__XQLH;
+        } else {
+          ((__POINTER *)result__ZQLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XQLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__ZQLH=next__XQLH;
+        };
+      };
+      ptr__FNK=result__ZQLH;
+    } else {
+      t__DQGH=((__UINTEGER_32 )typ_id__KNK);
+      a__CQGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__ARLH=(__UINTEGER_32)((__UINTEGER_32)(sz__HNK + a__CQGH) & (__UINTEGER_32)(~ a__CQGH));
+      ptr_table__3QLH=((__POINTER )(&(table_type[(t__DQGH)])));
+      lab_type__5QLH=(__UINTEGER_32)(t__DQGH |  1);
+      next__2QLH=((__POINTER )(NULL));
+      result__4QLH=((__POINTER *)ptr_table__3QLH)[ 0];
+      if ((result__4QLH == (void *)NULL)) {
+        result__4QLH=new_lab__RTJ(lab_type__5QLH);
+        next__2QLH=(void *)((unsigned long)result__4QLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ARLH)));
+        ((__POINTER *)next__2QLH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__3QLH)[ 0]=next__2QLH;
+      } else {
+        next__2QLH=((__POINTER *)result__4QLH)[ 0];
+        if ((next__2QLH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4QLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__ARLH <<  1)) <=  4096)) {
+            next__2QLH=(void *)((unsigned long)result__4QLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ARLH)));
+          } else {
+            next__2QLH=new_lab__RTJ(lab_type__5QLH);
+          };
+          ((__POINTER *)next__2QLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__3QLH)[ 0]=next__2QLH;
+        } else {
+          ((__POINTER *)result__4QLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2QLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__4QLH=next__2QLH;
+        };
+      };
+      ptr__FNK=result__4QLH;
+    };
+    result__ENK=((__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *)ptr__FNK);
+    *(result__ENK) = *(HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo__);
+  };
+  Self__ANU=((__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *)result__ENK);
+  new_capacity__3FZ=prime_number_ceiling__021( 193);
+  Self__ANU->buckets__F4T=create__OG5(new_capacity__3FZ);
+  Self__ANU->capacity__A4T=new_capacity__3FZ;
+  Self__ANU->count__CGZ= 0;
+  dico__XVI=result__ENK;
+  HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo__->key__R4T=NULL;
+  HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo__->next__24T=NULL;
+  HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo__->item__E5T=NULL;
+  result__HXQ=NULL;
+  ptr__IXQ=((__POINTER )(NULL));
+  typ_id__NXQ= 0;
+  sz__KXQ=((__UINTEGER_32 )sizeof(__ITM_TYPE_PARAMETER));
+  if ((sz__KXQ ==  0)) {
+    result__HXQ=ITM_TYPE_PARAMETER__;
   } else {
-    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__;
+    typ_id__NXQ=-1;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__KXQ);
+    if ((typ_id__NXQ == (__INTEGER)(-  1))) {
+      a__NCFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__OCFH=(__UINTEGER_32)((__UINTEGER_32)(sz__KXQ + a__NCFH) & (__UINTEGER_32)(~ a__NCFH));
+      ptr_table__CRLH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__OCFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__BRLH=((__POINTER )(NULL));
+      result__DRLH=((__POINTER *)ptr_table__CRLH)[ 0];
+      if ((result__DRLH == (void *)NULL)) {
+        result__DRLH=new_lab__RTJ(new_size__OCFH);
+        next__BRLH=(void *)((unsigned long)result__DRLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OCFH)));
+        ((__POINTER *)next__BRLH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__CRLH)[ 0]=next__BRLH;
+      } else {
+        next__BRLH=((__POINTER *)result__DRLH)[ 0];
+        if ((next__BRLH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DRLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__OCFH <<  1)) <=  4096)) {
+            next__BRLH=(void *)((unsigned long)result__DRLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OCFH)));
+          } else {
+            next__BRLH=new_lab__RTJ(new_size__OCFH);
+          };
+          ((__POINTER *)next__BRLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__CRLH)[ 0]=next__BRLH;
+        } else {
+          ((__POINTER *)result__DRLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BRLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__DRLH=next__BRLH;
+        };
+      };
+      ptr__IXQ=result__DRLH;
+    } else {
+      t__SCFH=((__UINTEGER_32 )typ_id__NXQ);
+      a__RCFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__KRLH=(__UINTEGER_32)((__UINTEGER_32)(sz__KXQ + a__RCFH) & (__UINTEGER_32)(~ a__RCFH));
+      ptr_table__HRLH=((__POINTER )(&(table_type[(t__SCFH)])));
+      lab_type__JRLH=(__UINTEGER_32)(t__SCFH |  1);
+      next__GRLH=((__POINTER )(NULL));
+      result__IRLH=((__POINTER *)ptr_table__HRLH)[ 0];
+      if ((result__IRLH == (void *)NULL)) {
+        result__IRLH=new_lab__RTJ(lab_type__JRLH);
+        next__GRLH=(void *)((unsigned long)result__IRLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KRLH)));
+        ((__POINTER *)next__GRLH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__HRLH)[ 0]=next__GRLH;
+      } else {
+        next__GRLH=((__POINTER *)result__IRLH)[ 0];
+        if ((next__GRLH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__IRLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__KRLH <<  1)) <=  4096)) {
+            next__GRLH=(void *)((unsigned long)result__IRLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KRLH)));
+          } else {
+            next__GRLH=new_lab__RTJ(lab_type__JRLH);
+          };
+          ((__POINTER *)next__GRLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__HRLH)[ 0]=next__GRLH;
+        } else {
+          ((__POINTER *)result__IRLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GRLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__IRLH=next__GRLH;
+        };
+      };
+      ptr__IXQ=result__IRLH;
+    };
+    result__HXQ=((__ITM_TYPE_PARAMETER *)ptr__IXQ);
+    *(result__HXQ) = *(ITM_TYPE_PARAMETER__);
+  };
+  Self__52V=((__ITM_TYPE_PARAMETER *)result__HXQ);
+  Self__52V->parent_itm_type__VFE.name__GZP=(&__string_1);
+  fast_put__to__JPZ(result__ENK,Self__52V,(&__string_1));
+  type_self__DVN=result__HXQ;
+  ARRAYED_COLLECTIONoITM_TYPE_STYLEo__->upper__LPR= 0;
+  ARRAYED_COLLECTIONoITM_TYPE_STYLEo__->capacity__PLW= 0;
+  ARRAYED_COLLECTIONoITM_TYPE_STYLEo__->storage__0LW=NULL;
+  FAST_ARRAYoITM_TYPE_STYLEo__->parent_arrayed_collection__BPR=(*ARRAYED_COLLECTIONoITM_TYPE_STYLEo__);
+  result__DWR=NULL;
+  ptr__EWR=((__POINTER )(NULL));
+  typ_id__JWR= 0;
+  sz__GWR=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_TYPE_STYLEo));
+  if ((sz__GWR ==  0)) {
+    result__DWR=FAST_ARRAYoITM_TYPE_STYLEo__;
   } else {
-    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__;
+    typ_id__JWR=__FAST_ARRAYoITM_TYPE_STYLEo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__GWR);
+    if ((typ_id__JWR == (__INTEGER)(-  1))) {
+      a__GQGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__HQGH=(__UINTEGER_32)((__UINTEGER_32)(sz__GWR + a__GQGH) & (__UINTEGER_32)(~ a__GQGH));
+      ptr_table__MRLH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__HQGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__LRLH=((__POINTER )(NULL));
+      result__NRLH=((__POINTER *)ptr_table__MRLH)[ 0];
+      if ((result__NRLH == (void *)NULL)) {
+        result__NRLH=new_lab__RTJ(new_size__HQGH);
+        next__LRLH=(void *)((unsigned long)result__NRLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HQGH)));
+        ((__POINTER *)next__LRLH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__MRLH)[ 0]=next__LRLH;
+      } else {
+        next__LRLH=((__POINTER *)result__NRLH)[ 0];
+        if ((next__LRLH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__NRLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__HQGH <<  1)) <=  4096)) {
+            next__LRLH=(void *)((unsigned long)result__NRLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HQGH)));
+          } else {
+            next__LRLH=new_lab__RTJ(new_size__HQGH);
+          };
+          ((__POINTER *)next__LRLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__MRLH)[ 0]=next__LRLH;
+        } else {
+          ((__POINTER *)result__NRLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LRLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__NRLH=next__LRLH;
+        };
+      };
+      ptr__EWR=result__NRLH;
+    } else {
+      t__LQGH=((__UINTEGER_32 )typ_id__JWR);
+      a__KQGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__URLH=(__UINTEGER_32)((__UINTEGER_32)(sz__GWR + a__KQGH) & (__UINTEGER_32)(~ a__KQGH));
+      ptr_table__RRLH=((__POINTER )(&(table_type[(t__LQGH)])));
+      lab_type__TRLH=(__UINTEGER_32)(t__LQGH |  1);
+      next__QRLH=((__POINTER )(NULL));
+      result__SRLH=((__POINTER *)ptr_table__RRLH)[ 0];
+      if ((result__SRLH == (void *)NULL)) {
+        result__SRLH=new_lab__RTJ(lab_type__TRLH);
+        next__QRLH=(void *)((unsigned long)result__SRLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__URLH)));
+        ((__POINTER *)next__QRLH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__RRLH)[ 0]=next__QRLH;
+      } else {
+        next__QRLH=((__POINTER *)result__SRLH)[ 0];
+        if ((next__QRLH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__SRLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__URLH <<  1)) <=  4096)) {
+            next__QRLH=(void *)((unsigned long)result__SRLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__URLH)));
+          } else {
+            next__QRLH=new_lab__RTJ(lab_type__TRLH);
+          };
+          ((__POINTER *)next__QRLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__RRLH)[ 0]=next__QRLH;
+        } else {
+          ((__POINTER *)result__SRLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QRLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__SRLH=next__QRLH;
+        };
+      };
+      ptr__EWR=result__SRLH;
+    };
+    result__DWR=((__FAST_ARRAYoITM_TYPE_STYLEo *)ptr__EWR);
+    *(result__DWR) = *(FAST_ARRAYoITM_TYPE_STYLEo__);
+  };
+  Self__GLW=((__FAST_ARRAYoITM_TYPE_STYLEo *)result__DWR);
+  if ((Self__GLW->parent_arrayed_collection__BPR.capacity__PLW <  32)) {
+    Self__GLW->parent_arrayed_collection__BPR.storage__0LW=create__VFYB( 32);
+    Self__GLW->parent_arrayed_collection__BPR.capacity__PLW= 32;
+  };
+  Self__GLW->parent_arrayed_collection__BPR.upper__LPR=(__INTEGER)(-  1);
+  dico__CPR=result__DWR;
+  type_null__1VN=get__IVI((&__string_2));
+  ITM_LIST__->parent_itm_code__SBF=(*ITM_CODE__);
+  last_group__TWF=NULL;
+  old_position__ITI= 0;
+  old_pos_cur__KTI= 0;
+  old_pos_line__MTI= 0;
+  old_pos_col__OTI= 0;
+  old_short_derive__QTI= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo__->upper__C3T= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo__->capacity__NKU= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo__->storage__YKU=NULL;
+  FAST_ARRAYoFAST_ARRAYoITM_LOCALoo__->parent_arrayed_collection__ZTI=(*ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo__);
+  ARRAYED_COLLECTIONoITM_LOCALo__->upper__M2K= 0;
+  ARRAYED_COLLECTIONoITM_LOCALo__->capacity__IMU= 0;
+  ARRAYED_COLLECTIONoITM_LOCALo__->storage__TMU=NULL;
+  FAST_ARRAYoITM_LOCALo__->parent_arrayed_collection__T3H=(*ARRAYED_COLLECTIONoITM_LOCALo__);
+  result__BKK=NULL;
+  ptr__CKK=((__POINTER )(NULL));
+  typ_id__HKK= 0;
+  sz__EKK=((__UINTEGER_32 )sizeof(__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo));
+  if ((sz__EKK ==  0)) {
+    result__BKK=FAST_ARRAYoFAST_ARRAYoITM_LOCALoo__;
   } else {
-    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__;
+    typ_id__HKK=__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__EKK);
+    if ((typ_id__HKK == (__INTEGER)(-  1))) {
+      a__OQGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__PQGH=(__UINTEGER_32)((__UINTEGER_32)(sz__EKK + a__OQGH) & (__UINTEGER_32)(~ a__OQGH));
+      ptr_table__WRLH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__PQGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__VRLH=((__POINTER )(NULL));
+      result__XRLH=((__POINTER *)ptr_table__WRLH)[ 0];
+      if ((result__XRLH == (void *)NULL)) {
+        result__XRLH=new_lab__RTJ(new_size__PQGH);
+        next__VRLH=(void *)((unsigned long)result__XRLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PQGH)));
+        ((__POINTER *)next__VRLH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__WRLH)[ 0]=next__VRLH;
+      } else {
+        next__VRLH=((__POINTER *)result__XRLH)[ 0];
+        if ((next__VRLH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XRLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__PQGH <<  1)) <=  4096)) {
+            next__VRLH=(void *)((unsigned long)result__XRLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PQGH)));
+          } else {
+            next__VRLH=new_lab__RTJ(new_size__PQGH);
+          };
+          ((__POINTER *)next__VRLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__WRLH)[ 0]=next__VRLH;
+        } else {
+          ((__POINTER *)result__XRLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VRLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__XRLH=next__VRLH;
+        };
+      };
+      ptr__CKK=result__XRLH;
+    } else {
+      t__TQGH=((__UINTEGER_32 )typ_id__HKK);
+      a__SQGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__4RLH=(__UINTEGER_32)((__UINTEGER_32)(sz__EKK + a__SQGH) & (__UINTEGER_32)(~ a__SQGH));
+      ptr_table__1RLH=((__POINTER )(&(table_type[(t__TQGH)])));
+      lab_type__3RLH=(__UINTEGER_32)(t__TQGH |  1);
+      next__0RLH=((__POINTER )(NULL));
+      result__2RLH=((__POINTER *)ptr_table__1RLH)[ 0];
+      if ((result__2RLH == (void *)NULL)) {
+        result__2RLH=new_lab__RTJ(lab_type__3RLH);
+        next__0RLH=(void *)((unsigned long)result__2RLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4RLH)));
+        ((__POINTER *)next__0RLH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__1RLH)[ 0]=next__0RLH;
+      } else {
+        next__0RLH=((__POINTER *)result__2RLH)[ 0];
+        if ((next__0RLH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2RLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__4RLH <<  1)) <=  4096)) {
+            next__0RLH=(void *)((unsigned long)result__2RLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4RLH)));
+          } else {
+            next__0RLH=new_lab__RTJ(lab_type__3RLH);
+          };
+          ((__POINTER *)next__0RLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__1RLH)[ 0]=next__0RLH;
+        } else {
+          ((__POINTER *)result__2RLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0RLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__2RLH=next__0RLH;
+        };
+      };
+      ptr__CKK=result__2RLH;
+    };
+    result__BKK=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)ptr__CKK);
+    *(result__BKK) = *(FAST_ARRAYoFAST_ARRAYoITM_LOCALoo__);
+  };
+  Self__EKU=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)result__BKK);
+  if ((Self__EKU->parent_arrayed_collection__ZTI.capacity__NKU <  5)) {
+    Self__EKU->parent_arrayed_collection__ZTI.storage__YKU=create__NFQB( 5);
+    Self__EKU->parent_arrayed_collection__ZTI.capacity__NKU= 5;
+  };
+  Self__EKU->parent_arrayed_collection__ZTI.upper__C3T=(__INTEGER)(-  1);
+  free_list__0TI=result__BKK;
+  ITM_LOCAL__->parent_itm_object__O3H=(*ITM_OBJECT__);
+  ITM_LOCAL__->name__P4K=NULL;
+  HASHED_SET_NODEoSTRING_CONSTANTo__->item__PEV=NULL;
+  HASHED_SET_NODEoSTRING_CONSTANTo__->next__0EV=NULL;
+  ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo__->upper__BYT= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo__->capacity__TBU= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo__->storage__PCU=NULL;
+  FAST_ARRAYoFAST_ARRAYoITM_CODEoo__->parent_arrayed_collection__PAI=(*ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo__);
+  ARRAYED_COLLECTIONoITM_CODEo__->upper__NJL= 0;
+  ARRAYED_COLLECTIONoITM_CODEo__->capacity__TZT= 0;
+  ARRAYED_COLLECTIONoITM_CODEo__->storage__4ZT=NULL;
+  FAST_ARRAYoITM_CODEo__->parent_arrayed_collection__JWF=(*ARRAYED_COLLECTIONoITM_CODEo__);
+  result__KAK=NULL;
+  ptr__LAK=((__POINTER )(NULL));
+  typ_id__QAK= 0;
+  sz__NAK=((__UINTEGER_32 )sizeof(__FAST_ARRAYoFAST_ARRAYoITM_CODEoo));
+  if ((sz__NAK ==  0)) {
+    result__KAK=FAST_ARRAYoFAST_ARRAYoITM_CODEoo__;
   } else {
-    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__ZVKH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__0VKH)[ 0]=next__ZVKH;
-        } else {
-          ((__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__;
+    typ_id__QAK=__FAST_ARRAYoFAST_ARRAYoITM_CODEoo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__NAK);
+    if ((typ_id__QAK == (__INTEGER)(-  1))) {
+      a__WQGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__XQGH=(__UINTEGER_32)((__UINTEGER_32)(sz__NAK + a__WQGH) & (__UINTEGER_32)(~ a__WQGH));
+      ptr_table__ASLH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__XQGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__5RLH=((__POINTER )(NULL));
+      result__BSLH=((__POINTER *)ptr_table__ASLH)[ 0];
+      if ((result__BSLH == (void *)NULL)) {
+        result__BSLH=new_lab__RTJ(new_size__XQGH);
+        next__5RLH=(void *)((unsigned long)result__BSLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XQGH)));
+        ((__POINTER *)next__5RLH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__ASLH)[ 0]=next__5RLH;
+      } else {
+        next__5RLH=((__POINTER *)result__BSLH)[ 0];
+        if ((next__5RLH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BSLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__XQGH <<  1)) <=  4096)) {
+            next__5RLH=(void *)((unsigned long)result__BSLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XQGH)));
+          } else {
+            next__5RLH=new_lab__RTJ(new_size__XQGH);
+          };
+          ((__POINTER *)next__5RLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__ASLH)[ 0]=next__5RLH;
+        } else {
+          ((__POINTER *)result__BSLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5RLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__BSLH=next__5RLH;
+        };
+      };
+      ptr__LAK=result__BSLH;
+    } else {
+      t__1QGH=((__UINTEGER_32 )typ_id__QAK);
+      a__0QGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__ISLH=(__UINTEGER_32)((__UINTEGER_32)(sz__NAK + a__0QGH) & (__UINTEGER_32)(~ a__0QGH));
+      ptr_table__FSLH=((__POINTER )(&(table_type[(t__1QGH)])));
+      lab_type__HSLH=(__UINTEGER_32)(t__1QGH |  1);
+      next__ESLH=((__POINTER )(NULL));
+      result__GSLH=((__POINTER *)ptr_table__FSLH)[ 0];
+      if ((result__GSLH == (void *)NULL)) {
+        result__GSLH=new_lab__RTJ(lab_type__HSLH);
+        next__ESLH=(void *)((unsigned long)result__GSLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ISLH)));
+        ((__POINTER *)next__ESLH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__FSLH)[ 0]=next__ESLH;
+      } else {
+        next__ESLH=((__POINTER *)result__GSLH)[ 0];
+        if ((next__ESLH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GSLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__ISLH <<  1)) <=  4096)) {
+            next__ESLH=(void *)((unsigned long)result__GSLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ISLH)));
+          } else {
+            next__ESLH=new_lab__RTJ(lab_type__HSLH);
+          };
+          ((__POINTER *)next__ESLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__FSLH)[ 0]=next__ESLH;
+        } else {
+          ((__POINTER *)result__GSLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ESLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__GSLH=next__ESLH;
+        };
+      };
+      ptr__LAK=result__GSLH;
+    };
+    result__KAK=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)ptr__LAK);
+    *(result__KAK) = *(FAST_ARRAYoFAST_ARRAYoITM_CODEoo__);
+  };
+  Self__BHU=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)result__KAK);
+  if ((Self__BHU->parent_arrayed_collection__PAI.capacity__TBU <  5)) {
+    Self__BHU->parent_arrayed_collection__PAI.storage__PCU=create__3ZPB( 5);
+    Self__BHU->parent_arrayed_collection__PAI.capacity__TBU= 5;
+  };
+  Self__BHU->parent_arrayed_collection__PAI.upper__BYT=(__INTEGER)(-  1);
+  free_list__QAI=result__KAK;
+  ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo__->upper__LUU= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo__->capacity__QWU= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo__->storage__1WU=NULL;
+  FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo__->parent_arrayed_collection__0AL=(*ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo__);
+  ARRAYED_COLLECTIONoSTRING_CONSTANTo__->upper__2CPD= 0;
+  ARRAYED_COLLECTIONoSTRING_CONSTANTo__->capacity__XEPD= 0;
+  ARRAYED_COLLECTIONoSTRING_CONSTANTo__->storage__SFPD=NULL;
+  FAST_ARRAYoSTRING_CONSTANTo__->parent_arrayed_collection__MBJ=(*ARRAYED_COLLECTIONoSTRING_CONSTANTo__);
+  result__EMM=NULL;
+  ptr__FMM=((__POINTER )(NULL));
+  typ_id__KMM= 0;
+  sz__HMM=((__UINTEGER_32 )sizeof(__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo));
+  if ((sz__HMM ==  0)) {
+    result__EMM=FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo__;
   } else {
-    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__4VKH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__5VKH)[ 0]=next__4VKH;
-        } else {
-          ((__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__;
+    typ_id__KMM=__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__HMM);
+    if ((typ_id__KMM == (__INTEGER)(-  1))) {
+      a__4QGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__5QGH=(__UINTEGER_32)((__UINTEGER_32)(sz__HMM + a__4QGH) & (__UINTEGER_32)(~ a__4QGH));
+      ptr_table__KSLH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__5QGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__JSLH=((__POINTER )(NULL));
+      result__LSLH=((__POINTER *)ptr_table__KSLH)[ 0];
+      if ((result__LSLH == (void *)NULL)) {
+        result__LSLH=new_lab__RTJ(new_size__5QGH);
+        next__JSLH=(void *)((unsigned long)result__LSLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5QGH)));
+        ((__POINTER *)next__JSLH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__KSLH)[ 0]=next__JSLH;
+      } else {
+        next__JSLH=((__POINTER *)result__LSLH)[ 0];
+        if ((next__JSLH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LSLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__5QGH <<  1)) <=  4096)) {
+            next__JSLH=(void *)((unsigned long)result__LSLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5QGH)));
+          } else {
+            next__JSLH=new_lab__RTJ(new_size__5QGH);
+          };
+          ((__POINTER *)next__JSLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__KSLH)[ 0]=next__JSLH;
+        } else {
+          ((__POINTER *)result__LSLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JSLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__LSLH=next__JSLH;
+        };
+      };
+      ptr__FMM=result__LSLH;
+    } else {
+      t__DRGH=((__UINTEGER_32 )typ_id__KMM);
+      a__CRGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__SSLH=(__UINTEGER_32)((__UINTEGER_32)(sz__HMM + a__CRGH) & (__UINTEGER_32)(~ a__CRGH));
+      ptr_table__PSLH=((__POINTER )(&(table_type[(t__DRGH)])));
+      lab_type__RSLH=(__UINTEGER_32)(t__DRGH |  1);
+      next__OSLH=((__POINTER )(NULL));
+      result__QSLH=((__POINTER *)ptr_table__PSLH)[ 0];
+      if ((result__QSLH == (void *)NULL)) {
+        result__QSLH=new_lab__RTJ(lab_type__RSLH);
+        next__OSLH=(void *)((unsigned long)result__QSLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SSLH)));
+        ((__POINTER *)next__OSLH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__PSLH)[ 0]=next__OSLH;
+      } else {
+        next__OSLH=((__POINTER *)result__QSLH)[ 0];
+        if ((next__OSLH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__QSLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__SSLH <<  1)) <=  4096)) {
+            next__OSLH=(void *)((unsigned long)result__QSLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SSLH)));
+          } else {
+            next__OSLH=new_lab__RTJ(lab_type__RSLH);
+          };
+          ((__POINTER *)next__OSLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__PSLH)[ 0]=next__OSLH;
+        } else {
+          ((__POINTER *)result__QSLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OSLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__QSLH=next__OSLH;
+        };
+      };
+      ptr__FMM=result__QSLH;
+    };
+    result__EMM=((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)ptr__FMM);
+    *(result__EMM) = *(FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo__);
+  };
+  Self__HWU=((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)result__EMM);
+  if ((Self__HWU->parent_arrayed_collection__0AL.capacity__QWU <  5)) {
+    Self__HWU->parent_arrayed_collection__0AL.storage__1WU=create__Z1ZB( 5);
+    Self__HWU->parent_arrayed_collection__0AL.capacity__QWU= 5;
+  };
+  Self__HWU->parent_arrayed_collection__0AL.upper__LUU=(__INTEGER)(-  1);
+  free_list__1AL=result__EMM;
+  ITM_LIST_IDF__->parent_itm_code__1EJ=(*ITM_CODE__);
+  ITM_LDOTS__->parent_itm_constant__IXF=(*ITM_CODE__);
+  ITM_PROTOTYPE__->parent_itm_constant__UYF=(*ITM_CONSTANT__);
+  ITM_WRITE__->parent_itm_code__QFJ=(*ITM_CODE__);
+  ITM_WRITE_VALUE__->parent_itm_write__RFJ=(*ITM_WRITE__);
+  ITM_WRITE_CAST__->parent_itm_write__IGJ=(*ITM_WRITE__);
+  ITM_READ__->parent_itm_code__VIJ=(*ITM_CODE__);
+  ITM_WRITE_CODE__->parent_itm_write__TJJ=(*ITM_WRITE__);
+  ITM_OPERATOR__->parent_itm_code__VGL=(*ITM_CODE__);
+  ITM_READ_ARG1__->parent_itm_read__1JL=(*ITM_READ__);
+  ITM_READ_ARG2__->parent_itm_read__IML=(*ITM_READ__);
+  ITM_EXPRESSION__->value_list__PJV=NULL;
+  ITM_OLD__->parent_itm_code__W3L=(*ITM_CODE__);
+  ITM_EXTERN__->parent_itm_code__K5M=(*ITM_CODE__);
+  ITM_EXTERNAL_TYPE__->parent_itm_extern__L5M=(*ITM_EXTERN__);
+  ITM_BLOCK__->list__KMDC=NULL;
+  ITM_EXTERNAL__->parent_itm_extern__QGN=(*ITM_EXTERN__);
+  ITM_READ_ARGS__->parent_itm_read__GEO=(*ITM_READ__);
+  ITM_RESULT__->value__WKFC=NULL;
+  ITM_OPERATOR__->name__AKL=NULL;
+  ITM_ARGUMENT__->parent_itm_code__O5M=(*ITM_OBJECT__);
+  ITM_ARG__->parent_itm_argument__SEHB=(*ITM_ARGUMENT__);
+  ITM_ARG__->name__F0HC=NULL;
+  ITM_ARG__->type__G0HC=NULL;
+  empty_list__IOMF=create_with_capacity__THRC( 0);
+  HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo__->buckets__RLQF=NULL;
+  HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo__->capacity__MLQF= 0;
+  HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo__->count__DQQF= 0;
+  result__TJOF=NULL;
+  ptr__UJOF=((__POINTER )(NULL));
+  typ_id__ZJOF= 0;
+  sz__WJOF=((__UINTEGER_32 )sizeof(__HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo));
+  if ((sz__WJOF ==  0)) {
+    result__TJOF=HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo__;
   } else {
-    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__;
+    typ_id__ZJOF=__HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__WJOF);
+    if ((typ_id__ZJOF == (__INTEGER)(-  1))) {
+      a__GRGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__HRGH=(__UINTEGER_32)((__UINTEGER_32)(sz__WJOF + a__GRGH) & (__UINTEGER_32)(~ a__GRGH));
+      ptr_table__USLH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__HRGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__TSLH=((__POINTER )(NULL));
+      result__VSLH=((__POINTER *)ptr_table__USLH)[ 0];
+      if ((result__VSLH == (void *)NULL)) {
+        result__VSLH=new_lab__RTJ(new_size__HRGH);
+        next__TSLH=(void *)((unsigned long)result__VSLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HRGH)));
+        ((__POINTER *)next__TSLH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__USLH)[ 0]=next__TSLH;
+      } else {
+        next__TSLH=((__POINTER *)result__VSLH)[ 0];
+        if ((next__TSLH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__VSLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__HRGH <<  1)) <=  4096)) {
+            next__TSLH=(void *)((unsigned long)result__VSLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HRGH)));
+          } else {
+            next__TSLH=new_lab__RTJ(new_size__HRGH);
+          };
+          ((__POINTER *)next__TSLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__USLH)[ 0]=next__TSLH;
+        } else {
+          ((__POINTER *)result__VSLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TSLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__VSLH=next__TSLH;
+        };
+      };
+      ptr__UJOF=result__VSLH;
+    } else {
+      t__LRGH=((__UINTEGER_32 )typ_id__ZJOF);
+      a__KRGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__2SLH=(__UINTEGER_32)((__UINTEGER_32)(sz__WJOF + a__KRGH) & (__UINTEGER_32)(~ a__KRGH));
+      ptr_table__ZSLH=((__POINTER )(&(table_type[(t__LRGH)])));
+      lab_type__1SLH=(__UINTEGER_32)(t__LRGH |  1);
+      next__YSLH=((__POINTER )(NULL));
+      result__0SLH=((__POINTER *)ptr_table__ZSLH)[ 0];
+      if ((result__0SLH == (void *)NULL)) {
+        result__0SLH=new_lab__RTJ(lab_type__1SLH);
+        next__YSLH=(void *)((unsigned long)result__0SLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2SLH)));
+        ((__POINTER *)next__YSLH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__ZSLH)[ 0]=next__YSLH;
+      } else {
+        next__YSLH=((__POINTER *)result__0SLH)[ 0];
+        if ((next__YSLH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__0SLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__2SLH <<  1)) <=  4096)) {
+            next__YSLH=(void *)((unsigned long)result__0SLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2SLH)));
+          } else {
+            next__YSLH=new_lab__RTJ(lab_type__1SLH);
+          };
+          ((__POINTER *)next__YSLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__ZSLH)[ 0]=next__YSLH;
+        } else {
+          ((__POINTER *)result__0SLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YSLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__0SLH=next__YSLH;
+        };
+      };
+      ptr__UJOF=result__0SLH;
+    };
+    result__TJOF=((__HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo *)ptr__UJOF);
+    *(result__TJOF) = *(HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo__);
+  };
+  Self__DOQF=((__HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo *)result__TJOF);
+  new_capacity__U0RF=prime_number_ceiling__021( 53);
+  Self__DOQF->buckets__RLQF=create__FNUF(new_capacity__U0RF);
+  Self__DOQF->capacity__MLQF=new_capacity__U0RF;
+  Self__DOQF->count__DQQF= 0;
+  bucket__SOMF=result__TJOF;
+  HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo__->item__3LQF=NULL;
+  HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo__->next__JMQF=NULL;
+  ITM_ARGS__->parent_itm_argument__CEFE=(*ITM_ARGUMENT__);
+  ITM_ARGS__->name__XDQF=NULL;
+  ITM_ARGS__->type__YDQF=NULL;
+  ITM_EXTERNAL_TYPE__->is_persistant__IIN=FALSE__;
+  result__KAG=NULL;
+  ptr__LAG=((__POINTER )(NULL));
+  typ_id__QAG= 0;
+  sz__NAG=((__UINTEGER_32 )sizeof(__FAST_ARRAYoSTRINGo));
+  if ((sz__NAG ==  0)) {
+    result__KAG=FAST_ARRAYoSTRINGo__;
   } else {
-    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__;
+    typ_id__QAG=__FAST_ARRAYoSTRINGo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__NAG);
+    if ((typ_id__QAG == (__INTEGER)(-  1))) {
+      a__1BFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__L0G=(__UINTEGER_32)((__UINTEGER_32)(sz__NAG + a__1BFH) & (__UINTEGER_32)(~ a__1BFH));
+      ptr_table__4SLH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__L0G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__3SLH=((__POINTER )(NULL));
+      result__5SLH=((__POINTER *)ptr_table__4SLH)[ 0];
+      if ((result__5SLH == (void *)NULL)) {
+        result__5SLH=new_lab__RTJ(new_size__L0G);
+        next__3SLH=(void *)((unsigned long)result__5SLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__L0G)));
+        ((__POINTER *)next__3SLH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__4SLH)[ 0]=next__3SLH;
+      } else {
+        next__3SLH=((__POINTER *)result__5SLH)[ 0];
+        if ((next__3SLH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__5SLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__L0G <<  1)) <=  4096)) {
+            next__3SLH=(void *)((unsigned long)result__5SLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__L0G)));
+          } else {
+            next__3SLH=new_lab__RTJ(new_size__L0G);
+          };
+          ((__POINTER *)next__3SLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__4SLH)[ 0]=next__3SLH;
+        } else {
+          ((__POINTER *)result__5SLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3SLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__5SLH=next__3SLH;
+        };
+      };
+      ptr__LAG=result__5SLH;
+    } else {
+      t__U1G=((__UINTEGER_32 )typ_id__QAG);
+      a__BCFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__GTLH=(__UINTEGER_32)((__UINTEGER_32)(sz__NAG + a__BCFH) & (__UINTEGER_32)(~ a__BCFH));
+      ptr_table__DTLH=((__POINTER )(&(table_type[(t__U1G)])));
+      lab_type__FTLH=(__UINTEGER_32)(t__U1G |  1);
+      next__CTLH=((__POINTER )(NULL));
+      result__ETLH=((__POINTER *)ptr_table__DTLH)[ 0];
+      if ((result__ETLH == (void *)NULL)) {
+        result__ETLH=new_lab__RTJ(lab_type__FTLH);
+        next__CTLH=(void *)((unsigned long)result__ETLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GTLH)));
+        ((__POINTER *)next__CTLH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__DTLH)[ 0]=next__CTLH;
+      } else {
+        next__CTLH=((__POINTER *)result__ETLH)[ 0];
+        if ((next__CTLH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ETLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__GTLH <<  1)) <=  4096)) {
+            next__CTLH=(void *)((unsigned long)result__ETLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GTLH)));
+          } else {
+            next__CTLH=new_lab__RTJ(lab_type__FTLH);
+          };
+          ((__POINTER *)next__CTLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__DTLH)[ 0]=next__CTLH;
+        } else {
+          ((__POINTER *)result__ETLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CTLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__ETLH=next__CTLH;
+        };
+      };
+      ptr__LAG=result__ETLH;
+    };
+    result__KAG=((__FAST_ARRAYoSTRINGo *)ptr__LAG);
+    *(result__KAG) = *(FAST_ARRAYoSTRINGo__);
+  };
+  Self__AGT=((__FAST_ARRAYoSTRINGo *)result__KAG);
+  if ((Self__AGT->parent_arrayed_collection__5KC.capacity__JGT <  5)) {
+    Self__AGT->parent_arrayed_collection__5KC.storage__UGT=create__2DRB( 5);
+    Self__AGT->parent_arrayed_collection__5KC.capacity__JGT= 5;
+  };
+  Self__AGT->parent_arrayed_collection__5KC.upper__CLC=(__INTEGER)(-  1);
+  free__3OP=result__KAG;
+  type_void__WYF=get__IVI((&__string_3));
+  PROTOTYPE__->default_value__LWE=NULL;
+  PROTOTYPE__->type_c__GYE=NULL;
+  LIP_CODE__->parent_itm_object__XFE=(*ITM_OBJECT__);
+  LIP_UNARY__->parent_lip_code__FZ4B=(*LIP_CODE__);
+  LIP_UNARY__->operator__J5QD='\0';
+  LIP_UNARY__->value__G5QD=NULL;
+  LIP_CALL__->parent_lip_code__XZ4B=(*LIP_CODE__);
+  LIP_CALL__->name__JRUE=NULL;
+  LIP_CALL__->argument__4QUE=NULL;
+  ARRAYED_COLLECTIONoLIP_INTEGERo__->upper__GIXE= 0;
+  ARRAYED_COLLECTIONoLIP_INTEGERo__->capacity__IMXE= 0;
+  ARRAYED_COLLECTIONoLIP_INTEGERo__->storage__TMXE=NULL;
+  FAST_ARRAYoLIP_INTEGERo__->parent_arrayed_collection__3YSE=(*ARRAYED_COLLECTIONoLIP_INTEGERo__);
+  result__MVTE=NULL;
+  ptr__NVTE=((__POINTER )(NULL));
+  typ_id__SVTE= 0;
+  sz__PVTE=((__UINTEGER_32 )sizeof(__FAST_ARRAYoLIP_INTEGERo));
+  if ((sz__PVTE ==  0)) {
+    result__MVTE=FAST_ARRAYoLIP_INTEGERo__;
   } else {
-    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__;
+    typ_id__SVTE=__FAST_ARRAYoLIP_INTEGERo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__PVTE);
+    if ((typ_id__SVTE == (__INTEGER)(-  1))) {
+      a__ORGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__PRGH=(__UINTEGER_32)((__UINTEGER_32)(sz__PVTE + a__ORGH) & (__UINTEGER_32)(~ a__ORGH));
+      ptr_table__ITLH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__PRGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__HTLH=((__POINTER )(NULL));
+      result__JTLH=((__POINTER *)ptr_table__ITLH)[ 0];
+      if ((result__JTLH == (void *)NULL)) {
+        result__JTLH=new_lab__RTJ(new_size__PRGH);
+        next__HTLH=(void *)((unsigned long)result__JTLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PRGH)));
+        ((__POINTER *)next__HTLH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__ITLH)[ 0]=next__HTLH;
+      } else {
+        next__HTLH=((__POINTER *)result__JTLH)[ 0];
+        if ((next__HTLH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__JTLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__PRGH <<  1)) <=  4096)) {
+            next__HTLH=(void *)((unsigned long)result__JTLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PRGH)));
+          } else {
+            next__HTLH=new_lab__RTJ(new_size__PRGH);
+          };
+          ((__POINTER *)next__HTLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__ITLH)[ 0]=next__HTLH;
+        } else {
+          ((__POINTER *)result__JTLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HTLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__JTLH=next__HTLH;
+        };
+      };
+      ptr__NVTE=result__JTLH;
+    } else {
+      t__TRGH=((__UINTEGER_32 )typ_id__SVTE);
+      a__SRGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__QTLH=(__UINTEGER_32)((__UINTEGER_32)(sz__PVTE + a__SRGH) & (__UINTEGER_32)(~ a__SRGH));
+      ptr_table__NTLH=((__POINTER )(&(table_type[(t__TRGH)])));
+      lab_type__PTLH=(__UINTEGER_32)(t__TRGH |  1);
+      next__MTLH=((__POINTER )(NULL));
+      result__OTLH=((__POINTER *)ptr_table__NTLH)[ 0];
+      if ((result__OTLH == (void *)NULL)) {
+        result__OTLH=new_lab__RTJ(lab_type__PTLH);
+        next__MTLH=(void *)((unsigned long)result__OTLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QTLH)));
+        ((__POINTER *)next__MTLH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__NTLH)[ 0]=next__MTLH;
+      } else {
+        next__MTLH=((__POINTER *)result__OTLH)[ 0];
+        if ((next__MTLH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__OTLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__QTLH <<  1)) <=  4096)) {
+            next__MTLH=(void *)((unsigned long)result__OTLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QTLH)));
+          } else {
+            next__MTLH=new_lab__RTJ(lab_type__PTLH);
+          };
+          ((__POINTER *)next__MTLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__NTLH)[ 0]=next__MTLH;
+        } else {
+          ((__POINTER *)result__OTLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MTLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__OTLH=next__MTLH;
+        };
+      };
+      ptr__NVTE=result__OTLH;
+    };
+    result__MVTE=((__FAST_ARRAYoLIP_INTEGERo *)ptr__NVTE);
+    *(result__MVTE) = *(FAST_ARRAYoLIP_INTEGERo__);
+  };
+  Self__5LXE=((__FAST_ARRAYoLIP_INTEGERo *)result__MVTE);
+  if ((Self__5LXE->parent_arrayed_collection__3YSE.capacity__IMXE <  10)) {
+    Self__5LXE->parent_arrayed_collection__3YSE.storage__TMXE=create__JPGF( 10);
+    Self__5LXE->parent_arrayed_collection__3YSE.capacity__IMXE= 10;
+  };
+  Self__5LXE->parent_arrayed_collection__3YSE.upper__GIXE=(__INTEGER)(-  1);
+  storage__4YSE=result__MVTE;
+  LIP_INTEGER__->value__FP4F= 0;
+  ARRAYED_COLLECTIONoLIP_STRINGo__->upper__WZPF= 0;
+  ARRAYED_COLLECTIONoLIP_STRINGo__->capacity__4AQF= 0;
+  ARRAYED_COLLECTIONoLIP_STRINGo__->storage__JBQF=NULL;
+  FAST_ARRAYoLIP_STRINGo__->parent_arrayed_collection__G5FF=(*ARRAYED_COLLECTIONoLIP_STRINGo__);
+  result__GTMF=NULL;
+  ptr__HTMF=((__POINTER )(NULL));
+  typ_id__MTMF= 0;
+  sz__JTMF=((__UINTEGER_32 )sizeof(__FAST_ARRAYoLIP_STRINGo));
+  if ((sz__JTMF ==  0)) {
+    result__GTMF=FAST_ARRAYoLIP_STRINGo__;
   } else {
-    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__;
+    typ_id__MTMF=__FAST_ARRAYoLIP_STRINGo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__JTMF);
+    if ((typ_id__MTMF == (__INTEGER)(-  1))) {
+      a__WRGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__XRGH=(__UINTEGER_32)((__UINTEGER_32)(sz__JTMF + a__WRGH) & (__UINTEGER_32)(~ a__WRGH));
+      ptr_table__STLH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__XRGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__RTLH=((__POINTER )(NULL));
+      result__TTLH=((__POINTER *)ptr_table__STLH)[ 0];
+      if ((result__TTLH == (void *)NULL)) {
+        result__TTLH=new_lab__RTJ(new_size__XRGH);
+        next__RTLH=(void *)((unsigned long)result__TTLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XRGH)));
+        ((__POINTER *)next__RTLH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__STLH)[ 0]=next__RTLH;
+      } else {
+        next__RTLH=((__POINTER *)result__TTLH)[ 0];
+        if ((next__RTLH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TTLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__XRGH <<  1)) <=  4096)) {
+            next__RTLH=(void *)((unsigned long)result__TTLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XRGH)));
+          } else {
+            next__RTLH=new_lab__RTJ(new_size__XRGH);
+          };
+          ((__POINTER *)next__RTLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__STLH)[ 0]=next__RTLH;
+        } else {
+          ((__POINTER *)result__TTLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RTLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__TTLH=next__RTLH;
+        };
+      };
+      ptr__HTMF=result__TTLH;
+    } else {
+      t__1RGH=((__UINTEGER_32 )typ_id__MTMF);
+      a__0RGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__0TLH=(__UINTEGER_32)((__UINTEGER_32)(sz__JTMF + a__0RGH) & (__UINTEGER_32)(~ a__0RGH));
+      ptr_table__XTLH=((__POINTER )(&(table_type[(t__1RGH)])));
+      lab_type__ZTLH=(__UINTEGER_32)(t__1RGH |  1);
+      next__WTLH=((__POINTER )(NULL));
+      result__YTLH=((__POINTER *)ptr_table__XTLH)[ 0];
+      if ((result__YTLH == (void *)NULL)) {
+        result__YTLH=new_lab__RTJ(lab_type__ZTLH);
+        next__WTLH=(void *)((unsigned long)result__YTLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0TLH)));
+        ((__POINTER *)next__WTLH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__XTLH)[ 0]=next__WTLH;
+      } else {
+        next__WTLH=((__POINTER *)result__YTLH)[ 0];
+        if ((next__WTLH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YTLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__0TLH <<  1)) <=  4096)) {
+            next__WTLH=(void *)((unsigned long)result__YTLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0TLH)));
+          } else {
+            next__WTLH=new_lab__RTJ(lab_type__ZTLH);
+          };
+          ((__POINTER *)next__WTLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__XTLH)[ 0]=next__WTLH;
+        } else {
+          ((__POINTER *)result__YTLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WTLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__YTLH=next__WTLH;
+        };
+      };
+      ptr__HTMF=result__YTLH;
+    };
+    result__GTMF=((__FAST_ARRAYoLIP_STRINGo *)ptr__HTMF);
+    *(result__GTMF) = *(FAST_ARRAYoLIP_STRINGo__);
+  };
+  Self__VAQF=((__FAST_ARRAYoLIP_STRINGo *)result__GTMF);
+  if ((Self__VAQF->parent_arrayed_collection__G5FF.capacity__4AQF <  10)) {
+    Self__VAQF->parent_arrayed_collection__G5FF.storage__JBQF=create__ARYF( 10);
+    Self__VAQF->parent_arrayed_collection__G5FF.capacity__4AQF= 10;
+  };
+  Self__VAQF->parent_arrayed_collection__G5FF.upper__WZPF=(__INTEGER)(-  1);
+  storage__H5FF=result__GTMF;
+  LIP_STRING__->value__WSUE=NULL;
+  LIP_BOOLEAN__->value__MGQD=FALSE__;
+  result__Q5NF=NULL;
+  ptr__R5NF=((__POINTER )(NULL));
+  typ_id__W5NF= 0;
+  sz__T5NF=((__UINTEGER_32 )sizeof(__LIP_BOOLEAN));
+  if ((sz__T5NF ==  0)) {
+    result__Q5NF=LIP_BOOLEAN__;
   } else {
-    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__;
+    typ_id__W5NF=-1;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__T5NF);
+    if ((typ_id__W5NF == (__INTEGER)(-  1))) {
+      a__4RGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__5RGH=(__UINTEGER_32)((__UINTEGER_32)(sz__T5NF + a__4RGH) & (__UINTEGER_32)(~ a__4RGH));
+      ptr_table__2TLH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__5RGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__1TLH=((__POINTER )(NULL));
+      result__3TLH=((__POINTER *)ptr_table__2TLH)[ 0];
+      if ((result__3TLH == (void *)NULL)) {
+        result__3TLH=new_lab__RTJ(new_size__5RGH);
+        next__1TLH=(void *)((unsigned long)result__3TLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5RGH)));
+        ((__POINTER *)next__1TLH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__2TLH)[ 0]=next__1TLH;
+      } else {
+        next__1TLH=((__POINTER *)result__3TLH)[ 0];
+        if ((next__1TLH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__3TLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__5RGH <<  1)) <=  4096)) {
+            next__1TLH=(void *)((unsigned long)result__3TLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5RGH)));
+          } else {
+            next__1TLH=new_lab__RTJ(new_size__5RGH);
+          };
+          ((__POINTER *)next__1TLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__2TLH)[ 0]=next__1TLH;
+        } else {
+          ((__POINTER *)result__3TLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1TLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__3TLH=next__1TLH;
+        };
+      };
+      ptr__R5NF=result__3TLH;
+    } else {
+      t__DSGH=((__UINTEGER_32 )typ_id__W5NF);
+      a__CSGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__EULH=(__UINTEGER_32)((__UINTEGER_32)(sz__T5NF + a__CSGH) & (__UINTEGER_32)(~ a__CSGH));
+      ptr_table__BULH=((__POINTER )(&(table_type[(t__DSGH)])));
+      lab_type__DULH=(__UINTEGER_32)(t__DSGH |  1);
+      next__AULH=((__POINTER )(NULL));
+      result__CULH=((__POINTER *)ptr_table__BULH)[ 0];
+      if ((result__CULH == (void *)NULL)) {
+        result__CULH=new_lab__RTJ(lab_type__DULH);
+        next__AULH=(void *)((unsigned long)result__CULH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EULH)));
+        ((__POINTER *)next__AULH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__BULH)[ 0]=next__AULH;
+      } else {
+        next__AULH=((__POINTER *)result__CULH)[ 0];
+        if ((next__AULH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__CULH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__EULH <<  1)) <=  4096)) {
+            next__AULH=(void *)((unsigned long)result__CULH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EULH)));
+          } else {
+            next__AULH=new_lab__RTJ(lab_type__DULH);
+          };
+          ((__POINTER *)next__AULH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__BULH)[ 0]=next__AULH;
+        } else {
+          ((__POINTER *)result__CULH)[ 0]=(void *)((unsigned long)((__POINTER *)next__AULH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__CULH=next__AULH;
+        };
+      };
+      ptr__R5NF=result__CULH;
+    };
+    result__Q5NF=((__LIP_BOOLEAN *)ptr__R5NF);
+    *(result__Q5NF) = *(LIP_BOOLEAN__);
+  };
+  ((__LIP_BOOLEAN *)result__Q5NF)->value__MGQD=TRUE__;
+  true__5YLF=result__Q5NF;
+  LIP_VALUE__->parent_lip_code__1IFE=(*LIP_CODE__);
+  LIP_VALUE__->value__I1UE=NULL;
+  LIP_BINARY__->parent_lip_code__WNZB=(*LIP_CODE__);
+  LIP_BINARY__->left__J2QD=NULL;
+  LIP_BINARY__->right__M2QD=NULL;
+  LIP_BINARY__->operator__P2QD='\0';
+  LIP_AFFECT__->parent_lip_code__YSPB=(*LIP_CODE__);
+  LIP_AFFECT__->name__AGFC=NULL;
+  LIP_AFFECT__->value__SGFC=NULL;
+  ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo__->upper__PTTD= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo__->capacity__QFUD= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo__->storage__MGUD=NULL;
+  FAST_ARRAYoFAST_ARRAYoLIP_CODEoo__->parent_arrayed_collection__WOID=(*ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo__);
+  ARRAYED_COLLECTIONoLIP_CODEo__->upper__ZGQD= 0;
+  ARRAYED_COLLECTIONoLIP_CODEo__->capacity__1UTD= 0;
+  ARRAYED_COLLECTIONoLIP_CODEo__->storage__GVTD=NULL;
+  FAST_ARRAYoLIP_CODEo__->parent_arrayed_collection__4MYC=(*ARRAYED_COLLECTIONoLIP_CODEo__);
+  result__1YMD=NULL;
+  ptr__2YMD=((__POINTER )(NULL));
+  typ_id__BZMD= 0;
+  sz__4YMD=((__UINTEGER_32 )sizeof(__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo));
+  if ((sz__4YMD ==  0)) {
+    result__1YMD=FAST_ARRAYoFAST_ARRAYoLIP_CODEoo__;
   } else {
-    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__;
+    typ_id__BZMD=__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__4YMD);
+    if ((typ_id__BZMD == (__INTEGER)(-  1))) {
+      a__GSGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__HSGH=(__UINTEGER_32)((__UINTEGER_32)(sz__4YMD + a__GSGH) & (__UINTEGER_32)(~ a__GSGH));
+      ptr_table__GULH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__HSGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__FULH=((__POINTER )(NULL));
+      result__HULH=((__POINTER *)ptr_table__GULH)[ 0];
+      if ((result__HULH == (void *)NULL)) {
+        result__HULH=new_lab__RTJ(new_size__HSGH);
+        next__FULH=(void *)((unsigned long)result__HULH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HSGH)));
+        ((__POINTER *)next__FULH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__GULH)[ 0]=next__FULH;
+      } else {
+        next__FULH=((__POINTER *)result__HULH)[ 0];
+        if ((next__FULH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HULH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__HSGH <<  1)) <=  4096)) {
+            next__FULH=(void *)((unsigned long)result__HULH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HSGH)));
+          } else {
+            next__FULH=new_lab__RTJ(new_size__HSGH);
+          };
+          ((__POINTER *)next__FULH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__GULH)[ 0]=next__FULH;
+        } else {
+          ((__POINTER *)result__HULH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FULH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__HULH=next__FULH;
+        };
+      };
+      ptr__2YMD=result__HULH;
+    } else {
+      t__LSGH=((__UINTEGER_32 )typ_id__BZMD);
+      a__KSGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__OULH=(__UINTEGER_32)((__UINTEGER_32)(sz__4YMD + a__KSGH) & (__UINTEGER_32)(~ a__KSGH));
+      ptr_table__LULH=((__POINTER )(&(table_type[(t__LSGH)])));
+      lab_type__NULH=(__UINTEGER_32)(t__LSGH |  1);
+      next__KULH=((__POINTER )(NULL));
+      result__MULH=((__POINTER *)ptr_table__LULH)[ 0];
+      if ((result__MULH == (void *)NULL)) {
+        result__MULH=new_lab__RTJ(lab_type__NULH);
+        next__KULH=(void *)((unsigned long)result__MULH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OULH)));
+        ((__POINTER *)next__KULH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__LULH)[ 0]=next__KULH;
+      } else {
+        next__KULH=((__POINTER *)result__MULH)[ 0];
+        if ((next__KULH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MULH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__OULH <<  1)) <=  4096)) {
+            next__KULH=(void *)((unsigned long)result__MULH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OULH)));
+          } else {
+            next__KULH=new_lab__RTJ(lab_type__NULH);
+          };
+          ((__POINTER *)next__KULH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__LULH)[ 0]=next__KULH;
+        } else {
+          ((__POINTER *)result__MULH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KULH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__MULH=next__KULH;
+        };
+      };
+      ptr__2YMD=result__MULH;
+    };
+    result__1YMD=((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)ptr__2YMD);
+    *(result__1YMD) = *(FAST_ARRAYoFAST_ARRAYoLIP_CODEoo__);
+  };
+  Self__KKUD=((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)result__1YMD);
+  if ((Self__KKUD->parent_arrayed_collection__WOID.capacity__QFUD <  5)) {
+    Self__KKUD->parent_arrayed_collection__WOID.storage__MGUD=create__R2IE( 5);
+    Self__KKUD->parent_arrayed_collection__WOID.capacity__QFUD= 5;
+  };
+  Self__KKUD->parent_arrayed_collection__WOID.upper__PTTD=(__INTEGER)(-  1);
+  free_list__XOID=result__1YMD;
+  LIP_IF__->parent_lip_code__PQYC=(*LIP_CODE__);
+  LIP_IF__->condition__3FQD=NULL;
+  LIP_IF__->then__TGQD=NULL;
+  LIP_IF__->else__KHQD=NULL;
+  LIP_PRINT__->parent_lip_code__BRYC=(*LIP_CODE__);
+  LIP_PRINT__->message__NVUE=NULL;
+  HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo__->buckets__DYRD=NULL;
+  HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo__->capacity__4XRD= 0;
+  result__SXED=NULL;
+  ptr__TXED=((__POINTER )(NULL));
+  typ_id__YXED= 0;
+  sz__VXED=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo));
+  if ((sz__VXED ==  0)) {
+    result__SXED=HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo__;
   } else {
-    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 *))))));
+    typ_id__YXED=__HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__VXED);
+    if ((typ_id__YXED == (__INTEGER)(-  1))) {
+      a__OSGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__PSGH=(__UINTEGER_32)((__UINTEGER_32)(sz__VXED + a__OSGH) & (__UINTEGER_32)(~ a__OSGH));
+      ptr_table__QULH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__PSGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__PULH=((__POINTER )(NULL));
+      result__RULH=((__POINTER *)ptr_table__QULH)[ 0];
+      if ((result__RULH == (void *)NULL)) {
+        result__RULH=new_lab__RTJ(new_size__PSGH);
+        next__PULH=(void *)((unsigned long)result__RULH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PSGH)));
+        ((__POINTER *)next__PULH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__QULH)[ 0]=next__PULH;
+      } else {
+        next__PULH=((__POINTER *)result__RULH)[ 0];
+        if ((next__PULH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__RULH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__PSGH <<  1)) <=  4096)) {
+            next__PULH=(void *)((unsigned long)result__RULH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PSGH)));
+          } else {
+            next__PULH=new_lab__RTJ(new_size__PSGH);
+          };
+          ((__POINTER *)next__PULH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__QULH)[ 0]=next__PULH;
+        } else {
+          ((__POINTER *)result__RULH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PULH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__RULH=next__PULH;
+        };
+      };
+      ptr__TXED=result__RULH;
+    } else {
+      t__TSGH=((__UINTEGER_32 )typ_id__YXED);
+      a__SSGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__YULH=(__UINTEGER_32)((__UINTEGER_32)(sz__VXED + a__SSGH) & (__UINTEGER_32)(~ a__SSGH));
+      ptr_table__VULH=((__POINTER )(&(table_type[(t__TSGH)])));
+      lab_type__XULH=(__UINTEGER_32)(t__TSGH |  1);
+      next__UULH=((__POINTER )(NULL));
+      result__WULH=((__POINTER *)ptr_table__VULH)[ 0];
+      if ((result__WULH == (void *)NULL)) {
+        result__WULH=new_lab__RTJ(lab_type__XULH);
+        next__UULH=(void *)((unsigned long)result__WULH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YULH)));
+        ((__POINTER *)next__UULH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__VULH)[ 0]=next__UULH;
+      } else {
+        next__UULH=((__POINTER *)result__WULH)[ 0];
+        if ((next__UULH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__WULH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__YULH <<  1)) <=  4096)) {
+            next__UULH=(void *)((unsigned long)result__WULH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YULH)));
+          } else {
+            next__UULH=new_lab__RTJ(lab_type__XULH);
+          };
+          ((__POINTER *)next__UULH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__VULH)[ 0]=next__UULH;
+        } else {
+          ((__POINTER *)result__WULH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UULH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__WULH=next__UULH;
+        };
+      };
+      ptr__TXED=result__WULH;
+    };
+    result__SXED=((__HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo *)ptr__TXED);
+    *(result__SXED) = *(HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo__);
+  };
+  Self__1OSD=((__HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo *)result__SXED);
+  new_capacity__PFXD=prime_number_ceiling__021( 193);
+  sz__RGHH=((__UINTEGER_32 )(__INTEGER)(new_capacity__PFXD * ((__INTEGER )(sizeof(void *)))));
+  result__PGHH=((__POINTER )(NULL));
+  a__QGHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__SGHH=(__UINTEGER_32)((__UINTEGER_32)(sz__RGHH + a__QGHH) & (__UINTEGER_32)(~ a__QGHH));
+  new_size2__TGHH=(__UINTEGER_32)(new_size__SGHH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__TGHH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__UGHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__VGHH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__TGHH + a__UGHH) & (__UINTEGER_32)(~ a__UGHH));
+    ptr_table__0ULH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__VGHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__ZULH=((__POINTER )(NULL));
+    result__1ULH=((__POINTER *)ptr_table__0ULH)[ 0];
+    if ((result__1ULH == (void *)NULL)) {
+      result__1ULH=new_lab__RTJ(new_size__VGHH);
+      next__ZULH=(void *)((unsigned long)result__1ULH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VGHH)));
+      ((__POINTER *)next__ZULH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__0ULH)[ 0]=next__ZULH;
+    } else {
+      next__ZULH=((__POINTER *)result__1ULH)[ 0];
+      if ((next__ZULH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1ULH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__VGHH <<  1)) <=  4096)) {
+          next__ZULH=(void *)((unsigned long)result__1ULH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VGHH)));
+        } else {
+          next__ZULH=new_lab__RTJ(new_size__VGHH);
+        };
+        ((__POINTER *)next__ZULH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__0ULH)[ 0]=next__ZULH;
+      } else {
+        ((__POINTER *)result__1ULH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZULH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__1ULH=next__ZULH;
+      };
+    };
+    ((__POINTER *)result__1ULH)[ 0]=((__POINTER ) 3);
+    result__PGHH=(void *)((unsigned long)result__1ULH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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__;
+    result__PGHH=(void *)((unsigned long)((__POINTER )((__MEMORY *)search__XAVB(new_size__SGHH))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+  };
+  Result__UWHE=((void **)result__PGHH);
+  Self__EPYE=(__INTEGER)(new_capacity__PFXD -  1);
+  while ((Self__EPYE >=  0)) {
+    Result__UWHE[Self__EPYE]=NULL;
+    Self__EPYE=(__INTEGER)(Self__EPYE -  1);
+  };
+  Self__1OSD->buckets__DYRD=Result__UWHE;
+  Self__1OSD->capacity__4XRD=new_capacity__PFXD;
+  list_data__HONC=result__SXED;
+  push_back_flag__P0MF=FALSE__;
+  memory__OGMF='\0';
+  last_integer__AZUE= 0;
+  last_string__SZUE=create__ZBB( 1024);
+  ARRAYED_COLLECTIONoLIP_SLOT_DATAo__->upper__ADQF= 0;
+  ARRAYED_COLLECTIONoLIP_SLOT_DATAo__->capacity__HJQF= 0;
+  ARRAYED_COLLECTIONoLIP_SLOT_DATAo__->storage__SJQF=NULL;
+  FAST_ARRAYoLIP_SLOT_DATAo__->parent_arrayed_collection__H0UE=(*ARRAYED_COLLECTIONoLIP_SLOT_DATAo__);
+  result__M0NF=NULL;
+  ptr__N0NF=((__POINTER )(NULL));
+  typ_id__S0NF= 0;
+  sz__P0NF=((__UINTEGER_32 )sizeof(__FAST_ARRAYoLIP_SLOT_DATAo));
+  if ((sz__P0NF ==  0)) {
+    result__M0NF=FAST_ARRAYoLIP_SLOT_DATAo__;
   } else {
-    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__;
+    typ_id__S0NF=__FAST_ARRAYoLIP_SLOT_DATAo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__P0NF);
+    if ((typ_id__S0NF == (__INTEGER)(-  1))) {
+      a__WSGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__XSGH=(__UINTEGER_32)((__UINTEGER_32)(sz__P0NF + a__WSGH) & (__UINTEGER_32)(~ a__WSGH));
+      ptr_table__5ULH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__XSGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__4ULH=((__POINTER )(NULL));
+      result__AVLH=((__POINTER *)ptr_table__5ULH)[ 0];
+      if ((result__AVLH == (void *)NULL)) {
+        result__AVLH=new_lab__RTJ(new_size__XSGH);
+        next__4ULH=(void *)((unsigned long)result__AVLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XSGH)));
+        ((__POINTER *)next__4ULH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__5ULH)[ 0]=next__4ULH;
+      } else {
+        next__4ULH=((__POINTER *)result__AVLH)[ 0];
+        if ((next__4ULH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__AVLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__XSGH <<  1)) <=  4096)) {
+            next__4ULH=(void *)((unsigned long)result__AVLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XSGH)));
+          } else {
+            next__4ULH=new_lab__RTJ(new_size__XSGH);
+          };
+          ((__POINTER *)next__4ULH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__5ULH)[ 0]=next__4ULH;
+        } else {
+          ((__POINTER *)result__AVLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4ULH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__AVLH=next__4ULH;
+        };
+      };
+      ptr__N0NF=result__AVLH;
+    } else {
+      t__1SGH=((__UINTEGER_32 )typ_id__S0NF);
+      a__0SGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__HVLH=(__UINTEGER_32)((__UINTEGER_32)(sz__P0NF + a__0SGH) & (__UINTEGER_32)(~ a__0SGH));
+      ptr_table__EVLH=((__POINTER )(&(table_type[(t__1SGH)])));
+      lab_type__GVLH=(__UINTEGER_32)(t__1SGH |  1);
+      next__DVLH=((__POINTER )(NULL));
+      result__FVLH=((__POINTER *)ptr_table__EVLH)[ 0];
+      if ((result__FVLH == (void *)NULL)) {
+        result__FVLH=new_lab__RTJ(lab_type__GVLH);
+        next__DVLH=(void *)((unsigned long)result__FVLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HVLH)));
+        ((__POINTER *)next__DVLH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__EVLH)[ 0]=next__DVLH;
+      } else {
+        next__DVLH=((__POINTER *)result__FVLH)[ 0];
+        if ((next__DVLH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__FVLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__HVLH <<  1)) <=  4096)) {
+            next__DVLH=(void *)((unsigned long)result__FVLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HVLH)));
+          } else {
+            next__DVLH=new_lab__RTJ(lab_type__GVLH);
+          };
+          ((__POINTER *)next__DVLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__EVLH)[ 0]=next__DVLH;
+        } else {
+          ((__POINTER *)result__FVLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DVLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__FVLH=next__DVLH;
+        };
+      };
+      ptr__N0NF=result__FVLH;
+    };
+    result__M0NF=((__FAST_ARRAYoLIP_SLOT_DATAo *)ptr__N0NF);
+    *(result__M0NF) = *(FAST_ARRAYoLIP_SLOT_DATAo__);
+  };
+  Self__4IQF=((__FAST_ARRAYoLIP_SLOT_DATAo *)result__M0NF);
+  if ((Self__4IQF->parent_arrayed_collection__H0UE.capacity__HJQF <  8)) {
+    sz__ZGHH=((__UINTEGER_32 )(__INTEGER)(((__INTEGER )(sizeof(void *))) <<  3));
+    result__XGHH=((__POINTER )(NULL));
+    a__YGHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__0GHH=(__UINTEGER_32)((__UINTEGER_32)(sz__ZGHH + a__YGHH) & (__UINTEGER_32)(~ a__YGHH));
+    new_size2__1GHH=(__UINTEGER_32)(new_size__0GHH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+    if ((new_size2__1GHH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+      a__2GHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__3GHH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__1GHH + a__2GHH) & (__UINTEGER_32)(~ a__2GHH));
+      ptr_table__JVLH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__3GHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__IVLH=((__POINTER )(NULL));
+      result__KVLH=((__POINTER *)ptr_table__JVLH)[ 0];
+      if ((result__KVLH == (void *)NULL)) {
+        result__KVLH=new_lab__RTJ(new_size__3GHH);
+        next__IVLH=(void *)((unsigned long)result__KVLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3GHH)));
+        ((__POINTER *)next__IVLH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__JVLH)[ 0]=next__IVLH;
+      } else {
+        next__IVLH=((__POINTER *)result__KVLH)[ 0];
+        if ((next__IVLH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__KVLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__3GHH <<  1)) <=  4096)) {
+            next__IVLH=(void *)((unsigned long)result__KVLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3GHH)));
+          } else {
+            next__IVLH=new_lab__RTJ(new_size__3GHH);
+          };
+          ((__POINTER *)next__IVLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__JVLH)[ 0]=next__IVLH;
+        } else {
+          ((__POINTER *)result__KVLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__IVLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__KVLH=next__IVLH;
+        };
+      };
+      ((__POINTER *)result__KVLH)[ 0]=((__POINTER ) 3);
+      result__XGHH=(void *)((unsigned long)result__KVLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+    } else {
+      result__XGHH=(void *)((unsigned long)((__POINTER )((__MEMORY *)search__XAVB(new_size__0GHH))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    };
+    Result__SK1F=((void **)result__XGHH);
+    Self__HQAG= 7;
+    while ((Self__HQAG >=  0)) {
+      Result__SK1F[Self__HQAG]=NULL;
+      Self__HQAG=(__INTEGER)(Self__HQAG -  1);
+    };
+    Self__4IQF->parent_arrayed_collection__H0UE.storage__SJQF=Result__SK1F;
+    Self__4IQF->parent_arrayed_collection__H0UE.capacity__HJQF= 8;
+  };
+  Self__4IQF->parent_arrayed_collection__H0UE.upper__ADQF=(__INTEGER)(-  1);
+  stack__I0UE=result__M0NF;
+  path_file__1FXF=create_with_capacity__THRC( 3000);
+  ARRAYED_COLLECTIONoLIP_SLOT_CODEo__->upper__M2KF= 0;
+  ARRAYED_COLLECTIONoLIP_SLOT_CODEo__->capacity__IEQF= 0;
+  ARRAYED_COLLECTIONoLIP_SLOT_CODEo__->storage__TEQF=NULL;
+  FAST_ARRAYoLIP_SLOT_CODEo__->parent_arrayed_collection__C2KF=(*ARRAYED_COLLECTIONoLIP_SLOT_CODEo__);
+  result__JLNF=NULL;
+  ptr__KLNF=((__POINTER )(NULL));
+  typ_id__PLNF= 0;
+  sz__MLNF=((__UINTEGER_32 )sizeof(__FAST_ARRAYoLIP_SLOT_CODEo));
+  if ((sz__MLNF ==  0)) {
+    result__JLNF=FAST_ARRAYoLIP_SLOT_CODEo__;
   } else {
-    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__;
+    typ_id__PLNF=__FAST_ARRAYoLIP_SLOT_CODEo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__MLNF);
+    if ((typ_id__PLNF == (__INTEGER)(-  1))) {
+      a__4SGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__5SGH=(__UINTEGER_32)((__UINTEGER_32)(sz__MLNF + a__4SGH) & (__UINTEGER_32)(~ a__4SGH));
+      ptr_table__OVLH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__5SGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__NVLH=((__POINTER )(NULL));
+      result__PVLH=((__POINTER *)ptr_table__OVLH)[ 0];
+      if ((result__PVLH == (void *)NULL)) {
+        result__PVLH=new_lab__RTJ(new_size__5SGH);
+        next__NVLH=(void *)((unsigned long)result__PVLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5SGH)));
+        ((__POINTER *)next__NVLH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__OVLH)[ 0]=next__NVLH;
+      } else {
+        next__NVLH=((__POINTER *)result__PVLH)[ 0];
+        if ((next__NVLH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__PVLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__5SGH <<  1)) <=  4096)) {
+            next__NVLH=(void *)((unsigned long)result__PVLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5SGH)));
+          } else {
+            next__NVLH=new_lab__RTJ(new_size__5SGH);
+          };
+          ((__POINTER *)next__NVLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__OVLH)[ 0]=next__NVLH;
+        } else {
+          ((__POINTER *)result__PVLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NVLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__PVLH=next__NVLH;
+        };
+      };
+      ptr__KLNF=result__PVLH;
+    } else {
+      t__DTGH=((__UINTEGER_32 )typ_id__PLNF);
+      a__CTGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__WVLH=(__UINTEGER_32)((__UINTEGER_32)(sz__MLNF + a__CTGH) & (__UINTEGER_32)(~ a__CTGH));
+      ptr_table__TVLH=((__POINTER )(&(table_type[(t__DTGH)])));
+      lab_type__VVLH=(__UINTEGER_32)(t__DTGH |  1);
+      next__SVLH=((__POINTER )(NULL));
+      result__UVLH=((__POINTER *)ptr_table__TVLH)[ 0];
+      if ((result__UVLH == (void *)NULL)) {
+        result__UVLH=new_lab__RTJ(lab_type__VVLH);
+        next__SVLH=(void *)((unsigned long)result__UVLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WVLH)));
+        ((__POINTER *)next__SVLH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__TVLH)[ 0]=next__SVLH;
+      } else {
+        next__SVLH=((__POINTER *)result__UVLH)[ 0];
+        if ((next__SVLH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__UVLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__WVLH <<  1)) <=  4096)) {
+            next__SVLH=(void *)((unsigned long)result__UVLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WVLH)));
+          } else {
+            next__SVLH=new_lab__RTJ(lab_type__VVLH);
+          };
+          ((__POINTER *)next__SVLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__TVLH)[ 0]=next__SVLH;
+        } else {
+          ((__POINTER *)result__UVLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__SVLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__UVLH=next__SVLH;
+        };
+      };
+      ptr__KLNF=result__UVLH;
+    };
+    result__JLNF=((__FAST_ARRAYoLIP_SLOT_CODEo *)ptr__KLNF);
+    *(result__JLNF) = *(FAST_ARRAYoLIP_SLOT_CODEo__);
+  };
+  Self__5DQF=((__FAST_ARRAYoLIP_SLOT_CODEo *)result__JLNF);
+  if ((Self__5DQF->parent_arrayed_collection__C2KF.capacity__IEQF <  32)) {
+    sz__BHHH=((__UINTEGER_32 )(__INTEGER)(((__INTEGER )(sizeof(void *))) <<  5));
+    result__5GHH=((__POINTER )(NULL));
+    a__AHHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__CHHH=(__UINTEGER_32)((__UINTEGER_32)(sz__BHHH + a__AHHH) & (__UINTEGER_32)(~ a__AHHH));
+    new_size2__DHHH=(__UINTEGER_32)(new_size__CHHH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+    if ((new_size2__DHHH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+      a__EHHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__FHHH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__DHHH + a__EHHH) & (__UINTEGER_32)(~ a__EHHH));
+      ptr_table__YVLH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__FHHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__XVLH=((__POINTER )(NULL));
+      result__ZVLH=((__POINTER *)ptr_table__YVLH)[ 0];
+      if ((result__ZVLH == (void *)NULL)) {
+        result__ZVLH=new_lab__RTJ(new_size__FHHH);
+        next__XVLH=(void *)((unsigned long)result__ZVLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FHHH)));
+        ((__POINTER *)next__XVLH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__YVLH)[ 0]=next__XVLH;
+      } else {
+        next__XVLH=((__POINTER *)result__ZVLH)[ 0];
+        if ((next__XVLH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ZVLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__FHHH <<  1)) <=  4096)) {
+            next__XVLH=(void *)((unsigned long)result__ZVLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FHHH)));
+          } else {
+            next__XVLH=new_lab__RTJ(new_size__FHHH);
+          };
+          ((__POINTER *)next__XVLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__YVLH)[ 0]=next__XVLH;
+        } else {
+          ((__POINTER *)result__ZVLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XVLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__ZVLH=next__XVLH;
+        };
+      };
+      ((__POINTER *)result__ZVLH)[ 0]=((__POINTER ) 3);
+      result__5GHH=(void *)((unsigned long)result__ZVLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+    } else {
+      result__5GHH=(void *)((unsigned long)((__POINTER )((__MEMORY *)search__XAVB(new_size__CHHH))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    };
+    Result__ZF1F=((void **)result__5GHH);
+    Self__APAG= 31;
+    while ((Self__APAG >=  0)) {
+      Result__ZF1F[Self__APAG]=NULL;
+      Self__APAG=(__INTEGER)(Self__APAG -  1);
+    };
+    Self__5DQF->parent_arrayed_collection__C2KF.storage__TEQF=Result__ZF1F;
+    Self__5DQF->parent_arrayed_collection__C2KF.capacity__IEQF= 32;
+  };
+  Self__5DQF->parent_arrayed_collection__C2KF.upper__M2KF=(__INTEGER)(-  1);
+  list_method__D2KF=result__JLNF;
+  PROTOTYPE__->comment_slot__YRTC=NULL;
+  PROTOTYPE__->comment_header__Q4QC=NULL;
+  HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo__->buckets__MOEC=NULL;
+  HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo__->capacity__HOEC= 0;
+  HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo__->count__JYFC= 0;
+  result__40YB=NULL;
+  ptr__50YB=((__POINTER )(NULL));
+  typ_id__E1YB= 0;
+  sz__B1YB=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo));
+  if ((sz__B1YB ==  0)) {
+    result__40YB=HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo__;
   } else {
-    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__;
+    typ_id__E1YB=__HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__B1YB);
+    if ((typ_id__E1YB == (__INTEGER)(-  1))) {
+      a__GTGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__HTGH=(__UINTEGER_32)((__UINTEGER_32)(sz__B1YB + a__GTGH) & (__UINTEGER_32)(~ a__GTGH));
+      ptr_table__3VLH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__HTGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__2VLH=((__POINTER )(NULL));
+      result__4VLH=((__POINTER *)ptr_table__3VLH)[ 0];
+      if ((result__4VLH == (void *)NULL)) {
+        result__4VLH=new_lab__RTJ(new_size__HTGH);
+        next__2VLH=(void *)((unsigned long)result__4VLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HTGH)));
+        ((__POINTER *)next__2VLH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__3VLH)[ 0]=next__2VLH;
+      } else {
+        next__2VLH=((__POINTER *)result__4VLH)[ 0];
+        if ((next__2VLH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4VLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__HTGH <<  1)) <=  4096)) {
+            next__2VLH=(void *)((unsigned long)result__4VLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HTGH)));
+          } else {
+            next__2VLH=new_lab__RTJ(new_size__HTGH);
+          };
+          ((__POINTER *)next__2VLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__3VLH)[ 0]=next__2VLH;
+        } else {
+          ((__POINTER *)result__4VLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2VLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__4VLH=next__2VLH;
+        };
+      };
+      ptr__50YB=result__4VLH;
+    } else {
+      t__LTGH=((__UINTEGER_32 )typ_id__E1YB);
+      a__KTGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__FWLH=(__UINTEGER_32)((__UINTEGER_32)(sz__B1YB + a__KTGH) & (__UINTEGER_32)(~ a__KTGH));
+      ptr_table__CWLH=((__POINTER )(&(table_type[(t__LTGH)])));
+      lab_type__EWLH=(__UINTEGER_32)(t__LTGH |  1);
+      next__BWLH=((__POINTER )(NULL));
+      result__DWLH=((__POINTER *)ptr_table__CWLH)[ 0];
+      if ((result__DWLH == (void *)NULL)) {
+        result__DWLH=new_lab__RTJ(lab_type__EWLH);
+        next__BWLH=(void *)((unsigned long)result__DWLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FWLH)));
+        ((__POINTER *)next__BWLH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__CWLH)[ 0]=next__BWLH;
+      } else {
+        next__BWLH=((__POINTER *)result__DWLH)[ 0];
+        if ((next__BWLH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DWLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__FWLH <<  1)) <=  4096)) {
+            next__BWLH=(void *)((unsigned long)result__DWLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FWLH)));
+          } else {
+            next__BWLH=new_lab__RTJ(lab_type__EWLH);
+          };
+          ((__POINTER *)next__BWLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__CWLH)[ 0]=next__BWLH;
+        } else {
+          ((__POINTER *)result__DWLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BWLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__DWLH=next__BWLH;
+        };
+      };
+      ptr__50YB=result__DWLH;
+    };
+    result__40YB=((__HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo *)ptr__50YB);
+    *(result__40YB) = *(HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo__);
+  };
+  Self__MWFC=((__HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo *)result__40YB);
+  new_capacity__ZFOC=prime_number_ceiling__021( 193);
+  Self__MWFC->buckets__MOEC=create__C3XC(new_capacity__ZFOC);
+  Self__MWFC->capacity__HOEC=new_capacity__ZFOC;
+  Self__MWFC->count__JYFC= 0;
+  bucket_name__2ROB=result__40YB;
+  HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__->key__YOEC=NULL;
+  HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__->next__DPEC=NULL;
+  HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__->item__LPEC=NULL;
+  SECTION___->name__MYDC=NULL;
+  SECTION___->type_list__1WFC=NULL;
+  last_section__S2C=NULL;
+  PROTOTYPE__->last_slot__J3C=NULL;
+  ITM_SLOT__->id_section__T3C=NULL;
+  ITM_SLOT__->comment__WZOB=NULL;
+  ITM_SLOT__->result_type__A4FC=NULL;
+  ITM_SLOT__->affect__P5FC='\0';
+  ITM_SLOT__->argument_list__QDHC=NULL;
+  ITM_SLOT__->next__YGHC=NULL;
+  ITM_SLOT__->comment_chapter__S0HC=NULL;
+  ITM_SLOT__->stat_shorter__4OTD= 0;
+  ITM_SLOT_OPERATOR__->parent_itm_slot__0S5B=(*ITM_SLOT__);
+  HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__->buckets__SQEC=NULL;
+  HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__->capacity__NQEC= 0;
+  HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__->count__D1FC= 0;
+  result__D4YB=NULL;
+  ptr__E4YB=((__POINTER )(NULL));
+  typ_id__J4YB= 0;
+  sz__G4YB=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo));
+  if ((sz__G4YB ==  0)) {
+    result__D4YB=HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__;
   } else {
-    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__;
+    typ_id__J4YB=__HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__G4YB);
+    if ((typ_id__J4YB == (__INTEGER)(-  1))) {
+      a__OTGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__PTGH=(__UINTEGER_32)((__UINTEGER_32)(sz__G4YB + a__OTGH) & (__UINTEGER_32)(~ a__OTGH));
+      ptr_table__HWLH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__PTGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__GWLH=((__POINTER )(NULL));
+      result__IWLH=((__POINTER *)ptr_table__HWLH)[ 0];
+      if ((result__IWLH == (void *)NULL)) {
+        result__IWLH=new_lab__RTJ(new_size__PTGH);
+        next__GWLH=(void *)((unsigned long)result__IWLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PTGH)));
+        ((__POINTER *)next__GWLH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__HWLH)[ 0]=next__GWLH;
+      } else {
+        next__GWLH=((__POINTER *)result__IWLH)[ 0];
+        if ((next__GWLH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__IWLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__PTGH <<  1)) <=  4096)) {
+            next__GWLH=(void *)((unsigned long)result__IWLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PTGH)));
+          } else {
+            next__GWLH=new_lab__RTJ(new_size__PTGH);
+          };
+          ((__POINTER *)next__GWLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__HWLH)[ 0]=next__GWLH;
+        } else {
+          ((__POINTER *)result__IWLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GWLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__IWLH=next__GWLH;
+        };
+      };
+      ptr__E4YB=result__IWLH;
+    } else {
+      t__TTGH=((__UINTEGER_32 )typ_id__J4YB);
+      a__STGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__PWLH=(__UINTEGER_32)((__UINTEGER_32)(sz__G4YB + a__STGH) & (__UINTEGER_32)(~ a__STGH));
+      ptr_table__MWLH=((__POINTER )(&(table_type[(t__TTGH)])));
+      lab_type__OWLH=(__UINTEGER_32)(t__TTGH |  1);
+      next__LWLH=((__POINTER )(NULL));
+      result__NWLH=((__POINTER *)ptr_table__MWLH)[ 0];
+      if ((result__NWLH == (void *)NULL)) {
+        result__NWLH=new_lab__RTJ(lab_type__OWLH);
+        next__LWLH=(void *)((unsigned long)result__NWLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PWLH)));
+        ((__POINTER *)next__LWLH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__MWLH)[ 0]=next__LWLH;
+      } else {
+        next__LWLH=((__POINTER *)result__NWLH)[ 0];
+        if ((next__LWLH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__NWLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__PWLH <<  1)) <=  4096)) {
+            next__LWLH=(void *)((unsigned long)result__NWLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PWLH)));
+          } else {
+            next__LWLH=new_lab__RTJ(lab_type__OWLH);
+          };
+          ((__POINTER *)next__LWLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__MWLH)[ 0]=next__LWLH;
+        } else {
+          ((__POINTER *)result__NWLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LWLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__NWLH=next__LWLH;
+        };
+      };
+      ptr__E4YB=result__NWLH;
+    };
+    result__D4YB=((__HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)ptr__E4YB);
+    *(result__D4YB) = *(HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__);
+  };
+  Self__LZFC=((__HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)result__D4YB);
+  new_capacity__UJOC=prime_number_ceiling__021( 193);
+  Self__LZFC->buckets__SQEC=create__FCYC(new_capacity__UJOC);
+  Self__LZFC->capacity__NQEC=new_capacity__UJOC;
+  Self__LZFC->count__D1FC= 0;
+  bucket_list__XTOB=result__D4YB;
+  HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__->key__4QEC=NULL;
+  HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__->next__JREC=NULL;
+  HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__->item__RREC=NULL;
+  ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo__->upper__0SGC= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo__->capacity__CKHC= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo__->storage__NKHC=NULL;
+  FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo__->parent_arrayed_collection__PS1B=(*ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo__);
+  ARRAYED_COLLECTIONoITM_ARGUMENTo__->upper__I5GC= 0;
+  ARRAYED_COLLECTIONoITM_ARGUMENTo__->capacity__K5GC= 0;
+  ARRAYED_COLLECTIONoITM_ARGUMENTo__->storage__GAHC=NULL;
+  FAST_ARRAYoITM_ARGUMENTo__->parent_arrayed_collection__Z5YB=(*ARRAYED_COLLECTIONoITM_ARGUMENTo__);
+  result__3H5B=NULL;
+  ptr__4H5B=((__POINTER )(NULL));
+  typ_id__DI5B= 0;
+  sz__AI5B=((__UINTEGER_32 )sizeof(__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo));
+  if ((sz__AI5B ==  0)) {
+    result__3H5B=FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo__;
   } else {
-    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__;
+    typ_id__DI5B=__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__AI5B);
+    if ((typ_id__DI5B == (__INTEGER)(-  1))) {
+      a__WTGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__XTGH=(__UINTEGER_32)((__UINTEGER_32)(sz__AI5B + a__WTGH) & (__UINTEGER_32)(~ a__WTGH));
+      ptr_table__RWLH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__XTGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__QWLH=((__POINTER )(NULL));
+      result__SWLH=((__POINTER *)ptr_table__RWLH)[ 0];
+      if ((result__SWLH == (void *)NULL)) {
+        result__SWLH=new_lab__RTJ(new_size__XTGH);
+        next__QWLH=(void *)((unsigned long)result__SWLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XTGH)));
+        ((__POINTER *)next__QWLH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__RWLH)[ 0]=next__QWLH;
+      } else {
+        next__QWLH=((__POINTER *)result__SWLH)[ 0];
+        if ((next__QWLH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__SWLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__XTGH <<  1)) <=  4096)) {
+            next__QWLH=(void *)((unsigned long)result__SWLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XTGH)));
+          } else {
+            next__QWLH=new_lab__RTJ(new_size__XTGH);
+          };
+          ((__POINTER *)next__QWLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__RWLH)[ 0]=next__QWLH;
+        } else {
+          ((__POINTER *)result__SWLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QWLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__SWLH=next__QWLH;
+        };
+      };
+      ptr__4H5B=result__SWLH;
+    } else {
+      t__1TGH=((__UINTEGER_32 )typ_id__DI5B);
+      a__0TGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__ZWLH=(__UINTEGER_32)((__UINTEGER_32)(sz__AI5B + a__0TGH) & (__UINTEGER_32)(~ a__0TGH));
+      ptr_table__WWLH=((__POINTER )(&(table_type[(t__1TGH)])));
+      lab_type__YWLH=(__UINTEGER_32)(t__1TGH |  1);
+      next__VWLH=((__POINTER )(NULL));
+      result__XWLH=((__POINTER *)ptr_table__WWLH)[ 0];
+      if ((result__XWLH == (void *)NULL)) {
+        result__XWLH=new_lab__RTJ(lab_type__YWLH);
+        next__VWLH=(void *)((unsigned long)result__XWLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZWLH)));
+        ((__POINTER *)next__VWLH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__WWLH)[ 0]=next__VWLH;
+      } else {
+        next__VWLH=((__POINTER *)result__XWLH)[ 0];
+        if ((next__VWLH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XWLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__ZWLH <<  1)) <=  4096)) {
+            next__VWLH=(void *)((unsigned long)result__XWLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZWLH)));
+          } else {
+            next__VWLH=new_lab__RTJ(lab_type__YWLH);
+          };
+          ((__POINTER *)next__VWLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__WWLH)[ 0]=next__VWLH;
+        } else {
+          ((__POINTER *)result__XWLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VWLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__XWLH=next__VWLH;
+        };
+      };
+      ptr__4H5B=result__XWLH;
+    };
+    result__3H5B=((__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *)ptr__4H5B);
+    *(result__3H5B) = *(FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo__);
+  };
+  Self__ZJHC=((__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *)result__3H5B);
+  if ((Self__ZJHC->parent_arrayed_collection__PS1B.capacity__CKHC <  5)) {
+    Self__ZJHC->parent_arrayed_collection__PS1B.storage__NKHC=create__3MBD( 5);
+    Self__ZJHC->parent_arrayed_collection__PS1B.capacity__CKHC= 5;
+  };
+  Self__ZJHC->parent_arrayed_collection__PS1B.upper__0SGC=(__INTEGER)(-  1);
+  free_list__QS1B=result__3H5B;
+  ITM_SLOT_OPERATOR__->priority_and_level__UZHC= 0;
+  ITM_SLOT_OPERATOR__->pretty_name__5ZHC=NULL;
+  last_slot__VUOB=NULL;
+  HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__->key__ZAGC=NULL;
+  HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__->next__EBGC=NULL;
+  HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__->item__MBGC=NULL;
+  PROTOTYPE__->first_slot__2DZB=NULL;
+  ARRAYED_COLLECTIONoITM_SLOTo__->upper__UOTD= 0;
+  ARRAYED_COLLECTIONoITM_SLOTo__->capacity__RCWE= 0;
+  ARRAYED_COLLECTIONoITM_SLOTo__->storage__UPWE=NULL;
+  FAST_ARRAYoITM_SLOTo__->parent_arrayed_collection__XNTD=(*ARRAYED_COLLECTIONoITM_SLOTo__);
+  result__XCIE=NULL;
+  ptr__YCIE=((__POINTER )(NULL));
+  typ_id__3CIE= 0;
+  sz__0CIE=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_SLOTo));
+  if ((sz__0CIE ==  0)) {
+    result__XCIE=FAST_ARRAYoITM_SLOTo__;
   } else {
-    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);
+    typ_id__3CIE=__FAST_ARRAYoITM_SLOTo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__0CIE);
+    if ((typ_id__3CIE == (__INTEGER)(-  1))) {
+      a__4TGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__5TGH=(__UINTEGER_32)((__UINTEGER_32)(sz__0CIE + a__4TGH) & (__UINTEGER_32)(~ a__4TGH));
+      ptr_table__1WLH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__5TGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__0WLH=((__POINTER )(NULL));
+      result__2WLH=((__POINTER *)ptr_table__1WLH)[ 0];
+      if ((result__2WLH == (void *)NULL)) {
+        result__2WLH=new_lab__RTJ(new_size__5TGH);
+        next__0WLH=(void *)((unsigned long)result__2WLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5TGH)));
+        ((__POINTER *)next__0WLH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__1WLH)[ 0]=next__0WLH;
+      } else {
+        next__0WLH=((__POINTER *)result__2WLH)[ 0];
+        if ((next__0WLH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2WLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__5TGH <<  1)) <=  4096)) {
+            next__0WLH=(void *)((unsigned long)result__2WLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5TGH)));
+          } else {
+            next__0WLH=new_lab__RTJ(new_size__5TGH);
+          };
+          ((__POINTER *)next__0WLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__1WLH)[ 0]=next__0WLH;
+        } else {
+          ((__POINTER *)result__2WLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0WLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__2WLH=next__0WLH;
+        };
+      };
+      ptr__YCIE=result__2WLH;
+    } else {
+      t__DUGH=((__UINTEGER_32 )typ_id__3CIE);
+      a__CUGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__DXLH=(__UINTEGER_32)((__UINTEGER_32)(sz__0CIE + a__CUGH) & (__UINTEGER_32)(~ a__CUGH));
+      ptr_table__AXLH=((__POINTER )(&(table_type[(t__DUGH)])));
+      lab_type__CXLH=(__UINTEGER_32)(t__DUGH |  1);
+      next__5WLH=((__POINTER )(NULL));
+      result__BXLH=((__POINTER *)ptr_table__AXLH)[ 0];
+      if ((result__BXLH == (void *)NULL)) {
+        result__BXLH=new_lab__RTJ(lab_type__CXLH);
+        next__5WLH=(void *)((unsigned long)result__BXLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DXLH)));
+        ((__POINTER *)next__5WLH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__AXLH)[ 0]=next__5WLH;
+      } else {
+        next__5WLH=((__POINTER *)result__BXLH)[ 0];
+        if ((next__5WLH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BXLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__DXLH <<  1)) <=  4096)) {
+            next__5WLH=(void *)((unsigned long)result__BXLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DXLH)));
+          } else {
+            next__5WLH=new_lab__RTJ(lab_type__CXLH);
+          };
+          ((__POINTER *)next__5WLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__AXLH)[ 0]=next__5WLH;
+        } else {
+          ((__POINTER *)result__BXLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5WLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__BXLH=next__5WLH;
+        };
+      };
+      ptr__YCIE=result__BXLH;
+    };
+    result__XCIE=((__FAST_ARRAYoITM_SLOTo *)ptr__YCIE);
+    *(result__XCIE) = *(FAST_ARRAYoITM_SLOTo__);
+  };
+  Self__BPWE=((__FAST_ARRAYoITM_SLOTo *)result__XCIE);
+  if ((Self__BPWE->parent_arrayed_collection__XNTD.capacity__RCWE <  256)) {
+    Self__BPWE->parent_arrayed_collection__XNTD.storage__UPWE=create__BJFF( 256);
+    Self__BPWE->parent_arrayed_collection__XNTD.capacity__RCWE= 256;
+  };
+  Self__BPWE->parent_arrayed_collection__XNTD.upper__UOTD=(__INTEGER)(-  1);
+  list_tmp__YNTD=result__XCIE;
+  str_tmp__PP4E=create__ZBB( 512);
+  str_tmp2__RR4E=create__ZBB( 64);
+  str_tmp3__RV4E=create__ZBB( 64);
   txt__1=NULL;
   p__AB=NULL;
   create__ZBB( 255);
@@ -5797,246 +5769,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__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;
+      a__GUGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__HUGH=(__UINTEGER_32)((__UINTEGER_32)(sz__WUB + a__GUGH) & (__UINTEGER_32)(~ a__GUGH));
+      ptr_table__FXLH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__HUGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__EXLH=((__POINTER )(NULL));
+      result__GXLH=((__POINTER *)ptr_table__FXLH)[ 0];
+      if ((result__GXLH == (void *)NULL)) {
+        result__GXLH=new_lab__RTJ(new_size__HUGH);
+        next__EXLH=(void *)((unsigned long)result__GXLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HUGH)));
+        ((__POINTER *)next__EXLH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__FXLH)[ 0]=next__EXLH;
       } else {
-        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)));
+        next__EXLH=((__POINTER *)result__GXLH)[ 0];
+        if ((next__EXLH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GXLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__HUGH <<  1)) <=  4096)) {
+            next__EXLH=(void *)((unsigned long)result__GXLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HUGH)));
           } else {
-            next__C1KH=new_lab__FTJ(new_size__XLHH);
+            next__EXLH=new_lab__RTJ(new_size__HUGH);
           };
-          ((__POINTER *)next__C1KH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__D1KH)[ 0]=next__C1KH;
+          ((__POINTER *)next__EXLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__FXLH)[ 0]=next__EXLH;
         } else {
-          ((__POINTER *)result__E1KH)[ 0]=(void *)((unsigned long)((__POINTER *)next__C1KH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__E1KH=next__C1KH;
+          ((__POINTER *)result__GXLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EXLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__GXLH=next__EXLH;
         };
       };
-      ptr__UUB=result__E1KH;
+      ptr__UUB=result__GXLH;
     } else {
-      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;
+      t__LUGH=((__UINTEGER_32 )typ_id__ZUB);
+      a__KUGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__NXLH=(__UINTEGER_32)((__UINTEGER_32)(sz__WUB + a__KUGH) & (__UINTEGER_32)(~ a__KUGH));
+      ptr_table__KXLH=((__POINTER )(&(table_type[(t__LUGH)])));
+      lab_type__MXLH=(__UINTEGER_32)(t__LUGH |  1);
+      next__JXLH=((__POINTER )(NULL));
+      result__LXLH=((__POINTER *)ptr_table__KXLH)[ 0];
+      if ((result__LXLH == (void *)NULL)) {
+        result__LXLH=new_lab__RTJ(lab_type__MXLH);
+        next__JXLH=(void *)((unsigned long)result__LXLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NXLH)));
+        ((__POINTER *)next__JXLH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__KXLH)[ 0]=next__JXLH;
       } else {
-        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)));
+        next__JXLH=((__POINTER *)result__LXLH)[ 0];
+        if ((next__JXLH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LXLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__NXLH <<  1)) <=  4096)) {
+            next__JXLH=(void *)((unsigned long)result__LXLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NXLH)));
           } else {
-            next__H1KH=new_lab__FTJ(lab_type__K1KH);
+            next__JXLH=new_lab__RTJ(lab_type__MXLH);
           };
-          ((__POINTER *)next__H1KH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__I1KH)[ 0]=next__H1KH;
+          ((__POINTER *)next__JXLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__KXLH)[ 0]=next__JXLH;
         } else {
-          ((__POINTER *)result__J1KH)[ 0]=(void *)((unsigned long)((__POINTER *)next__H1KH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__J1KH=next__H1KH;
+          ((__POINTER *)result__LXLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JXLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__LXLH=next__JXLH;
         };
       };
-      ptr__UUB=result__J1KH;
+      ptr__UUB=result__LXLH;
     };
     result__TUB=((__HASHED_SEToABSTRACT_STRINGo *)ptr__UUB);
     *(result__TUB) = *(HASHED_SEToABSTRACT_STRINGo__);
   };
-  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;
+  Self__DDS=((__HASHED_SEToABSTRACT_STRINGo *)result__TUB);
+  new_capacity__QZW=prime_number_ceiling__021( 53);
+  Self__DDS->buckets__0ZR=create__EI2(new_capacity__QZW);
+  Self__DDS->capacity__VZR=new_capacity__QZW;
+  Self__DDS->count__10R= 0;
   list__FK=result__TUB;
-  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));
+  add__EZR(result__TUB,(&__string_4));
+  add__EZR(list__FK,(&__string_5));
+  add__EZR(list__FK,(&__string_6));
+  add__EZR(list__FK,(&__string_7));
+  add__EZR(list__FK,(&__string_8));
+  add__EZR(list__FK,(&__string_9));
+  add__EZR(list__FK,(&__string_10));
+  add__EZR(list__FK,(&__string_11));
+  add__EZR(list__FK,(&__string_12));
+  add__EZR(list__FK,(&__string_13));
+  add__EZR(list__FK,(&__string_14));
+  add__EZR(list__FK,(&__string_15));
+  add__EZR(list__FK,(&__string_16));
+  add__EZR(list__FK,(&__string_17));
+  add__EZR(list__FK,(&__string_18));
+  add__EZR(list__FK,(&__string_19));
+  add__EZR(list__FK,(&__string_20));
+  add__EZR(list__FK,(&__string_21));
+  add__EZR(list__FK,(&__string_22));
+  add__EZR(list__FK,(&__string_23));
+  add__EZR(list__FK,(&__string_24));
+  add__EZR(list__FK,(&__string_25));
+  add__EZR(list__FK,(&__string_26));
+  add__EZR(list__FK,(&__string_27));
+  add__EZR(list__FK,(&__string_28));
+  add__EZR(list__FK,(&__string_29));
+  add__EZR(list__FK,(&__string_30));
+  add__EZR(list__FK,(&__string_31));
+  add__EZR(list__FK,(&__string_32));
+  add__EZR(list__FK,(&__string_33));
+  add__EZR(list__FK,(&__string_34));
+  add__EZR(list__FK,(&__string_35));
+  add__EZR(list__FK,(&__string_36));
+  add__EZR(list__FK,(&__string_37));
+  add__EZR(list__FK,(&__string_38));
+  add__EZR(list__FK,(&__string_39));
+  add__EZR(list__FK,(&__string_40));
+  add__EZR(list__FK,(&__string_41));
+  add__EZR(list__FK,(&__string_42));
+  add__EZR(list__FK,(&__string_43));
+  add__EZR(list__FK,(&__string_44));
+  add__EZR(list__FK,(&__string_45));
+  add__EZR(list__FK,(&__string_46));
+  add__EZR(list__FK,(&__string_47));
+  add__EZR(list__FK,(&__string_1));
+  add__EZR(list__FK,(&__string_48));
+  add__EZR(list__FK,(&__string_49));
+  add__EZR(list__FK,(&__string_50));
+  add__EZR(list__FK,(&__string_51));
+  add__EZR(list__FK,(&__string_52));
+  add__EZR(list__FK,(&__string_53));
+  add__EZR(list__FK,(&__string_54));
+  add__EZR(list__FK,(&__string_55));
+  add__EZR(list__FK,(&__string_56));
+  add__EZR(list__FK,(&__string_57));
+  add__EZR(list__FK,(&__string_58));
+  add__EZR(list__FK,(&__string_59));
+  add__EZR(list__FK,(&__string_2));
+  add__EZR(list__FK,(&__string_3));
+  add__EZR(list__FK,(&__string_60));
+  add__EZR(list__FK,(&__string_61));
+  add__EZR(list__FK,(&__string_62));
+  add__EZR(list__FK,(&__string_63));
+  add__EZR(list__FK,(&__string_64));
+  add__EZR(list__FK,(&__string_65));
+  add__EZR(list__FK,(&__string_66));
+  add__EZR(list__FK,(&__string_67));
+  add__EZR(list__FK,(&__string_68));
+  add__EZR(list__FK,(&__string_69));
+  add__EZR(list__FK,(&__string_70));
+  add__EZR(list__FK,(&__string_71));
+  add__EZR(list__FK,(&__string_72));
+  add__EZR(list__FK,(&__string_73));
+  add__EZR(list__FK,(&__string_74));
+  add__EZR(list__FK,(&__string_75));
+  add__EZR(list__FK,(&__string_76));
+  add__EZR(list__FK,(&__string_77));
+  add__EZR(list__FK,(&__string_78));
+  add__EZR(list__FK,(&__string_79));
+  add__EZR(list__FK,(&__string_80));
+  add__EZR(list__FK,(&__string_81));
+  add__EZR(list__FK,(&__string_82));
+  add__EZR(list__FK,(&__string_83));
+  add__EZR(list__FK,(&__string_84));
+  add__EZR(list__FK,(&__string_85));
+  add__EZR(list__FK,(&__string_86));
+  add__EZR(list__FK,(&__string_87));
+  add__EZR(list__FK,(&__string_88));
+  add__EZR(list__FK,(&__string_89));
+  add__EZR(list__FK,(&__string_90));
+  add__EZR(list__FK,(&__string_91));
+  add__EZR(list__FK,(&__string_92));
+  add__EZR(list__FK,(&__string_93));
+  add__EZR(list__FK,(&__string_94));
+  add__EZR(list__FK,(&__string_95));
+  add__EZR(list__FK,(&__string_96));
+  add__EZR(list__FK,(&__string_97));
+  add__EZR(list__FK,(&__string_98));
+  add__EZR(list__FK,(&__string_99));
+  add__EZR(list__FK,(&__string_100));
+  add__EZR(list__FK,(&__string_101));
+  add__EZR(list__FK,(&__string_102));
+  add__EZR(list__FK,(&__string_103));
+  add__EZR(list__FK,(&__string_104));
+  add__EZR(list__FK,(&__string_105));
+  add__EZR(list__FK,(&__string_106));
+  add__EZR(list__FK,(&__string_107));
+  add__EZR(list__FK,(&__string_108));
+  add__EZR(list__FK,(&__string_109));
+  add__EZR(list__FK,(&__string_110));
+  add__EZR(list__FK,(&__string_111));
+  add__EZR(list__FK,(&__string_112));
+  add__EZR(list__FK,(&__string_113));
+  add__EZR(list__FK,(&__string_114));
+  add__EZR(list__FK,(&__string_115));
+  add__EZR(list__FK,(&__string_116));
+  add__EZR(list__FK,(&__string_117));
+  add__EZR(list__FK,(&__string_118));
+  add__EZR(list__FK,(&__string_119));
+  add__EZR(list__FK,(&__string_120));
+  add__EZR(list__FK,(&__string_121));
+  add__EZR(list__FK,(&__string_122));
+  add__EZR(list__FK,(&__string_123));
+  add__EZR(list__FK,(&__string_124));
+  add__EZR(list__FK,(&__string_125));
+  add__EZR(list__FK,(&__string_126));
+  add__EZR(list__FK,(&__string_127));
+  add__EZR(list__FK,(&__string_128));
+  add__EZR(list__FK,(&__string_129));
+  add__EZR(list__FK,(&__string_70));
+  add__EZR(list__FK,(&__string_130));
+  add__EZR(list__FK,(&__string_131));
+  add__EZR(list__FK,(&__string_132));
+  add__EZR(list__FK,(&__string_133));
+  add__EZR(list__FK,(&__string_65));
+  add__EZR(list__FK,(&__string_134));
+  add__EZR(list__FK,(&__string_135));
+  add__EZR(list__FK,(&__string_136));
+  add__EZR(list__FK,(&__string_137));
+  add__EZR(list__FK,(&__string_138));
+  add__EZR(list__FK,(&__string_139));
+  add__EZR(list__FK,(&__string_140));
+  add__EZR(list__FK,(&__string_141));
+  add__EZR(list__FK,(&__string_142));
+  add__EZR(list__FK,(&__string_143));
+  add__EZR(list__FK,(&__string_144));
+  add__EZR(list__FK,(&__string_145));
+  add__EZR(list__FK,(&__string_146));
+  add__EZR(list__FK,(&__string_147));
+  add__EZR(list__FK,(&__string_148));
+  add__EZR(list__FK,(&__string_149));
+  add__EZR(list__FK,(&__string_150));
+  add__EZR(list__FK,(&__string_66));
+  add__EZR(list__FK,(&__string_151));
+  add__EZR(list__FK,(&__string_152));
+  add__EZR(list__FK,(&__string_153));
+  add__EZR(list__FK,(&__string_154));
+  add__EZR(list__FK,(&__string_155));
+  add__EZR(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__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')) {
+  while ((j__IZ <= ((__FAST_ARRAYoSTRINGo *)result__ZID)->parent_arrayed_collection__5KC.upper__CLC)) {
+    cmd__HZ=((void **)((__FAST_ARRAYoSTRINGo *)result__ZID)->parent_arrayed_collection__5KC.storage__UGT)[j__IZ];
+    if ((((__CHARACTER *)((__STRING *)cmd__HZ)->storage__3CS)[ 0] == '-')) {
+      if ((((__CHARACTER *)((__STRING *)cmd__HZ)->storage__3CS)[ 1] == 'o')) {
         j__IZ=(__INTEGER)(j__IZ +  1);
-        if ((j__IZ > (__INTEGER)(((__FAST_ARRAYoSTRINGo *)result__OID)->parent_arrayed_collection__RKC.upper__UKC +  1))) {
-          print__DJD((&__string_157));
+        if ((j__IZ > (__INTEGER)(((__FAST_ARRAYoSTRINGo *)result__ZID)->parent_arrayed_collection__5KC.upper__CLC +  1))) {
+          print__OJD((&__string_157));
           exit(( 1));
         };
-        output_name__DI=get__YWB(((void **)((__FAST_ARRAYoSTRINGo *)result__OID)->parent_arrayed_collection__RKC.storage__HHT)[j__IZ]);
+        output_name__DI=get__YWB(((void **)((__FAST_ARRAYoSTRINGo *)result__ZID)->parent_arrayed_collection__5KC.storage__UGT)[j__IZ]);
         __tmp__U0=TRUE__;
       } else {
         __tmp__U0=FALSE__;
@@ -6044,849 +6016,829 @@ int main(int argc,char **argv)
       if (__tmp__U0) {
         __tmp__P1=TRUE__;
       } else {
-        result__JAOB=(((__CHARACTER *)((__STRING *)cmd__HZ)->storage__RCS)[ 1] == 'f');
-        if (result__JAOB) {
+        result__Y2NB=(((__CHARACTER *)((__STRING *)cmd__HZ)->storage__3CS)[ 1] == 'f');
+        if (result__Y2NB) {
           j__IZ=(__INTEGER)(j__IZ +  1);
-          if ((j__IZ > (__INTEGER)(((__FAST_ARRAYoSTRINGo *)result__OID)->parent_arrayed_collection__RKC.upper__UKC +  1))) {
-            print__DJD((&__string_157));
+          if ((j__IZ > (__INTEGER)(((__FAST_ARRAYoSTRINGo *)result__ZID)->parent_arrayed_collection__5KC.upper__CLC +  1))) {
+            print__OJD((&__string_157));
             exit(( 1));
           };
-          format_name__N1=get__YWB(((void **)((__FAST_ARRAYoSTRINGo *)result__OID)->parent_arrayed_collection__RKC.storage__HHT)[j__IZ]);
+          format_name__N1=get__YWB(((void **)((__FAST_ARRAYoSTRINGo *)result__ZID)->parent_arrayed_collection__5KC.storage__UGT)[j__IZ]);
         };
-        __tmp__P1=result__JAOB;
+        __tmp__P1=result__Y2NB;
       };
       if (__tmp__P1) {
         __tmp__31=TRUE__;
       } else {
-        result__1AOB=(((__CHARACTER *)((__STRING *)cmd__HZ)->storage__RCS)[ 1] == 'c');
-        if (result__1AOB) {
+        result__K3NB=(((__CHARACTER *)((__STRING *)cmd__HZ)->storage__3CS)[ 1] == 'c');
+        if (result__K3NB) {
           is_short_code__11=TRUE__;
         };
-        __tmp__31=result__1AOB;
+        __tmp__31=result__K3NB;
       };
       if (__tmp__31) {
         __tmp__L2=TRUE__;
       } else {
-        result__NBOB=(((__CHARACTER *)((__STRING *)cmd__HZ)->storage__RCS)[ 1] == 'p');
-        if (result__NBOB) {
+        result__23NB=(((__CHARACTER *)((__STRING *)cmd__HZ)->storage__3CS)[ 1] == 'p');
+        if (result__23NB) {
           is_short_private__J2=TRUE__;
         };
-        __tmp__L2=result__NBOB;
+        __tmp__L2=result__23NB;
       };
       if (__tmp__L2) {
         __tmp__Y2=TRUE__;
       } else {
-        result__5BOB=(((__CHARACTER *)((__STRING *)cmd__HZ)->storage__RCS)[ 1] == 'r');
-        if (result__5BOB) {
+        result__O4NB=(((__CHARACTER *)((__STRING *)cmd__HZ)->storage__3CS)[ 1] == 'r');
+        if (result__O4NB) {
           is_short_recursive__JB=TRUE__;
         };
-        __tmp__Y2=result__5BOB;
+        __tmp__Y2=result__O4NB;
       };
       if ((! __tmp__Y2)) {
-        if ((((__CHARACTER *)((__STRING *)cmd__HZ)->storage__RCS)[ 1] == 'd')) {
+        if ((((__CHARACTER *)((__STRING *)cmd__HZ)->storage__3CS)[ 1] == 'd')) {
           is_shorter__LZ=FALSE__;
           is_shorter2__VI=TRUE__;
           is_short_recursive__JB=TRUE__;
         } else {
-          print__DJD((&__string_157));
+          print__OJD((&__string_157));
           exit(( 1));
         };
       };
     } else {
       if (((void *)input_name__3B != (void *)NULL)) {
-        print__DJD((&__string_157));
+        print__OJD((&__string_157));
         exit(( 1));
       };
-      copy__JDS(string_tmp__VH,((void **)((__FAST_ARRAYoSTRINGo *)result__OID)->parent_arrayed_collection__RKC.storage__HHT)[j__IZ]);
+      copy__VDS(string_tmp__VH,((void **)((__FAST_ARRAYoSTRINGo *)result__ZID)->parent_arrayed_collection__5KC.storage__UGT)[j__IZ]);
       input_name__3B=get__YWB(string_tmp__VH);
     };
     j__IZ=(__INTEGER)(j__IZ +  1);
   };
   if (((void *)input_name__3B == (void *)NULL)) {
-    print__DJD((&__string_157));
+    print__OJD((&__string_157));
     exit(( 1));
   };
   if (((void *)format_name__N1 != (void *)NULL)) {
     path__KZ=((__CHARACTER *)(LISAAC_DIRECTORY));
-    Self__BLC=((__CHARACTER *)path__KZ);
-    idx__NLC= 0;
-    while ((! ((idx__NLC >  1024) || ('\0' == Self__BLC[idx__NLC])))) {
-      idx__NLC=(__INTEGER)(idx__NLC +  1);
-    };
-    result__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__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__R1KH=new_lab__FTJ(lab_type__U1KH);
-            };
-            ((__POINTER *)next__R1KH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__S1KH)[ 0]=next__R1KH;
-          } else {
-            ((__POINTER *)result__T1KH)[ 0]=(void *)((unsigned long)((__POINTER *)next__R1KH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__T1KH=next__R1KH;
-          };
-        };
-        ptr__MOIH=result__T1KH;
-      };
-      result__LOIH=((__STRING_CONSTANT *)ptr__MOIH);
-      *(result__LOIH) = *(STRING_CONSTANT__);
-    };
-    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)] != '\\');
+    __tmp__P4=fast_first_index_of__until__OLC(path__KZ);
+    result__0UIH=NULL;
+    ptr__1UIH=((__POINTER )(NULL));
+    typ_id__2UIH= 0;
+    sz__3UIH=((__UINTEGER_32 )sizeof(__STRING_CONSTANT));
+    if ((sz__3UIH ==  0)) {
+      result__0UIH=STRING_CONSTANT__;
+    } else {
+      typ_id__2UIH=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__3UIH);
+      if ((typ_id__2UIH == (__INTEGER)(-  1))) {
+        a__4UIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__5UIH=(__UINTEGER_32)((__UINTEGER_32)(sz__3UIH + a__4UIH) & (__UINTEGER_32)(~ a__4UIH));
+        ptr_table__PXLH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__5UIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__OXLH=((__POINTER )(NULL));
+        result__QXLH=((__POINTER *)ptr_table__PXLH)[ 0];
+        if ((result__QXLH == (void *)NULL)) {
+          result__QXLH=new_lab__RTJ(new_size__5UIH);
+          next__OXLH=(void *)((unsigned long)result__QXLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5UIH)));
+          ((__POINTER *)next__OXLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__PXLH)[ 0]=next__OXLH;
+        } else {
+          next__OXLH=((__POINTER *)result__QXLH)[ 0];
+          if ((next__OXLH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__QXLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__5UIH <<  1)) <=  4096)) {
+              next__OXLH=(void *)((unsigned long)result__QXLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5UIH)));
+            } else {
+              next__OXLH=new_lab__RTJ(new_size__5UIH);
+            };
+            ((__POINTER *)next__OXLH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__PXLH)[ 0]=next__OXLH;
+          } else {
+            ((__POINTER *)result__QXLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OXLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__QXLH=next__OXLH;
+          };
+        };
+        ptr__1UIH=result__QXLH;
+      } else {
+        t__AVIH=((__UINTEGER_32 )typ_id__2UIH);
+        a__BVIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__XXLH=(__UINTEGER_32)((__UINTEGER_32)(sz__3UIH + a__BVIH) & (__UINTEGER_32)(~ a__BVIH));
+        ptr_table__UXLH=((__POINTER )(&(table_type[(t__AVIH)])));
+        lab_type__WXLH=(__UINTEGER_32)(t__AVIH |  1);
+        next__TXLH=((__POINTER )(NULL));
+        result__VXLH=((__POINTER *)ptr_table__UXLH)[ 0];
+        if ((result__VXLH == (void *)NULL)) {
+          result__VXLH=new_lab__RTJ(lab_type__WXLH);
+          next__TXLH=(void *)((unsigned long)result__VXLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XXLH)));
+          ((__POINTER *)next__TXLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__UXLH)[ 0]=next__TXLH;
+        } else {
+          next__TXLH=((__POINTER *)result__VXLH)[ 0];
+          if ((next__TXLH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__VXLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__XXLH <<  1)) <=  4096)) {
+              next__TXLH=(void *)((unsigned long)result__VXLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XXLH)));
+            } else {
+              next__TXLH=new_lab__RTJ(lab_type__WXLH);
+            };
+            ((__POINTER *)next__TXLH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__UXLH)[ 0]=next__TXLH;
+          } else {
+            ((__POINTER *)result__VXLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TXLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__VXLH=next__TXLH;
+          };
+        };
+        ptr__1UIH=result__VXLH;
+      };
+      result__0UIH=((__STRING_CONSTANT *)ptr__1UIH);
+      *(result__0UIH) = *(STRING_CONSTANT__);
+    };
+    Self__JXS=((__STRING_CONSTANT *)result__0UIH);
+    Self__JXS->storage__RRO=path__KZ;
+    Self__JXS->count__DD=__tmp__P4;
+    copy__VDS(string_tmp__VH,result__0UIH);
+    Self__MUGH=((__STRING_CONSTANT *)result__0UIH);
+    if ((((__CHARACTER *)Self__MUGH->storage__RRO)[(__INTEGER)(Self__MUGH->count__DD -  1)] != '/')) {
+      Self__AOS=((__STRING_CONSTANT *)result__0UIH);
+      __tmp__14=(((__CHARACTER *)Self__AOS->storage__RRO)[(__INTEGER)(Self__AOS->count__DD -  1)] != '\\');
     } else {
       __tmp__14=FALSE__;
     };
     if (__tmp__14) {
-      add_last__GOT(string_tmp__VH,'/');
-    };
-    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__2GD==0) {
-    } else {
-      parent_directory__1FD();
-    };
-    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));
+      Self__UNT=((__STRING *)string_tmp__VH);
+      new_capacity__WNT= 0;
+      if ((Self__UNT->capacity__UCS <= Self__UNT->count__SGC)) {
+        if ((Self__UNT->capacity__UCS ==  0)) {
+          Self__UNT->capacity__UCS= 32;
+          Self__UNT->storage__3CS=create__YIEB( 32);
+        } else {
+          new_capacity__WNT=(__INTEGER)(Self__UNT->capacity__UCS <<  1);
+          Self__VBFH=((__CHARACTER *)Self__UNT->storage__3CS);
+          old_nb_elts__WBFH=Self__UNT->capacity__UCS;
+          new__YBFH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__VBFH),((__UINTEGER_32 )old_nb_elts__WBFH),((__UINTEGER_32 )new_capacity__WNT)));
+          upper__CQ3C=(__INTEGER)(new_capacity__WNT -  1);
+          Self__KWDD=old_nb_elts__WBFH;
+          while ((Self__KWDD <= upper__CQ3C)) {
+            new__YBFH[Self__KWDD]='\0';
+            Self__KWDD=(__INTEGER)(Self__KWDD +  1);
+          };
+          Self__UNT->storage__3CS=new__YBFH;
+          Self__UNT->capacity__UCS=new_capacity__WNT;
+        };
+      };
+      ((__CHARACTER *)Self__UNT->storage__3CS)[Self__UNT->count__SGC]='/';
+      Self__UNT->count__SGC=(__INTEGER)(Self__UNT->count__SGC +  1);
+    };
+    append__3OS(string_tmp__VH,(&__string_158));
+    append__3OS(string_tmp__VH,format_name__N1);
+    append__3OS(string_tmp__VH,(&__string_159));
+    fmt_name__GOC=get__YWB(string_tmp__VH);
+    if (FILE_SYSTEM__->parent_directory__HHD==0) {
+    } else {
+      parent_directory__GGD();
+    };
+    if (((void *)get_entry__DZAC(fmt_name__GOC) == (void *)NULL)) {
+      put_string__33F((&__string_160));
+      put_string__33F(fmt_name__GOC);
+      put_string__33F((&__string_161));
       exit(( 1));
     };
-    object__ZBC=create__name__generic_count__JBC(fmt_name__YNC,(&__string_114));
+    object__ZBC=create__name__generic_count__JBC(fmt_name__GOC,(&__string_114));
     source__5BC=((__PROTOTYPE *)object__ZBC)->source__3BC;
     position__CCC= 1;
     pos_cur__FCC= 1;
     pos_line__GCC= 1;
     pos_col__HCC= 0;
-    while_do__OLF:
+    while_do__LMF:
     {
-      result__W1KH=FALSE__;
-      if ((! read_space__MTD())) {
-        result__W1KH=FALSE__;
+      result__YXLH=FALSE__;
+      if ((! read_space__XTD())) {
+        result__YXLH=FALSE__;
       } else {
-        result__X1KH='\0';
-        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__X1KH=((__CHARACTER )(( 0)));
+        result__ZXLH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+          result__ZXLH=((__CHARACTER )(( 0)));
         } else {
-          result__X1KH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+          result__ZXLH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__X1KH == '-')) {
+        if ((result__ZXLH == '-')) {
           position__CCC=(__INTEGER)(position__CCC +  1);
-          result__W1KH=TRUE__;
+          result__YXLH=TRUE__;
         };
       };
-      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)) {
+      if (result__YXLH) {
+        if ((! read_identifier__2BL())) {
+          pos__2S1G=current_position__B0F();
+          put_error__text__1PG( 0,(&__string_162));
+          put_position__FRG(pos__2S1G);
+          put_string__33F(msg_err__AQG);
+          if ((type_error__5PG !=  2)) {
             exit(( 1));
           };
         };
-        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__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)));
+        result__3DKB=NULL;
+        ptr__4DKB=((__POINTER )(NULL));
+        typ_id__DEKB= 0;
+        sz__AEKB=((__UINTEGER_32 )sizeof(__LINKED_LISToSTRING_CONSTANTo));
+        if ((sz__AEKB ==  0)) {
+          result__3DKB=LINKED_LISToSTRING_CONSTANTo__;
+        } else {
+          typ_id__DEKB=__LINKED_LISToSTRING_CONSTANTo__;
+          clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__AEKB);
+          if ((typ_id__DEKB == (__INTEGER)(-  1))) {
+            a__PUGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__QUGH=(__UINTEGER_32)((__UINTEGER_32)(sz__AEKB + a__PUGH) & (__UINTEGER_32)(~ a__PUGH));
+            ptr_table__2XLH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__QUGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__1XLH=((__POINTER )(NULL));
+            result__3XLH=((__POINTER *)ptr_table__2XLH)[ 0];
+            if ((result__3XLH == (void *)NULL)) {
+              result__3XLH=new_lab__RTJ(new_size__QUGH);
+              next__1XLH=(void *)((unsigned long)result__3XLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QUGH)));
+              ((__POINTER *)next__1XLH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__2XLH)[ 0]=next__1XLH;
+            } else {
+              next__1XLH=((__POINTER *)result__3XLH)[ 0];
+              if ((next__1XLH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__3XLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__QUGH <<  1)) <=  4096)) {
+                  next__1XLH=(void *)((unsigned long)result__3XLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QUGH)));
                 } else {
-                  next__Z1KH=new_lab__FTJ(new_size__AMHH);
+                  next__1XLH=new_lab__RTJ(new_size__QUGH);
                 };
-                ((__POINTER *)next__Z1KH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__01KH)[ 0]=next__Z1KH;
+                ((__POINTER *)next__1XLH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__2XLH)[ 0]=next__1XLH;
               } else {
-                ((__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__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)));
+                ((__POINTER *)result__3XLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1XLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__3XLH=next__1XLH;
+              };
+            };
+            ptr__4DKB=result__3XLH;
+          } else {
+            t__UUGH=((__UINTEGER_32 )typ_id__DEKB);
+            a__TUGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__EYLH=(__UINTEGER_32)((__UINTEGER_32)(sz__AEKB + a__TUGH) & (__UINTEGER_32)(~ a__TUGH));
+            ptr_table__BYLH=((__POINTER )(&(table_type[(t__UUGH)])));
+            lab_type__DYLH=(__UINTEGER_32)(t__UUGH |  1);
+            next__AYLH=((__POINTER )(NULL));
+            result__CYLH=((__POINTER *)ptr_table__BYLH)[ 0];
+            if ((result__CYLH == (void *)NULL)) {
+              result__CYLH=new_lab__RTJ(lab_type__DYLH);
+              next__AYLH=(void *)((unsigned long)result__CYLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EYLH)));
+              ((__POINTER *)next__AYLH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__BYLH)[ 0]=next__AYLH;
+            } else {
+              next__AYLH=((__POINTER *)result__CYLH)[ 0];
+              if ((next__AYLH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__CYLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__EYLH <<  1)) <=  4096)) {
+                  next__AYLH=(void *)((unsigned long)result__CYLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EYLH)));
                 } else {
-                  next__41KH=new_lab__FTJ(lab_type__B2KH);
+                  next__AYLH=new_lab__RTJ(lab_type__DYLH);
                 };
-                ((__POINTER *)next__41KH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__51KH)[ 0]=next__41KH;
+                ((__POINTER *)next__AYLH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__BYLH)[ 0]=next__AYLH;
               } else {
-                ((__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)) {
+                ((__POINTER *)result__CYLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__AYLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__CYLH=next__AYLH;
+              };
+            };
+            ptr__4DKB=result__CYLH;
+          };
+          result__3DKB=((__LINKED_LISToSTRING_CONSTANTo *)ptr__4DKB);
+          *(result__3DKB) = *(LINKED_LISToSTRING_CONSTANTo__);
+        };
+        if (fast_has__IDT(short_dico__QD,last_string__D2C)) {
+          pos__GT1G=current_position__B0F();
+          put_error__text__1PG( 0,(&__string_163));
+          put_position__FRG(pos__GT1G);
+          put_string__33F(msg_err__AQG);
+          if ((type_error__5PG !=  2)) {
             exit(( 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__BPIH <  0)) {
-                  result__BPIH=(__INTEGER)(~ result__BPIH);
-                };
-                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;
+        __tmp__UPD=last_string__D2C;
+        Self__NMEB=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
+        k__PMEB=last_string__D2C;
+        h__WMEB=hash_code__RNW(last_string__D2C);
+        idx__XMEB=(__INTEGER)(h__WMEB % Self__NMEB->capacity__WDT);
+        node__YMEB=((void **)Self__NMEB->buckets__1DT)[idx__XMEB];
+        while ((! (((void *)node__YMEB == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__YMEB)->key__HET == (void *)k__PMEB)))) {
+          node__YMEB=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__YMEB)->next__SET;
+        };
+        if (((void *)node__YMEB == (void *)NULL)) {
+          if ((Self__NMEB->capacity__WDT == Self__NMEB->count__4MY)) {
+            idx__YFZB= 0;
+            node1__2FZB=NULL;
+            node2__3FZB=NULL;
+            old_buckets__1FZB=Self__NMEB->buckets__1DT;
+            new_capacity__ZFZB=prime_number_ceiling__021((__INTEGER)(Self__NMEB->capacity__WDT +  1));
+            Self__NMEB->buckets__1DT=create__0E4(new_capacity__ZFZB);
+            i__0FZB=(__INTEGER)(Self__NMEB->capacity__WDT -  1);
+            Self__NMEB->capacity__WDT=new_capacity__ZFZB;
+            while ((i__0FZB >=  0)) {
+              node1__2FZB=((void **)old_buckets__1FZB)[i__0FZB];
+              while (((void *)node1__2FZB != (void *)NULL)) {
+                node2__3FZB=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node1__2FZB)->next__SET;
+                idx__YFZB=(__INTEGER)(hash_code__RNW(((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node1__2FZB)->key__HET) % Self__NMEB->capacity__WDT);
+                ((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node1__2FZB)->next__SET=((void **)Self__NMEB->buckets__1DT)[idx__YFZB];
+                ((void **)Self__NMEB->buckets__1DT)[idx__YFZB]=node1__2FZB;
+                node1__2FZB=node2__3FZB;
+              };
+              i__0FZB=(__INTEGER)(i__0FZB -  1);
+            };
+            idx__XMEB=(__INTEGER)(h__WMEB % Self__NMEB->capacity__WDT);
+          };
+          __tmp__FOEB=((void **)Self__NMEB->buckets__1DT)[idx__XMEB];
+          result__BIZB=NULL;
+          ptr__CIZB=((__POINTER )(NULL));
+          typ_id__HIZB= 0;
+          sz__EIZB=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo));
+          if ((sz__EIZB ==  0)) {
+            result__BIZB=HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__;
+          } else {
+            typ_id__HIZB=__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__;
+            clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__EIZB);
+            if ((typ_id__HIZB == (__INTEGER)(-  1))) {
+              a__0UGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__1UGH=(__UINTEGER_32)((__UINTEGER_32)(sz__EIZB + a__0UGH) & (__UINTEGER_32)(~ a__0UGH));
+              ptr_table__GYLH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__1UGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__FYLH=((__POINTER )(NULL));
+              result__HYLH=((__POINTER *)ptr_table__GYLH)[ 0];
+              if ((result__HYLH == (void *)NULL)) {
+                result__HYLH=new_lab__RTJ(new_size__1UGH);
+                next__FYLH=(void *)((unsigned long)result__HYLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1UGH)));
+                ((__POINTER *)next__FYLH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__GYLH)[ 0]=next__FYLH;
               } else {
-                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)));
+                next__FYLH=((__POINTER *)result__HYLH)[ 0];
+                if ((next__FYLH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HYLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__1UGH <<  1)) <=  4096)) {
+                    next__FYLH=(void *)((unsigned long)result__HYLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1UGH)));
                   } else {
-                    next__D2KH=new_lab__FTJ(new_size__LMHH);
+                    next__FYLH=new_lab__RTJ(new_size__1UGH);
                   };
-                  ((__POINTER *)next__D2KH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__E2KH)[ 0]=next__D2KH;
+                  ((__POINTER *)next__FYLH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__GYLH)[ 0]=next__FYLH;
                 } else {
-                  ((__POINTER *)result__F2KH)[ 0]=(void *)((unsigned long)((__POINTER *)next__D2KH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__F2KH=next__D2KH;
+                  ((__POINTER *)result__HYLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FYLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__HYLH=next__FYLH;
                 };
               };
-              ptr__VLZB=result__F2KH;
-            } else {
-              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;
+              ptr__CIZB=result__HYLH;
+            } else {
+              t__5UGH=((__UINTEGER_32 )typ_id__HIZB);
+              a__4UGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__OYLH=(__UINTEGER_32)((__UINTEGER_32)(sz__EIZB + a__4UGH) & (__UINTEGER_32)(~ a__4UGH));
+              ptr_table__LYLH=((__POINTER )(&(table_type[(t__5UGH)])));
+              lab_type__NYLH=(__UINTEGER_32)(t__5UGH |  1);
+              next__KYLH=((__POINTER )(NULL));
+              result__MYLH=((__POINTER *)ptr_table__LYLH)[ 0];
+              if ((result__MYLH == (void *)NULL)) {
+                result__MYLH=new_lab__RTJ(lab_type__NYLH);
+                next__KYLH=(void *)((unsigned long)result__MYLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OYLH)));
+                ((__POINTER *)next__KYLH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__LYLH)[ 0]=next__KYLH;
               } else {
-                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)));
+                next__KYLH=((__POINTER *)result__MYLH)[ 0];
+                if ((next__KYLH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MYLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__OYLH <<  1)) <=  4096)) {
+                    next__KYLH=(void *)((unsigned long)result__MYLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OYLH)));
                   } else {
-                    next__I2KH=new_lab__FTJ(lab_type__L2KH);
+                    next__KYLH=new_lab__RTJ(lab_type__NYLH);
                   };
-                  ((__POINTER *)next__I2KH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__J2KH)[ 0]=next__I2KH;
+                  ((__POINTER *)next__KYLH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__LYLH)[ 0]=next__KYLH;
                 } else {
-                  ((__POINTER *)result__K2KH)[ 0]=(void *)((unsigned long)((__POINTER *)next__I2KH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__K2KH=next__I2KH;
+                  ((__POINTER *)result__MYLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KYLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__MYLH=next__KYLH;
                 };
               };
-              ptr__VLZB=result__K2KH;
+              ptr__CIZB=result__MYLH;
             };
-            result__ULZB=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)ptr__VLZB);
-            *(result__ULZB) = *(HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__);
+            result__BIZB=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)ptr__CIZB);
+            *(result__BIZB) = *(HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__);
           };
-          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);
+          Self__FDGC=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__BIZB);
+          Self__FDGC->item__KW3=result__3DKB;
+          Self__FDGC->key__HET=__tmp__UPD;
+          Self__FDGC->next__SET=__tmp__FOEB;
+          node__YMEB=result__BIZB;
+          ((void **)Self__NMEB->buckets__1DT)[idx__XMEB]=result__BIZB;
+          Self__NMEB->count__4MY=(__INTEGER)(Self__NMEB->count__4MY +  1);
         } else {
-          ((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__JQEB)->item__PY3=result__OHKB;
+          ((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__YMEB)->item__KW3=result__3DKB;
         };
-        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)) {
+        if ((! read_symbol__4YJ((&__string_12)))) {
+          pos__YU1G=current_position__B0F();
+          put_error__text__1PG( 0,(&__string_164));
+          put_position__FRG(pos__YU1G);
+          put_string__33F(msg_err__AQG);
+          if ((type_error__5PG !=  2)) {
             exit(( 1));
           };
         };
-        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__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;
+        def__3OEB=result__3DKB;
+        result__5OEB=FALSE__;
+        if (read_short_elt__EIKB()) {
+          result__5OEB=TRUE__;
+          Self__FVGH=((__LINKED_LISToSTRING_CONSTANTo *)result__3DKB);
+          element__EVGH=last_string__D2C;
+          if (((void *)Self__FVGH->first_link__OTEC == (void *)NULL)) {
+            i__LVIH=last_string__D2C;
+            result__CVIH=NULL;
+            ptr__DVIH=((__POINTER )(NULL));
+            typ_id__EVIH= 0;
+            sz__FVIH=((__UINTEGER_32 )sizeof(__LINKED_LIST_NODEoSTRING_CONSTANTo));
+            if ((sz__FVIH ==  0)) {
+              result__CVIH=LINKED_LIST_NODEoSTRING_CONSTANTo__;
+            } else {
+              typ_id__EVIH=__LINKED_LIST_NODEoSTRING_CONSTANTo__;
+              clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__FVIH);
+              if ((typ_id__EVIH == (__INTEGER)(-  1))) {
+                a__GVIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                new_size__HVIH=(__UINTEGER_32)((__UINTEGER_32)(sz__FVIH + a__GVIH) & (__UINTEGER_32)(~ a__GVIH));
+                ptr_table__QYLH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__HVIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                next__PYLH=((__POINTER )(NULL));
+                result__RYLH=((__POINTER *)ptr_table__QYLH)[ 0];
+                if ((result__RYLH == (void *)NULL)) {
+                  result__RYLH=new_lab__RTJ(new_size__HVIH);
+                  next__PYLH=(void *)((unsigned long)result__RYLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HVIH)));
+                  ((__POINTER *)next__PYLH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__QYLH)[ 0]=next__PYLH;
                 } else {
-                  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)));
+                  next__PYLH=((__POINTER *)result__RYLH)[ 0];
+                  if ((next__PYLH == (void *)NULL)) {
+                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__RYLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__HVIH <<  1)) <=  4096)) {
+                      next__PYLH=(void *)((unsigned long)result__RYLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HVIH)));
                     } else {
-                      next__N2KH=new_lab__FTJ(new_size__LPIH);
+                      next__PYLH=new_lab__RTJ(new_size__HVIH);
                     };
-                    ((__POINTER *)next__N2KH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__O2KH)[ 0]=next__N2KH;
+                    ((__POINTER *)next__PYLH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__QYLH)[ 0]=next__PYLH;
                   } else {
-                    ((__POINTER *)result__P2KH)[ 0]=(void *)((unsigned long)((__POINTER *)next__N2KH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__P2KH=next__N2KH;
+                    ((__POINTER *)result__RYLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PYLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__RYLH=next__PYLH;
                   };
                 };
-                ptr__HPIH=result__P2KH;
+                ptr__DVIH=result__RYLH;
               } else {
-                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;
+                t__IVIH=((__UINTEGER_32 )typ_id__EVIH);
+                a__JVIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                new_size__YYLH=(__UINTEGER_32)((__UINTEGER_32)(sz__FVIH + a__JVIH) & (__UINTEGER_32)(~ a__JVIH));
+                ptr_table__VYLH=((__POINTER )(&(table_type[(t__IVIH)])));
+                lab_type__XYLH=(__UINTEGER_32)(t__IVIH |  1);
+                next__UYLH=((__POINTER )(NULL));
+                result__WYLH=((__POINTER *)ptr_table__VYLH)[ 0];
+                if ((result__WYLH == (void *)NULL)) {
+                  result__WYLH=new_lab__RTJ(lab_type__XYLH);
+                  next__UYLH=(void *)((unsigned long)result__WYLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YYLH)));
+                  ((__POINTER *)next__UYLH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__VYLH)[ 0]=next__UYLH;
                 } else {
-                  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)));
+                  next__UYLH=((__POINTER *)result__WYLH)[ 0];
+                  if ((next__UYLH == (void *)NULL)) {
+                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__WYLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__YYLH <<  1)) <=  4096)) {
+                      next__UYLH=(void *)((unsigned long)result__WYLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YYLH)));
                     } else {
-                      next__S2KH=new_lab__FTJ(lab_type__V2KH);
+                      next__UYLH=new_lab__RTJ(lab_type__XYLH);
                     };
-                    ((__POINTER *)next__S2KH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__T2KH)[ 0]=next__S2KH;
+                    ((__POINTER *)next__UYLH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__VYLH)[ 0]=next__UYLH;
                   } else {
-                    ((__POINTER *)result__U2KH)[ 0]=(void *)((unsigned long)((__POINTER *)next__S2KH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__U2KH=next__S2KH;
+                    ((__POINTER *)result__WYLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UYLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__WYLH=next__UYLH;
                   };
                 };
-                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__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;
+                ptr__DVIH=result__WYLH;
+              };
+              result__CVIH=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)ptr__DVIH);
+              *(result__CVIH) = *(LINKED_LIST_NODEoSTRING_CONSTANTo__);
+            };
+            Self__KVIH=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)result__CVIH);
+            Self__KVIH->item__L0HD=i__LVIH;
+            Self__KVIH->next__JROD=NULL;
+            Self__FVGH->first_link__OTEC=result__CVIH;
+            Self__FVGH->parent_linked_collection__LD.upper__0ED= 1;
+            Self__FVGH->last_link__XTEC=result__CVIH;
+            Self__FVGH->mem_idx__YTEC= 1;
+            Self__FVGH->mem_lnk__0TEC=result__CVIH;
+          } else {
+            result__MVIH=NULL;
+            ptr__NVIH=((__POINTER )(NULL));
+            typ_id__OVIH= 0;
+            sz__PVIH=((__UINTEGER_32 )sizeof(__LINKED_LIST_NODEoSTRING_CONSTANTo));
+            if ((sz__PVIH ==  0)) {
+              result__MVIH=LINKED_LIST_NODEoSTRING_CONSTANTo__;
+            } else {
+              typ_id__OVIH=__LINKED_LIST_NODEoSTRING_CONSTANTo__;
+              clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__PVIH);
+              if ((typ_id__OVIH == (__INTEGER)(-  1))) {
+                a__QVIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                new_size__RVIH=(__UINTEGER_32)((__UINTEGER_32)(sz__PVIH + a__QVIH) & (__UINTEGER_32)(~ a__QVIH));
+                ptr_table__0YLH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__RVIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                next__ZYLH=((__POINTER )(NULL));
+                result__1YLH=((__POINTER *)ptr_table__0YLH)[ 0];
+                if ((result__1YLH == (void *)NULL)) {
+                  result__1YLH=new_lab__RTJ(new_size__RVIH);
+                  next__ZYLH=(void *)((unsigned long)result__1YLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RVIH)));
+                  ((__POINTER *)next__ZYLH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__0YLH)[ 0]=next__ZYLH;
                 } else {
-                  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)));
+                  next__ZYLH=((__POINTER *)result__1YLH)[ 0];
+                  if ((next__ZYLH == (void *)NULL)) {
+                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1YLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__RVIH <<  1)) <=  4096)) {
+                      next__ZYLH=(void *)((unsigned long)result__1YLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RVIH)));
                     } else {
-                      next__X2KH=new_lab__FTJ(new_size__VPIH);
+                      next__ZYLH=new_lab__RTJ(new_size__RVIH);
                     };
-                    ((__POINTER *)next__X2KH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__Y2KH)[ 0]=next__X2KH;
+                    ((__POINTER *)next__ZYLH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__0YLH)[ 0]=next__ZYLH;
                   } else {
-                    ((__POINTER *)result__Z2KH)[ 0]=(void *)((unsigned long)((__POINTER *)next__X2KH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__Z2KH=next__X2KH;
+                    ((__POINTER *)result__1YLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZYLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__1YLH=next__ZYLH;
                   };
                 };
-                ptr__RPIH=result__Z2KH;
+                ptr__NVIH=result__1YLH;
               } else {
-                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;
+                t__SVIH=((__UINTEGER_32 )typ_id__OVIH);
+                a__TVIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                new_size__CZLH=(__UINTEGER_32)((__UINTEGER_32)(sz__PVIH + a__TVIH) & (__UINTEGER_32)(~ a__TVIH));
+                ptr_table__5YLH=((__POINTER )(&(table_type[(t__SVIH)])));
+                lab_type__BZLH=(__UINTEGER_32)(t__SVIH |  1);
+                next__4YLH=((__POINTER )(NULL));
+                result__AZLH=((__POINTER *)ptr_table__5YLH)[ 0];
+                if ((result__AZLH == (void *)NULL)) {
+                  result__AZLH=new_lab__RTJ(lab_type__BZLH);
+                  next__4YLH=(void *)((unsigned long)result__AZLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CZLH)));
+                  ((__POINTER *)next__4YLH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__5YLH)[ 0]=next__4YLH;
                 } else {
-                  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)));
+                  next__4YLH=((__POINTER *)result__AZLH)[ 0];
+                  if ((next__4YLH == (void *)NULL)) {
+                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__AZLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__CZLH <<  1)) <=  4096)) {
+                      next__4YLH=(void *)((unsigned long)result__AZLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CZLH)));
                     } else {
-                      next__22KH=new_lab__FTJ(lab_type__52KH);
+                      next__4YLH=new_lab__RTJ(lab_type__BZLH);
                     };
-                    ((__POINTER *)next__22KH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__32KH)[ 0]=next__22KH;
+                    ((__POINTER *)next__4YLH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__5YLH)[ 0]=next__4YLH;
                   } else {
-                    ((__POINTER *)result__42KH)[ 0]=(void *)((unsigned long)((__POINTER *)next__22KH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__42KH=next__22KH;
+                    ((__POINTER *)result__AZLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4YLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__AZLH=next__4YLH;
                   };
                 };
-                ptr__RPIH=result__42KH;
+                ptr__NVIH=result__AZLH;
               };
-              result__QPIH=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)ptr__RPIH);
-              *(result__QPIH) = *(LINKED_LIST_NODEoSTRING_CONSTANTo__);
+              result__MVIH=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)ptr__NVIH);
+              *(result__MVIH) = *(LINKED_LIST_NODEoSTRING_CONSTANTo__);
             };
-            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;
+            Self__UVIH=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)result__MVIH);
+            Self__UVIH->item__L0HD=element__EVGH;
+            Self__UVIH->next__JROD=NULL;
+            ((__LINKED_LIST_NODEoSTRING_CONSTANTo *)Self__FVGH->last_link__XTEC)->next__JROD=result__MVIH;
+            Self__FVGH->parent_linked_collection__LD.upper__0ED=(__INTEGER)(Self__FVGH->parent_linked_collection__LD.upper__0ED +  1);
+            Self__FVGH->last_link__XTEC=result__MVIH;
           };
-          while_do__YTSB:
+          while_do__FQSB:
           {
-            result__B3KH=FALSE__;
-            if ((! read_space__MTD())) {
-              result__B3KH=FALSE__;
+            result__DZLH=FALSE__;
+            if ((! read_space__XTD())) {
+              result__DZLH=FALSE__;
             } else {
-              result__C3KH='\0';
-              if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                result__C3KH=((__CHARACTER )(( 0)));
+              result__EZLH='\0';
+              if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+                result__EZLH=((__CHARACTER )(( 0)));
               } else {
-                result__C3KH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+                result__EZLH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
               };
-              if ((result__C3KH == '+')) {
+              if ((result__EZLH == '+')) {
                 position__CCC=(__INTEGER)(position__CCC +  1);
-                result__B3KH=TRUE__;
+                result__DZLH=TRUE__;
               };
             };
-            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)) {
+            if (result__DZLH) {
+              if ((! read_short_elt__EIKB())) {
+                pos__0U1G=current_position__B0F();
+                put_error__text__1PG( 0,(&__string_165));
+                put_position__FRG(pos__0U1G);
+                put_string__33F(msg_err__AQG);
+                if ((type_error__5PG !=  2)) {
                   exit(( 1));
                 };
               };
-              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__;
+              Self__JTEC=((__LINKED_LISToSTRING_CONSTANTo *)def__3OEB);
+              element__KTEC=last_string__D2C;
+              if (((void *)Self__JTEC->first_link__OTEC == (void *)NULL)) {
+                i__5VIH=last_string__D2C;
+                result__WVIH=NULL;
+                ptr__XVIH=((__POINTER )(NULL));
+                typ_id__YVIH= 0;
+                sz__ZVIH=((__UINTEGER_32 )sizeof(__LINKED_LIST_NODEoSTRING_CONSTANTo));
+                if ((sz__ZVIH ==  0)) {
+                  result__WVIH=LINKED_LIST_NODEoSTRING_CONSTANTo__;
                 } else {
-                  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;
+                  typ_id__YVIH=__LINKED_LIST_NODEoSTRING_CONSTANTo__;
+                  clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__ZVIH);
+                  if ((typ_id__YVIH == (__INTEGER)(-  1))) {
+                    a__0VIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__1VIH=(__UINTEGER_32)((__UINTEGER_32)(sz__ZVIH + a__0VIH) & (__UINTEGER_32)(~ a__0VIH));
+                    ptr_table__HZLH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__1VIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                    next__GZLH=((__POINTER )(NULL));
+                    result__IZLH=((__POINTER *)ptr_table__HZLH)[ 0];
+                    if ((result__IZLH == (void *)NULL)) {
+                      result__IZLH=new_lab__RTJ(new_size__1VIH);
+                      next__GZLH=(void *)((unsigned long)result__IZLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1VIH)));
+                      ((__POINTER *)next__GZLH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__HZLH)[ 0]=next__GZLH;
                     } else {
-                      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)));
+                      next__GZLH=((__POINTER *)result__IZLH)[ 0];
+                      if ((next__GZLH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__IZLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__1VIH <<  1)) <=  4096)) {
+                          next__GZLH=(void *)((unsigned long)result__IZLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1VIH)));
                         } else {
-                          next__E3KH=new_lab__FTJ(new_size__5PIH);
+                          next__GZLH=new_lab__RTJ(new_size__1VIH);
                         };
-                        ((__POINTER *)next__E3KH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__F3KH)[ 0]=next__E3KH;
+                        ((__POINTER *)next__GZLH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__HZLH)[ 0]=next__GZLH;
                       } else {
-                        ((__POINTER *)result__G3KH)[ 0]=(void *)((unsigned long)((__POINTER *)next__E3KH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__G3KH=next__E3KH;
+                        ((__POINTER *)result__IZLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GZLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__IZLH=next__GZLH;
                       };
                     };
-                    ptr__1PIH=result__G3KH;
+                    ptr__XVIH=result__IZLH;
                   } else {
-                    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;
+                    t__2VIH=((__UINTEGER_32 )typ_id__YVIH);
+                    a__3VIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__PZLH=(__UINTEGER_32)((__UINTEGER_32)(sz__ZVIH + a__3VIH) & (__UINTEGER_32)(~ a__3VIH));
+                    ptr_table__MZLH=((__POINTER )(&(table_type[(t__2VIH)])));
+                    lab_type__OZLH=(__UINTEGER_32)(t__2VIH |  1);
+                    next__LZLH=((__POINTER )(NULL));
+                    result__NZLH=((__POINTER *)ptr_table__MZLH)[ 0];
+                    if ((result__NZLH == (void *)NULL)) {
+                      result__NZLH=new_lab__RTJ(lab_type__OZLH);
+                      next__LZLH=(void *)((unsigned long)result__NZLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PZLH)));
+                      ((__POINTER *)next__LZLH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__MZLH)[ 0]=next__LZLH;
                     } else {
-                      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)));
+                      next__LZLH=((__POINTER *)result__NZLH)[ 0];
+                      if ((next__LZLH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__NZLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__PZLH <<  1)) <=  4096)) {
+                          next__LZLH=(void *)((unsigned long)result__NZLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PZLH)));
                         } else {
-                          next__J3KH=new_lab__FTJ(lab_type__M3KH);
+                          next__LZLH=new_lab__RTJ(lab_type__OZLH);
                         };
-                        ((__POINTER *)next__J3KH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__K3KH)[ 0]=next__J3KH;
+                        ((__POINTER *)next__LZLH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__MZLH)[ 0]=next__LZLH;
                       } else {
-                        ((__POINTER *)result__L3KH)[ 0]=(void *)((unsigned long)((__POINTER *)next__J3KH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__L3KH=next__J3KH;
+                        ((__POINTER *)result__NZLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LZLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__NZLH=next__LZLH;
                       };
                     };
-                    ptr__1PIH=result__L3KH;
+                    ptr__XVIH=result__NZLH;
                   };
-                  result__0PIH=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)ptr__1PIH);
-                  *(result__0PIH) = *(LINKED_LIST_NODEoSTRING_CONSTANTo__);
+                  result__WVIH=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)ptr__XVIH);
+                  *(result__WVIH) = *(LINKED_LIST_NODEoSTRING_CONSTANTo__);
                 };
-                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;
+                Self__4VIH=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)result__WVIH);
+                Self__4VIH->item__L0HD=i__5VIH;
+                Self__4VIH->next__JROD=NULL;
+                Self__JTEC->first_link__OTEC=result__WVIH;
+                Self__JTEC->parent_linked_collection__LD.upper__0ED= 1;
+                Self__JTEC->last_link__XTEC=result__WVIH;
+                Self__JTEC->mem_idx__YTEC= 1;
+                Self__JTEC->mem_lnk__0TEC=result__WVIH;
               } else {
-                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__;
+                result__IRED=NULL;
+                ptr__JRED=((__POINTER )(NULL));
+                typ_id__ORED= 0;
+                sz__LRED=((__UINTEGER_32 )sizeof(__LINKED_LIST_NODEoSTRING_CONSTANTo));
+                if ((sz__LRED ==  0)) {
+                  result__IRED=LINKED_LIST_NODEoSTRING_CONSTANTo__;
                 } else {
-                  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;
+                  typ_id__ORED=__LINKED_LIST_NODEoSTRING_CONSTANTo__;
+                  clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__LRED);
+                  if ((typ_id__ORED == (__INTEGER)(-  1))) {
+                    a__QQFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__RQFH=(__UINTEGER_32)((__UINTEGER_32)(sz__LRED + a__QQFH) & (__UINTEGER_32)(~ a__QQFH));
+                    ptr_table__RZLH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__RQFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                    next__QZLH=((__POINTER )(NULL));
+                    result__SZLH=((__POINTER *)ptr_table__RZLH)[ 0];
+                    if ((result__SZLH == (void *)NULL)) {
+                      result__SZLH=new_lab__RTJ(new_size__RQFH);
+                      next__QZLH=(void *)((unsigned long)result__SZLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RQFH)));
+                      ((__POINTER *)next__QZLH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__RZLH)[ 0]=next__QZLH;
                     } else {
-                      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)));
+                      next__QZLH=((__POINTER *)result__SZLH)[ 0];
+                      if ((next__QZLH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__SZLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__RQFH <<  1)) <=  4096)) {
+                          next__QZLH=(void *)((unsigned long)result__SZLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RQFH)));
                         } else {
-                          next__O3KH=new_lab__FTJ(new_size__4DGH);
+                          next__QZLH=new_lab__RTJ(new_size__RQFH);
                         };
-                        ((__POINTER *)next__O3KH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__P3KH)[ 0]=next__O3KH;
+                        ((__POINTER *)next__QZLH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__RZLH)[ 0]=next__QZLH;
                       } else {
-                        ((__POINTER *)result__Q3KH)[ 0]=(void *)((unsigned long)((__POINTER *)next__O3KH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__Q3KH=next__O3KH;
+                        ((__POINTER *)result__SZLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QZLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__SZLH=next__QZLH;
                       };
                     };
-                    ptr__ETED=result__Q3KH;
+                    ptr__JRED=result__SZLH;
                   } else {
-                    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;
+                    t__VQFH=((__UINTEGER_32 )typ_id__ORED);
+                    a__UQFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__ZZLH=(__UINTEGER_32)((__UINTEGER_32)(sz__LRED + a__UQFH) & (__UINTEGER_32)(~ a__UQFH));
+                    ptr_table__WZLH=((__POINTER )(&(table_type[(t__VQFH)])));
+                    lab_type__YZLH=(__UINTEGER_32)(t__VQFH |  1);
+                    next__VZLH=((__POINTER )(NULL));
+                    result__XZLH=((__POINTER *)ptr_table__WZLH)[ 0];
+                    if ((result__XZLH == (void *)NULL)) {
+                      result__XZLH=new_lab__RTJ(lab_type__YZLH);
+                      next__VZLH=(void *)((unsigned long)result__XZLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZZLH)));
+                      ((__POINTER *)next__VZLH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__WZLH)[ 0]=next__VZLH;
                     } else {
-                      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)));
+                      next__VZLH=((__POINTER *)result__XZLH)[ 0];
+                      if ((next__VZLH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XZLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__ZZLH <<  1)) <=  4096)) {
+                          next__VZLH=(void *)((unsigned long)result__XZLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZZLH)));
                         } else {
-                          next__T3KH=new_lab__FTJ(lab_type__W3KH);
+                          next__VZLH=new_lab__RTJ(lab_type__YZLH);
                         };
-                        ((__POINTER *)next__T3KH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__U3KH)[ 0]=next__T3KH;
+                        ((__POINTER *)next__VZLH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__WZLH)[ 0]=next__VZLH;
                       } else {
-                        ((__POINTER *)result__V3KH)[ 0]=(void *)((unsigned long)((__POINTER *)next__T3KH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__V3KH=next__T3KH;
+                        ((__POINTER *)result__XZLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VZLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__XZLH=next__VZLH;
                       };
                     };
-                    ptr__ETED=result__V3KH;
+                    ptr__JRED=result__XZLH;
                   };
-                  result__DTED=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)ptr__ETED);
-                  *(result__DTED) = *(LINKED_LIST_NODEoSTRING_CONSTANTo__);
+                  result__IRED=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)ptr__JRED);
+                  *(result__IRED) = *(LINKED_LIST_NODEoSTRING_CONSTANTo__);
                 };
-                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;
+                Self__JOSD=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)result__IRED);
+                Self__JOSD->item__L0HD=element__KTEC;
+                Self__JOSD->next__JROD=NULL;
+                ((__LINKED_LIST_NODEoSTRING_CONSTANTo *)Self__JTEC->last_link__XTEC)->next__JROD=result__IRED;
+                Self__JTEC->parent_linked_collection__LD.upper__0ED=(__INTEGER)(Self__JTEC->parent_linked_collection__LD.upper__0ED +  1);
+                Self__JTEC->last_link__XTEC=result__IRED;
               };
-              goto while_do__YTSB;
+              goto while_do__FQSB;
             };
           };
         };
-        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)) {
+        if ((! result__5OEB)) {
+          pos__2U1G=current_position__B0F();
+          put_error__text__1PG( 0,(&__string_166));
+          put_position__FRG(pos__2U1G);
+          put_string__33F(msg_err__AQG);
+          if ((type_error__5PG !=  2)) {
             exit(( 1));
           };
         };
-        result__4IG=FALSE__;
-        if ((! read_space__MTD())) {
-          result__4IG=FALSE__;
+        result__MJG=FALSE__;
+        if ((! read_space__XTD())) {
+          result__MJG=FALSE__;
         } else {
-          result__YUDH='\0';
-          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__YUDH=((__CHARACTER )(( 0)));
+          result__4VDH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+            result__4VDH=((__CHARACTER )(( 0)));
           } else {
-            result__YUDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+            result__4VDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__YUDH == ';')) {
+          if ((result__4VDH == ';')) {
             position__CCC=(__INTEGER)(position__CCC +  1);
-            result__4IG=TRUE__;
+            result__MJG=TRUE__;
           };
         };
-        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)) {
+        if ((! result__MJG)) {
+          pos__4U1G=current_position__B0F();
+          put_error__text__1PG( 2,(&__string_167));
+          put_position__FRG(pos__4U1G);
+          put_string__33F(msg_err__AQG);
+          if ((type_error__5PG !=  2)) {
             exit(( 1));
           };
         };
-        goto while_do__OLF;
+        goto while_do__LMF;
       };
     };
-    read_space__MTD();
-    result__HKDH='\0';
-    if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-      result__HKDH=((__CHARACTER )(( 0)));
+    read_space__XTD();
+    result__BMDH='\0';
+    if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+      result__BMDH=((__CHARACTER )(( 0)));
     } else {
-      result__HKDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+      result__BMDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
     };
-    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)) {
+    if ((result__BMDH != ((__CHARACTER )(( 0))))) {
+      pos__AV1G=current_position__B0F();
+      put_error__text__1PG( 0,(&__string_168));
+      put_position__FRG(pos__AV1G);
+      put_string__33F(msg_err__AQG);
+      if ((type_error__5PG !=  2)) {
         exit(( 1));
       };
     };
     object__ZBC=NULL;
   };
   index_count__P5=(__INTEGER)(index_count__P5 +  1);
-  fast_put__to__I2R(result__1OC,(&__string_2));
+  fast_put__to__U2R(result__JPC,(&__string_2));
   result__2YB=NULL;
   ptr__3YB=((__POINTER )(NULL));
   typ_id__CZB= 0;
@@ -6897,123 +6849,115 @@ 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__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;
+      a__IVGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__JVGH=(__UINTEGER_32)((__UINTEGER_32)(sz__5YB + a__IVGH) & (__UINTEGER_32)(~ a__IVGH));
+      ptr_table__1ZLH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__JVGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__0ZLH=((__POINTER )(NULL));
+      result__2ZLH=((__POINTER *)ptr_table__1ZLH)[ 0];
+      if ((result__2ZLH == (void *)NULL)) {
+        result__2ZLH=new_lab__RTJ(new_size__JVGH);
+        next__0ZLH=(void *)((unsigned long)result__2ZLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JVGH)));
+        ((__POINTER *)next__0ZLH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__1ZLH)[ 0]=next__0ZLH;
       } else {
-        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)));
+        next__0ZLH=((__POINTER *)result__2ZLH)[ 0];
+        if ((next__0ZLH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2ZLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__JVGH <<  1)) <=  4096)) {
+            next__0ZLH=(void *)((unsigned long)result__2ZLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JVGH)));
           } else {
-            next__Y3KH=new_lab__FTJ(new_size__ZMHH);
+            next__0ZLH=new_lab__RTJ(new_size__JVGH);
           };
-          ((__POINTER *)next__Y3KH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__Z3KH)[ 0]=next__Y3KH;
+          ((__POINTER *)next__0ZLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__1ZLH)[ 0]=next__0ZLH;
         } else {
-          ((__POINTER *)result__03KH)[ 0]=(void *)((unsigned long)((__POINTER *)next__Y3KH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__03KH=next__Y3KH;
+          ((__POINTER *)result__2ZLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0ZLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__2ZLH=next__0ZLH;
         };
       };
-      ptr__3YB=result__03KH;
+      ptr__3YB=result__2ZLH;
     } else {
-      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;
+      t__NVGH=((__UINTEGER_32 )typ_id__CZB);
+      a__MVGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__D0LH=(__UINTEGER_32)((__UINTEGER_32)(sz__5YB + a__MVGH) & (__UINTEGER_32)(~ a__MVGH));
+      ptr_table__A0LH=((__POINTER )(&(table_type[(t__NVGH)])));
+      lab_type__C0LH=(__UINTEGER_32)(t__NVGH |  1);
+      next__5ZLH=((__POINTER )(NULL));
+      result__B0LH=((__POINTER *)ptr_table__A0LH)[ 0];
+      if ((result__B0LH == (void *)NULL)) {
+        result__B0LH=new_lab__RTJ(lab_type__C0LH);
+        next__5ZLH=(void *)((unsigned long)result__B0LH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__D0LH)));
+        ((__POINTER *)next__5ZLH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__A0LH)[ 0]=next__5ZLH;
       } else {
-        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)));
+        next__5ZLH=((__POINTER *)result__B0LH)[ 0];
+        if ((next__5ZLH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__B0LH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__D0LH <<  1)) <=  4096)) {
+            next__5ZLH=(void *)((unsigned long)result__B0LH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__D0LH)));
           } else {
-            next__33KH=new_lab__FTJ(lab_type__A4KH);
+            next__5ZLH=new_lab__RTJ(lab_type__C0LH);
           };
-          ((__POINTER *)next__33KH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__43KH)[ 0]=next__33KH;
+          ((__POINTER *)next__5ZLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__A0LH)[ 0]=next__5ZLH;
         } else {
-          ((__POINTER *)result__53KH)[ 0]=(void *)((unsigned long)((__POINTER *)next__33KH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__53KH=next__33KH;
+          ((__POINTER *)result__B0LH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5ZLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__B0LH=next__5ZLH;
         };
       };
-      ptr__3YB=result__53KH;
+      ptr__3YB=result__B0LH;
     };
     result__2YB=((__FAST_ARRAYoSLOTo *)ptr__3YB);
     *(result__2YB) = *(FAST_ARRAYoSLOTo__);
   };
-  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;
+  Self__HFS=((__FAST_ARRAYoSLOTo *)result__2YB);
+  if ((Self__HFS->parent_arrayed_collection__BAB.capacity__QFS <  1)) {
+    sz__JHHH=((__UINTEGER_32 )((__INTEGER )(sizeof(void *))));
+    result__HHHH=((__POINTER )(NULL));
+    a__IHHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__KHHH=(__UINTEGER_32)((__UINTEGER_32)(sz__JHHH + a__IHHH) & (__UINTEGER_32)(~ a__IHHH));
+    new_size2__LHHH=(__UINTEGER_32)(new_size__KHHH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+    if ((new_size2__LHHH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+      a__MHHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__NHHH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__LHHH + a__MHHH) & (__UINTEGER_32)(~ a__MHHH));
+      ptr_table__F0LH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__NHHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__E0LH=((__POINTER )(NULL));
+      result__G0LH=((__POINTER *)ptr_table__F0LH)[ 0];
+      if ((result__G0LH == (void *)NULL)) {
+        result__G0LH=new_lab__RTJ(new_size__NHHH);
+        next__E0LH=(void *)((unsigned long)result__G0LH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NHHH)));
+        ((__POINTER *)next__E0LH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__F0LH)[ 0]=next__E0LH;
       } else {
-        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)));
+        next__E0LH=((__POINTER *)result__G0LH)[ 0];
+        if ((next__E0LH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__G0LH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__NHHH <<  1)) <=  4096)) {
+            next__E0LH=(void *)((unsigned long)result__G0LH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NHHH)));
           } else {
-            next__C4KH=new_lab__FTJ(new_size__BNHH);
+            next__E0LH=new_lab__RTJ(new_size__NHHH);
           };
-          ((__POINTER *)next__C4KH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__D4KH)[ 0]=next__C4KH;
+          ((__POINTER *)next__E0LH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__F0LH)[ 0]=next__E0LH;
         } else {
-          ((__POINTER *)result__E4KH)[ 0]=(void *)((unsigned long)((__POINTER *)next__C4KH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__E4KH=next__C4KH;
+          ((__POINTER *)result__G0LH)[ 0]=(void *)((unsigned long)((__POINTER *)next__E0LH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__G0LH=next__E0LH;
         };
       };
-      ((__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 *))))));
+      ((__POINTER *)result__G0LH)[ 0]=((__POINTER ) 3);
+      result__HHHH=(void *)((unsigned long)result__G0LH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
     } else {
-      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__H4KH == (void *)NULL)) {
-        result__H4KH=new_page__YC5();
-      };
-      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__HHHH=(void *)((unsigned long)((__POINTER )((__MEMORY *)search__XAVB(new_size__KHHH))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
     };
-    Result__DN1C=((void **)result__IEFH);
-    Self__0OWD= 0;
-    while ((Self__0OWD >=  0)) {
-      Result__DN1C[Self__0OWD]=NULL;
-      Self__0OWD=(__INTEGER)(Self__0OWD -  1);
+    Result__3J1C=((void **)result__HHHH);
+    Self__BQWD= 0;
+    while ((Self__BQWD >=  0)) {
+      Result__3J1C[Self__BQWD]=NULL;
+      Self__BQWD=(__INTEGER)(Self__BQWD -  1);
     };
-    Self__1ES->parent_arrayed_collection__BAB.capacity__EFS= 1;
+    Self__HFS->parent_arrayed_collection__BAB.capacity__QFS= 1;
   };
   create__with__CRB(TYPE_NULL__, 0);
-  fast_put__to__I2R(result__1OC,(&__string_3));
+  fast_put__to__U2R(result__JPC,(&__string_3));
   create__with__CRB(TYPE_VOID__, 0);
-  fast_put__to__I2R(result__1OC,(&__string_45));
+  fast_put__to__U2R(result__JPC,(&__string_45));
   create__with__CRB(TYPE_CONTEXT__, 1);
   result__42B=NULL;
   ptr__52B=((__POINTER )(NULL));
@@ -7025,143 +6969,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__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;
+      a__QVGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__RVGH=(__UINTEGER_32)((__UINTEGER_32)(sz__B3B + a__QVGH) & (__UINTEGER_32)(~ a__QVGH));
+      ptr_table__K0LH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__RVGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__J0LH=((__POINTER )(NULL));
+      result__L0LH=((__POINTER *)ptr_table__K0LH)[ 0];
+      if ((result__L0LH == (void *)NULL)) {
+        result__L0LH=new_lab__RTJ(new_size__RVGH);
+        next__J0LH=(void *)((unsigned long)result__L0LH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RVGH)));
+        ((__POINTER *)next__J0LH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__K0LH)[ 0]=next__J0LH;
       } else {
-        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)));
+        next__J0LH=((__POINTER *)result__L0LH)[ 0];
+        if ((next__J0LH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__L0LH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__RVGH <<  1)) <=  4096)) {
+            next__J0LH=(void *)((unsigned long)result__L0LH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RVGH)));
           } else {
-            next__K4KH=new_lab__FTJ(new_size__INHH);
+            next__J0LH=new_lab__RTJ(new_size__RVGH);
           };
-          ((__POINTER *)next__K4KH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__L4KH)[ 0]=next__K4KH;
+          ((__POINTER *)next__J0LH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__K0LH)[ 0]=next__J0LH;
         } else {
-          ((__POINTER *)result__M4KH)[ 0]=(void *)((unsigned long)((__POINTER *)next__K4KH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__M4KH=next__K4KH;
+          ((__POINTER *)result__L0LH)[ 0]=(void *)((unsigned long)((__POINTER *)next__J0LH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__L0LH=next__J0LH;
         };
       };
-      ptr__52B=result__M4KH;
+      ptr__52B=result__L0LH;
     } else {
-      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;
+      t__VVGH=((__UINTEGER_32 )typ_id__E3B);
+      a__UVGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__S0LH=(__UINTEGER_32)((__UINTEGER_32)(sz__B3B + a__UVGH) & (__UINTEGER_32)(~ a__UVGH));
+      ptr_table__P0LH=((__POINTER )(&(table_type[(t__VVGH)])));
+      lab_type__R0LH=(__UINTEGER_32)(t__VVGH |  1);
+      next__O0LH=((__POINTER )(NULL));
+      result__Q0LH=((__POINTER *)ptr_table__P0LH)[ 0];
+      if ((result__Q0LH == (void *)NULL)) {
+        result__Q0LH=new_lab__RTJ(lab_type__R0LH);
+        next__O0LH=(void *)((unsigned long)result__Q0LH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__S0LH)));
+        ((__POINTER *)next__O0LH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__P0LH)[ 0]=next__O0LH;
       } else {
-        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)));
+        next__O0LH=((__POINTER *)result__Q0LH)[ 0];
+        if ((next__O0LH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__Q0LH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__S0LH <<  1)) <=  4096)) {
+            next__O0LH=(void *)((unsigned long)result__Q0LH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__S0LH)));
           } else {
-            next__P4KH=new_lab__FTJ(lab_type__S4KH);
+            next__O0LH=new_lab__RTJ(lab_type__R0LH);
           };
-          ((__POINTER *)next__P4KH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__Q4KH)[ 0]=next__P4KH;
+          ((__POINTER *)next__O0LH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__P0LH)[ 0]=next__O0LH;
         } else {
-          ((__POINTER *)result__R4KH)[ 0]=(void *)((unsigned long)((__POINTER *)next__P4KH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__R4KH=next__P4KH;
+          ((__POINTER *)result__Q0LH)[ 0]=(void *)((unsigned long)((__POINTER *)next__O0LH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__Q0LH=next__O0LH;
         };
       };
-      ptr__52B=result__R4KH;
+      ptr__52B=result__Q0LH;
     };
     result__42B=((__FAST_ARRAYoTYPE_IDo *)ptr__52B);
     *(result__42B) = *(FAST_ARRAYoTYPE_IDo__);
   };
-  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__GIS=((__FAST_ARRAYoTYPE_IDo *)result__42B);
+  if ((Self__GIS->parent_arrayed_collection__ABB.capacity__Q5R <  3)) {
+    Self__GIS->parent_arrayed_collection__ABB.storage__MAS=create__1VNB( 3);
+    Self__GIS->parent_arrayed_collection__ABB.capacity__Q5R= 3;
   };
-  Self__0HS->parent_arrayed_collection__ABB.upper__C5R=(__INTEGER)(-  1);
+  Self__GIS->parent_arrayed_collection__ABB.upper__O5R=(__INTEGER)(-  1);
   list_id__CBB=result__42B;
-  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__;
+  result__AWIH=NULL;
+  ptr__BWIH=((__POINTER )(NULL));
+  typ_id__CWIH= 0;
+  sz__DWIH=((__UINTEGER_32 )sizeof(__TYPE_ID));
+  if ((sz__DWIH ==  0)) {
+    result__AWIH=TYPE_ID__;
   } else {
-    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);
+    typ_id__CWIH=-1;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__DWIH);
+    if ((typ_id__CWIH == (__INTEGER)(-  1))) {
+      a__EWIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__FWIH=(__UINTEGER_32)((__UINTEGER_32)(sz__DWIH + a__EWIH) & (__UINTEGER_32)(~ a__EWIH));
+      ptr_table__U0LH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__FWIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__T0LH=((__POINTER )(NULL));
+      result__V0LH=((__POINTER *)ptr_table__U0LH)[ 0];
+      if ((result__V0LH == (void *)NULL)) {
+        result__V0LH=new_lab__RTJ(new_size__FWIH);
+        next__T0LH=(void *)((unsigned long)result__V0LH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FWIH)));
+        ((__POINTER *)next__T0LH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__U0LH)[ 0]=next__T0LH;
+      } else {
+        next__T0LH=((__POINTER *)result__V0LH)[ 0];
+        if ((next__T0LH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__V0LH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__FWIH <<  1)) <=  4096)) {
+            next__T0LH=(void *)((unsigned long)result__V0LH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FWIH)));
+          } else {
+            next__T0LH=new_lab__RTJ(new_size__FWIH);
+          };
+          ((__POINTER *)next__T0LH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__U0LH)[ 0]=next__T0LH;
+        } else {
+          ((__POINTER *)result__V0LH)[ 0]=(void *)((unsigned long)((__POINTER *)next__T0LH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__V0LH=next__T0LH;
+        };
+      };
+      ptr__BWIH=result__V0LH;
+    } else {
+      t__GWIH=((__UINTEGER_32 )typ_id__CWIH);
+      a__HWIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__20LH=(__UINTEGER_32)((__UINTEGER_32)(sz__DWIH + a__HWIH) & (__UINTEGER_32)(~ a__HWIH));
+      ptr_table__Z0LH=((__POINTER )(&(table_type[(t__GWIH)])));
+      lab_type__10LH=(__UINTEGER_32)(t__GWIH |  1);
+      next__Y0LH=((__POINTER )(NULL));
+      result__00LH=((__POINTER *)ptr_table__Z0LH)[ 0];
+      if ((result__00LH == (void *)NULL)) {
+        result__00LH=new_lab__RTJ(lab_type__10LH);
+        next__Y0LH=(void *)((unsigned long)result__00LH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__20LH)));
+        ((__POINTER *)next__Y0LH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__Z0LH)[ 0]=next__Y0LH;
+      } else {
+        next__Y0LH=((__POINTER *)result__00LH)[ 0];
+        if ((next__Y0LH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__00LH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__20LH <<  1)) <=  4096)) {
+            next__Y0LH=(void *)((unsigned long)result__00LH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__20LH)));
+          } else {
+            next__Y0LH=new_lab__RTJ(lab_type__10LH);
+          };
+          ((__POINTER *)next__Y0LH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__Z0LH)[ 0]=next__Y0LH;
+        } else {
+          ((__POINTER *)result__00LH)[ 0]=(void *)((unsigned long)((__POINTER *)next__Y0LH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__00LH=next__Y0LH;
+        };
+      };
+      ptr__BWIH=result__00LH;
+    };
+    result__AWIH=((__TYPE_ID *)ptr__BWIH);
+    *(result__AWIH) = *(TYPE_ID__);
+  };
+  create__with__CRB(((__TYPE_ID *)result__AWIH), 0);
+  add_last__K5R(result__42B,result__AWIH);
   result__Q4B=NULL;
   ptr__R4B=((__POINTER )(NULL));
   typ_id__W4B= 0;
@@ -7172,107 +7116,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__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;
+      a__MIFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__NIFH=(__UINTEGER_32)((__UINTEGER_32)(sz__T4B + a__MIFH) & (__UINTEGER_32)(~ a__MIFH));
+      ptr_table__40LH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__NIFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__30LH=((__POINTER )(NULL));
+      result__50LH=((__POINTER *)ptr_table__40LH)[ 0];
+      if ((result__50LH == (void *)NULL)) {
+        result__50LH=new_lab__RTJ(new_size__NIFH);
+        next__30LH=(void *)((unsigned long)result__50LH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NIFH)));
+        ((__POINTER *)next__30LH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__40LH)[ 0]=next__30LH;
       } else {
-        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)));
+        next__30LH=((__POINTER *)result__50LH)[ 0];
+        if ((next__30LH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__50LH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__NIFH <<  1)) <=  4096)) {
+            next__30LH=(void *)((unsigned long)result__50LH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NIFH)));
           } else {
-            next__44KH=new_lab__FTJ(new_size__MXFH);
+            next__30LH=new_lab__RTJ(new_size__NIFH);
           };
-          ((__POINTER *)next__44KH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__54KH)[ 0]=next__44KH;
+          ((__POINTER *)next__30LH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__40LH)[ 0]=next__30LH;
         } else {
-          ((__POINTER *)result__A5KH)[ 0]=(void *)((unsigned long)((__POINTER *)next__44KH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__A5KH=next__44KH;
+          ((__POINTER *)result__50LH)[ 0]=(void *)((unsigned long)((__POINTER *)next__30LH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__50LH=next__30LH;
         };
       };
-      ptr__R4B=result__A5KH;
+      ptr__R4B=result__50LH;
     } else {
-      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;
+      t__RIFH=((__UINTEGER_32 )typ_id__W4B);
+      a__QIFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__G1LH=(__UINTEGER_32)((__UINTEGER_32)(sz__T4B + a__QIFH) & (__UINTEGER_32)(~ a__QIFH));
+      ptr_table__D1LH=((__POINTER )(&(table_type[(t__RIFH)])));
+      lab_type__F1LH=(__UINTEGER_32)(t__RIFH |  1);
+      next__C1LH=((__POINTER )(NULL));
+      result__E1LH=((__POINTER *)ptr_table__D1LH)[ 0];
+      if ((result__E1LH == (void *)NULL)) {
+        result__E1LH=new_lab__RTJ(lab_type__F1LH);
+        next__C1LH=(void *)((unsigned long)result__E1LH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__G1LH)));
+        ((__POINTER *)next__C1LH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__D1LH)[ 0]=next__C1LH;
       } else {
-        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)));
+        next__C1LH=((__POINTER *)result__E1LH)[ 0];
+        if ((next__C1LH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__E1LH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__G1LH <<  1)) <=  4096)) {
+            next__C1LH=(void *)((unsigned long)result__E1LH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__G1LH)));
           } else {
-            next__D5KH=new_lab__FTJ(lab_type__G5KH);
+            next__C1LH=new_lab__RTJ(lab_type__F1LH);
           };
-          ((__POINTER *)next__D5KH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__E5KH)[ 0]=next__D5KH;
+          ((__POINTER *)next__C1LH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__D1LH)[ 0]=next__C1LH;
         } else {
-          ((__POINTER *)result__F5KH)[ 0]=(void *)((unsigned long)((__POINTER *)next__D5KH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__F5KH=next__D5KH;
+          ((__POINTER *)result__E1LH)[ 0]=(void *)((unsigned long)((__POINTER *)next__C1LH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__E1LH=next__C1LH;
         };
       };
-      ptr__R4B=result__F5KH;
+      ptr__R4B=result__E1LH;
     };
     result__Q4B=((__TYPE_ID *)ptr__R4B);
     *(result__Q4B) = *(TYPE_ID__);
   };
   create__with__CRB(((__TYPE_ID *)result__Q4B), 0);
-  add_last__44R(list_id__CBB,result__Q4B);
+  add_last__K5R(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__2GD==0) {
+    if (FILE_SYSTEM__->parent_directory__HHD==0) {
     } else {
-      parent_directory__1FD();
+      parent_directory__GGD();
     };
-    ent__TB=get_entry__S2AC(__tmp__4B);
+    ent__TB=get_entry__DZAC(__tmp__4B);
     if (((void *)ent__TB == (void *)NULL)) {
       __tmp__JC=TRUE__;
     } else {
       if (((struct ___OBJ *)ent__TB)->__id==__DIRECTORY_UNIX__) {
-        Self__KKSD=((__DIRECTORY_UNIX *)ent__TB);
-        dir__MKSD=Self__KKSD;
-        __tmp__FC=((void *)Self__KKSD != (void *)NULL);
+        Self__NLSD=((__DIRECTORY_UNIX *)ent__TB);
+        dir__PLSD=Self__NLSD;
+        __tmp__FC=((void *)Self__NLSD != (void *)NULL);
       } else {
-        dir__UKSD=NULL;
+        dir__XLSD=NULL;
         __tmp__FC=FALSE__;
       };
       __tmp__JC=(! __tmp__FC);
     };
     if (__tmp__JC) {
-      print__DJD((&__string_169));
-      print__DJD(input_name__3B);
-      print__DJD((&__string_170));
+      print__OJD((&__string_169));
+      print__OJD(input_name__3B);
+      print__OJD((&__string_170));
       exit(( 1));
     };
     if (((struct ___OBJ *)ent__TB)->__id==__DIRECTORY_UNIX__) {
-      __tmp__UC=open__TGRD(ent__TB);
+      __tmp__UC=open__WHRD(ent__TB);
     } else {
-      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);
+      Self__1LRD=((__FILE_UNIX *)ent__TB);
+      Self__1LRD->stream__BMRD=((__POINTER )(fopen((char*)(((__STRING_CONSTANT *)Self__1LRD->parent_entry_unix__EFF.parent_entry__QGD.path__BD)->storage__RRO),"r+b")));
+      __tmp__UC=(Self__1LRD->stream__BMRD != (void *)NULL);
     };
     if ((! __tmp__UC)) {
-      print__DJD((&__string_169));
-      print__DJD(input_name__3B);
-      print__DJD((&__string_171));
+      print__OJD((&__string_169));
+      print__OJD(input_name__3B);
+      print__OJD((&__string_171));
       exit(( 1));
     };
     if (ent__TB==NULL) {
@@ -7288,1175 +7232,921 @@ int main(int argc,char **argv)
       }
     };
     dir__SB=__tmp__AD;
-    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);
+    check_in__begin__ZQQC(__tmp__AD,(__INTEGER)(((__STRING_CONSTANT *)((__DIRECTORY_UNIX *)__tmp__AD)->parent_entry_unix__RGD.parent_entry__QGD.path__BD)->count__DD +  1));
+    if (fast_has__IDT(result__2PH,(&__string_150))) {
+      txt__1=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)fast_at__LV3(result__2PH,(&__string_150)))->first_link__OTEC)->item__L0HD;
+      Self__HX1G=((__STRING_CONSTANT *)txt__1);
+      new__IX1G=create__ZBB(Self__HX1G->count__DD);
+      copy__VDS(new__IX1G,Self__HX1G);
+      copy__VDS(string_tmp__VH,(&__string_150));
+      if (fast_has__IDT(result__2PH,(&__string_116))) {
+        append__3OS(string_tmp__VH,((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)fast_at__LV3(result__2PH,(&__string_116)))->first_link__OTEC)->item__L0HD);
+      } else {
+        append__3OS(string_tmp__VH,(&__string_172));
+      };
+      save_file__with__3DC(get__YWB(string_tmp__VH),new__IX1G);
+    };
+    if (fast_has__IDT(result__2PH,(&__string_66))) {
+      txt__1=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)fast_at__LV3(result__2PH,(&__string_66)))->first_link__OTEC)->item__L0HD;
+      Self__JX1G=((__STRING_CONSTANT *)txt__1);
+      new__KX1G=create__ZBB(Self__JX1G->count__DD);
+      copy__VDS(new__KX1G,Self__JX1G);
+      copy__VDS(string_tmp__VH,(&__string_66));
+      if (fast_has__IDT(result__2PH,(&__string_116))) {
+        append__3OS(string_tmp__VH,((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)fast_at__LV3(result__2PH,(&__string_116)))->first_link__OTEC)->item__L0HD);
+      } else {
+        append__3OS(string_tmp__VH,(&__string_172));
+      };
+      save_file__with__3DC(get__YWB(string_tmp__VH),new__KX1G);
+    };
+    if (fast_has__IDT(result__2PH,(&__string_151))) {
+      txt__1=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)fast_at__LV3(result__2PH,(&__string_151)))->first_link__OTEC)->item__L0HD;
+      Self__PHHH=((__STRING *)directory_list__YB);
+      i__QHHH=Self__PHHH->count__SGC;
+      j__SHHH=((__STRING_CONSTANT *)txt__1)->count__DD;
+      resize__1VZ(Self__PHHH,(__INTEGER)(i__QHHH + j__SHHH));
+      if (((i__QHHH >  0) && (j__SHHH >  0))) {
+        move__to__by__LVCC(Self__PHHH->storage__3CS, 0,(__INTEGER)(i__QHHH -  1),j__SHHH);
+      };
+      Self__J1LH=((__CHARACTER *)Self__PHHH->storage__3CS);
+      model__K1LH=((__STRING_CONSTANT *)txt__1)->storage__RRO;
+      Self__I1LH=(__INTEGER)(j__SHHH -  1);
+      while ((Self__I1LH >=  0)) {
+        Self__J1LH[Self__I1LH]=((__CHARACTER *)model__K1LH)[Self__I1LH];
+        Self__I1LH=(__INTEGER)(Self__I1LH -  1);
+      };
+    };
+    Self__CUVB=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__2PH);
+    node__MUVB=((void **)Self__CUVB->buckets__1DT)[(__INTEGER)(hash_code__RNW((&__string_153)) % Self__CUVB->capacity__WDT)];
+    while ((! (((void *)node__MUVB == (void *)NULL) || __infix_equal_equal__V2DB(((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__MUVB)->key__HET,(&__string_153))))) {
+      node__MUVB=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__MUVB)->next__SET;
+    };
+    if (((void *)node__MUVB != (void *)NULL)) {
+      txt__1=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)at__JK4(result__2PH,(&__string_153)))->first_link__OTEC)->item__L0HD;
+      append__3OS(directory_list__YB,txt__1);
+    };
+    copy__VDS(string_tmp__VH,(&__string_173));
+    if (fast_has__IDT(result__2PH,(&__string_116))) {
+      append__3OS(string_tmp__VH,((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)fast_at__LV3(result__2PH,(&__string_116)))->first_link__OTEC)->item__L0HD);
+    } else {
+      append__3OS(string_tmp__VH,(&__string_172));
+    };
+    save_file__with__3DC(get__YWB(string_tmp__VH),directory_list__YB);
+    if (fast_has__IDT(result__2PH,(&__string_154))) {
+      txt__1=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)fast_at__LV3(result__2PH,(&__string_154)))->first_link__OTEC)->item__L0HD;
+      Self__THHH=((__STRING *)file_list__0B);
+      i__UHHH=Self__THHH->count__SGC;
+      j__WHHH=((__STRING_CONSTANT *)txt__1)->count__DD;
+      resize__1VZ(Self__THHH,(__INTEGER)(i__UHHH + j__WHHH));
+      if (((i__UHHH >  0) && (j__WHHH >  0))) {
+        move__to__by__LVCC(Self__THHH->storage__3CS, 0,(__INTEGER)(i__UHHH -  1),j__WHHH);
+      };
+      Self__O1LH=((__CHARACTER *)Self__THHH->storage__3CS);
+      model__P1LH=((__STRING_CONSTANT *)txt__1)->storage__RRO;
+      Self__N1LH=(__INTEGER)(j__WHHH -  1);
+      while ((Self__N1LH >=  0)) {
+        Self__O1LH[Self__N1LH]=((__CHARACTER *)model__P1LH)[Self__N1LH];
+        Self__N1LH=(__INTEGER)(Self__N1LH -  1);
+      };
+    };
+    if (fast_has__IDT(result__2PH,(&__string_156))) {
+      txt__1=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)fast_at__LV3(result__2PH,(&__string_156)))->first_link__OTEC)->item__L0HD;
+      append__3OS(file_list__0B,txt__1);
+    };
+    copy__VDS(string_tmp__VH,(&__string_174));
+    if (fast_has__IDT(result__2PH,(&__string_116))) {
+      append__3OS(string_tmp__VH,((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)fast_at__LV3(result__2PH,(&__string_116)))->first_link__OTEC)->item__L0HD);
+    } else {
+      append__3OS(string_tmp__VH,(&__string_172));
+    };
+    save_file__with__3DC(get__YWB(string_tmp__VH),file_list__0B);
   } else {
-    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));
+    if ((! has_suffix__QJS(input_name__3B))) {
+      copy__VDS(string_tmp__VH,input_name__3B);
+      append__3OS(string_tmp__VH,(&__string_159));
       input_name__3B=get__YWB(string_tmp__VH);
     };
     __tmp__2H=input_name__3B;
-    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__XSIH=(__INTEGER)(Self__XSIH -  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__2SIH >=  1)) {
-      Self__ROHH=((__STRING *)string_tmp__VH);
-      if ((result__2SIH > Self__ROHH->count__EGC)) {
-        Self__ROHH->count__EGC= 0;
+    copy__VDS(string_tmp__VH,input_name__3B);
+    replace_all__with__CRS(string_tmp__VH,'\\','/');
+    i__BAC=last_index__NTC(string_tmp__VH,'/');
+    if ((i__BAC >=  1)) {
+      Self__XHHH=((__STRING *)string_tmp__VH);
+      if ((i__BAC > Self__XHHH->count__SGC)) {
+        Self__XHHH->count__SGC= 0;
       } else {
-        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__ROHH->count__EGC=(__INTEGER)(Self__ROHH->count__EGC - len__BTIH);
-          };
+        if ((i__BAC >  0)) {
+          remove_between__to__MIT(Self__XHHH, 1,i__BAC);
         };
       };
     };
-    result__ETC=((__STRING *)string_tmp__VH)->count__EGC;
-    while ((! ((result__ETC <  1) || (((__CHARACTER *)((__STRING *)string_tmp__VH)->storage__RCS)[(__INTEGER)(result__ETC -  1)] == '.')))) {
-      result__ETC=(__INTEGER)(result__ETC -  1);
-    };
-    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;
+    i__BAC=last_index__NTC(string_tmp__VH,'.');
+    Self__2VGH=((__STRING *)string_tmp__VH);
+    n__3VGH=(__INTEGER)((__INTEGER)(((__STRING *)string_tmp__VH)->count__SGC - i__BAC) +  1);
+    if ((n__3VGH > Self__2VGH->count__SGC)) {
+      Self__2VGH->count__SGC= 0;
     } else {
-      Self__TOHH->count__EGC=(__INTEGER)(Self__TOHH->count__EGC - n__UOHH);
-    };
-    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__Q5KH=((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )Self__P5KH) -  32))));
-      };
-      ((__CHARACTER *)Self__N5KH->storage__RCS)[(__INTEGER)(Self__O5KH -  1)]=result__Q5KH;
-      Self__O5KH=(__INTEGER)(Self__O5KH -  1);
+      Self__2VGH->count__SGC=(__INTEGER)(Self__2VGH->count__SGC - n__3VGH);
     };
+    to_upper__PTS(string_tmp__VH);
     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__PCF(((__PROTOTYPE *)proto_input__BI)->parent_named__5.name__LI);
+      copy__VDS(string_tmp__VH,((__PROTOTYPE *)proto_input__BI)->parent_named__5.name__LI);
+      if (fast_has__IDT(result__2PH,(&__string_116))) {
+        append__3OS(string_tmp__VH,((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)fast_at__LV3(result__2PH,(&__string_116)))->first_link__OTEC)->item__L0HD);
+      } else {
+        append__3OS(string_tmp__VH,(&__string_172));
+      };
+      output_name__DI=get__YWB(string_tmp__VH);
     };
     save_file__with__3DC(output_name__DI,output_code__SI);
   };
   if (is_shorter2__VI) {
-    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__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__Q3XD((&__string_175),output_code__SI,(&__string_141));
+    Self__30QC= 0;
+    limit_up__40QC=result__JPJ->parent_arrayed_collection__AJ.upper__HJ;
+    while ((Self__30QC <= limit_up__40QC)) {
+      p__AB=((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__DVT)[Self__30QC];
+      ((__STRING *)output_code__SI)->count__SGC= 0;
+      Self__XMTD=((__PROTOTYPE *)p__AB);
+      title__ZMTD=NULL;
+      s__0MTD=NULL;
+      put__to__like__X4XD(Self__XMTD->parent_named__5.name__LI,output_code__SI,(&__string_140));
+      if (((void *)Self__XMTD->comment_slot__YRTC != (void *)NULL)) {
+        put__to__like__X4XD(Self__XMTD->comment_slot__YRTC,output_code__SI,(&__string_138));
+      };
+      if (((void *)Self__XMTD->comment_header__Q4QC != (void *)NULL)) {
+        put__to__like__X4XD(Self__XMTD->comment_header__Q4QC,output_code__SI,(&__string_139));
+      };
+      ((__FAST_ARRAYoITM_SLOTo *)list_tmp__YNTD)->parent_arrayed_collection__XNTD.upper__UOTD=(__INTEGER)(-  1);
+      shorter_get_all_slot_in__ZAYD(Self__XMTD,list_tmp__YNTD);
+      s__CHYD=NULL;
+      is_first_cur__BHYD=TRUE__;
+      __tmp__GHYD=((__FAST_ARRAYoITM_SLOTo *)list_tmp__YNTD)->parent_arrayed_collection__XNTD.upper__UOTD;
+      Self__2G5D= 0;
+      while ((Self__2G5D <= __tmp__GHYD)) {
+        s__CHYD=((void **)((__FAST_ARRAYoITM_SLOTo *)list_tmp__YNTD)->parent_arrayed_collection__XNTD.storage__UPWE)[Self__2G5D];
+        if (((struct ___OBJ *)s__CHYD)->__id==__ITM_SLOT__) {
+          __tmp__BOTD=((__ITM_SLOT *)s__CHYD)->id_section__T3C;
+        } else {
+          __tmp__BOTD=((__ITM_SLOT_OPERATOR *)s__CHYD)->parent_itm_slot__0S5B.id_section__T3C;
+        };
+        Self__RL2G=((__SECTION_ *)__tmp__BOTD);
+        if ((((void *)Self__RL2G->name__MYDC == (void *)(&__string_23)) || ((void *)Self__RL2G->name__MYDC == (void *)(&__string_24)))) {
+          if (((struct ___OBJ *)s__CHYD)->__id==__ITM_SLOT__) {
+            __tmp__THYD=((__ITM_SLOT *)s__CHYD)->stat_shorter__4OTD;
+          } else {
+            __tmp__THYD=((__ITM_SLOT_OPERATOR *)s__CHYD)->parent_itm_slot__0S5B.stat_shorter__4OTD;
+          };
+          __tmp__WHYD=(__tmp__THYD ==  0);
+        } else {
+          __tmp__WHYD=FALSE__;
+        };
+        if (__tmp__WHYD) {
+          if (is_first_cur__BHYD) {
+            if (((void *)(&__string_175) == (void *)NULL)) {
+              put__to__like__X4XD((&__string_176),output_code__SI,(&__string_141));
             } else {
-              put__to__like__Q3XD((&__string_174),output_code__SI,(&__string_141));
+              put__to__like__X4XD((&__string_175),output_code__SI,(&__string_141));
             };
-            is_first_cur__0FYD=FALSE__;
+            is_first_cur__BHYD=FALSE__;
           };
-          if (((struct ___OBJ *)s__1FYD)->__id==__ITM_SLOT__) {
-            ((__ITM_SLOT *)s__1FYD)->stat_shorter__XNTD= 1;
+          if (((struct ___OBJ *)s__CHYD)->__id==__ITM_SLOT__) {
+            ((__ITM_SLOT *)s__CHYD)->stat_shorter__4OTD= 1;
           } else {
-            ((__ITM_SLOT_OPERATOR *)s__1FYD)->parent_itm_slot__NW5B.stat_shorter__XNTD= 1;
+            ((__ITM_SLOT_OPERATOR *)s__CHYD)->parent_itm_slot__0S5B.stat_shorter__4OTD= 1;
           };
-          ((__STRING *)string_tmp__VH)->count__EGC= 0;
-          ((__STRING *)string_tmp2__0BJ)->count__EGC= 0;
-          if (((struct ___OBJ *)s__1FYD)->__id==__ITM_SLOT__) {
-            pretty_name_in__LW4F(s__1FYD,string_tmp2__0BJ);
+          ((__STRING *)string_tmp__VH)->count__SGC= 0;
+          ((__STRING *)string_tmp2__GCJ)->count__SGC= 0;
+          if (((struct ___OBJ *)s__CHYD)->__id==__ITM_SLOT__) {
+            pretty_name_in__FY4F(s__CHYD,string_tmp2__GCJ);
           } else {
-            pretty_name_in__AY4F(s__1FYD,string_tmp2__0BJ);
+            pretty_name_in__0Z4F(s__CHYD,string_tmp2__GCJ);
           };
-          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;
+          put__to__like__X4XD(string_tmp2__GCJ,string_tmp__VH,(&__string_143));
+          if (((struct ___OBJ *)s__CHYD)->__id==__ITM_SLOT__) {
+            __tmp__1IYD=((__ITM_SLOT *)s__CHYD)->id_section__T3C;
           } else {
-            __tmp__UHYD=((__ITM_SLOT_OPERATOR *)s__1FYD)->parent_itm_slot__NW5B.id_section__F3C;
+            __tmp__1IYD=((__ITM_SLOT_OPERATOR *)s__CHYD)->parent_itm_slot__0S5B.id_section__T3C;
           };
-          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;
+          Self__SL2G=((__SECTION_ *)__tmp__1IYD);
+          if ((((void *)Self__SL2G->name__MYDC == (void *)(&__string_23)) || ((void *)Self__SL2G->name__MYDC == (void *)(&__string_24)))) {
+            if (((struct ___OBJ *)s__CHYD)->__id==__ITM_SLOT__) {
+              __tmp__CJYD=((__ITM_SLOT *)s__CHYD)->parent_named__15.style__0FU;
             } else {
-              __tmp__1HYD=((__ITM_SLOT_OPERATOR *)s__1FYD)->parent_itm_slot__NW5B.parent_named__15.style__OGU;
+              __tmp__CJYD=((__ITM_SLOT_OPERATOR *)s__CHYD)->parent_itm_slot__0S5B.parent_named__15.style__0FU;
             };
-            if ((__tmp__1HYD != '+')) {
-              __tmp__RIYD=TRUE__;
+            if ((__tmp__CJYD != '+')) {
+              __tmp__YJYD=TRUE__;
             } else {
-              if (((struct ___OBJ *)s__1FYD)->__id==__ITM_SLOT__) {
-                __tmp__CIYD=((__ITM_SLOT *)s__1FYD)->result_type__PBGC;
+              if (((struct ___OBJ *)s__CHYD)->__id==__ITM_SLOT__) {
+                __tmp__JJYD=((__ITM_SLOT *)s__CHYD)->result_type__A4FC;
               } else {
-                __tmp__CIYD=((__ITM_SLOT_OPERATOR *)s__1FYD)->parent_itm_slot__NW5B.result_type__PBGC;
+                __tmp__JJYD=((__ITM_SLOT_OPERATOR *)s__CHYD)->parent_itm_slot__0S5B.result_type__A4FC;
               };
-              if (__tmp__CIYD==NULL) {
-                __tmp__EIYD=NULL;
+              if (__tmp__JJYD==NULL) {
+                __tmp__LJYD=NULL;
               } else {
-                switch (((struct ___OBJ *)__tmp__CIYD)->__id) {
+                switch (((struct ___OBJ *)__tmp__JJYD)->__id) {
                 case __ITM_TYPE_PARAMETER__: {
-                  __tmp__EIYD=((void *)__tmp__CIYD);
+                  __tmp__LJYD=((void *)__tmp__JJYD);
                 } break;
                 case __ITM_TYPE_SIMPLE__: {
-                  __tmp__EIYD=((void *)__tmp__CIYD);
+                  __tmp__LJYD=((void *)__tmp__JJYD);
                 } break;
                 case __ITM_TYPE_MULTI__: {
-                  __tmp__EIYD=NULL;
+                  __tmp__LJYD=NULL;
                 } break;
                 case __ITM_TYPE_BLOCK__: {
-                  __tmp__EIYD=NULL;
+                  __tmp__LJYD=NULL;
                 } break;
                 case __ITM_TYPE_GENERIC__: {
-                  __tmp__EIYD=((void *)__tmp__CIYD);
+                  __tmp__LJYD=((void *)__tmp__JJYD);
                 } break;
                 case __ITM_TYPE_STYLE__: {
-                  __tmp__EIYD=((void *)__tmp__CIYD);
+                  __tmp__LJYD=((void *)__tmp__JJYD);
                 } break;
                 }
               };
-              ts__BIYD=__tmp__EIYD;
-              if (((void *)__tmp__EIYD == (void *)NULL)) {
-                __tmp__OIYD=TRUE__;
+              ts__IJYD=__tmp__LJYD;
+              if (((void *)__tmp__LJYD == (void *)NULL)) {
+                __tmp__VJYD=TRUE__;
               } else {
-                switch (((struct ___OBJ *)__tmp__EIYD)->__id) {
+                switch (((struct ___OBJ *)__tmp__LJYD)->__id) {
                 case __ITM_TYPE_PARAMETER__: {
-                  __tmp__KIYD=NULL;
+                  __tmp__RJYD=NULL;
                 } break;
                 case __ITM_TYPE_SIMPLE__: {
-                  __tmp__KIYD=NULL;
+                  __tmp__RJYD=NULL;
                 } break;
                 case __ITM_TYPE_GENERIC__: {
-                  __tmp__KIYD=((__ITM_TYPE_GENERIC *)__tmp__EIYD)->parent_itm_type_style__SSN.style__DZP;
+                  __tmp__RJYD=((__ITM_TYPE_GENERIC *)__tmp__LJYD)->parent_itm_type_style__4SN.style__PZP;
                 } break;
                 case __ITM_TYPE_STYLE__: {
-                  __tmp__KIYD=((__ITM_TYPE_STYLE *)__tmp__EIYD)->style__DZP;
+                  __tmp__RJYD=((__ITM_TYPE_STYLE *)__tmp__LJYD)->style__PZP;
                 } break;
                 };
-                __tmp__OIYD=((void *)__tmp__KIYD != (void *)(&__string_9));
+                __tmp__VJYD=((void *)__tmp__RJYD != (void *)(&__string_9));
               };
-              __tmp__RIYD=__tmp__OIYD;
+              __tmp__YJYD=__tmp__VJYD;
             };
-            if (__tmp__RIYD) {
-              if (((struct ___OBJ *)s__1FYD)->__id==__ITM_SLOT__) {
-                __tmp__XIYD=((__ITM_SLOT *)s__1FYD)->parent_named__15.name__LI;
+            if (__tmp__YJYD) {
+              if (((struct ___OBJ *)s__CHYD)->__id==__ITM_SLOT__) {
+                __tmp__4JYD=((__ITM_SLOT *)s__CHYD)->parent_named__15.name__LI;
               } else {
-                __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__S5KH=(i__T5KH ==  0);
+                __tmp__4JYD=((__ITM_SLOT_OPERATOR *)s__CHYD)->parent_itm_slot__0S5B.parent_named__15.name__LI;
               };
-              __tmp__FJYD=(! result__S5KH);
+              __tmp__MKYD=(! has_prefix__OTTF(__tmp__4JYD,(&__string_177)));
             } else {
-              __tmp__FJYD=FALSE__;
+              __tmp__MKYD=FALSE__;
             };
-            if (__tmp__FJYD) {
-              if (((struct ___OBJ *)s__1FYD)->__id==__ITM_SLOT__) {
-                __tmp__AJYD=((__ITM_SLOT *)s__1FYD)->parent_named__15.name__LI;
+            if (__tmp__MKYD) {
+              if (((struct ___OBJ *)s__CHYD)->__id==__ITM_SLOT__) {
+                __tmp__HKYD=((__ITM_SLOT *)s__CHYD)->parent_named__15.name__LI;
               } else {
-                __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__X5KH=(i__Y5KH ==  0);
+                __tmp__HKYD=((__ITM_SLOT_OPERATOR *)s__CHYD)->parent_itm_slot__0S5B.parent_named__15.name__LI;
               };
-              __tmp__GJYD=(! result__X5KH);
+              __tmp__NKYD=(! has_prefix__OTTF(__tmp__HKYD,(&__string_178)));
             } else {
-              __tmp__GJYD=FALSE__;
+              __tmp__NKYD=FALSE__;
             };
-            __tmp__JJYD=__tmp__GJYD;
+            __tmp__QKYD=__tmp__NKYD;
           } else {
-            __tmp__JJYD=FALSE__;
+            __tmp__QKYD=FALSE__;
           };
-          if (__tmp__JJYD) {
-            put__to__like__Q3XD((&__string_178),string_tmp__VH,(&__string_135));
+          if (__tmp__QKYD) {
+            put__to__like__X4XD((&__string_179),string_tmp__VH,(&__string_135));
           };
-          ((__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;
+          ((__STRING *)string_tmp2__GCJ)->count__SGC= 0;
+          if (((struct ___OBJ *)s__CHYD)->__id==__ITM_SLOT__) {
+            __tmp__2KYD=((__ITM_SLOT *)s__CHYD)->parent_named__15.name__LI;
           } else {
-            __tmp__VJYD=((__ITM_SLOT_OPERATOR *)s__1FYD)->parent_itm_slot__NW5B.parent_named__15.name__LI;
+            __tmp__2KYD=((__ITM_SLOT_OPERATOR *)s__CHYD)->parent_itm_slot__0S5B.parent_named__15.name__LI;
           };
-          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));
+          get_all_comment_slot__in__PL4E(Self__XMTD,__tmp__2KYD,string_tmp2__GCJ);
+          ((__STRING *)string_tmp3__HUD)->count__SGC= 0;
+          shorter_comment__in__light__CP4E(string_tmp2__GCJ,string_tmp3__HUD,TRUE__);
+          put__to__like__X4XD(string_tmp3__HUD,string_tmp__VH,(&__string_144));
+          put__to__like__X4XD(string_tmp__VH,output_code__SI,(&__string_142));
         };
-        Self__1F5D=(__INTEGER)(Self__1F5D +  1);
+        Self__2G5D=(__INTEGER)(Self__2G5D +  1);
       };
-      if ((! is_first_cur__0FYD)) {
-        put__to__like__Q3XD(NULL,output_code__SI,(&__string_145));
+      if ((! is_first_cur__BHYD)) {
+        put__to__like__X4XD(NULL,output_code__SI,(&__string_145));
       };
-      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;
+      s__1LYD=NULL;
+      is_first_cur__0LYD=TRUE__;
+      __tmp__5LYD=((__FAST_ARRAYoITM_SLOTo *)list_tmp__YNTD)->parent_arrayed_collection__XNTD.upper__UOTD;
+      Self__OH5D= 0;
+      while ((Self__OH5D <= __tmp__5LYD)) {
+        s__1LYD=((void **)((__FAST_ARRAYoITM_SLOTo *)list_tmp__YNTD)->parent_arrayed_collection__XNTD.storage__UPWE)[Self__OH5D];
+        if (((struct ___OBJ *)s__1LYD)->__id==__ITM_SLOT__) {
+          __tmp__LOTD=((__ITM_SLOT *)s__1LYD)->parent_named__15.name__LI;
         } else {
-          __tmp__ENTD=((__ITM_SLOT_OPERATOR *)s__UKYD)->parent_itm_slot__NW5B.parent_named__15.name__LI;
+          __tmp__LOTD=((__ITM_SLOT_OPERATOR *)s__1LYD)->parent_itm_slot__0S5B.parent_named__15.name__LI;
         };
-        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__25KH=(i__35KH ==  0);
-        };
-        if (result__25KH) {
-          if (((struct ___OBJ *)s__UKYD)->__id==__ITM_SLOT__) {
-            __tmp__FLYD=((__ITM_SLOT *)s__UKYD)->stat_shorter__XNTD;
+        if (has_prefix__OTTF(__tmp__LOTD,(&__string_180))) {
+          if (((struct ___OBJ *)s__1LYD)->__id==__ITM_SLOT__) {
+            __tmp__MMYD=((__ITM_SLOT *)s__1LYD)->stat_shorter__4OTD;
           } else {
-            __tmp__FLYD=((__ITM_SLOT_OPERATOR *)s__UKYD)->parent_itm_slot__NW5B.stat_shorter__XNTD;
+            __tmp__MMYD=((__ITM_SLOT_OPERATOR *)s__1LYD)->parent_itm_slot__0S5B.stat_shorter__4OTD;
           };
-          __tmp__ILYD=(__tmp__FLYD ==  0);
+          __tmp__PMYD=(__tmp__MMYD ==  0);
         } else {
-          __tmp__ILYD=FALSE__;
+          __tmp__PMYD=FALSE__;
         };
-        if (__tmp__ILYD) {
-          if (is_first_cur__TKYD) {
-            if (((void *)(&__string_180) == (void *)NULL)) {
-              put__to__like__Q3XD((&__string_175),output_code__SI,(&__string_141));
+        if (__tmp__PMYD) {
+          if (is_first_cur__0LYD) {
+            if (((void *)(&__string_181) == (void *)NULL)) {
+              put__to__like__X4XD((&__string_176),output_code__SI,(&__string_141));
             } else {
-              put__to__like__Q3XD((&__string_180),output_code__SI,(&__string_141));
+              put__to__like__X4XD((&__string_181),output_code__SI,(&__string_141));
             };
-            is_first_cur__TKYD=FALSE__;
+            is_first_cur__0LYD=FALSE__;
           };
-          if (((struct ___OBJ *)s__UKYD)->__id==__ITM_SLOT__) {
-            ((__ITM_SLOT *)s__UKYD)->stat_shorter__XNTD= 1;
+          if (((struct ___OBJ *)s__1LYD)->__id==__ITM_SLOT__) {
+            ((__ITM_SLOT *)s__1LYD)->stat_shorter__4OTD= 1;
           } else {
-            ((__ITM_SLOT_OPERATOR *)s__UKYD)->parent_itm_slot__NW5B.stat_shorter__XNTD= 1;
+            ((__ITM_SLOT_OPERATOR *)s__1LYD)->parent_itm_slot__0S5B.stat_shorter__4OTD= 1;
           };
-          ((__STRING *)string_tmp__VH)->count__EGC= 0;
-          ((__STRING *)string_tmp2__0BJ)->count__EGC= 0;
-          if (((struct ___OBJ *)s__UKYD)->__id==__ITM_SLOT__) {
-            pretty_name_in__LW4F(s__UKYD,string_tmp2__0BJ);
+          ((__STRING *)string_tmp__VH)->count__SGC= 0;
+          ((__STRING *)string_tmp2__GCJ)->count__SGC= 0;
+          if (((struct ___OBJ *)s__1LYD)->__id==__ITM_SLOT__) {
+            pretty_name_in__FY4F(s__1LYD,string_tmp2__GCJ);
           } else {
-            pretty_name_in__AY4F(s__UKYD,string_tmp2__0BJ);
+            pretty_name_in__0Z4F(s__1LYD,string_tmp2__GCJ);
           };
-          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;
+          put__to__like__X4XD(string_tmp2__GCJ,string_tmp__VH,(&__string_143));
+          if (((struct ___OBJ *)s__1LYD)->__id==__ITM_SLOT__) {
+            __tmp__UNYD=((__ITM_SLOT *)s__1LYD)->id_section__T3C;
           } else {
-            __tmp__NMYD=((__ITM_SLOT_OPERATOR *)s__UKYD)->parent_itm_slot__NW5B.id_section__F3C;
+            __tmp__UNYD=((__ITM_SLOT_OPERATOR *)s__1LYD)->parent_itm_slot__0S5B.id_section__T3C;
           };
-          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;
+          Self__TL2G=((__SECTION_ *)__tmp__UNYD);
+          if ((((void *)Self__TL2G->name__MYDC == (void *)(&__string_23)) || ((void *)Self__TL2G->name__MYDC == (void *)(&__string_24)))) {
+            if (((struct ___OBJ *)s__1LYD)->__id==__ITM_SLOT__) {
+              __tmp__1NYD=((__ITM_SLOT *)s__1LYD)->parent_named__15.style__0FU;
             } else {
-              __tmp__UMYD=((__ITM_SLOT_OPERATOR *)s__UKYD)->parent_itm_slot__NW5B.parent_named__15.style__OGU;
+              __tmp__1NYD=((__ITM_SLOT_OPERATOR *)s__1LYD)->parent_itm_slot__0S5B.parent_named__15.style__0FU;
             };
-            if ((__tmp__UMYD != '+')) {
-              __tmp__KNYD=TRUE__;
+            if ((__tmp__1NYD != '+')) {
+              __tmp__ROYD=TRUE__;
             } else {
-              if (((struct ___OBJ *)s__UKYD)->__id==__ITM_SLOT__) {
-                __tmp__1MYD=((__ITM_SLOT *)s__UKYD)->result_type__PBGC;
+              if (((struct ___OBJ *)s__1LYD)->__id==__ITM_SLOT__) {
+                __tmp__COYD=((__ITM_SLOT *)s__1LYD)->result_type__A4FC;
               } else {
-                __tmp__1MYD=((__ITM_SLOT_OPERATOR *)s__UKYD)->parent_itm_slot__NW5B.result_type__PBGC;
+                __tmp__COYD=((__ITM_SLOT_OPERATOR *)s__1LYD)->parent_itm_slot__0S5B.result_type__A4FC;
               };
-              if (__tmp__1MYD==NULL) {
-                __tmp__3MYD=NULL;
+              if (__tmp__COYD==NULL) {
+                __tmp__EOYD=NULL;
               } else {
-                switch (((struct ___OBJ *)__tmp__1MYD)->__id) {
+                switch (((struct ___OBJ *)__tmp__COYD)->__id) {
                 case __ITM_TYPE_PARAMETER__: {
-                  __tmp__3MYD=((void *)__tmp__1MYD);
+                  __tmp__EOYD=((void *)__tmp__COYD);
                 } break;
                 case __ITM_TYPE_SIMPLE__: {
-                  __tmp__3MYD=((void *)__tmp__1MYD);
+                  __tmp__EOYD=((void *)__tmp__COYD);
                 } break;
                 case __ITM_TYPE_MULTI__: {
-                  __tmp__3MYD=NULL;
+                  __tmp__EOYD=NULL;
                 } break;
                 case __ITM_TYPE_BLOCK__: {
-                  __tmp__3MYD=NULL;
+                  __tmp__EOYD=NULL;
                 } break;
                 case __ITM_TYPE_GENERIC__: {
-                  __tmp__3MYD=((void *)__tmp__1MYD);
+                  __tmp__EOYD=((void *)__tmp__COYD);
                 } break;
                 case __ITM_TYPE_STYLE__: {
-                  __tmp__3MYD=((void *)__tmp__1MYD);
+                  __tmp__EOYD=((void *)__tmp__COYD);
                 } break;
                 }
               };
-              ts__0MYD=__tmp__3MYD;
-              if (((void *)__tmp__3MYD == (void *)NULL)) {
-                __tmp__HNYD=TRUE__;
+              ts__BOYD=__tmp__EOYD;
+              if (((void *)__tmp__EOYD == (void *)NULL)) {
+                __tmp__OOYD=TRUE__;
               } else {
-                switch (((struct ___OBJ *)__tmp__3MYD)->__id) {
+                switch (((struct ___OBJ *)__tmp__EOYD)->__id) {
                 case __ITM_TYPE_PARAMETER__: {
-                  __tmp__DNYD=NULL;
+                  __tmp__KOYD=NULL;
                 } break;
                 case __ITM_TYPE_SIMPLE__: {
-                  __tmp__DNYD=NULL;
+                  __tmp__KOYD=NULL;
                 } break;
                 case __ITM_TYPE_GENERIC__: {
-                  __tmp__DNYD=((__ITM_TYPE_GENERIC *)__tmp__3MYD)->parent_itm_type_style__SSN.style__DZP;
+                  __tmp__KOYD=((__ITM_TYPE_GENERIC *)__tmp__EOYD)->parent_itm_type_style__4SN.style__PZP;
                 } break;
                 case __ITM_TYPE_STYLE__: {
-                  __tmp__DNYD=((__ITM_TYPE_STYLE *)__tmp__3MYD)->style__DZP;
+                  __tmp__KOYD=((__ITM_TYPE_STYLE *)__tmp__EOYD)->style__PZP;
                 } break;
                 };
-                __tmp__HNYD=((void *)__tmp__DNYD != (void *)(&__string_9));
+                __tmp__OOYD=((void *)__tmp__KOYD != (void *)(&__string_9));
               };
-              __tmp__KNYD=__tmp__HNYD;
+              __tmp__ROYD=__tmp__OOYD;
             };
-            if (__tmp__KNYD) {
-              if (((struct ___OBJ *)s__UKYD)->__id==__ITM_SLOT__) {
-                __tmp__QNYD=((__ITM_SLOT *)s__UKYD)->parent_named__15.name__LI;
+            if (__tmp__ROYD) {
+              if (((struct ___OBJ *)s__1LYD)->__id==__ITM_SLOT__) {
+                __tmp__XOYD=((__ITM_SLOT *)s__1LYD)->parent_named__15.name__LI;
               } else {
-                __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__BALH=(i__CALH ==  0);
+                __tmp__XOYD=((__ITM_SLOT_OPERATOR *)s__1LYD)->parent_itm_slot__0S5B.parent_named__15.name__LI;
               };
-              __tmp__4NYD=(! result__BALH);
+              __tmp__FPYD=(! has_prefix__OTTF(__tmp__XOYD,(&__string_177)));
             } else {
-              __tmp__4NYD=FALSE__;
+              __tmp__FPYD=FALSE__;
             };
-            if (__tmp__4NYD) {
-              if (((struct ___OBJ *)s__UKYD)->__id==__ITM_SLOT__) {
-                __tmp__ZNYD=((__ITM_SLOT *)s__UKYD)->parent_named__15.name__LI;
+            if (__tmp__FPYD) {
+              if (((struct ___OBJ *)s__1LYD)->__id==__ITM_SLOT__) {
+                __tmp__APYD=((__ITM_SLOT *)s__1LYD)->parent_named__15.name__LI;
               } else {
-                __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__GALH=(i__HALH ==  0);
+                __tmp__APYD=((__ITM_SLOT_OPERATOR *)s__1LYD)->parent_itm_slot__0S5B.parent_named__15.name__LI;
               };
-              __tmp__5NYD=(! result__GALH);
+              __tmp__GPYD=(! has_prefix__OTTF(__tmp__APYD,(&__string_178)));
             } else {
-              __tmp__5NYD=FALSE__;
+              __tmp__GPYD=FALSE__;
             };
-            __tmp__COYD=__tmp__5NYD;
+            __tmp__JPYD=__tmp__GPYD;
           } else {
-            __tmp__COYD=FALSE__;
+            __tmp__JPYD=FALSE__;
           };
-          if (__tmp__COYD) {
-            put__to__like__Q3XD((&__string_178),string_tmp__VH,(&__string_135));
+          if (__tmp__JPYD) {
+            put__to__like__X4XD((&__string_179),string_tmp__VH,(&__string_135));
           };
-          ((__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;
+          ((__STRING *)string_tmp2__GCJ)->count__SGC= 0;
+          if (((struct ___OBJ *)s__1LYD)->__id==__ITM_SLOT__) {
+            __tmp__VPYD=((__ITM_SLOT *)s__1LYD)->parent_named__15.name__LI;
           } else {
-            __tmp__OOYD=((__ITM_SLOT_OPERATOR *)s__UKYD)->parent_itm_slot__NW5B.parent_named__15.name__LI;
+            __tmp__VPYD=((__ITM_SLOT_OPERATOR *)s__1LYD)->parent_itm_slot__0S5B.parent_named__15.name__LI;
           };
-          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));
+          get_all_comment_slot__in__PL4E(Self__XMTD,__tmp__VPYD,string_tmp2__GCJ);
+          ((__STRING *)string_tmp3__HUD)->count__SGC= 0;
+          shorter_comment__in__light__CP4E(string_tmp2__GCJ,string_tmp3__HUD,TRUE__);
+          put__to__like__X4XD(string_tmp3__HUD,string_tmp__VH,(&__string_144));
+          put__to__like__X4XD(string_tmp__VH,output_code__SI,(&__string_142));
         };
-        Self__NG5D=(__INTEGER)(Self__NG5D +  1);
+        Self__OH5D=(__INTEGER)(Self__OH5D +  1);
       };
-      if ((! is_first_cur__TKYD)) {
-        put__to__like__Q3XD(NULL,output_code__SI,(&__string_145));
+      if ((! is_first_cur__0LYD)) {
+        put__to__like__X4XD(NULL,output_code__SI,(&__string_145));
       };
-      __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;
+      __tmp__WOTD=((__FAST_ARRAYoITM_SLOTo *)list_tmp__YNTD)->parent_arrayed_collection__XNTD.upper__UOTD;
+      Self__PQYD= 0;
+      while ((Self__PQYD <= __tmp__WOTD)) {
+        s__0MTD=((void **)((__FAST_ARRAYoITM_SLOTo *)list_tmp__YNTD)->parent_arrayed_collection__XNTD.storage__UPWE)[Self__PQYD];
+        if (((struct ___OBJ *)s__0MTD)->__id==__ITM_SLOT__) {
+          __tmp__5OTD=((__ITM_SLOT *)s__0MTD)->stat_shorter__4OTD;
         } else {
-          __tmp__YNTD=((__ITM_SLOT_OPERATOR *)s__TLTD)->parent_itm_slot__NW5B.stat_shorter__XNTD;
+          __tmp__5OTD=((__ITM_SLOT_OPERATOR *)s__0MTD)->parent_itm_slot__0S5B.stat_shorter__4OTD;
         };
-        if ((__tmp__YNTD ==  0)) {
-          if (((struct ___OBJ *)s__TLTD)->__id==__ITM_SLOT__) {
-            __tmp__4NTD=((__ITM_SLOT *)s__TLTD)->comment_chapter__B4HC;
+        if ((__tmp__5OTD ==  0)) {
+          if (((struct ___OBJ *)s__0MTD)->__id==__ITM_SLOT__) {
+            __tmp__FPTD=((__ITM_SLOT *)s__0MTD)->comment_chapter__S0HC;
           } else {
-            __tmp__4NTD=((__ITM_SLOT_OPERATOR *)s__TLTD)->parent_itm_slot__NW5B.comment_chapter__B4HC;
+            __tmp__FPTD=((__ITM_SLOT_OPERATOR *)s__0MTD)->parent_itm_slot__0S5B.comment_chapter__S0HC;
           };
-          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;
+          title__ZMTD=__tmp__FPTD;
+          t__VBRE=__tmp__FPTD;
+          s__YBRE=NULL;
+          is_first_cur__XBRE=TRUE__;
+          __tmp__2BRE=((__FAST_ARRAYoITM_SLOTo *)list_tmp__YNTD)->parent_arrayed_collection__XNTD.upper__UOTD;
+          Self__GKSE= 0;
+          while ((Self__GKSE <= __tmp__2BRE)) {
+            s__YBRE=((void **)((__FAST_ARRAYoITM_SLOTo *)list_tmp__YNTD)->parent_arrayed_collection__XNTD.storage__UPWE)[Self__GKSE];
+            if (((struct ___OBJ *)s__YBRE)->__id==__ITM_SLOT__) {
+              __tmp__MPTD=((__ITM_SLOT *)s__YBRE)->comment_chapter__S0HC;
             } else {
-              __tmp__FOTD=((__ITM_SLOT_OPERATOR *)s__DBRE)->parent_itm_slot__NW5B.comment_chapter__B4HC;
+              __tmp__MPTD=((__ITM_SLOT_OPERATOR *)s__YBRE)->parent_itm_slot__0S5B.comment_chapter__S0HC;
             };
-            if (((void *)__tmp__FOTD == (void *)title__SLTD)) {
-              if (((struct ___OBJ *)s__DBRE)->__id==__ITM_SLOT__) {
-                __tmp__UBRE=((__ITM_SLOT *)s__DBRE)->stat_shorter__XNTD;
+            if (((void *)__tmp__MPTD == (void *)title__ZMTD)) {
+              if (((struct ___OBJ *)s__YBRE)->__id==__ITM_SLOT__) {
+                __tmp__JCRE=((__ITM_SLOT *)s__YBRE)->stat_shorter__4OTD;
               } else {
-                __tmp__UBRE=((__ITM_SLOT_OPERATOR *)s__DBRE)->parent_itm_slot__NW5B.stat_shorter__XNTD;
+                __tmp__JCRE=((__ITM_SLOT_OPERATOR *)s__YBRE)->parent_itm_slot__0S5B.stat_shorter__4OTD;
               };
-              __tmp__XBRE=(__tmp__UBRE ==  0);
+              __tmp__MCRE=(__tmp__JCRE ==  0);
             } else {
-              __tmp__XBRE=FALSE__;
+              __tmp__MCRE=FALSE__;
             };
-            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));
+            if (__tmp__MCRE) {
+              if (is_first_cur__XBRE) {
+                if (((void *)t__VBRE == (void *)NULL)) {
+                  put__to__like__X4XD((&__string_176),output_code__SI,(&__string_141));
                 } else {
-                  put__to__like__Q3XD(t__ABRE,output_code__SI,(&__string_141));
+                  put__to__like__X4XD(t__VBRE,output_code__SI,(&__string_141));
                 };
-                is_first_cur__CBRE=FALSE__;
+                is_first_cur__XBRE=FALSE__;
               };
-              if (((struct ___OBJ *)s__DBRE)->__id==__ITM_SLOT__) {
-                ((__ITM_SLOT *)s__DBRE)->stat_shorter__XNTD= 1;
+              if (((struct ___OBJ *)s__YBRE)->__id==__ITM_SLOT__) {
+                ((__ITM_SLOT *)s__YBRE)->stat_shorter__4OTD= 1;
               } else {
-                ((__ITM_SLOT_OPERATOR *)s__DBRE)->parent_itm_slot__NW5B.stat_shorter__XNTD= 1;
+                ((__ITM_SLOT_OPERATOR *)s__YBRE)->parent_itm_slot__0S5B.stat_shorter__4OTD= 1;
               };
-              ((__STRING *)string_tmp__VH)->count__EGC= 0;
-              ((__STRING *)string_tmp2__0BJ)->count__EGC= 0;
-              if (((struct ___OBJ *)s__DBRE)->__id==__ITM_SLOT__) {
-                pretty_name_in__LW4F(s__DBRE,string_tmp2__0BJ);
+              ((__STRING *)string_tmp__VH)->count__SGC= 0;
+              ((__STRING *)string_tmp2__GCJ)->count__SGC= 0;
+              if (((struct ___OBJ *)s__YBRE)->__id==__ITM_SLOT__) {
+                pretty_name_in__FY4F(s__YBRE,string_tmp2__GCJ);
               } else {
-                pretty_name_in__AY4F(s__DBRE,string_tmp2__0BJ);
+                pretty_name_in__0Z4F(s__YBRE,string_tmp2__GCJ);
               };
-              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;
+              put__to__like__X4XD(string_tmp2__GCJ,string_tmp__VH,(&__string_143));
+              if (((struct ___OBJ *)s__YBRE)->__id==__ITM_SLOT__) {
+                __tmp__RDRE=((__ITM_SLOT *)s__YBRE)->id_section__T3C;
               } else {
-                __tmp__2CRE=((__ITM_SLOT_OPERATOR *)s__DBRE)->parent_itm_slot__NW5B.id_section__F3C;
+                __tmp__RDRE=((__ITM_SLOT_OPERATOR *)s__YBRE)->parent_itm_slot__0S5B.id_section__T3C;
               };
-              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;
+              Self__UL2G=((__SECTION_ *)__tmp__RDRE);
+              if ((((void *)Self__UL2G->name__MYDC == (void *)(&__string_23)) || ((void *)Self__UL2G->name__MYDC == (void *)(&__string_24)))) {
+                if (((struct ___OBJ *)s__YBRE)->__id==__ITM_SLOT__) {
+                  __tmp__YDRE=((__ITM_SLOT *)s__YBRE)->parent_named__15.style__0FU;
                 } else {
-                  __tmp__DDRE=((__ITM_SLOT_OPERATOR *)s__DBRE)->parent_itm_slot__NW5B.parent_named__15.style__OGU;
+                  __tmp__YDRE=((__ITM_SLOT_OPERATOR *)s__YBRE)->parent_itm_slot__0S5B.parent_named__15.style__0FU;
                 };
-                if ((__tmp__DDRE != '+')) {
-                  __tmp__ZDRE=TRUE__;
+                if ((__tmp__YDRE != '+')) {
+                  __tmp__OERE=TRUE__;
                 } else {
-                  if (((struct ___OBJ *)s__DBRE)->__id==__ITM_SLOT__) {
-                    __tmp__KDRE=((__ITM_SLOT *)s__DBRE)->result_type__PBGC;
+                  if (((struct ___OBJ *)s__YBRE)->__id==__ITM_SLOT__) {
+                    __tmp__5DRE=((__ITM_SLOT *)s__YBRE)->result_type__A4FC;
                   } else {
-                    __tmp__KDRE=((__ITM_SLOT_OPERATOR *)s__DBRE)->parent_itm_slot__NW5B.result_type__PBGC;
+                    __tmp__5DRE=((__ITM_SLOT_OPERATOR *)s__YBRE)->parent_itm_slot__0S5B.result_type__A4FC;
                   };
-                  if (__tmp__KDRE==NULL) {
-                    __tmp__MDRE=NULL;
+                  if (__tmp__5DRE==NULL) {
+                    __tmp__BERE=NULL;
                   } else {
-                    switch (((struct ___OBJ *)__tmp__KDRE)->__id) {
+                    switch (((struct ___OBJ *)__tmp__5DRE)->__id) {
                     case __ITM_TYPE_PARAMETER__: {
-                      __tmp__MDRE=((void *)__tmp__KDRE);
+                      __tmp__BERE=((void *)__tmp__5DRE);
                     } break;
                     case __ITM_TYPE_SIMPLE__: {
-                      __tmp__MDRE=((void *)__tmp__KDRE);
+                      __tmp__BERE=((void *)__tmp__5DRE);
                     } break;
                     case __ITM_TYPE_MULTI__: {
-                      __tmp__MDRE=NULL;
+                      __tmp__BERE=NULL;
                     } break;
                     case __ITM_TYPE_BLOCK__: {
-                      __tmp__MDRE=NULL;
+                      __tmp__BERE=NULL;
                     } break;
                     case __ITM_TYPE_GENERIC__: {
-                      __tmp__MDRE=((void *)__tmp__KDRE);
+                      __tmp__BERE=((void *)__tmp__5DRE);
                     } break;
                     case __ITM_TYPE_STYLE__: {
-                      __tmp__MDRE=((void *)__tmp__KDRE);
+                      __tmp__BERE=((void *)__tmp__5DRE);
                     } break;
                     }
                   };
-                  ts__JDRE=__tmp__MDRE;
-                  if (((void *)__tmp__MDRE == (void *)NULL)) {
-                    __tmp__WDRE=TRUE__;
+                  ts__4DRE=__tmp__BERE;
+                  if (((void *)__tmp__BERE == (void *)NULL)) {
+                    __tmp__LERE=TRUE__;
                   } else {
-                    switch (((struct ___OBJ *)__tmp__MDRE)->__id) {
+                    switch (((struct ___OBJ *)__tmp__BERE)->__id) {
                     case __ITM_TYPE_PARAMETER__: {
-                      __tmp__SDRE=NULL;
+                      __tmp__HERE=NULL;
                     } break;
                     case __ITM_TYPE_SIMPLE__: {
-                      __tmp__SDRE=NULL;
+                      __tmp__HERE=NULL;
                     } break;
                     case __ITM_TYPE_GENERIC__: {
-                      __tmp__SDRE=((__ITM_TYPE_GENERIC *)__tmp__MDRE)->parent_itm_type_style__SSN.style__DZP;
+                      __tmp__HERE=((__ITM_TYPE_GENERIC *)__tmp__BERE)->parent_itm_type_style__4SN.style__PZP;
                     } break;
                     case __ITM_TYPE_STYLE__: {
-                      __tmp__SDRE=((__ITM_TYPE_STYLE *)__tmp__MDRE)->style__DZP;
+                      __tmp__HERE=((__ITM_TYPE_STYLE *)__tmp__BERE)->style__PZP;
                     } break;
                     };
-                    __tmp__WDRE=((void *)__tmp__SDRE != (void *)(&__string_9));
+                    __tmp__LERE=((void *)__tmp__HERE != (void *)(&__string_9));
                   };
-                  __tmp__ZDRE=__tmp__WDRE;
+                  __tmp__OERE=__tmp__LERE;
                 };
-                if (__tmp__ZDRE) {
-                  if (((struct ___OBJ *)s__DBRE)->__id==__ITM_SLOT__) {
-                    __tmp__5DRE=((__ITM_SLOT *)s__DBRE)->parent_named__15.name__LI;
+                if (__tmp__OERE) {
+                  if (((struct ___OBJ *)s__YBRE)->__id==__ITM_SLOT__) {
+                    __tmp__UERE=((__ITM_SLOT *)s__YBRE)->parent_named__15.name__LI;
                   } else {
-                    __tmp__5DRE=((__ITM_SLOT_OPERATOR *)s__DBRE)->parent_itm_slot__NW5B.parent_named__15.name__LI;
+                    __tmp__UERE=((__ITM_SLOT_OPERATOR *)s__YBRE)->parent_itm_slot__0S5B.parent_named__15.name__LI;
                   };
-                  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__LALH=(i__MALH ==  0);
-                  };
-                  __tmp__NERE=(! result__LALH);
+                  __tmp__CFRE=(! has_prefix__OTTF(__tmp__UERE,(&__string_177)));
                 } else {
-                  __tmp__NERE=FALSE__;
+                  __tmp__CFRE=FALSE__;
                 };
-                if (__tmp__NERE) {
-                  if (((struct ___OBJ *)s__DBRE)->__id==__ITM_SLOT__) {
-                    __tmp__IERE=((__ITM_SLOT *)s__DBRE)->parent_named__15.name__LI;
+                if (__tmp__CFRE) {
+                  if (((struct ___OBJ *)s__YBRE)->__id==__ITM_SLOT__) {
+                    __tmp__3ERE=((__ITM_SLOT *)s__YBRE)->parent_named__15.name__LI;
                   } else {
-                    __tmp__IERE=((__ITM_SLOT_OPERATOR *)s__DBRE)->parent_itm_slot__NW5B.parent_named__15.name__LI;
-                  };
-                  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__QALH=(i__RALH ==  0);
+                    __tmp__3ERE=((__ITM_SLOT_OPERATOR *)s__YBRE)->parent_itm_slot__0S5B.parent_named__15.name__LI;
                   };
-                  __tmp__OERE=(! result__QALH);
+                  __tmp__DFRE=(! has_prefix__OTTF(__tmp__3ERE,(&__string_178)));
                 } else {
-                  __tmp__OERE=FALSE__;
+                  __tmp__DFRE=FALSE__;
                 };
-                __tmp__RERE=__tmp__OERE;
+                __tmp__GFRE=__tmp__DFRE;
               } else {
-                __tmp__RERE=FALSE__;
+                __tmp__GFRE=FALSE__;
               };
-              if (__tmp__RERE) {
-                put__to__like__Q3XD((&__string_178),string_tmp__VH,(&__string_135));
+              if (__tmp__GFRE) {
+                put__to__like__X4XD((&__string_179),string_tmp__VH,(&__string_135));
               };
-              ((__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;
+              ((__STRING *)string_tmp2__GCJ)->count__SGC= 0;
+              if (((struct ___OBJ *)s__YBRE)->__id==__ITM_SLOT__) {
+                __tmp__SFRE=((__ITM_SLOT *)s__YBRE)->parent_named__15.name__LI;
               } else {
-                __tmp__3ERE=((__ITM_SLOT_OPERATOR *)s__DBRE)->parent_itm_slot__NW5B.parent_named__15.name__LI;
+                __tmp__SFRE=((__ITM_SLOT_OPERATOR *)s__YBRE)->parent_itm_slot__0S5B.parent_named__15.name__LI;
               };
-              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));
+              get_all_comment_slot__in__PL4E(Self__XMTD,__tmp__SFRE,string_tmp2__GCJ);
+              ((__STRING *)string_tmp3__HUD)->count__SGC= 0;
+              shorter_comment__in__light__CP4E(string_tmp2__GCJ,string_tmp3__HUD,TRUE__);
+              put__to__like__X4XD(string_tmp3__HUD,string_tmp__VH,(&__string_144));
+              put__to__like__X4XD(string_tmp__VH,output_code__SI,(&__string_142));
             };
-            Self__RJSE=(__INTEGER)(Self__RJSE +  1);
+            Self__GKSE=(__INTEGER)(Self__GKSE +  1);
           };
-          if ((! is_first_cur__CBRE)) {
-            put__to__like__Q3XD(NULL,output_code__SI,(&__string_145));
+          if ((! is_first_cur__XBRE)) {
+            put__to__like__X4XD(NULL,output_code__SI,(&__string_145));
           };
         };
-        Self__IPYD=(__INTEGER)(Self__IPYD +  1);
+        Self__PQYD=(__INTEGER)(Self__PQYD +  1);
       };
-      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;
+      s__DRYD=NULL;
+      is_first__CRYD=TRUE__;
+      __tmp__HRYD=((__FAST_ARRAYoITM_SLOTo *)list_tmp__YNTD)->parent_arrayed_collection__XNTD.upper__UOTD;
+      Self__JI5D= 0;
+      while ((Self__JI5D <= __tmp__HRYD)) {
+        s__DRYD=((void **)((__FAST_ARRAYoITM_SLOTo *)list_tmp__YNTD)->parent_arrayed_collection__XNTD.storage__UPWE)[Self__JI5D];
+        if (((struct ___OBJ *)s__DRYD)->__id==__ITM_SLOT__) {
+          __tmp__YPTD=((__ITM_SLOT *)s__DRYD)->id_section__T3C;
         } else {
-          __tmp__ROTD=((__ITM_SLOT_OPERATOR *)s__2PYD)->parent_itm_slot__NW5B.id_section__F3C;
+          __tmp__YPTD=((__ITM_SLOT_OPERATOR *)s__DRYD)->parent_itm_slot__0S5B.id_section__T3C;
         };
-        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;
+        Self__VL2G=((__SECTION_ *)__tmp__YPTD);
+        if ((((void *)Self__VL2G->name__MYDC == (void *)(&__string_23)) || ((void *)Self__VL2G->name__MYDC == (void *)(&__string_24)))) {
+          if (((struct ___OBJ *)s__DRYD)->__id==__ITM_SLOT__) {
+            __tmp__URYD=((__ITM_SLOT *)s__DRYD)->stat_shorter__4OTD;
           } else {
-            __tmp__NQYD=((__ITM_SLOT_OPERATOR *)s__2PYD)->parent_itm_slot__NW5B.stat_shorter__XNTD;
+            __tmp__URYD=((__ITM_SLOT_OPERATOR *)s__DRYD)->parent_itm_slot__0S5B.stat_shorter__4OTD;
           };
-          __tmp__QQYD=(__tmp__NQYD ==  1);
+          __tmp__XRYD=(__tmp__URYD ==  1);
         } else {
-          __tmp__QQYD=FALSE__;
+          __tmp__XRYD=FALSE__;
         };
-        if (__tmp__QQYD) {
-          if (is_first__1PYD) {
-            if (((void *)(&__string_181) == (void *)NULL)) {
-              put__to__like__Q3XD((&__string_182),output_code__SI,(&__string_146));
+        if (__tmp__XRYD) {
+          if (is_first__CRYD) {
+            if (((void *)(&__string_182) == (void *)NULL)) {
+              put__to__like__X4XD((&__string_183),output_code__SI,(&__string_146));
             } else {
-              put__to__like__Q3XD((&__string_181),output_code__SI,(&__string_146));
+              put__to__like__X4XD((&__string_182),output_code__SI,(&__string_146));
             };
-            is_first__1PYD=FALSE__;
+            is_first__CRYD=FALSE__;
           };
-          if (((struct ___OBJ *)s__2PYD)->__id==__ITM_SLOT__) {
-            ((__ITM_SLOT *)s__2PYD)->stat_shorter__XNTD= 2;
+          if (((struct ___OBJ *)s__DRYD)->__id==__ITM_SLOT__) {
+            ((__ITM_SLOT *)s__DRYD)->stat_shorter__4OTD= 2;
           } else {
-            ((__ITM_SLOT_OPERATOR *)s__2PYD)->parent_itm_slot__NW5B.stat_shorter__XNTD= 2;
+            ((__ITM_SLOT_OPERATOR *)s__DRYD)->parent_itm_slot__0S5B.stat_shorter__4OTD= 2;
           };
-          ((__STRING *)string_tmp2__0BJ)->count__EGC= 0;
-          if (((struct ___OBJ *)s__2PYD)->__id==__ITM_SLOT__) {
-            pretty_name_in__LW4F(s__2PYD,string_tmp2__0BJ);
+          ((__STRING *)string_tmp2__GCJ)->count__SGC= 0;
+          if (((struct ___OBJ *)s__DRYD)->__id==__ITM_SLOT__) {
+            pretty_name_in__FY4F(s__DRYD,string_tmp2__GCJ);
           } else {
-            pretty_name_in__AY4F(s__2PYD,string_tmp2__0BJ);
+            pretty_name_in__0Z4F(s__DRYD,string_tmp2__GCJ);
           };
-          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;
+          put__to__like__X4XD(string_tmp2__GCJ,output_code__SI,(&__string_147));
+          if (((struct ___OBJ *)s__DRYD)->__id==__ITM_SLOT__) {
+            __tmp__1SYD=((__ITM_SLOT *)s__DRYD)->parent_named__15.parent_itm_object__4.position__SFJ;
           } else {
-            __tmp__URYD=((__ITM_SLOT_OPERATOR *)s__2PYD)->parent_itm_slot__NW5B.parent_named__15.parent_itm_object__4.position__GFJ;
+            __tmp__1SYD=((__ITM_SLOT_OPERATOR *)s__DRYD)->parent_itm_slot__0S5B.parent_named__15.parent_itm_object__4.position__SFJ;
           };
-          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;
+          copy__VDS(string_tmp__VH,((__PROTOTYPE *)((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__DVT)[(__INTEGER)(((__INTEGER )((__UINTEGER_32 )__tmp__1SYD)) &  511)])->filename__FSG);
+          append__3OS(string_tmp__VH,(&__string_184));
+          if (((struct ___OBJ *)s__DRYD)->__id==__ITM_SLOT__) {
+            __tmp__ATYD=((__ITM_SLOT *)s__DRYD)->parent_named__15.parent_itm_object__4.position__SFJ;
           } else {
-            __tmp__ZRYD=((__ITM_SLOT_OPERATOR *)s__2PYD)->parent_itm_slot__NW5B.parent_named__15.parent_itm_object__4.position__GFJ;
+            __tmp__ATYD=((__ITM_SLOT_OPERATOR *)s__DRYD)->parent_itm_slot__0S5B.parent_named__15.parent_itm_object__4.position__SFJ;
           };
-          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__2PYD)->__id==__ITM_SLOT__) {
-            __tmp__CSYD=((__ITM_SLOT *)s__2PYD)->id_section__F3C;
+          append_in__5KH((__UINTEGER_32)(((__UINTEGER_32 )__tmp__ATYD) >>  17),string_tmp__VH);
+          put__to__like__X4XD(string_tmp__VH,output_code__SI,(&__string_149));
+          put__to__like__X4XD((&__string_185),output_code__SI,(&__string_148));
+          ((__STRING *)string_tmp__VH)->count__SGC= 0;
+          if (((struct ___OBJ *)s__DRYD)->__id==__ITM_SLOT__) {
+            __tmp__JTYD=((__ITM_SLOT *)s__DRYD)->id_section__T3C;
           } else {
-            __tmp__CSYD=((__ITM_SLOT_OPERATOR *)s__2PYD)->parent_itm_slot__NW5B.id_section__F3C;
+            __tmp__JTYD=((__ITM_SLOT_OPERATOR *)s__DRYD)->parent_itm_slot__0S5B.id_section__T3C;
           };
-          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);
+          append_in__S14F(__tmp__JTYD,string_tmp__VH);
+          put__to__like__X4XD(string_tmp__VH,output_code__SI,(&__string_120));
+          put__to__like__X4XD((&__string_186),output_code__SI,(&__string_148));
+          if (((struct ___OBJ *)s__DRYD)->__id==__ITM_SLOT__) {
+            shorter_profile_in__U24F(s__DRYD,output_code__SI);
           } else {
-            shorter_profile_in__X14F(s__2PYD,output_code__SI);
+            shorter_profile_in__R34F(s__DRYD,output_code__SI);
           };
-          ((__STRING *)string_tmp__VH)->count__EGC= 0;
-          if (((struct ___OBJ *)s__2PYD)->__id==__ITM_SLOT__) {
-            __tmp__KSYD=((__ITM_SLOT *)s__2PYD)->parent_named__15.name__LI;
+          ((__STRING *)string_tmp__VH)->count__SGC= 0;
+          if (((struct ___OBJ *)s__DRYD)->__id==__ITM_SLOT__) {
+            __tmp__RTYD=((__ITM_SLOT *)s__DRYD)->parent_named__15.name__LI;
           } else {
-            __tmp__KSYD=((__ITM_SLOT_OPERATOR *)s__2PYD)->parent_itm_slot__NW5B.parent_named__15.name__LI;
+            __tmp__RTYD=((__ITM_SLOT_OPERATOR *)s__DRYD)->parent_itm_slot__0S5B.parent_named__15.name__LI;
           };
-          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__);
+          get_all_comment_slot__in__PL4E(Self__XMTD,__tmp__RTYD,string_tmp__VH);
+          shorter_comment__in__light__CP4E(string_tmp__VH,output_code__SI,FALSE__);
         };
-        Self__IH5D=(__INTEGER)(Self__IH5D +  1);
+        Self__JI5D=(__INTEGER)(Self__JI5D +  1);
       };
-      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;
+      s__5TYD=NULL;
+      is_first__4TYD=TRUE__;
+      __tmp__DUYD=((__FAST_ARRAYoITM_SLOTo *)list_tmp__YNTD)->parent_arrayed_collection__XNTD.upper__UOTD;
+      Self__YI5D= 0;
+      while ((Self__YI5D <= __tmp__DUYD)) {
+        s__5TYD=((void **)((__FAST_ARRAYoITM_SLOTo *)list_tmp__YNTD)->parent_arrayed_collection__XNTD.storage__UPWE)[Self__YI5D];
+        if (((struct ___OBJ *)s__5TYD)->__id==__ITM_SLOT__) {
+          __tmp__CQTD=((__ITM_SLOT *)s__5TYD)->parent_named__15.name__LI;
         } else {
-          __tmp__1OTD=((__ITM_SLOT_OPERATOR *)s__YSYD)->parent_itm_slot__NW5B.parent_named__15.name__LI;
-        };
-        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__VALH=(i__WALH ==  0);
+          __tmp__CQTD=((__ITM_SLOT_OPERATOR *)s__5TYD)->parent_itm_slot__0S5B.parent_named__15.name__LI;
         };
-        if (result__VALH) {
-          if (((struct ___OBJ *)s__YSYD)->__id==__ITM_SLOT__) {
-            __tmp__JTYD=((__ITM_SLOT *)s__YSYD)->stat_shorter__XNTD;
+        if (has_prefix__OTTF(__tmp__CQTD,(&__string_180))) {
+          if (((struct ___OBJ *)s__5TYD)->__id==__ITM_SLOT__) {
+            __tmp__QUYD=((__ITM_SLOT *)s__5TYD)->stat_shorter__4OTD;
           } else {
-            __tmp__JTYD=((__ITM_SLOT_OPERATOR *)s__YSYD)->parent_itm_slot__NW5B.stat_shorter__XNTD;
+            __tmp__QUYD=((__ITM_SLOT_OPERATOR *)s__5TYD)->parent_itm_slot__0S5B.stat_shorter__4OTD;
           };
-          __tmp__MTYD=(__tmp__JTYD ==  1);
+          __tmp__TUYD=(__tmp__QUYD ==  1);
         } else {
-          __tmp__MTYD=FALSE__;
+          __tmp__TUYD=FALSE__;
         };
-        if (__tmp__MTYD) {
-          if (is_first__XSYD) {
-            if (((void *)(&__string_186) == (void *)NULL)) {
-              put__to__like__Q3XD((&__string_182),output_code__SI,(&__string_146));
+        if (__tmp__TUYD) {
+          if (is_first__4TYD) {
+            if (((void *)(&__string_187) == (void *)NULL)) {
+              put__to__like__X4XD((&__string_183),output_code__SI,(&__string_146));
             } else {
-              put__to__like__Q3XD((&__string_186),output_code__SI,(&__string_146));
+              put__to__like__X4XD((&__string_187),output_code__SI,(&__string_146));
             };
-            is_first__XSYD=FALSE__;
+            is_first__4TYD=FALSE__;
           };
-          if (((struct ___OBJ *)s__YSYD)->__id==__ITM_SLOT__) {
-            ((__ITM_SLOT *)s__YSYD)->stat_shorter__XNTD= 2;
+          if (((struct ___OBJ *)s__5TYD)->__id==__ITM_SLOT__) {
+            ((__ITM_SLOT *)s__5TYD)->stat_shorter__4OTD= 2;
           } else {
-            ((__ITM_SLOT_OPERATOR *)s__YSYD)->parent_itm_slot__NW5B.stat_shorter__XNTD= 2;
+            ((__ITM_SLOT_OPERATOR *)s__5TYD)->parent_itm_slot__0S5B.stat_shorter__4OTD= 2;
           };
-          ((__STRING *)string_tmp2__0BJ)->count__EGC= 0;
-          if (((struct ___OBJ *)s__YSYD)->__id==__ITM_SLOT__) {
-            pretty_name_in__LW4F(s__YSYD,string_tmp2__0BJ);
+          ((__STRING *)string_tmp2__GCJ)->count__SGC= 0;
+          if (((struct ___OBJ *)s__5TYD)->__id==__ITM_SLOT__) {
+            pretty_name_in__FY4F(s__5TYD,string_tmp2__GCJ);
           } else {
-            pretty_name_in__AY4F(s__YSYD,string_tmp2__0BJ);
+            pretty_name_in__0Z4F(s__5TYD,string_tmp2__GCJ);
           };
-          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;
+          put__to__like__X4XD(string_tmp2__GCJ,output_code__SI,(&__string_147));
+          if (((struct ___OBJ *)s__5TYD)->__id==__ITM_SLOT__) {
+            __tmp__XVYD=((__ITM_SLOT *)s__5TYD)->parent_named__15.parent_itm_object__4.position__SFJ;
           } else {
-            __tmp__QUYD=((__ITM_SLOT_OPERATOR *)s__YSYD)->parent_itm_slot__NW5B.parent_named__15.parent_itm_object__4.position__GFJ;
+            __tmp__XVYD=((__ITM_SLOT_OPERATOR *)s__5TYD)->parent_itm_slot__0S5B.parent_named__15.parent_itm_object__4.position__SFJ;
           };
-          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;
+          copy__VDS(string_tmp__VH,((__PROTOTYPE *)((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__DVT)[(__INTEGER)(((__INTEGER )((__UINTEGER_32 )__tmp__XVYD)) &  511)])->filename__FSG);
+          append__3OS(string_tmp__VH,(&__string_184));
+          if (((struct ___OBJ *)s__5TYD)->__id==__ITM_SLOT__) {
+            __tmp__2VYD=((__ITM_SLOT *)s__5TYD)->parent_named__15.parent_itm_object__4.position__SFJ;
           } else {
-            __tmp__VUYD=((__ITM_SLOT_OPERATOR *)s__YSYD)->parent_itm_slot__NW5B.parent_named__15.parent_itm_object__4.position__GFJ;
+            __tmp__2VYD=((__ITM_SLOT_OPERATOR *)s__5TYD)->parent_itm_slot__0S5B.parent_named__15.parent_itm_object__4.position__SFJ;
           };
-          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__YSYD)->__id==__ITM_SLOT__) {
-            __tmp__4UYD=((__ITM_SLOT *)s__YSYD)->id_section__F3C;
+          append_in__5KH((__UINTEGER_32)(((__UINTEGER_32 )__tmp__2VYD) >>  17),string_tmp__VH);
+          put__to__like__X4XD(string_tmp__VH,output_code__SI,(&__string_149));
+          put__to__like__X4XD((&__string_185),output_code__SI,(&__string_148));
+          ((__STRING *)string_tmp__VH)->count__SGC= 0;
+          if (((struct ___OBJ *)s__5TYD)->__id==__ITM_SLOT__) {
+            __tmp__FWYD=((__ITM_SLOT *)s__5TYD)->id_section__T3C;
           } else {
-            __tmp__4UYD=((__ITM_SLOT_OPERATOR *)s__YSYD)->parent_itm_slot__NW5B.id_section__F3C;
+            __tmp__FWYD=((__ITM_SLOT_OPERATOR *)s__5TYD)->parent_itm_slot__0S5B.id_section__T3C;
           };
-          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);
+          append_in__S14F(__tmp__FWYD,string_tmp__VH);
+          put__to__like__X4XD(string_tmp__VH,output_code__SI,(&__string_120));
+          put__to__like__X4XD((&__string_186),output_code__SI,(&__string_148));
+          if (((struct ___OBJ *)s__5TYD)->__id==__ITM_SLOT__) {
+            shorter_profile_in__U24F(s__5TYD,output_code__SI);
           } else {
-            shorter_profile_in__X14F(s__YSYD,output_code__SI);
+            shorter_profile_in__R34F(s__5TYD,output_code__SI);
           };
-          ((__STRING *)string_tmp__VH)->count__EGC= 0;
-          if (((struct ___OBJ *)s__YSYD)->__id==__ITM_SLOT__) {
-            __tmp__GVYD=((__ITM_SLOT *)s__YSYD)->parent_named__15.name__LI;
+          ((__STRING *)string_tmp__VH)->count__SGC= 0;
+          if (((struct ___OBJ *)s__5TYD)->__id==__ITM_SLOT__) {
+            __tmp__NWYD=((__ITM_SLOT *)s__5TYD)->parent_named__15.name__LI;
           } else {
-            __tmp__GVYD=((__ITM_SLOT_OPERATOR *)s__YSYD)->parent_itm_slot__NW5B.parent_named__15.name__LI;
+            __tmp__NWYD=((__ITM_SLOT_OPERATOR *)s__5TYD)->parent_itm_slot__0S5B.parent_named__15.name__LI;
           };
-          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__);
+          get_all_comment_slot__in__PL4E(Self__XMTD,__tmp__NWYD,string_tmp__VH);
+          shorter_comment__in__light__CP4E(string_tmp__VH,output_code__SI,FALSE__);
         };
-        Self__XH5D=(__INTEGER)(Self__XH5D +  1);
+        Self__YI5D=(__INTEGER)(Self__YI5D +  1);
       };
-      __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;
+      __tmp__LQTD=((__FAST_ARRAYoITM_SLOTo *)list_tmp__YNTD)->parent_arrayed_collection__XNTD.upper__UOTD;
+      Self__WWYD= 0;
+      while ((Self__WWYD <= __tmp__LQTD)) {
+        s__0MTD=((void **)((__FAST_ARRAYoITM_SLOTo *)list_tmp__YNTD)->parent_arrayed_collection__XNTD.storage__UPWE)[Self__WWYD];
+        if (((struct ___OBJ *)s__0MTD)->__id==__ITM_SLOT__) {
+          __tmp__TQTD=((__ITM_SLOT *)s__0MTD)->stat_shorter__4OTD;
         } else {
-          __tmp__MPTD=((__ITM_SLOT_OPERATOR *)s__TLTD)->parent_itm_slot__NW5B.stat_shorter__XNTD;
+          __tmp__TQTD=((__ITM_SLOT_OPERATOR *)s__0MTD)->parent_itm_slot__0S5B.stat_shorter__4OTD;
         };
-        if ((__tmp__MPTD ==  1)) {
-          if (((struct ___OBJ *)s__TLTD)->__id==__ITM_SLOT__) {
-            __tmp__SPTD=((__ITM_SLOT *)s__TLTD)->comment_chapter__B4HC;
+        if ((__tmp__TQTD ==  1)) {
+          if (((struct ___OBJ *)s__0MTD)->__id==__ITM_SLOT__) {
+            __tmp__ZQTD=((__ITM_SLOT *)s__0MTD)->comment_chapter__S0HC;
           } else {
-            __tmp__SPTD=((__ITM_SLOT_OPERATOR *)s__TLTD)->parent_itm_slot__NW5B.comment_chapter__B4HC;
+            __tmp__ZQTD=((__ITM_SLOT_OPERATOR *)s__0MTD)->parent_itm_slot__0S5B.comment_chapter__S0HC;
           };
-          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;
+          title__ZMTD=__tmp__ZQTD;
+          t__OGRE=__tmp__ZQTD;
+          s__RGRE=NULL;
+          is_first__QGRE=TRUE__;
+          __tmp__VGRE=((__FAST_ARRAYoITM_SLOTo *)list_tmp__YNTD)->parent_arrayed_collection__XNTD.upper__UOTD;
+          Self__YKSE= 0;
+          while ((Self__YKSE <= __tmp__VGRE)) {
+            s__RGRE=((void **)((__FAST_ARRAYoITM_SLOTo *)list_tmp__YNTD)->parent_arrayed_collection__XNTD.storage__UPWE)[Self__YKSE];
+            if (((struct ___OBJ *)s__RGRE)->__id==__ITM_SLOT__) {
+              __tmp__ARTD=((__ITM_SLOT *)s__RGRE)->comment_chapter__S0HC;
             } else {
-              __tmp__ZPTD=((__ITM_SLOT_OPERATOR *)s__2FRE)->parent_itm_slot__NW5B.comment_chapter__B4HC;
+              __tmp__ARTD=((__ITM_SLOT_OPERATOR *)s__RGRE)->parent_itm_slot__0S5B.comment_chapter__S0HC;
             };
-            if (((void *)__tmp__ZPTD == (void *)title__SLTD)) {
-              if (((struct ___OBJ *)s__2FRE)->__id==__ITM_SLOT__) {
-                __tmp__NGRE=((__ITM_SLOT *)s__2FRE)->stat_shorter__XNTD;
+            if (((void *)__tmp__ARTD == (void *)title__ZMTD)) {
+              if (((struct ___OBJ *)s__RGRE)->__id==__ITM_SLOT__) {
+                __tmp__CHRE=((__ITM_SLOT *)s__RGRE)->stat_shorter__4OTD;
               } else {
-                __tmp__NGRE=((__ITM_SLOT_OPERATOR *)s__2FRE)->parent_itm_slot__NW5B.stat_shorter__XNTD;
+                __tmp__CHRE=((__ITM_SLOT_OPERATOR *)s__RGRE)->parent_itm_slot__0S5B.stat_shorter__4OTD;
               };
-              __tmp__QGRE=(__tmp__NGRE ==  1);
+              __tmp__FHRE=(__tmp__CHRE ==  1);
             } else {
-              __tmp__QGRE=FALSE__;
+              __tmp__FHRE=FALSE__;
             };
-            if (__tmp__QGRE) {
-              if (is_first__1FRE) {
-                if (((void *)t__ZFRE == (void *)NULL)) {
-                  put__to__like__Q3XD((&__string_182),output_code__SI,(&__string_146));
+            if (__tmp__FHRE) {
+              if (is_first__QGRE) {
+                if (((void *)t__OGRE == (void *)NULL)) {
+                  put__to__like__X4XD((&__string_183),output_code__SI,(&__string_146));
                 } else {
-                  put__to__like__Q3XD(t__ZFRE,output_code__SI,(&__string_146));
+                  put__to__like__X4XD(t__OGRE,output_code__SI,(&__string_146));
                 };
-                is_first__1FRE=FALSE__;
+                is_first__QGRE=FALSE__;
               };
-              if (((struct ___OBJ *)s__2FRE)->__id==__ITM_SLOT__) {
-                ((__ITM_SLOT *)s__2FRE)->stat_shorter__XNTD= 2;
+              if (((struct ___OBJ *)s__RGRE)->__id==__ITM_SLOT__) {
+                ((__ITM_SLOT *)s__RGRE)->stat_shorter__4OTD= 2;
               } else {
-                ((__ITM_SLOT_OPERATOR *)s__2FRE)->parent_itm_slot__NW5B.stat_shorter__XNTD= 2;
+                ((__ITM_SLOT_OPERATOR *)s__RGRE)->parent_itm_slot__0S5B.stat_shorter__4OTD= 2;
               };
-              ((__STRING *)string_tmp2__0BJ)->count__EGC= 0;
-              if (((struct ___OBJ *)s__2FRE)->__id==__ITM_SLOT__) {
-                pretty_name_in__LW4F(s__2FRE,string_tmp2__0BJ);
+              ((__STRING *)string_tmp2__GCJ)->count__SGC= 0;
+              if (((struct ___OBJ *)s__RGRE)->__id==__ITM_SLOT__) {
+                pretty_name_in__FY4F(s__RGRE,string_tmp2__GCJ);
               } else {
-                pretty_name_in__AY4F(s__2FRE,string_tmp2__0BJ);
+                pretty_name_in__0Z4F(s__RGRE,string_tmp2__GCJ);
               };
-              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;
+              put__to__like__X4XD(string_tmp2__GCJ,output_code__SI,(&__string_147));
+              if (((struct ___OBJ *)s__RGRE)->__id==__ITM_SLOT__) {
+                __tmp__JIRE=((__ITM_SLOT *)s__RGRE)->parent_named__15.parent_itm_object__4.position__SFJ;
               } else {
-                __tmp__UHRE=((__ITM_SLOT_OPERATOR *)s__2FRE)->parent_itm_slot__NW5B.parent_named__15.parent_itm_object__4.position__GFJ;
+                __tmp__JIRE=((__ITM_SLOT_OPERATOR *)s__RGRE)->parent_itm_slot__0S5B.parent_named__15.parent_itm_object__4.position__SFJ;
               };
-              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;
+              copy__VDS(string_tmp__VH,((__PROTOTYPE *)((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__DVT)[(__INTEGER)(((__INTEGER )((__UINTEGER_32 )__tmp__JIRE)) &  511)])->filename__FSG);
+              append__3OS(string_tmp__VH,(&__string_184));
+              if (((struct ___OBJ *)s__RGRE)->__id==__ITM_SLOT__) {
+                __tmp__OIRE=((__ITM_SLOT *)s__RGRE)->parent_named__15.parent_itm_object__4.position__SFJ;
               } else {
-                __tmp__ZHRE=((__ITM_SLOT_OPERATOR *)s__2FRE)->parent_itm_slot__NW5B.parent_named__15.parent_itm_object__4.position__GFJ;
-              };
-              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__2FRE)->__id==__ITM_SLOT__) {
-                __tmp__CIRE=((__ITM_SLOT *)s__2FRE)->id_section__F3C;
+                __tmp__OIRE=((__ITM_SLOT_OPERATOR *)s__RGRE)->parent_itm_slot__0S5B.parent_named__15.parent_itm_object__4.position__SFJ;
+              };
+              append_in__5KH((__UINTEGER_32)(((__UINTEGER_32 )__tmp__OIRE) >>  17),string_tmp__VH);
+              put__to__like__X4XD(string_tmp__VH,output_code__SI,(&__string_149));
+              put__to__like__X4XD((&__string_185),output_code__SI,(&__string_148));
+              ((__STRING *)string_tmp__VH)->count__SGC= 0;
+              if (((struct ___OBJ *)s__RGRE)->__id==__ITM_SLOT__) {
+                __tmp__XIRE=((__ITM_SLOT *)s__RGRE)->id_section__T3C;
               } else {
-                __tmp__CIRE=((__ITM_SLOT_OPERATOR *)s__2FRE)->parent_itm_slot__NW5B.id_section__F3C;
+                __tmp__XIRE=((__ITM_SLOT_OPERATOR *)s__RGRE)->parent_itm_slot__0S5B.id_section__T3C;
               };
-              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);
+              append_in__S14F(__tmp__XIRE,string_tmp__VH);
+              put__to__like__X4XD(string_tmp__VH,output_code__SI,(&__string_120));
+              put__to__like__X4XD((&__string_186),output_code__SI,(&__string_148));
+              if (((struct ___OBJ *)s__RGRE)->__id==__ITM_SLOT__) {
+                shorter_profile_in__U24F(s__RGRE,output_code__SI);
               } else {
-                shorter_profile_in__X14F(s__2FRE,output_code__SI);
+                shorter_profile_in__R34F(s__RGRE,output_code__SI);
               };
-              ((__STRING *)string_tmp__VH)->count__EGC= 0;
-              if (((struct ___OBJ *)s__2FRE)->__id==__ITM_SLOT__) {
-                __tmp__KIRE=((__ITM_SLOT *)s__2FRE)->parent_named__15.name__LI;
+              ((__STRING *)string_tmp__VH)->count__SGC= 0;
+              if (((struct ___OBJ *)s__RGRE)->__id==__ITM_SLOT__) {
+                __tmp__5IRE=((__ITM_SLOT *)s__RGRE)->parent_named__15.name__LI;
               } else {
-                __tmp__KIRE=((__ITM_SLOT_OPERATOR *)s__2FRE)->parent_itm_slot__NW5B.parent_named__15.name__LI;
+                __tmp__5IRE=((__ITM_SLOT_OPERATOR *)s__RGRE)->parent_itm_slot__0S5B.parent_named__15.name__LI;
               };
-              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__);
+              get_all_comment_slot__in__PL4E(Self__XMTD,__tmp__5IRE,string_tmp__VH);
+              shorter_comment__in__light__CP4E(string_tmp__VH,output_code__SI,FALSE__);
             };
-            Self__DKSE=(__INTEGER)(Self__DKSE +  1);
+            Self__YKSE=(__INTEGER)(Self__YKSE +  1);
           };
         };
-        Self__PVYD=(__INTEGER)(Self__PVYD +  1);
+        Self__WWYD=(__INTEGER)(Self__WWYD +  1);
       };
-      __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;
+      __tmp__LRTD=((__FAST_ARRAYoITM_SLOTo *)list_tmp__YNTD)->parent_arrayed_collection__XNTD.upper__UOTD;
+      Self__FXYD= 0;
+      __tmp__4VGH=((__FAST_ARRAYoITM_SLOTo *)list_tmp__YNTD)->parent_arrayed_collection__XNTD.storage__UPWE;
+      while ((Self__FXYD <= __tmp__LRTD)) {
+        __tmp__SRTD=((void **)__tmp__4VGH)[Self__FXYD];
+        if (((struct ___OBJ *)__tmp__SRTD)->__id==__ITM_SLOT__) {
+          ((__ITM_SLOT *)__tmp__SRTD)->stat_shorter__4OTD= 0;
         } else {
-          ((__ITM_SLOT_OPERATOR *)__tmp__LQTD)->parent_itm_slot__NW5B.stat_shorter__XNTD= 0;
+          ((__ITM_SLOT_OPERATOR *)__tmp__SRTD)->parent_itm_slot__0S5B.stat_shorter__4OTD= 0;
         };
-        Self__4VYD=(__INTEGER)(Self__4VYD +  1);
+        Self__FXYD=(__INTEGER)(Self__FXYD +  1);
+      };
+      copy__VDS(string_tmp__VH,((__PROTOTYPE *)p__AB)->parent_named__5.name__LI);
+      if (fast_has__IDT(short_dico__QD,(&__string_116))) {
+        append__3OS(string_tmp__VH,((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)fast_at__LV3(short_dico__QD,(&__string_116)))->first_link__OTEC)->item__L0HD);
+      } else {
+        append__3OS(string_tmp__VH,(&__string_172));
       };
-      save_file__with__3DC(add_ext__PCF(((__PROTOTYPE *)p__AB)->parent_named__5.name__LI),output_code__SI);
-      Self__M4QC=(__INTEGER)(Self__M4QC +  1);
+      save_file__with__3DC(get__YWB(string_tmp__VH),output_code__SI);
+      Self__30QC=(__INTEGER)(Self__30QC +  1);
     };
   };
   return( 0);
@@ -8465,12 +8155,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__ZBS;
-  __POINTER ptr__ZSB,ptr_table__1ALH,next__0ALH,result__2ALH;
-  __POINTER ptr_table__YVH,next__3VH,result__1VH;
+  __STRING *result__YSB,*Self__FCS;
+  __POINTER ptr__ZSB,ptr_table__S1LH,next__R1LH,result__T1LH;
+  __POINTER ptr_table__X1LH,next__W1LH,result__Y1LH;
   __INTEGER typ_id__5SB;
-  __UINTEGER_32 sz__2SB,a__XOHH,new_size__YOHH,t__2OHH,a__1OHH;
-  __UINTEGER_32 new_size__XVH,lab_type__ZVH;
+  __UINTEGER_32 sz__2SB,a__BWGH,new_size__CWGH,t__GWGH,a__FWGH;
+  __UINTEGER_32 new_size__01LH,lab_type__Z1LH;
   result__YSB=NULL;
   ptr__ZSB=((__POINTER )(NULL));
   typ_id__5SB= 0;
@@ -8481,2606 +8171,2469 @@ 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__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;
+      a__BWGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__CWGH=(__UINTEGER_32)((__UINTEGER_32)(sz__2SB + a__BWGH) & (__UINTEGER_32)(~ a__BWGH));
+      ptr_table__S1LH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__CWGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__R1LH=((__POINTER )(NULL));
+      result__T1LH=((__POINTER *)ptr_table__S1LH)[ 0];
+      if ((result__T1LH == (void *)NULL)) {
+        result__T1LH=new_lab__RTJ(new_size__CWGH);
+        next__R1LH=(void *)((unsigned long)result__T1LH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CWGH)));
+        ((__POINTER *)next__R1LH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__S1LH)[ 0]=next__R1LH;
       } else {
-        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)));
+        next__R1LH=((__POINTER *)result__T1LH)[ 0];
+        if ((next__R1LH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__T1LH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__CWGH <<  1)) <=  4096)) {
+            next__R1LH=(void *)((unsigned long)result__T1LH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CWGH)));
           } else {
-            next__0ALH=new_lab__FTJ(new_size__YOHH);
+            next__R1LH=new_lab__RTJ(new_size__CWGH);
           };
-          ((__POINTER *)next__0ALH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__1ALH)[ 0]=next__0ALH;
+          ((__POINTER *)next__R1LH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__S1LH)[ 0]=next__R1LH;
         } else {
-          ((__POINTER *)result__2ALH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0ALH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__2ALH=next__0ALH;
+          ((__POINTER *)result__T1LH)[ 0]=(void *)((unsigned long)((__POINTER *)next__R1LH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__T1LH=next__R1LH;
         };
       };
-      ptr__ZSB=result__2ALH;
+      ptr__ZSB=result__T1LH;
     } else {
-      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;
+      t__GWGH=((__UINTEGER_32 )typ_id__5SB);
+      a__FWGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__01LH=(__UINTEGER_32)((__UINTEGER_32)(sz__2SB + a__FWGH) & (__UINTEGER_32)(~ a__FWGH));
+      ptr_table__X1LH=((__POINTER )(&(table_type[(t__GWGH)])));
+      lab_type__Z1LH=(__UINTEGER_32)(t__GWGH |  1);
+      next__W1LH=((__POINTER )(NULL));
+      result__Y1LH=((__POINTER *)ptr_table__X1LH)[ 0];
+      if ((result__Y1LH == (void *)NULL)) {
+        result__Y1LH=new_lab__RTJ(lab_type__Z1LH);
+        next__W1LH=(void *)((unsigned long)result__Y1LH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__01LH)));
+        ((__POINTER *)next__W1LH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__X1LH)[ 0]=next__W1LH;
       } else {
-        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)));
+        next__W1LH=((__POINTER *)result__Y1LH)[ 0];
+        if ((next__W1LH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__Y1LH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__01LH <<  1)) <=  4096)) {
+            next__W1LH=(void *)((unsigned long)result__Y1LH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__01LH)));
           } else {
-            next__3VH=new_lab__FTJ(lab_type__ZVH);
+            next__W1LH=new_lab__RTJ(lab_type__Z1LH);
           };
-          ((__POINTER *)next__3VH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__YVH)[ 0]=next__3VH;
+          ((__POINTER *)next__W1LH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__X1LH)[ 0]=next__W1LH;
         } else {
-          ((__POINTER *)result__1VH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3VH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__1VH=next__3VH;
+          ((__POINTER *)result__Y1LH)[ 0]=(void *)((unsigned long)((__POINTER *)next__W1LH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__Y1LH=next__W1LH;
         };
       };
-      ptr__ZSB=result__1VH;
+      ptr__ZSB=result__Y1LH;
     };
     result__YSB=((__STRING *)ptr__ZSB);
     *(result__YSB) = *(STRING__);
   };
-  Self__ZBS=((__STRING *)result__YSB);
+  Self__FCS=((__STRING *)result__YSB);
   if ((needed_capacity__1BB >  0)) {
-    if ((Self__ZBS->capacity__ICS < needed_capacity__1BB)) {
-      Self__ZBS->storage__RCS=create__JMEB(needed_capacity__1BB);
-      Self__ZBS->capacity__ICS=needed_capacity__1BB;
+    if ((Self__FCS->capacity__UCS < needed_capacity__1BB)) {
+      Self__FCS->storage__3CS=create__YIEB(needed_capacity__1BB);
+      Self__FCS->capacity__UCS=needed_capacity__1BB;
     };
   };
-  Self__ZBS->count__EGC= 0;
+  Self__FCS->count__SGC= 0;
   return(result__YSB);
 }
 
-static __POINTER new_lab__FTJ(__UINTEGER_32 t__HTJ)
+static __POINTER new_lab__RTJ(__UINTEGER_32 t__TTJ)
 // ({UINTEGER_32}) With resultNo recursive, No inlinable.
 {
-  __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:
+  __UINTEGER_32 idx__VTJ,pv__2TJ;
+  void *blc__YTJ,*prev__ZTJ,*prev__L3HH,*next__M3HH;
+  __MEMORY *Self__4NAH,*Self__K3HH;
+  __POINTER result__0TJ;
+  __BOOLEAN __tmp__2UJ;
+  idx__VTJ= 0;
+  blc__YTJ=NULL;
+  prev__ZTJ=NULL;
+  pv__2TJ= 0;
+  while_do__YEK:
   {
-    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));
+    if ((idx__VTJ < nb_page__DUJ)) {
+      blc__YTJ=((void *)(last_block[(idx__VTJ)]));
+      __tmp__2UJ=(((__UINTEGER_32)(((__MEMORY *)blc__YTJ)->map_size_and_id__YTB &  4294967292LU) <  4096) || ((__UINTEGER_32)(((__MEMORY *)blc__YTJ)->map_size_and_id__YTB &  1) ==  1));
     } else {
-      __tmp__QUJ=FALSE__;
+      __tmp__2UJ=FALSE__;
     };
-    if (__tmp__QUJ) {
-      idx__JTJ=(__UINTEGER_32)(idx__JTJ +  1);
-      goto while_do__MEK;
+    if (__tmp__2UJ) {
+      idx__VTJ=(__UINTEGER_32)(idx__VTJ +  1);
+      goto while_do__YEK;
     };
   };
-  if ((idx__JTJ >= nb_page__XTJ)) {
-    blc__MTJ=new_page__YC5();
+  if ((idx__VTJ >= nb_page__DUJ)) {
+    blc__YTJ=new_page__H54();
   };
-  ((__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;
+  ((__MEMORY *)blc__YTJ)->map_size_and_id__YTB=(__UINTEGER_32)(((__MEMORY *)blc__YTJ)->map_size_and_id__YTB -  4096);
+  Self__4NAH=((__MEMORY *)blc__YTJ);
+  result__0TJ=((__POINTER )((void *)(void *)((unsigned long)(void *)((unsigned long)((__POINTER )Self__4NAH) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )(__UINTEGER_32)(Self__4NAH->map_size_and_id__YTB &  4294967292LU))))));
+  if (((__UINTEGER_32)(((__MEMORY *)blc__YTJ)->map_size_and_id__YTB &  4294967292LU) < ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    Self__K3HH=((__MEMORY *)blc__YTJ);
+    prev__L3HH=Self__K3HH->map_previous_free__0TB;
+    next__M3HH=Self__K3HH->map_next_free__ZTB;
+    if (((void *)prev__L3HH == (void *)NULL)) {
+      first_free__0BVB=next__M3HH;
     } else {
-      ((__MEMORY *)prev__BLEH)->map_next_free__ZTB=next__CLEH;
+      ((__MEMORY *)prev__L3HH)->map_next_free__ZTB=next__M3HH;
     };
-    if (((void *)next__CLEH != (void *)NULL)) {
-      ((__MEMORY *)next__CLEH)->map_previous_free__0TB=prev__BLEH;
+    if (((void *)next__M3HH != (void *)NULL)) {
+      ((__MEMORY *)next__M3HH)->map_previous_free__0TB=prev__L3HH;
     };
-    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);
+    pv__2TJ=((__MEMORY *)blc__YTJ)->map_previous_linear__XTB;
+    if ((pv__2TJ !=  4294967295LU)) {
+      prev__ZTJ=((void *)(void *)((unsigned long)begin_memory__4XH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )pv__2TJ))));
+      ((__MEMORY *)prev__ZTJ)->map_size_and_id__YTB=(__UINTEGER_32)((__UINTEGER_32)(((__MEMORY *)prev__ZTJ)->map_size_and_id__YTB + ((__MEMORY *)blc__YTJ)->map_size_and_id__YTB) +  8);
+      last_block[(idx__VTJ)] = (prev__ZTJ);
     };
   };
-  ((__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 *)))))));
+  ((__POINTER *)result__0TJ)[ 0]=((__POINTER )t__TTJ);
+  return((void *)((unsigned long)result__0TJ - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *)))))));
 }
 
-static void** create__PHRB(__INTEGER nb_elements__RHRB)
+static void** create__2DRB(__INTEGER nb_elements__4DRB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__HCHH,a__GCHH,new_size__ICHH,new_size2__JCHH,a__KCHH;
+  __UINTEGER_32 new_size__LCHH;
+  __POINTER result__FCHH,ptr_table__JTJH,next__ITJH,result__KTJH;
+  __INTEGER Self__EANC;
+  void **Result__ECUB;
+  sz__HCHH=((__UINTEGER_32 )(__INTEGER)(nb_elements__4DRB * ((__INTEGER )(sizeof(void *)))));
+  result__FCHH=((__POINTER )(NULL));
+  a__GCHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__ICHH=(__UINTEGER_32)((__UINTEGER_32)(sz__HCHH + a__GCHH) & (__UINTEGER_32)(~ a__GCHH));
+  new_size2__JCHH=(__UINTEGER_32)(new_size__ICHH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__JCHH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__KCHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__LCHH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__JCHH + a__KCHH) & (__UINTEGER_32)(~ a__KCHH));
+    ptr_table__JTJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__LCHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__ITJH=((__POINTER )(NULL));
+    result__KTJH=((__POINTER *)ptr_table__JTJH)[ 0];
+    if ((result__KTJH == (void *)NULL)) {
+      result__KTJH=new_lab__RTJ(new_size__LCHH);
+      next__ITJH=(void *)((unsigned long)result__KTJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LCHH)));
+      ((__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__4XH)))) &  4095) + (__UINTEGER_32)(new_size__LCHH <<  1)) <=  4096)) {
+          next__ITJH=(void *)((unsigned long)result__KTJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LCHH)));
+        } else {
+          next__ITJH=new_lab__RTJ(new_size__LCHH);
+        };
+        ((__POINTER *)next__ITJH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__JTJH)[ 0]=next__ITJH;
+      } else {
+        ((__POINTER *)result__KTJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ITJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__KTJH=next__ITJH;
+      };
+    };
+    ((__POINTER *)result__KTJH)[ 0]=((__POINTER ) 3);
+    result__FCHH=(void *)((unsigned long)result__KTJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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__WEJH == (void *)NULL)) {
-      result__WEJH=new_page__YC5();
-    };
-    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__FCHH=(void *)((unsigned long)((__POINTER )((__MEMORY *)search__XAVB(new_size__ICHH))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__ECUB=((void **)result__FCHH);
+  Self__EANC=(__INTEGER)(nb_elements__4DRB -  1);
+  while ((Self__EANC >=  0)) {
+    Result__ECUB[Self__EANC]=NULL;
+    Self__EANC=(__INTEGER)(Self__EANC -  1);
   };
-  return(Result__XFUB);
+  return(Result__ECUB);
 }
 
-static void add_last__GOT(__STRING *Self__HOT,__CHARACTER ch__IOT)
-// ({STRING},{CHARACTER}) VoidNo recursive, No inlinable.
+static __INTEGER fast_first_index_of__until__OLC(__CHARACTER *Self__PLC)
+// ({NATIVE_ARRAYoExpanded_CHARACTERo}) With resultNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER idx__1LC;
+  idx__1LC= 0;
+  while ((! ((idx__1LC >  1024) || ('\0' == Self__PLC[idx__1LC])))) {
+    idx__1LC=(__INTEGER)(idx__1LC +  1);
+  };
+  return(idx__1LC);
 }
 
-static void add_last__ISV(__FAST_ARRAYoSTRINGo *Self__JSV,void *element__KSV)
+static __CHARACTER* create__YIEB(__INTEGER nb_elements__0IEB)
+// ({INTEGER}) With resultNo recursive, No inlinable.
+{
+  __UINTEGER_32 sz__5BHH,a__4BHH,new_size__ACHH,new_size2__BCHH,a__CCHH;
+  __UINTEGER_32 new_size__DCHH;
+  __POINTER result__3BHH,ptr_table__21LH,next__11LH,result__31LH;
+  __INTEGER Self__KUKC;
+  __CHARACTER *Result__13JB;
+  sz__5BHH=((__UINTEGER_32 )nb_elements__0IEB);
+  result__3BHH=((__POINTER )(NULL));
+  a__4BHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__ACHH=(__UINTEGER_32)((__UINTEGER_32)(sz__5BHH + a__4BHH) & (__UINTEGER_32)(~ a__4BHH));
+  new_size2__BCHH=(__UINTEGER_32)(new_size__ACHH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__BCHH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__CCHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__DCHH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__BCHH + a__CCHH) & (__UINTEGER_32)(~ a__CCHH));
+    ptr_table__21LH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__DCHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__11LH=((__POINTER )(NULL));
+    result__31LH=((__POINTER *)ptr_table__21LH)[ 0];
+    if ((result__31LH == (void *)NULL)) {
+      result__31LH=new_lab__RTJ(new_size__DCHH);
+      next__11LH=(void *)((unsigned long)result__31LH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DCHH)));
+      ((__POINTER *)next__11LH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__21LH)[ 0]=next__11LH;
+    } else {
+      next__11LH=((__POINTER *)result__31LH)[ 0];
+      if ((next__11LH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__31LH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__DCHH <<  1)) <=  4096)) {
+          next__11LH=(void *)((unsigned long)result__31LH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DCHH)));
+        } else {
+          next__11LH=new_lab__RTJ(new_size__DCHH);
+        };
+        ((__POINTER *)next__11LH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__21LH)[ 0]=next__11LH;
+      } else {
+        ((__POINTER *)result__31LH)[ 0]=(void *)((unsigned long)((__POINTER *)next__11LH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__31LH=next__11LH;
+      };
+    };
+    ((__POINTER *)result__31LH)[ 0]=((__POINTER ) 3);
+    result__3BHH=(void *)((unsigned long)result__31LH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  } else {
+    result__3BHH=(void *)((unsigned long)((__POINTER )((__MEMORY *)search__XAVB(new_size__ACHH))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+  };
+  Result__13JB=((__CHARACTER *)result__3BHH);
+  Self__KUKC=(__INTEGER)(nb_elements__0IEB -  1);
+  while ((Self__KUKC >=  0)) {
+    Result__13JB[Self__KUKC]='\0';
+    Self__KUKC=(__INTEGER)(Self__KUKC -  1);
+  };
+  return(Result__13JB);
+}
+
+static __POINTER realloc_dynamic__old_size__new_size__KELC(__POINTER p__MELC,__UINTEGER_32 old_sz__NELC,__UINTEGER_32 new_sz__OELC)
+// ({POINTER},{UINTEGER_32},{UINTEGER_32}) With resultNo recursive, No inlinable.
+{
+  void *mem__ZELC,*nxt__RFED,*result__SFED,*next__WFND,*new_free__VFND;
+  void *prev__I3HH,*next__J3HH;
+  __POINTER result__0ELC,result__NCHH,ptr_table__EWH,next__JWH;
+  __POINTER result__HWH,__tmp__4FLC,last__3SHD,src__3CED,dst__4CED;
+  __UINTEGER_32 a__BNFH,old_size__QELC,old_size2__TELC,a__FNFH;
+  __UINTEGER_32 new_size__WELC,a__OCHH,new_size__QCHH,new_size2__RCHH;
+  __UINTEGER_32 a__SCHH,new_size__TCHH,a__BUH,__tmp__LGLC,sz__WFED;
+  __UINTEGER_32 old_size__TFED,prev__XFND,new_size__0FND;
+  __INTEGER siz__B2LH,Self__G2LH,siz__CDED,Self__QQHD;
+  __MEMORY *Self__NFED;
+  __POINTER *na_src__D2LH,*na_dst__F2LH,*na_src__ADED,*na_dst__BDED;
+  mem__ZELC=NULL;
+  result__0ELC=((__POINTER )(NULL));
+  a__BNFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  old_size__QELC=(__UINTEGER_32)((__UINTEGER_32)(old_sz__NELC + a__BNFH) & (__UINTEGER_32)(~ a__BNFH));
+  old_size2__TELC=(__UINTEGER_32)(old_size__QELC + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  a__FNFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__WELC=(__UINTEGER_32)((__UINTEGER_32)(new_sz__OELC + a__FNFH) & (__UINTEGER_32)(~ a__FNFH));
+  if ((old_size2__TELC <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    result__NCHH=((__POINTER )(NULL));
+    a__OCHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__QCHH=(__UINTEGER_32)((__UINTEGER_32)(new_size__WELC + a__OCHH) & (__UINTEGER_32)(~ a__OCHH));
+    new_size2__RCHH=(__UINTEGER_32)(new_size__QCHH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+    if ((new_size2__RCHH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+      a__SCHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__TCHH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__RCHH + a__SCHH) & (__UINTEGER_32)(~ a__SCHH));
+      ptr_table__EWH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__TCHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__JWH=((__POINTER )(NULL));
+      result__HWH=((__POINTER *)ptr_table__EWH)[ 0];
+      if ((result__HWH == (void *)NULL)) {
+        result__HWH=new_lab__RTJ(new_size__TCHH);
+        next__JWH=(void *)((unsigned long)result__HWH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TCHH)));
+        ((__POINTER *)next__JWH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__EWH)[ 0]=next__JWH;
+      } else {
+        next__JWH=((__POINTER *)result__HWH)[ 0];
+        if ((next__JWH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HWH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__TCHH <<  1)) <=  4096)) {
+            next__JWH=(void *)((unsigned long)result__HWH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TCHH)));
+          } else {
+            next__JWH=new_lab__RTJ(new_size__TCHH);
+          };
+          ((__POINTER *)next__JWH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__EWH)[ 0]=next__JWH;
+        } else {
+          ((__POINTER *)result__HWH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JWH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__HWH=next__JWH;
+        };
+      };
+      ((__POINTER *)result__HWH)[ 0]=((__POINTER ) 3);
+      result__NCHH=(void *)((unsigned long)result__HWH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+    } else {
+      result__NCHH=(void *)((unsigned long)((__POINTER )((__MEMORY *)search__XAVB(new_size__QCHH))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    };
+    result__0ELC=result__NCHH;
+    siz__B2LH=((__INTEGER )old_size__QELC);
+    siz__B2LH=(__INTEGER)(siz__B2LH / ((__INTEGER )(sizeof(void *))));
+    na_src__D2LH=((__POINTER *)p__MELC);
+    na_dst__F2LH=((__POINTER *)result__NCHH);
+    Self__G2LH=(__INTEGER)(siz__B2LH -  1);
+    while ((Self__G2LH >=  0)) {
+      na_dst__F2LH[Self__G2LH]=na_src__D2LH[Self__G2LH];
+      Self__G2LH=(__INTEGER)(Self__G2LH -  1);
+    };
+    __tmp__4FLC=(void *)((unsigned long)p__MELC - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *)))));
+    a__BUH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    last__3SHD=((__POINTER *)((__POINTER )(&(table_size[((__UINTEGER_32)((__UINTEGER_32)((__UINTEGER_32)(old_size2__TELC + a__BUH) & (__UINTEGER_32)(~ a__BUH)) / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))))[ 0];
+    ((__POINTER *)__tmp__4FLC)[ 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__3SHD)[ 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__3SHD)[ 0]=__tmp__4FLC;
+  } else {
+    mem__ZELC=((void *)(void *)((unsigned long)p__MELC - (unsigned long)((__POINTER ) 8)));
+    __tmp__LGLC=(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)p__MELC - (unsigned long)begin_memory__4XH)))) >>  26);
+    Self__NFED=((__MEMORY *)mem__ZELC);
+    nxt__RFED=NULL;
+    result__SFED=NULL;
+    sz__WFED= 0;
+    old_size__TFED=(__UINTEGER_32)(Self__NFED->map_size_and_id__YTB &  4294967292LU);
+    if ((new_size__WELC > old_size__TFED)) {
+      if ((! ((__UINTEGER_32)(Self__NFED->map_size_and_id__YTB &  2) !=  0))) {
+        nxt__RFED=((void *)(void *)((unsigned long)(void *)((unsigned long)((__POINTER )Self__NFED) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )(__UINTEGER_32)(Self__NFED->map_size_and_id__YTB &  4294967292LU)))));
+        sz__WFED=(__UINTEGER_32)((__UINTEGER_32)(new_size__WELC - old_size__TFED) -  8);
+        if ((((__UINTEGER_32)(((__MEMORY *)nxt__RFED)->map_size_and_id__YTB &  1) ==  0) && ((__UINTEGER_32)(((__MEMORY *)nxt__RFED)->map_size_and_id__YTB &  4294967292LU) >= sz__WFED))) {
+          to_busy__index__3SFC(nxt__RFED,sz__WFED,__tmp__LGLC);
+          Self__NFED->map_size_and_id__YTB=(__UINTEGER_32)((__UINTEGER_32)(Self__NFED->map_size_and_id__YTB + (__UINTEGER_32)(((__MEMORY *)nxt__RFED)->map_size_and_id__YTB &  4294967294LU)) +  8);
+          if (((__UINTEGER_32)(Self__NFED->map_size_and_id__YTB &  2) !=  0)) {
+            last_block[(__tmp__LGLC)] = (Self__NFED);
+          } else {
+            nxt__RFED=((void *)(void *)((unsigned long)(void *)((unsigned long)((__POINTER )Self__NFED) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )(__UINTEGER_32)(Self__NFED->map_size_and_id__YTB &  4294967292LU)))));
+            ((__MEMORY *)nxt__RFED)->map_previous_linear__XTB=((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )Self__NFED) - (unsigned long)begin_memory__4XH))));
+          };
+          result__SFED=Self__NFED;
+        };
+      };
+      if (((void *)result__SFED == (void *)NULL)) {
+        result__SFED=search__XAVB(new_size__WELC);
+        src__3CED=(void *)((unsigned long)((__POINTER )Self__NFED) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+        dst__4CED=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__SFED)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+        siz__CDED=((__INTEGER )old_size__TFED);
+        siz__CDED=(__INTEGER)(siz__CDED / ((__INTEGER )(sizeof(void *))));
+        na_src__ADED=((__POINTER *)src__3CED);
+        na_dst__BDED=((__POINTER *)dst__4CED);
+        Self__QQHD=(__INTEGER)(siz__CDED -  1);
+        while ((Self__QQHD >=  0)) {
+          na_dst__BDED[Self__QQHD]=na_src__ADED[Self__QQHD];
+          Self__QQHD=(__INTEGER)(Self__QQHD -  1);
+        };
+        prev__XFND=Self__NFED->map_previous_linear__XTB;
+        next__WFND=((void *)(void *)((unsigned long)(void *)((unsigned long)((__POINTER )Self__NFED) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )(__UINTEGER_32)(Self__NFED->map_size_and_id__YTB &  4294967292LU)))));
+        new_free__VFND=((void *)(void *)((unsigned long)begin_memory__4XH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )prev__XFND))));
+        new_size__0FND=(__UINTEGER_32)(Self__NFED->map_size_and_id__YTB &  4294967294LU);
+        if (((prev__XFND ==  4294967295LU) || ((__UINTEGER_32)(((__MEMORY *)new_free__VFND)->map_size_and_id__YTB &  1) !=  0))) {
+          new_free__VFND=Self__NFED;
+          Self__NFED->map_next_free__ZTB=first_free__0BVB;
+          Self__NFED->map_previous_free__0TB=NULL;
+          if (((void *)first_free__0BVB != (void *)NULL)) {
+            ((__MEMORY *)first_free__0BVB)->map_previous_free__0TB=Self__NFED;
+          };
+          first_free__0BVB=Self__NFED;
+        } else {
+          new_size__0FND=(__UINTEGER_32)((__UINTEGER_32)(new_size__0FND + ((__MEMORY *)new_free__VFND)->map_size_and_id__YTB) +  8);
+        };
+        if (((! ((__UINTEGER_32)(Self__NFED->map_size_and_id__YTB &  2) !=  0)) && ((__UINTEGER_32)(((__MEMORY *)next__WFND)->map_size_and_id__YTB &  1) ==  0))) {
+          new_size__0FND=(__UINTEGER_32)((__UINTEGER_32)(new_size__0FND + ((__MEMORY *)next__WFND)->map_size_and_id__YTB) +  8);
+          prev__I3HH=((__MEMORY *)next__WFND)->map_previous_free__0TB;
+          next__J3HH=((__MEMORY *)next__WFND)->map_next_free__ZTB;
+          if (((void *)prev__I3HH == (void *)NULL)) {
+            first_free__0BVB=next__J3HH;
+          } else {
+            ((__MEMORY *)prev__I3HH)->map_next_free__ZTB=next__J3HH;
+          };
+          if (((void *)next__J3HH != (void *)NULL)) {
+            ((__MEMORY *)next__J3HH)->map_previous_free__0TB=prev__I3HH;
+          };
+        };
+        ((__MEMORY *)new_free__VFND)->map_size_and_id__YTB=new_size__0FND;
+        if (((__UINTEGER_32)(((__MEMORY *)new_free__VFND)->map_size_and_id__YTB &  2) !=  0)) {
+          last_block[(__tmp__LGLC)] = (new_free__VFND);
+        } else {
+          next__WFND=((void *)(void *)((unsigned long)(void *)((unsigned long)((__POINTER )Self__NFED) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )(__UINTEGER_32)(Self__NFED->map_size_and_id__YTB &  4294967292LU)))));
+          ((__MEMORY *)next__WFND)->map_previous_linear__XTB=((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )new_free__VFND) - (unsigned long)begin_memory__4XH))));
+        };
+      };
+    } else {
+      result__SFED=Self__NFED;
+    };
+    result__0ELC=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__SFED)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+  };
+  return(result__0ELC);
+}
+
+static void add_last__URV(__FAST_ARRAYoSTRINGo *Self__VRV,void *element__WRV)
 // ({FAST_ARRAYoSTRINGo},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER new_capacity__XRV,__tmp__1SV,__tmp__XHEC,Self__HQVD;
+  __BOOLEAN __tmp__FSV;
+  void **__tmp__0SV,**new__DHEC;
+  new_capacity__XRV= 0;
+  if (((__INTEGER)(Self__VRV->parent_arrayed_collection__5KC.upper__CLC +  1) <= (__INTEGER)(Self__VRV->parent_arrayed_collection__5KC.capacity__JGT -  1))) {
+    Self__VRV->parent_arrayed_collection__5KC.upper__CLC=(__INTEGER)(Self__VRV->parent_arrayed_collection__5KC.upper__CLC +  1);
+    __tmp__FSV=TRUE__;
   } else {
-    __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;
+    __tmp__FSV=FALSE__;
+  };
+  if ((! __tmp__FSV)) {
+    if ((Self__VRV->parent_arrayed_collection__5KC.capacity__JGT ==  0)) {
+      Self__VRV->parent_arrayed_collection__5KC.storage__UGT=create__2DRB( 2);
+      Self__VRV->parent_arrayed_collection__5KC.capacity__JGT= 2;
+      Self__VRV->parent_arrayed_collection__5KC.upper__CLC= 0;
+    } else {
+      new_capacity__XRV=(__INTEGER)(Self__VRV->parent_arrayed_collection__5KC.capacity__JGT <<  1);
+      __tmp__0SV=Self__VRV->parent_arrayed_collection__5KC.storage__UGT;
+      __tmp__1SV=Self__VRV->parent_arrayed_collection__5KC.capacity__JGT;
+      new__DHEC=((void **)realloc_dynamic__old_size__new_size__KELC(((__POINTER )((void **)__tmp__0SV)),((__UINTEGER_32 )(__INTEGER)(__tmp__1SV * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__XRV * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__XHEC=(__INTEGER)(new_capacity__XRV -  1);
+      Self__HQVD=__tmp__1SV;
+      while ((Self__HQVD <= __tmp__XHEC)) {
+        new__DHEC[Self__HQVD]=NULL;
+        Self__HQVD=(__INTEGER)(Self__HQVD +  1);
+      };
+      Self__VRV->parent_arrayed_collection__5KC.storage__UGT=new__DHEC;
+      Self__VRV->parent_arrayed_collection__5KC.capacity__JGT=new_capacity__XRV;
+      Self__VRV->parent_arrayed_collection__5KC.upper__CLC=(__INTEGER)(Self__VRV->parent_arrayed_collection__5KC.upper__CLC +  1);
+    };
+  };
+  ((void **)Self__VRV->parent_arrayed_collection__5KC.storage__UGT)[Self__VRV->parent_arrayed_collection__5KC.upper__CLC]=element__WRV;
 }
 
-static __INTEGER prime_number_ceiling__541(__INTEGER integer__B51)
+static __INTEGER prime_number_ceiling__021(__INTEGER integer__221)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __INTEGER result__D51;
-  __BOOLEAN __tmp__L51,__tmp__Y51,result__ERCB,__tmp__FA2,result__WRCB;
-  __BOOLEAN __tmp__SA2,result__ISCB,__tmp__5A2,result__0SCB,__tmp__MB2;
-  __BOOLEAN result__MTCB,__tmp__ZB2,result__4TCB,__tmp__GC2;
-  __BOOLEAN result__QUCB,__tmp__TC2,result__CVCB,__tmp__AD2;
-  __BOOLEAN result__UVCB,__tmp__ND2,result__GWCB,__tmp__0D2;
-  __BOOLEAN result__YWCB,__tmp__HE2,result__KXCB,__tmp__UE2;
-  __BOOLEAN result__2XCB,__tmp__BF2,result__OYCB,__tmp__OF2;
-  __BOOLEAN result__AZCB,__tmp__1F2,result__SZCB,__tmp__IG2;
-  __BOOLEAN result__E0CB,__tmp__VG2,result__W0CB,__tmp__CH2;
-  __BOOLEAN result__I1CB,__tmp__PH2,result__01CB,__tmp__2H2;
-  __BOOLEAN result__M2CB,__tmp__JI2,result__42CB,__tmp__WI2;
-  __BOOLEAN result__Q3CB,__tmp__DJ2,result__C4CB,__tmp__QJ2;
-  __BOOLEAN result__U4CB;
-  result__D51= 0;
-  if ((integer__B51 <=  11)) {
-    result__D51= 11;
-    __tmp__L51=TRUE__;
+  __INTEGER result__421;
+  __BOOLEAN __tmp__G31,__tmp__T31,result__TNCB,__tmp__A41,result__FOCB;
+  __BOOLEAN __tmp__N41,result__XOCB,__tmp__041,result__JPCB,__tmp__H51;
+  __BOOLEAN result__1PCB,__tmp__U51,result__NQCB,__tmp__BA2;
+  __BOOLEAN result__5QCB,__tmp__OA2,result__RRCB,__tmp__1A2;
+  __BOOLEAN result__DSCB,__tmp__IB2,result__VSCB,__tmp__VB2;
+  __BOOLEAN result__HTCB,__tmp__CC2,result__ZTCB,__tmp__PC2;
+  __BOOLEAN result__LUCB,__tmp__2C2,result__3UCB,__tmp__JD2;
+  __BOOLEAN result__PVCB,__tmp__WD2,result__BWCB,__tmp__DE2;
+  __BOOLEAN result__TWCB,__tmp__QE2,result__FXCB,__tmp__3E2;
+  __BOOLEAN result__XXCB,__tmp__KF2,result__JYCB,__tmp__XF2;
+  __BOOLEAN result__1YCB,__tmp__EG2,result__NZCB,__tmp__RG2;
+  __BOOLEAN result__5ZCB,__tmp__4G2,result__R0CB,__tmp__LH2;
+  __BOOLEAN result__D1CB;
+  result__421= 0;
+  if ((integer__221 <=  11)) {
+    result__421= 11;
+    __tmp__G31=TRUE__;
   } else {
-    __tmp__L51=FALSE__;
+    __tmp__G31=FALSE__;
   };
-  if (__tmp__L51) {
-    __tmp__Y51=TRUE__;
+  if (__tmp__G31) {
+    __tmp__T31=TRUE__;
   } else {
-    result__ERCB=(integer__B51 <=  23);
-    if (result__ERCB) {
-      result__D51= 23;
+    result__TNCB=(integer__221 <=  23);
+    if (result__TNCB) {
+      result__421= 23;
     };
-    __tmp__Y51=result__ERCB;
+    __tmp__T31=result__TNCB;
   };
-  if (__tmp__Y51) {
-    __tmp__FA2=TRUE__;
+  if (__tmp__T31) {
+    __tmp__A41=TRUE__;
   } else {
-    result__WRCB=(integer__B51 <=  53);
-    if (result__WRCB) {
-      result__D51= 53;
+    result__FOCB=(integer__221 <=  53);
+    if (result__FOCB) {
+      result__421= 53;
     };
-    __tmp__FA2=result__WRCB;
+    __tmp__A41=result__FOCB;
   };
-  if (__tmp__FA2) {
-    __tmp__SA2=TRUE__;
+  if (__tmp__A41) {
+    __tmp__N41=TRUE__;
   } else {
-    result__ISCB=(integer__B51 <=  97);
-    if (result__ISCB) {
-      result__D51= 97;
+    result__XOCB=(integer__221 <=  97);
+    if (result__XOCB) {
+      result__421= 97;
     };
-    __tmp__SA2=result__ISCB;
+    __tmp__N41=result__XOCB;
   };
-  if (__tmp__SA2) {
-    __tmp__5A2=TRUE__;
+  if (__tmp__N41) {
+    __tmp__041=TRUE__;
   } else {
-    result__0SCB=(integer__B51 <=  193);
-    if (result__0SCB) {
-      result__D51= 193;
+    result__JPCB=(integer__221 <=  193);
+    if (result__JPCB) {
+      result__421= 193;
     };
-    __tmp__5A2=result__0SCB;
+    __tmp__041=result__JPCB;
   };
-  if (__tmp__5A2) {
-    __tmp__MB2=TRUE__;
+  if (__tmp__041) {
+    __tmp__H51=TRUE__;
   } else {
-    result__MTCB=(integer__B51 <=  389);
-    if (result__MTCB) {
-      result__D51= 389;
+    result__1PCB=(integer__221 <=  389);
+    if (result__1PCB) {
+      result__421= 389;
     };
-    __tmp__MB2=result__MTCB;
+    __tmp__H51=result__1PCB;
   };
-  if (__tmp__MB2) {
-    __tmp__ZB2=TRUE__;
+  if (__tmp__H51) {
+    __tmp__U51=TRUE__;
   } else {
-    result__4TCB=(integer__B51 <=  769);
-    if (result__4TCB) {
-      result__D51= 769;
+    result__NQCB=(integer__221 <=  769);
+    if (result__NQCB) {
+      result__421= 769;
     };
-    __tmp__ZB2=result__4TCB;
+    __tmp__U51=result__NQCB;
   };
-  if (__tmp__ZB2) {
-    __tmp__GC2=TRUE__;
+  if (__tmp__U51) {
+    __tmp__BA2=TRUE__;
   } else {
-    result__QUCB=(integer__B51 <=  1543);
-    if (result__QUCB) {
-      result__D51= 1543;
+    result__5QCB=(integer__221 <=  1543);
+    if (result__5QCB) {
+      result__421= 1543;
     };
-    __tmp__GC2=result__QUCB;
+    __tmp__BA2=result__5QCB;
   };
-  if (__tmp__GC2) {
-    __tmp__TC2=TRUE__;
+  if (__tmp__BA2) {
+    __tmp__OA2=TRUE__;
   } else {
-    result__CVCB=(integer__B51 <=  3079);
-    if (result__CVCB) {
-      result__D51= 3079;
+    result__RRCB=(integer__221 <=  3079);
+    if (result__RRCB) {
+      result__421= 3079;
     };
-    __tmp__TC2=result__CVCB;
+    __tmp__OA2=result__RRCB;
   };
-  if (__tmp__TC2) {
-    __tmp__AD2=TRUE__;
+  if (__tmp__OA2) {
+    __tmp__1A2=TRUE__;
   } else {
-    result__UVCB=(integer__B51 <=  6151);
-    if (result__UVCB) {
-      result__D51= 6151;
+    result__DSCB=(integer__221 <=  6151);
+    if (result__DSCB) {
+      result__421= 6151;
     };
-    __tmp__AD2=result__UVCB;
+    __tmp__1A2=result__DSCB;
   };
-  if (__tmp__AD2) {
-    __tmp__ND2=TRUE__;
+  if (__tmp__1A2) {
+    __tmp__IB2=TRUE__;
   } else {
-    result__GWCB=(integer__B51 <=  12289);
-    if (result__GWCB) {
-      result__D51= 12289;
+    result__VSCB=(integer__221 <=  12289);
+    if (result__VSCB) {
+      result__421= 12289;
     };
-    __tmp__ND2=result__GWCB;
+    __tmp__IB2=result__VSCB;
   };
-  if (__tmp__ND2) {
-    __tmp__0D2=TRUE__;
+  if (__tmp__IB2) {
+    __tmp__VB2=TRUE__;
   } else {
-    result__YWCB=(integer__B51 <=  24593);
-    if (result__YWCB) {
-      result__D51= 24593;
+    result__HTCB=(integer__221 <=  24593);
+    if (result__HTCB) {
+      result__421= 24593;
     };
-    __tmp__0D2=result__YWCB;
+    __tmp__VB2=result__HTCB;
   };
-  if (__tmp__0D2) {
-    __tmp__HE2=TRUE__;
+  if (__tmp__VB2) {
+    __tmp__CC2=TRUE__;
   } else {
-    result__KXCB=(integer__B51 <=  49157);
-    if (result__KXCB) {
-      result__D51= 49157;
+    result__ZTCB=(integer__221 <=  49157);
+    if (result__ZTCB) {
+      result__421= 49157;
     };
-    __tmp__HE2=result__KXCB;
+    __tmp__CC2=result__ZTCB;
   };
-  if (__tmp__HE2) {
-    __tmp__UE2=TRUE__;
+  if (__tmp__CC2) {
+    __tmp__PC2=TRUE__;
   } else {
-    result__2XCB=(integer__B51 <=  98317);
-    if (result__2XCB) {
-      result__D51= 98317;
+    result__LUCB=(integer__221 <=  98317);
+    if (result__LUCB) {
+      result__421= 98317;
     };
-    __tmp__UE2=result__2XCB;
+    __tmp__PC2=result__LUCB;
   };
-  if (__tmp__UE2) {
-    __tmp__BF2=TRUE__;
+  if (__tmp__PC2) {
+    __tmp__2C2=TRUE__;
   } else {
-    result__OYCB=(integer__B51 <=  196613);
-    if (result__OYCB) {
-      result__D51= 196613;
+    result__3UCB=(integer__221 <=  196613);
+    if (result__3UCB) {
+      result__421= 196613;
     };
-    __tmp__BF2=result__OYCB;
+    __tmp__2C2=result__3UCB;
   };
-  if (__tmp__BF2) {
-    __tmp__OF2=TRUE__;
+  if (__tmp__2C2) {
+    __tmp__JD2=TRUE__;
   } else {
-    result__AZCB=(integer__B51 <=  393241);
-    if (result__AZCB) {
-      result__D51= 393241;
+    result__PVCB=(integer__221 <=  393241);
+    if (result__PVCB) {
+      result__421= 393241;
     };
-    __tmp__OF2=result__AZCB;
+    __tmp__JD2=result__PVCB;
   };
-  if (__tmp__OF2) {
-    __tmp__1F2=TRUE__;
+  if (__tmp__JD2) {
+    __tmp__WD2=TRUE__;
   } else {
-    result__SZCB=(integer__B51 <=  786433);
-    if (result__SZCB) {
-      result__D51= 786433;
+    result__BWCB=(integer__221 <=  786433);
+    if (result__BWCB) {
+      result__421= 786433;
     };
-    __tmp__1F2=result__SZCB;
+    __tmp__WD2=result__BWCB;
   };
-  if (__tmp__1F2) {
-    __tmp__IG2=TRUE__;
+  if (__tmp__WD2) {
+    __tmp__DE2=TRUE__;
   } else {
-    result__E0CB=(integer__B51 <=  1572869);
-    if (result__E0CB) {
-      result__D51= 1572869;
+    result__TWCB=(integer__221 <=  1572869);
+    if (result__TWCB) {
+      result__421= 1572869;
     };
-    __tmp__IG2=result__E0CB;
+    __tmp__DE2=result__TWCB;
   };
-  if (__tmp__IG2) {
-    __tmp__VG2=TRUE__;
+  if (__tmp__DE2) {
+    __tmp__QE2=TRUE__;
   } else {
-    result__W0CB=(integer__B51 <=  3145739);
-    if (result__W0CB) {
-      result__D51= 3145739;
+    result__FXCB=(integer__221 <=  3145739);
+    if (result__FXCB) {
+      result__421= 3145739;
     };
-    __tmp__VG2=result__W0CB;
+    __tmp__QE2=result__FXCB;
   };
-  if (__tmp__VG2) {
-    __tmp__CH2=TRUE__;
+  if (__tmp__QE2) {
+    __tmp__3E2=TRUE__;
   } else {
-    result__I1CB=(integer__B51 <=  6291469);
-    if (result__I1CB) {
-      result__D51= 6291469;
+    result__XXCB=(integer__221 <=  6291469);
+    if (result__XXCB) {
+      result__421= 6291469;
     };
-    __tmp__CH2=result__I1CB;
+    __tmp__3E2=result__XXCB;
   };
-  if (__tmp__CH2) {
-    __tmp__PH2=TRUE__;
+  if (__tmp__3E2) {
+    __tmp__KF2=TRUE__;
   } else {
-    result__01CB=(integer__B51 <=  12582917);
-    if (result__01CB) {
-      result__D51= 12582917;
+    result__JYCB=(integer__221 <=  12582917);
+    if (result__JYCB) {
+      result__421= 12582917;
     };
-    __tmp__PH2=result__01CB;
+    __tmp__KF2=result__JYCB;
   };
-  if (__tmp__PH2) {
-    __tmp__2H2=TRUE__;
+  if (__tmp__KF2) {
+    __tmp__XF2=TRUE__;
   } else {
-    result__M2CB=(integer__B51 <=  25165843);
-    if (result__M2CB) {
-      result__D51= 25165843;
+    result__1YCB=(integer__221 <=  25165843);
+    if (result__1YCB) {
+      result__421= 25165843;
     };
-    __tmp__2H2=result__M2CB;
+    __tmp__XF2=result__1YCB;
   };
-  if (__tmp__2H2) {
-    __tmp__JI2=TRUE__;
+  if (__tmp__XF2) {
+    __tmp__EG2=TRUE__;
   } else {
-    result__42CB=(integer__B51 <=  50331653);
-    if (result__42CB) {
-      result__D51= 50331653;
+    result__NZCB=(integer__221 <=  50331653);
+    if (result__NZCB) {
+      result__421= 50331653;
     };
-    __tmp__JI2=result__42CB;
+    __tmp__EG2=result__NZCB;
   };
-  if (__tmp__JI2) {
-    __tmp__WI2=TRUE__;
+  if (__tmp__EG2) {
+    __tmp__RG2=TRUE__;
   } else {
-    result__Q3CB=(integer__B51 <=  100663319);
-    if (result__Q3CB) {
-      result__D51= 100663319;
+    result__5ZCB=(integer__221 <=  100663319);
+    if (result__5ZCB) {
+      result__421= 100663319;
     };
-    __tmp__WI2=result__Q3CB;
+    __tmp__RG2=result__5ZCB;
   };
-  if (__tmp__WI2) {
-    __tmp__DJ2=TRUE__;
+  if (__tmp__RG2) {
+    __tmp__4G2=TRUE__;
   } else {
-    result__C4CB=(integer__B51 <=  201326611);
-    if (result__C4CB) {
-      result__D51= 201326611;
+    result__R0CB=(integer__221 <=  201326611);
+    if (result__R0CB) {
+      result__421= 201326611;
     };
-    __tmp__DJ2=result__C4CB;
+    __tmp__4G2=result__R0CB;
   };
-  if (__tmp__DJ2) {
-    __tmp__QJ2=TRUE__;
+  if (__tmp__4G2) {
+    __tmp__LH2=TRUE__;
   } else {
-    result__U4CB=(integer__B51 <=  402653189);
-    if (result__U4CB) {
-      result__D51= 402653189;
+    result__D1CB=(integer__221 <=  402653189);
+    if (result__D1CB) {
+      result__421= 402653189;
     };
-    __tmp__QJ2=result__U4CB;
+    __tmp__LH2=result__D1CB;
   };
-  if ((! __tmp__QJ2)) {
-    if ((integer__B51 <=  805306457)) {
-      result__D51= 805306457;
+  if ((! __tmp__LH2)) {
+    if ((integer__221 <=  805306457)) {
+      result__421= 805306457;
     } else {
-      result__D51= 1610612741;
+      result__421= 1610612741;
     };
   };
-  return(result__D51);
+  return(result__421);
 }
 
-static void** create__BE4(__INTEGER nb_elements__DE4)
+static void** create__QA4(__INTEGER nb_elements__SA4)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__1HHH,a__0HHH,new_size__2HHH,new_size2__3HHH,a__4HHH;
+  __UINTEGER_32 new_size__5HHH;
+  __POINTER result__ZHHH,ptr_table__PWIH,next__OWIH,result__QWIH;
+  __INTEGER Self__C1JC;
+  void **Result__WWEB;
+  sz__1HHH=((__UINTEGER_32 )(__INTEGER)(nb_elements__SA4 * ((__INTEGER )(sizeof(void *)))));
+  result__ZHHH=((__POINTER )(NULL));
+  a__0HHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__2HHH=(__UINTEGER_32)((__UINTEGER_32)(sz__1HHH + a__0HHH) & (__UINTEGER_32)(~ a__0HHH));
+  new_size2__3HHH=(__UINTEGER_32)(new_size__2HHH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__3HHH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__4HHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__5HHH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__3HHH + a__4HHH) & (__UINTEGER_32)(~ a__4HHH));
+    ptr_table__PWIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__5HHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__OWIH=((__POINTER )(NULL));
+    result__QWIH=((__POINTER *)ptr_table__PWIH)[ 0];
+    if ((result__QWIH == (void *)NULL)) {
+      result__QWIH=new_lab__RTJ(new_size__5HHH);
+      next__OWIH=(void *)((unsigned long)result__QWIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5HHH)));
+      ((__POINTER *)next__OWIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__PWIH)[ 0]=next__OWIH;
+    } else {
+      next__OWIH=((__POINTER *)result__QWIH)[ 0];
+      if ((next__OWIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__QWIH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__5HHH <<  1)) <=  4096)) {
+          next__OWIH=(void *)((unsigned long)result__QWIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5HHH)));
+        } else {
+          next__OWIH=new_lab__RTJ(new_size__5HHH);
+        };
+        ((__POINTER *)next__OWIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__PWIH)[ 0]=next__OWIH;
+      } else {
+        ((__POINTER *)result__QWIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OWIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__QWIH=next__OWIH;
+      };
+    };
+    ((__POINTER *)result__QWIH)[ 0]=((__POINTER ) 3);
+    result__ZHHH=(void *)((unsigned long)result__QWIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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__5ALH == (void *)NULL)) {
-      result__5ALH=new_page__YC5();
-    };
-    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__ZHHH=(void *)((unsigned long)((__POINTER )((__MEMORY *)search__XAVB(new_size__2HHH))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__WWEB=((void **)result__ZHHH);
+  Self__C1JC=(__INTEGER)(nb_elements__SA4 -  1);
+  while ((Self__C1JC >=  0)) {
+    Result__WWEB[Self__C1JC]=NULL;
+    Self__C1JC=(__INTEGER)(Self__C1JC -  1);
   };
-  return(Result__H0EB);
+  return(Result__WWEB);
 }
 
-static void** create__5LTC(__INTEGER nb_elements__BMTC)
+static void** create__ZITC(__INTEGER nb_elements__1ITC)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__DIHH,a__CIHH,new_size__EIHH,new_size2__FIHH,a__GIHH;
+  __UINTEGER_32 new_size__HIHH;
+  __POINTER result__BIHH,ptr_table__UWIH,next__TWIH,result__VWIH;
+  __INTEGER Self__CVWD;
+  void **Result__EF3C;
+  sz__DIHH=((__UINTEGER_32 )(__INTEGER)(nb_elements__1ITC * ((__INTEGER )(sizeof(void *)))));
+  result__BIHH=((__POINTER )(NULL));
+  a__CIHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__EIHH=(__UINTEGER_32)((__UINTEGER_32)(sz__DIHH + a__CIHH) & (__UINTEGER_32)(~ a__CIHH));
+  new_size2__FIHH=(__UINTEGER_32)(new_size__EIHH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__FIHH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__GIHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__HIHH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__FIHH + a__GIHH) & (__UINTEGER_32)(~ a__GIHH));
+    ptr_table__UWIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__HIHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__TWIH=((__POINTER )(NULL));
+    result__VWIH=((__POINTER *)ptr_table__UWIH)[ 0];
+    if ((result__VWIH == (void *)NULL)) {
+      result__VWIH=new_lab__RTJ(new_size__HIHH);
+      next__TWIH=(void *)((unsigned long)result__VWIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HIHH)));
+      ((__POINTER *)next__TWIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__UWIH)[ 0]=next__TWIH;
+    } else {
+      next__TWIH=((__POINTER *)result__VWIH)[ 0];
+      if ((next__TWIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__VWIH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__HIHH <<  1)) <=  4096)) {
+          next__TWIH=(void *)((unsigned long)result__VWIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HIHH)));
+        } else {
+          next__TWIH=new_lab__RTJ(new_size__HIHH);
+        };
+        ((__POINTER *)next__TWIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__UWIH)[ 0]=next__TWIH;
+      } else {
+        ((__POINTER *)result__VWIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TWIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__VWIH=next__TWIH;
+      };
+    };
+    ((__POINTER *)result__VWIH)[ 0]=((__POINTER ) 3);
+    result__BIHH=(void *)((unsigned long)result__VWIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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__CBLH == (void *)NULL)) {
-      result__CBLH=new_page__YC5();
-    };
-    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__BIHH=(void *)((unsigned long)((__POINTER )((__MEMORY *)search__XAVB(new_size__EIHH))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__EF3C=((void **)result__BIHH);
+  Self__CVWD=(__INTEGER)(nb_elements__1ITC -  1);
+  while ((Self__CVWD >=  0)) {
+    Result__EF3C[Self__CVWD]=NULL;
+    Self__CVWD=(__INTEGER)(Self__CVWD -  1);
   };
-  return(Result__KI3C);
+  return(Result__EF3C);
 }
 
-static void** create__2GSB(__INTEGER nb_elements__4GSB)
+static void** create__JDSB(__INTEGER nb_elements__LDSB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__LIHH,a__KIHH,new_size__MIHH,new_size2__NIHH,a__OIHH;
+  __UINTEGER_32 new_size__PIHH;
+  __POINTER result__JIHH,ptr_table__ZWIH,next__YWIH,result__0WIH;
+  __INTEGER Self__KHNC;
+  void **Result__CIVB;
+  sz__LIHH=((__UINTEGER_32 )(__INTEGER)(nb_elements__LDSB * ((__INTEGER )(sizeof(void *)))));
+  result__JIHH=((__POINTER )(NULL));
+  a__KIHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__MIHH=(__UINTEGER_32)((__UINTEGER_32)(sz__LIHH + a__KIHH) & (__UINTEGER_32)(~ a__KIHH));
+  new_size2__NIHH=(__UINTEGER_32)(new_size__MIHH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__NIHH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__OIHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__PIHH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__NIHH + a__OIHH) & (__UINTEGER_32)(~ a__OIHH));
+    ptr_table__ZWIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__PIHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__YWIH=((__POINTER )(NULL));
+    result__0WIH=((__POINTER *)ptr_table__ZWIH)[ 0];
+    if ((result__0WIH == (void *)NULL)) {
+      result__0WIH=new_lab__RTJ(new_size__PIHH);
+      next__YWIH=(void *)((unsigned long)result__0WIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PIHH)));
+      ((__POINTER *)next__YWIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__ZWIH)[ 0]=next__YWIH;
+    } else {
+      next__YWIH=((__POINTER *)result__0WIH)[ 0];
+      if ((next__YWIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__0WIH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__PIHH <<  1)) <=  4096)) {
+          next__YWIH=(void *)((unsigned long)result__0WIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PIHH)));
+        } else {
+          next__YWIH=new_lab__RTJ(new_size__PIHH);
+        };
+        ((__POINTER *)next__YWIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__ZWIH)[ 0]=next__YWIH;
+      } else {
+        ((__POINTER *)result__0WIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YWIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__0WIH=next__YWIH;
+      };
+    };
+    ((__POINTER *)result__0WIH)[ 0]=((__POINTER ) 3);
+    result__JIHH=(void *)((unsigned long)result__0WIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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__FBLH == (void *)NULL)) {
-      result__FBLH=new_page__YC5();
-    };
-    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__JIHH=(void *)((unsigned long)((__POINTER )((__MEMORY *)search__XAVB(new_size__MIHH))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__CIVB=((void **)result__JIHH);
+  Self__KHNC=(__INTEGER)(nb_elements__LDSB -  1);
+  while ((Self__KHNC >=  0)) {
+    Result__CIVB[Self__KHNC]=NULL;
+    Self__KHNC=(__INTEGER)(Self__KHNC -  1);
   };
-  return(Result__VLVB);
+  return(Result__CIVB);
 }
 
-static void** create__LI4(__INTEGER nb_elements__NI4)
+static void** create__0E4(__INTEGER nb_elements__2E4)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__TIHH,a__SIHH,new_size__UIHH,new_size2__VIHH,a__WIHH;
+  __UINTEGER_32 new_size__XIHH;
+  __POINTER result__RIHH,ptr_table__4WIH,next__3WIH,result__5WIH;
+  __INTEGER Self__J2JC;
+  void **Result__X2EB;
+  sz__TIHH=((__UINTEGER_32 )(__INTEGER)(nb_elements__2E4 * ((__INTEGER )(sizeof(void *)))));
+  result__RIHH=((__POINTER )(NULL));
+  a__SIHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__UIHH=(__UINTEGER_32)((__UINTEGER_32)(sz__TIHH + a__SIHH) & (__UINTEGER_32)(~ a__SIHH));
+  new_size2__VIHH=(__UINTEGER_32)(new_size__UIHH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__VIHH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__WIHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__XIHH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__VIHH + a__WIHH) & (__UINTEGER_32)(~ a__WIHH));
+    ptr_table__4WIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__XIHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__3WIH=((__POINTER )(NULL));
+    result__5WIH=((__POINTER *)ptr_table__4WIH)[ 0];
+    if ((result__5WIH == (void *)NULL)) {
+      result__5WIH=new_lab__RTJ(new_size__XIHH);
+      next__3WIH=(void *)((unsigned long)result__5WIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XIHH)));
+      ((__POINTER *)next__3WIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__4WIH)[ 0]=next__3WIH;
+    } else {
+      next__3WIH=((__POINTER *)result__5WIH)[ 0];
+      if ((next__3WIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__5WIH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__XIHH <<  1)) <=  4096)) {
+          next__3WIH=(void *)((unsigned long)result__5WIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XIHH)));
+        } else {
+          next__3WIH=new_lab__RTJ(new_size__XIHH);
+        };
+        ((__POINTER *)next__3WIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__4WIH)[ 0]=next__3WIH;
+      } else {
+        ((__POINTER *)result__5WIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3WIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__5WIH=next__3WIH;
+      };
+    };
+    ((__POINTER *)result__5WIH)[ 0]=((__POINTER ) 3);
+    result__RIHH=(void *)((unsigned long)result__5WIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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__IBLH == (void *)NULL)) {
-      result__IBLH=new_page__YC5();
-    };
-    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__RIHH=(void *)((unsigned long)((__POINTER )((__MEMORY *)search__XAVB(new_size__UIHH))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__X2EB=((void **)result__RIHH);
+  Self__J2JC=(__INTEGER)(nb_elements__2E4 -  1);
+  while ((Self__J2JC >=  0)) {
+    Result__X2EB[Self__J2JC]=NULL;
+    Self__J2JC=(__INTEGER)(Self__J2JC -  1);
   };
-  return(Result__IAFB);
+  return(Result__X2EB);
 }
 
-static void** create__UZ2(__INTEGER nb_elements__WZ2)
+static void** create__PX2(__INTEGER nb_elements__RX2)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__1IHH,a__0IHH,new_size__2IHH,new_size2__3IHH,a__4IHH;
+  __UINTEGER_32 new_size__5IHH;
+  __POINTER result__ZIHH,ptr_table__DXIH,next__CXIH,result__EXIH;
+  __INTEGER Self__LUJC;
+  void **Result__0NDB;
+  sz__1IHH=((__UINTEGER_32 )(__INTEGER)(nb_elements__RX2 * ((__INTEGER )(sizeof(void *)))));
+  result__ZIHH=((__POINTER )(NULL));
+  a__0IHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__2IHH=(__UINTEGER_32)((__UINTEGER_32)(sz__1IHH + a__0IHH) & (__UINTEGER_32)(~ a__0IHH));
+  new_size2__3IHH=(__UINTEGER_32)(new_size__2IHH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__3IHH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__4IHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__5IHH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__3IHH + a__4IHH) & (__UINTEGER_32)(~ a__4IHH));
+    ptr_table__DXIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__5IHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__CXIH=((__POINTER )(NULL));
+    result__EXIH=((__POINTER *)ptr_table__DXIH)[ 0];
+    if ((result__EXIH == (void *)NULL)) {
+      result__EXIH=new_lab__RTJ(new_size__5IHH);
+      next__CXIH=(void *)((unsigned long)result__EXIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5IHH)));
+      ((__POINTER *)next__CXIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__DXIH)[ 0]=next__CXIH;
+    } else {
+      next__CXIH=((__POINTER *)result__EXIH)[ 0];
+      if ((next__CXIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__EXIH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__5IHH <<  1)) <=  4096)) {
+          next__CXIH=(void *)((unsigned long)result__EXIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5IHH)));
+        } else {
+          next__CXIH=new_lab__RTJ(new_size__5IHH);
+        };
+        ((__POINTER *)next__CXIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__DXIH)[ 0]=next__CXIH;
+      } else {
+        ((__POINTER *)result__EXIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CXIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__EXIH=next__CXIH;
+      };
+    };
+    ((__POINTER *)result__EXIH)[ 0]=((__POINTER ) 3);
+    result__ZIHH=(void *)((unsigned long)result__EXIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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__LBLH == (void *)NULL)) {
-      result__LBLH=new_page__YC5();
-    };
-    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__ZIHH=(void *)((unsigned long)((__POINTER )((__MEMORY *)search__XAVB(new_size__2IHH))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__0NDB=((void **)result__ZIHH);
+  Self__LUJC=(__INTEGER)(nb_elements__RX2 -  1);
+  while ((Self__LUJC >=  0)) {
+    Result__0NDB[Self__LUJC]=NULL;
+    Self__LUJC=(__INTEGER)(Self__LUJC -  1);
   };
-  return(Result__LRDB);
+  return(Result__0NDB);
 }
 
-static void** create__CLRB(__INTEGER nb_elements__ELRB)
+static void** create__PHRB(__INTEGER nb_elements__RHRB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__DJHH,a__CJHH,new_size__EJHH,new_size2__FJHH,a__GJHH;
+  __UINTEGER_32 new_size__HJHH;
+  __POINTER result__BJHH,ptr_table__IXIH,next__HXIH,result__JXIH;
+  __INTEGER Self__LBNC;
+  void **Result__ZGUB;
+  sz__DJHH=((__UINTEGER_32 )(__INTEGER)(nb_elements__RHRB * ((__INTEGER )(sizeof(void *)))));
+  result__BJHH=((__POINTER )(NULL));
+  a__CJHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__EJHH=(__UINTEGER_32)((__UINTEGER_32)(sz__DJHH + a__CJHH) & (__UINTEGER_32)(~ a__CJHH));
+  new_size2__FJHH=(__UINTEGER_32)(new_size__EJHH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__FJHH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__GJHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__HJHH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__FJHH + a__GJHH) & (__UINTEGER_32)(~ a__GJHH));
+    ptr_table__IXIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__HJHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__HXIH=((__POINTER )(NULL));
+    result__JXIH=((__POINTER *)ptr_table__IXIH)[ 0];
+    if ((result__JXIH == (void *)NULL)) {
+      result__JXIH=new_lab__RTJ(new_size__HJHH);
+      next__HXIH=(void *)((unsigned long)result__JXIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HJHH)));
+      ((__POINTER *)next__HXIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__IXIH)[ 0]=next__HXIH;
+    } else {
+      next__HXIH=((__POINTER *)result__JXIH)[ 0];
+      if ((next__HXIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__JXIH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__HJHH <<  1)) <=  4096)) {
+          next__HXIH=(void *)((unsigned long)result__JXIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HJHH)));
+        } else {
+          next__HXIH=new_lab__RTJ(new_size__HJHH);
+        };
+        ((__POINTER *)next__HXIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__IXIH)[ 0]=next__HXIH;
+      } else {
+        ((__POINTER *)result__JXIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HXIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__JXIH=next__HXIH;
+      };
+    };
+    ((__POINTER *)result__JXIH)[ 0]=((__POINTER ) 3);
+    result__BJHH=(void *)((unsigned long)result__JXIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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__OBLH == (void *)NULL)) {
-      result__OBLH=new_page__YC5();
-    };
-    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__BJHH=(void *)((unsigned long)((__POINTER )((__MEMORY *)search__XAVB(new_size__EJHH))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__ZGUB=((void **)result__BJHH);
+  Self__LBNC=(__INTEGER)(nb_elements__RHRB -  1);
+  while ((Self__LBNC >=  0)) {
+    Result__ZGUB[Self__LBNC]=NULL;
+    Self__LBNC=(__INTEGER)(Self__LBNC -  1);
   };
-  return(Result__MKUB);
+  return(Result__ZGUB);
 }
 
-static __FAST_ARRAYoITM_TYPE_MONOo* create_with_capacity__YFR(__INTEGER new_count__0FR)
+static __FAST_ARRAYoITM_TYPE_MONOo* create_with_capacity__EGR(__INTEGER new_count__GGR)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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__;
+  __POINTER ptr__CMR,ptr_table__NXIH,next__MXIH,result__OXIH;
+  __POINTER ptr_table__SXIH,next__RXIH,result__TXIH;
+  __INTEGER typ_id__HMR;
+  __UINTEGER_32 sz__EMR,a__FCFH,new_size__GCFH,t__KCFH,a__JCFH;
+  __UINTEGER_32 new_size__VXIH,lab_type__UXIH;
+  __FAST_ARRAYoITM_TYPE_MONOo *result__BMR,*Self__TJW;
+  result__BMR=NULL;
+  ptr__CMR=((__POINTER )(NULL));
+  typ_id__HMR= 0;
+  sz__EMR=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_TYPE_MONOo));
+  if ((sz__EMR ==  0)) {
+    result__BMR=FAST_ARRAYoITM_TYPE_MONOo__;
   } else {
-    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);
+    typ_id__HMR=__FAST_ARRAYoITM_TYPE_MONOo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__EMR);
+    if ((typ_id__HMR == (__INTEGER)(-  1))) {
+      a__FCFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__GCFH=(__UINTEGER_32)((__UINTEGER_32)(sz__EMR + a__FCFH) & (__UINTEGER_32)(~ a__FCFH));
+      ptr_table__NXIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__GCFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__MXIH=((__POINTER )(NULL));
+      result__OXIH=((__POINTER *)ptr_table__NXIH)[ 0];
+      if ((result__OXIH == (void *)NULL)) {
+        result__OXIH=new_lab__RTJ(new_size__GCFH);
+        next__MXIH=(void *)((unsigned long)result__OXIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GCFH)));
+        ((__POINTER *)next__MXIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__NXIH)[ 0]=next__MXIH;
+      } else {
+        next__MXIH=((__POINTER *)result__OXIH)[ 0];
+        if ((next__MXIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__OXIH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__GCFH <<  1)) <=  4096)) {
+            next__MXIH=(void *)((unsigned long)result__OXIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GCFH)));
+          } else {
+            next__MXIH=new_lab__RTJ(new_size__GCFH);
+          };
+          ((__POINTER *)next__MXIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__NXIH)[ 0]=next__MXIH;
+        } else {
+          ((__POINTER *)result__OXIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MXIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__OXIH=next__MXIH;
+        };
+      };
+      ptr__CMR=result__OXIH;
+    } else {
+      t__KCFH=((__UINTEGER_32 )typ_id__HMR);
+      a__JCFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__VXIH=(__UINTEGER_32)((__UINTEGER_32)(sz__EMR + a__JCFH) & (__UINTEGER_32)(~ a__JCFH));
+      ptr_table__SXIH=((__POINTER )(&(table_type[(t__KCFH)])));
+      lab_type__UXIH=(__UINTEGER_32)(t__KCFH |  1);
+      next__RXIH=((__POINTER )(NULL));
+      result__TXIH=((__POINTER *)ptr_table__SXIH)[ 0];
+      if ((result__TXIH == (void *)NULL)) {
+        result__TXIH=new_lab__RTJ(lab_type__UXIH);
+        next__RXIH=(void *)((unsigned long)result__TXIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VXIH)));
+        ((__POINTER *)next__RXIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__SXIH)[ 0]=next__RXIH;
+      } else {
+        next__RXIH=((__POINTER *)result__TXIH)[ 0];
+        if ((next__RXIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TXIH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__VXIH <<  1)) <=  4096)) {
+            next__RXIH=(void *)((unsigned long)result__TXIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VXIH)));
+          } else {
+            next__RXIH=new_lab__RTJ(lab_type__UXIH);
+          };
+          ((__POINTER *)next__RXIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__SXIH)[ 0]=next__RXIH;
+        } else {
+          ((__POINTER *)result__TXIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RXIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__TXIH=next__RXIH;
+        };
+      };
+      ptr__CMR=result__TXIH;
+    };
+    result__BMR=((__FAST_ARRAYoITM_TYPE_MONOo *)ptr__CMR);
+    *(result__BMR) = *(FAST_ARRAYoITM_TYPE_MONOo__);
+  };
+  Self__TJW=((__FAST_ARRAYoITM_TYPE_MONOo *)result__BMR);
+  if ((Self__TJW->parent_arrayed_collection__SYC.capacity__TNV < new_count__GGR)) {
+    Self__TJW->parent_arrayed_collection__SYC.storage__FMV=create__W5QB(new_count__GGR);
+    Self__TJW->parent_arrayed_collection__SYC.capacity__TNV=new_count__GGR;
+  };
+  Self__TJW->parent_arrayed_collection__SYC.upper__4HV=(__INTEGER)(-  1);
+  return(result__BMR);
 }
 
-static void** create__D0BB(__INTEGER nb_elements__F0BB)
+static void** create__SWBB(__INTEGER nb_elements__UWBB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__LJHH,a__KJHH,new_size__MJHH,new_size2__NJHH,a__OJHH;
+  __UINTEGER_32 new_size__PJHH;
+  __POINTER result__JJHH,ptr_table__XXIH,next__WXIH,result__YXIH;
+  __INTEGER Self__3LKC;
+  void **Result__AVIB;
+  sz__LJHH=((__UINTEGER_32 )(__INTEGER)(nb_elements__UWBB * ((__INTEGER )(sizeof(void *)))));
+  result__JJHH=((__POINTER )(NULL));
+  a__KJHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__MJHH=(__UINTEGER_32)((__UINTEGER_32)(sz__LJHH + a__KJHH) & (__UINTEGER_32)(~ a__KJHH));
+  new_size2__NJHH=(__UINTEGER_32)(new_size__MJHH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__NJHH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__OJHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__PJHH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__NJHH + a__OJHH) & (__UINTEGER_32)(~ a__OJHH));
+    ptr_table__XXIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__PJHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__WXIH=((__POINTER )(NULL));
+    result__YXIH=((__POINTER *)ptr_table__XXIH)[ 0];
+    if ((result__YXIH == (void *)NULL)) {
+      result__YXIH=new_lab__RTJ(new_size__PJHH);
+      next__WXIH=(void *)((unsigned long)result__YXIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PJHH)));
+      ((__POINTER *)next__WXIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__XXIH)[ 0]=next__WXIH;
+    } else {
+      next__WXIH=((__POINTER *)result__YXIH)[ 0];
+      if ((next__WXIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YXIH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__PJHH <<  1)) <=  4096)) {
+          next__WXIH=(void *)((unsigned long)result__YXIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PJHH)));
+        } else {
+          next__WXIH=new_lab__RTJ(new_size__PJHH);
+        };
+        ((__POINTER *)next__WXIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__XXIH)[ 0]=next__WXIH;
+      } else {
+        ((__POINTER *)result__YXIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WXIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__YXIH=next__WXIH;
+      };
+    };
+    ((__POINTER *)result__YXIH)[ 0]=((__POINTER ) 3);
+    result__JJHH=(void *)((unsigned long)result__YXIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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__RBLH == (void *)NULL)) {
-      result__RBLH=new_page__YC5();
-    };
-    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__JJHH=(void *)((unsigned long)((__POINTER )((__MEMORY *)search__XAVB(new_size__MJHH))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__AVIB=((void **)result__JJHH);
+  Self__3LKC=(__INTEGER)(nb_elements__UWBB -  1);
+  while ((Self__3LKC >=  0)) {
+    Result__AVIB[Self__3LKC]=NULL;
+    Self__3LKC=(__INTEGER)(Self__3LKC -  1);
   };
-  return(Result__RYIB);
+  return(Result__AVIB);
 }
 
-static void** create__CNXB(__INTEGER nb_elements__ENXB)
+static void** create__PJXB(__INTEGER nb_elements__RJXB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__TJHH,a__SJHH,new_size__UJHH,new_size2__VJHH,a__WJHH;
+  __UINTEGER_32 new_size__XJHH;
+  __POINTER result__RJHH,ptr_table__2XIH,next__1XIH,result__3XIH;
+  __INTEGER Self__KZOC;
+  void **Result__CV0B;
+  sz__TJHH=((__UINTEGER_32 )(__INTEGER)(nb_elements__RJXB * ((__INTEGER )(sizeof(void *)))));
+  result__RJHH=((__POINTER )(NULL));
+  a__SJHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__UJHH=(__UINTEGER_32)((__UINTEGER_32)(sz__TJHH + a__SJHH) & (__UINTEGER_32)(~ a__SJHH));
+  new_size2__VJHH=(__UINTEGER_32)(new_size__UJHH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__VJHH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__WJHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__XJHH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__VJHH + a__WJHH) & (__UINTEGER_32)(~ a__WJHH));
+    ptr_table__2XIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__XJHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__1XIH=((__POINTER )(NULL));
+    result__3XIH=((__POINTER *)ptr_table__2XIH)[ 0];
+    if ((result__3XIH == (void *)NULL)) {
+      result__3XIH=new_lab__RTJ(new_size__XJHH);
+      next__1XIH=(void *)((unsigned long)result__3XIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XJHH)));
+      ((__POINTER *)next__1XIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__2XIH)[ 0]=next__1XIH;
+    } else {
+      next__1XIH=((__POINTER *)result__3XIH)[ 0];
+      if ((next__1XIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__3XIH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__XJHH <<  1)) <=  4096)) {
+          next__1XIH=(void *)((unsigned long)result__3XIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XJHH)));
+        } else {
+          next__1XIH=new_lab__RTJ(new_size__XJHH);
+        };
+        ((__POINTER *)next__1XIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__2XIH)[ 0]=next__1XIH;
+      } else {
+        ((__POINTER *)result__3XIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1XIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__3XIH=next__1XIH;
+      };
+    };
+    ((__POINTER *)result__3XIH)[ 0]=((__POINTER ) 3);
+    result__RJHH=(void *)((unsigned long)result__3XIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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__UBLH == (void *)NULL)) {
-      result__UBLH=new_page__YC5();
-    };
-    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__RJHH=(void *)((unsigned long)((__POINTER )((__MEMORY *)search__XAVB(new_size__UJHH))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__CV0B=((void **)result__RJHH);
+  Self__KZOC=(__INTEGER)(nb_elements__RJXB -  1);
+  while ((Self__KZOC >=  0)) {
+    Result__CV0B[Self__KZOC]=NULL;
+    Self__KZOC=(__INTEGER)(Self__KZOC -  1);
   };
-  return(Result__VY0B);
+  return(Result__CV0B);
 }
 
-static void** create__3VWB(__INTEGER nb_elements__5VWB)
+static void** create__KSWB(__INTEGER nb_elements__MSWB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__1JHH,a__0JHH,new_size__2JHH,new_size2__3JHH,a__4JHH;
+  __UINTEGER_32 new_size__5JHH;
+  __POINTER result__ZJHH,ptr_table__BYIH,next__AYIH,result__CYIH;
+  __INTEGER Self__DYOC;
+  void **Result__LH0B;
+  sz__1JHH=((__UINTEGER_32 )(__INTEGER)(nb_elements__MSWB * ((__INTEGER )(sizeof(void *)))));
+  result__ZJHH=((__POINTER )(NULL));
+  a__0JHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__2JHH=(__UINTEGER_32)((__UINTEGER_32)(sz__1JHH + a__0JHH) & (__UINTEGER_32)(~ a__0JHH));
+  new_size2__3JHH=(__UINTEGER_32)(new_size__2JHH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__3JHH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__4JHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__5JHH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__3JHH + a__4JHH) & (__UINTEGER_32)(~ a__4JHH));
+    ptr_table__BYIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__5JHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__AYIH=((__POINTER )(NULL));
+    result__CYIH=((__POINTER *)ptr_table__BYIH)[ 0];
+    if ((result__CYIH == (void *)NULL)) {
+      result__CYIH=new_lab__RTJ(new_size__5JHH);
+      next__AYIH=(void *)((unsigned long)result__CYIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5JHH)));
+      ((__POINTER *)next__AYIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__BYIH)[ 0]=next__AYIH;
+    } else {
+      next__AYIH=((__POINTER *)result__CYIH)[ 0];
+      if ((next__AYIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__CYIH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__5JHH <<  1)) <=  4096)) {
+          next__AYIH=(void *)((unsigned long)result__CYIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5JHH)));
+        } else {
+          next__AYIH=new_lab__RTJ(new_size__5JHH);
+        };
+        ((__POINTER *)next__AYIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__BYIH)[ 0]=next__AYIH;
+      } else {
+        ((__POINTER *)result__CYIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__AYIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__CYIH=next__AYIH;
+      };
+    };
+    ((__POINTER *)result__CYIH)[ 0]=((__POINTER ) 3);
+    result__ZJHH=(void *)((unsigned long)result__CYIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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__XBLH == (void *)NULL)) {
-      result__XBLH=new_page__YC5();
-    };
-    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__ZJHH=(void *)((unsigned long)((__POINTER )((__MEMORY *)search__XAVB(new_size__2JHH))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__LH0B=((void **)result__ZJHH);
+  Self__DYOC=(__INTEGER)(nb_elements__MSWB -  1);
+  while ((Self__DYOC >=  0)) {
+    Result__LH0B[Self__DYOC]=NULL;
+    Self__DYOC=(__INTEGER)(Self__DYOC -  1);
   };
-  return(Result__4K0B);
+  return(Result__LH0B);
 }
 
-static void** create__2TXB(__INTEGER nb_elements__4TXB)
+static void** create__JQXB(__INTEGER nb_elements__LQXB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__DKHH,a__CKHH,new_size__EKHH,new_size2__FKHH,a__GKHH;
+  __UINTEGER_32 new_size__HKHH;
+  __POINTER result__BKHH,ptr_table__GYIH,next__FYIH,result__HYIH;
+  __INTEGER Self__R0OC;
+  void **Result__Y20B;
+  sz__DKHH=((__UINTEGER_32 )(__INTEGER)(nb_elements__LQXB * ((__INTEGER )(sizeof(void *)))));
+  result__BKHH=((__POINTER )(NULL));
+  a__CKHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__EKHH=(__UINTEGER_32)((__UINTEGER_32)(sz__DKHH + a__CKHH) & (__UINTEGER_32)(~ a__CKHH));
+  new_size2__FKHH=(__UINTEGER_32)(new_size__EKHH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__FKHH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__GKHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__HKHH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__FKHH + a__GKHH) & (__UINTEGER_32)(~ a__GKHH));
+    ptr_table__GYIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__HKHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__FYIH=((__POINTER )(NULL));
+    result__HYIH=((__POINTER *)ptr_table__GYIH)[ 0];
+    if ((result__HYIH == (void *)NULL)) {
+      result__HYIH=new_lab__RTJ(new_size__HKHH);
+      next__FYIH=(void *)((unsigned long)result__HYIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HKHH)));
+      ((__POINTER *)next__FYIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__GYIH)[ 0]=next__FYIH;
+    } else {
+      next__FYIH=((__POINTER *)result__HYIH)[ 0];
+      if ((next__FYIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HYIH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__HKHH <<  1)) <=  4096)) {
+          next__FYIH=(void *)((unsigned long)result__HYIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HKHH)));
+        } else {
+          next__FYIH=new_lab__RTJ(new_size__HKHH);
+        };
+        ((__POINTER *)next__FYIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__GYIH)[ 0]=next__FYIH;
+      } else {
+        ((__POINTER *)result__HYIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FYIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__HYIH=next__FYIH;
+      };
+    };
+    ((__POINTER *)result__HYIH)[ 0]=((__POINTER ) 3);
+    result__BKHH=(void *)((unsigned long)result__HYIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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__0BLH == (void *)NULL)) {
-      result__0BLH=new_page__YC5();
-    };
-    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__BKHH=(void *)((unsigned long)((__POINTER )((__MEMORY *)search__XAVB(new_size__EKHH))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__Y20B=((void **)result__BKHH);
+  Self__R0OC=(__INTEGER)(nb_elements__LQXB -  1);
+  while ((Self__R0OC >=  0)) {
+    Result__Y20B[Self__R0OC]=NULL;
+    Self__R0OC=(__INTEGER)(Self__R0OC -  1);
   };
-  return(Result__LA1B);
+  return(Result__Y20B);
 }
 
-static void** create__5J5(__INTEGER nb_elements__BK5)
+static void** create__OG5(__INTEGER nb_elements__QG5)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__LKHH,a__KKHH,new_size__MKHH,new_size2__NKHH,a__OKHH;
+  __UINTEGER_32 new_size__PKHH;
+  __POINTER result__JKHH,ptr_table__LYIH,next__KYIH,result__MYIH;
+  __INTEGER Self__GAKC;
+  void **Result__Y4FB;
+  sz__LKHH=((__UINTEGER_32 )(__INTEGER)(nb_elements__QG5 * ((__INTEGER )(sizeof(void *)))));
+  result__JKHH=((__POINTER )(NULL));
+  a__KKHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__MKHH=(__UINTEGER_32)((__UINTEGER_32)(sz__LKHH + a__KKHH) & (__UINTEGER_32)(~ a__KKHH));
+  new_size2__NKHH=(__UINTEGER_32)(new_size__MKHH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__NKHH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__OKHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__PKHH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__NKHH + a__OKHH) & (__UINTEGER_32)(~ a__OKHH));
+    ptr_table__LYIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__PKHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__KYIH=((__POINTER )(NULL));
+    result__MYIH=((__POINTER *)ptr_table__LYIH)[ 0];
+    if ((result__MYIH == (void *)NULL)) {
+      result__MYIH=new_lab__RTJ(new_size__PKHH);
+      next__KYIH=(void *)((unsigned long)result__MYIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PKHH)));
+      ((__POINTER *)next__KYIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__LYIH)[ 0]=next__KYIH;
+    } else {
+      next__KYIH=((__POINTER *)result__MYIH)[ 0];
+      if ((next__KYIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MYIH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__PKHH <<  1)) <=  4096)) {
+          next__KYIH=(void *)((unsigned long)result__MYIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PKHH)));
+        } else {
+          next__KYIH=new_lab__RTJ(new_size__PKHH);
+        };
+        ((__POINTER *)next__KYIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__LYIH)[ 0]=next__KYIH;
+      } else {
+        ((__POINTER *)result__MYIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KYIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__MYIH=next__KYIH;
+      };
+    };
+    ((__POINTER *)result__MYIH)[ 0]=((__POINTER ) 3);
+    result__JKHH=(void *)((unsigned long)result__MYIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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__3BLH == (void *)NULL)) {
-      result__3BLH=new_page__YC5();
-    };
-    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__JKHH=(void *)((unsigned long)((__POINTER )((__MEMORY *)search__XAVB(new_size__MKHH))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__Y4FB=((void **)result__JKHH);
+  Self__GAKC=(__INTEGER)(nb_elements__QG5 -  1);
+  while ((Self__GAKC >=  0)) {
+    Result__Y4FB[Self__GAKC]=NULL;
+    Self__GAKC=(__INTEGER)(Self__GAKC -  1);
   };
-  return(Result__JCGB);
+  return(Result__Y4FB);
 }
 
-static void fast_put__to__ORZ(__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *Self__PRZ,void *v__QRZ,void *k__RRZ)
+static void fast_put__to__JPZ(__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *Self__KPZ,void *v__LPZ,void *k__MPZ)
 // ({HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo},{ITM_TYPE_PARAMETERxITM_TYPE_SIMPLE},{NULLxSTRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __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__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__OVIH=new_lab__FTJ(lab_type__RVIH);
-            };
-            ((__POINTER *)next__OVIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__PVIH)[ 0]=next__OVIH;
-          } else {
-            ((__POINTER *)result__QVIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OVIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__QVIH=next__OVIH;
-          };
-        };
-        ptr__TGTB=result__QVIH;
-      };
-      result__SGTB=((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)ptr__TGTB);
-      *(result__SGTB) = *(HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo__);
-    };
-    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);
+  __INTEGER h__TPZ,idx__UPZ,idx__WATB,new_capacity__XATB,i__YATB;
+  __INTEGER typ_id__FDTB;
+  __POINTER ptr__ADTB,ptr_table__QYIH,next__PYIH,result__RYIH;
+  __POINTER ptr_table__VYIH,next__UYIH,result__WYIH;
+  __UINTEGER_32 sz__CDTB,a__NOFH,new_size__OOFH,t__SOFH,a__ROFH;
+  __UINTEGER_32 new_size__YYIH,lab_type__XYIH;
+  void *node__VPZ,*node1__0ATB,*node2__1ATB,*__tmp__CRZ;
+  void **old_buckets__ZATB;
+  __HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *result__5CTB;
+  __HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *Self__WWEC;
+  h__TPZ=hash_code__RNW(k__MPZ);
+  idx__UPZ=(__INTEGER)(h__TPZ % Self__KPZ->capacity__A4T);
+  node__VPZ=((void **)Self__KPZ->buckets__F4T)[idx__UPZ];
+  while ((! (((void *)node__VPZ == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node__VPZ)->key__R4T == (void *)k__MPZ)))) {
+    node__VPZ=((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node__VPZ)->next__24T;
+  };
+  if (((void *)node__VPZ == (void *)NULL)) {
+    if ((Self__KPZ->capacity__A4T == Self__KPZ->count__CGZ)) {
+      idx__WATB= 0;
+      node1__0ATB=NULL;
+      node2__1ATB=NULL;
+      old_buckets__ZATB=Self__KPZ->buckets__F4T;
+      new_capacity__XATB=prime_number_ceiling__021((__INTEGER)(Self__KPZ->capacity__A4T +  1));
+      Self__KPZ->buckets__F4T=create__OG5(new_capacity__XATB);
+      i__YATB=(__INTEGER)(Self__KPZ->capacity__A4T -  1);
+      Self__KPZ->capacity__A4T=new_capacity__XATB;
+      while ((i__YATB >=  0)) {
+        node1__0ATB=((void **)old_buckets__ZATB)[i__YATB];
+        while (((void *)node1__0ATB != (void *)NULL)) {
+          node2__1ATB=((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node1__0ATB)->next__24T;
+          idx__WATB=(__INTEGER)(hash_code__RNW(((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node1__0ATB)->key__R4T) % Self__KPZ->capacity__A4T);
+          ((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node1__0ATB)->next__24T=((void **)Self__KPZ->buckets__F4T)[idx__WATB];
+          ((void **)Self__KPZ->buckets__F4T)[idx__WATB]=node1__0ATB;
+          node1__0ATB=node2__1ATB;
+        };
+        i__YATB=(__INTEGER)(i__YATB -  1);
+      };
+      idx__UPZ=(__INTEGER)(h__TPZ % Self__KPZ->capacity__A4T);
+    };
+    __tmp__CRZ=((void **)Self__KPZ->buckets__F4T)[idx__UPZ];
+    result__5CTB=NULL;
+    ptr__ADTB=((__POINTER )(NULL));
+    typ_id__FDTB= 0;
+    sz__CDTB=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo));
+    if ((sz__CDTB ==  0)) {
+      result__5CTB=HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo__;
+    } else {
+      typ_id__FDTB=__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo__;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__CDTB);
+      if ((typ_id__FDTB == (__INTEGER)(-  1))) {
+        a__NOFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__OOFH=(__UINTEGER_32)((__UINTEGER_32)(sz__CDTB + a__NOFH) & (__UINTEGER_32)(~ a__NOFH));
+        ptr_table__QYIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__OOFH / ((__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__RTJ(new_size__OOFH);
+          next__PYIH=(void *)((unsigned long)result__RYIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OOFH)));
+          ((__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__4XH)))) &  4095) + (__UINTEGER_32)(new_size__OOFH <<  1)) <=  4096)) {
+              next__PYIH=(void *)((unsigned long)result__RYIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OOFH)));
+            } else {
+              next__PYIH=new_lab__RTJ(new_size__OOFH);
+            };
+            ((__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;
+          };
+        };
+        ptr__ADTB=result__RYIH;
+      } else {
+        t__SOFH=((__UINTEGER_32 )typ_id__FDTB);
+        a__ROFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__YYIH=(__UINTEGER_32)((__UINTEGER_32)(sz__CDTB + a__ROFH) & (__UINTEGER_32)(~ a__ROFH));
+        ptr_table__VYIH=((__POINTER )(&(table_type[(t__SOFH)])));
+        lab_type__XYIH=(__UINTEGER_32)(t__SOFH |  1);
+        next__UYIH=((__POINTER )(NULL));
+        result__WYIH=((__POINTER *)ptr_table__VYIH)[ 0];
+        if ((result__WYIH == (void *)NULL)) {
+          result__WYIH=new_lab__RTJ(lab_type__XYIH);
+          next__UYIH=(void *)((unsigned long)result__WYIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YYIH)));
+          ((__POINTER *)next__UYIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__VYIH)[ 0]=next__UYIH;
+        } else {
+          next__UYIH=((__POINTER *)result__WYIH)[ 0];
+          if ((next__UYIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__WYIH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__YYIH <<  1)) <=  4096)) {
+              next__UYIH=(void *)((unsigned long)result__WYIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YYIH)));
+            } else {
+              next__UYIH=new_lab__RTJ(lab_type__XYIH);
+            };
+            ((__POINTER *)next__UYIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__VYIH)[ 0]=next__UYIH;
+          } else {
+            ((__POINTER *)result__WYIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UYIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__WYIH=next__UYIH;
+          };
+        };
+        ptr__ADTB=result__WYIH;
+      };
+      result__5CTB=((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)ptr__ADTB);
+      *(result__5CTB) = *(HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo__);
+    };
+    Self__WWEC=((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)result__5CTB);
+    Self__WWEC->item__E5T=v__LPZ;
+    Self__WWEC->key__R4T=k__MPZ;
+    Self__WWEC->next__24T=__tmp__CRZ;
+    node__VPZ=result__5CTB;
+    ((void **)Self__KPZ->buckets__F4T)[idx__UPZ]=result__5CTB;
+    Self__KPZ->count__CGZ=(__INTEGER)(Self__KPZ->count__CGZ +  1);
   } else {
-    ((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node__0RZ)->item__Y5T=v__QRZ;
+    ((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node__VPZ)->item__E5T=v__LPZ;
   };
 }
 
-static void** create__IJYB(__INTEGER nb_elements__KJYB)
+static void** create__VFYB(__INTEGER nb_elements__XFYB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__TKHH,a__SKHH,new_size__UKHH,new_size2__VKHH,a__WKHH;
+  __UINTEGER_32 new_size__XKHH;
+  __POINTER result__RKHH,ptr_table__0YIH,next__ZYIH,result__1YIH;
+  __INTEGER Self__Y1OC;
+  void **Result__WG1B;
+  sz__TKHH=((__UINTEGER_32 )(__INTEGER)(nb_elements__XFYB * ((__INTEGER )(sizeof(void *)))));
+  result__RKHH=((__POINTER )(NULL));
+  a__SKHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__UKHH=(__UINTEGER_32)((__UINTEGER_32)(sz__TKHH + a__SKHH) & (__UINTEGER_32)(~ a__SKHH));
+  new_size2__VKHH=(__UINTEGER_32)(new_size__UKHH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__VKHH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__WKHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__XKHH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__VKHH + a__WKHH) & (__UINTEGER_32)(~ a__WKHH));
+    ptr_table__0YIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__XKHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__ZYIH=((__POINTER )(NULL));
+    result__1YIH=((__POINTER *)ptr_table__0YIH)[ 0];
+    if ((result__1YIH == (void *)NULL)) {
+      result__1YIH=new_lab__RTJ(new_size__XKHH);
+      next__ZYIH=(void *)((unsigned long)result__1YIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XKHH)));
+      ((__POINTER *)next__ZYIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__0YIH)[ 0]=next__ZYIH;
+    } else {
+      next__ZYIH=((__POINTER *)result__1YIH)[ 0];
+      if ((next__ZYIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1YIH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__XKHH <<  1)) <=  4096)) {
+          next__ZYIH=(void *)((unsigned long)result__1YIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XKHH)));
+        } else {
+          next__ZYIH=new_lab__RTJ(new_size__XKHH);
+        };
+        ((__POINTER *)next__ZYIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__0YIH)[ 0]=next__ZYIH;
+      } else {
+        ((__POINTER *)result__1YIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZYIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__1YIH=next__ZYIH;
+      };
+    };
+    ((__POINTER *)result__1YIH)[ 0]=((__POINTER ) 3);
+    result__RKHH=(void *)((unsigned long)result__1YIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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__ACLH == (void *)NULL)) {
-      result__ACLH=new_page__YC5();
-    };
-    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__RKHH=(void *)((unsigned long)((__POINTER )((__MEMORY *)search__XAVB(new_size__UKHH))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__WG1B=((void **)result__RKHH);
+  Self__Y1OC=(__INTEGER)(nb_elements__XFYB -  1);
+  while ((Self__Y1OC >=  0)) {
+    Result__WG1B[Self__Y1OC]=NULL;
+    Self__Y1OC=(__INTEGER)(Self__Y1OC -  1);
   };
-  return(Result__JK1B);
+  return(Result__WG1B);
 }
 
-static void* get__2UI(void *n__4UI)
+static void* get__IVI(void *n__KVI)
 // ({NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  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__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__3VIH=new_lab__FTJ(lab_type__AWIH);
-            };
-            ((__POINTER *)next__3VIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__4VIH)[ 0]=next__3VIH;
-          } else {
-            ((__POINTER *)result__5VIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3VIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__5VIH=next__3VIH;
-          };
-        };
-        ptr__RNL=result__5VIH;
-      };
-      result__QNL=((__ITM_TYPE_SIMPLE *)ptr__RNL);
-      *(result__QNL) = *(ITM_TYPE_SIMPLE__);
-    };
-    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__GVI);
+  void *result__SVI;
+  __ITM_TYPE_SIMPLE *result__2NL,*Self__DTU;
+  __POINTER ptr__3NL,ptr_table__5YIH,next__4YIH,result__AZIH;
+  __POINTER ptr_table__EZIH,next__DZIH,result__FZIH;
+  __INTEGER typ_id__COL;
+  __UINTEGER_32 sz__5NL,a__VCFH,new_size__WCFH,t__0CFH,a__ZCFH;
+  __UINTEGER_32 new_size__HZIH,lab_type__GZIH;
+  result__SVI=fast_reference_at__R3T(dico__XVI,n__KVI);
+  if (((void *)result__SVI == (void *)NULL)) {
+    result__2NL=NULL;
+    ptr__3NL=((__POINTER )(NULL));
+    typ_id__COL= 0;
+    sz__5NL=((__UINTEGER_32 )sizeof(__ITM_TYPE_SIMPLE));
+    if ((sz__5NL ==  0)) {
+      result__2NL=ITM_TYPE_SIMPLE__;
+    } else {
+      typ_id__COL=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__5NL);
+      if ((typ_id__COL == (__INTEGER)(-  1))) {
+        a__VCFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__WCFH=(__UINTEGER_32)((__UINTEGER_32)(sz__5NL + a__VCFH) & (__UINTEGER_32)(~ a__VCFH));
+        ptr_table__5YIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__WCFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__4YIH=((__POINTER )(NULL));
+        result__AZIH=((__POINTER *)ptr_table__5YIH)[ 0];
+        if ((result__AZIH == (void *)NULL)) {
+          result__AZIH=new_lab__RTJ(new_size__WCFH);
+          next__4YIH=(void *)((unsigned long)result__AZIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WCFH)));
+          ((__POINTER *)next__4YIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__5YIH)[ 0]=next__4YIH;
+        } else {
+          next__4YIH=((__POINTER *)result__AZIH)[ 0];
+          if ((next__4YIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__AZIH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__WCFH <<  1)) <=  4096)) {
+              next__4YIH=(void *)((unsigned long)result__AZIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WCFH)));
+            } else {
+              next__4YIH=new_lab__RTJ(new_size__WCFH);
+            };
+            ((__POINTER *)next__4YIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__5YIH)[ 0]=next__4YIH;
+          } else {
+            ((__POINTER *)result__AZIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4YIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__AZIH=next__4YIH;
+          };
+        };
+        ptr__3NL=result__AZIH;
+      } else {
+        t__0CFH=((__UINTEGER_32 )typ_id__COL);
+        a__ZCFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__HZIH=(__UINTEGER_32)((__UINTEGER_32)(sz__5NL + a__ZCFH) & (__UINTEGER_32)(~ a__ZCFH));
+        ptr_table__EZIH=((__POINTER )(&(table_type[(t__0CFH)])));
+        lab_type__GZIH=(__UINTEGER_32)(t__0CFH |  1);
+        next__DZIH=((__POINTER )(NULL));
+        result__FZIH=((__POINTER *)ptr_table__EZIH)[ 0];
+        if ((result__FZIH == (void *)NULL)) {
+          result__FZIH=new_lab__RTJ(lab_type__GZIH);
+          next__DZIH=(void *)((unsigned long)result__FZIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HZIH)));
+          ((__POINTER *)next__DZIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__EZIH)[ 0]=next__DZIH;
+        } else {
+          next__DZIH=((__POINTER *)result__FZIH)[ 0];
+          if ((next__DZIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__FZIH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__HZIH <<  1)) <=  4096)) {
+              next__DZIH=(void *)((unsigned long)result__FZIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HZIH)));
+            } else {
+              next__DZIH=new_lab__RTJ(lab_type__GZIH);
+            };
+            ((__POINTER *)next__DZIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__EZIH)[ 0]=next__DZIH;
+          } else {
+            ((__POINTER *)result__FZIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DZIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__FZIH=next__DZIH;
+          };
+        };
+        ptr__3NL=result__FZIH;
+      };
+      result__2NL=((__ITM_TYPE_SIMPLE *)ptr__3NL);
+      *(result__2NL) = *(ITM_TYPE_SIMPLE__);
+    };
+    Self__DTU=((__ITM_TYPE_SIMPLE *)result__2NL);
+    Self__DTU->name__GZP=n__KVI;
+    fast_put__to__JPZ(dico__XVI,Self__DTU,n__KVI);
+    result__SVI=result__2NL;
+  };
+  return(result__SVI);
 }
 
-static void** create__AJQB(__INTEGER nb_elements__CJQB)
+static void** create__NFQB(__INTEGER nb_elements__PFQB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__1KHH,a__0KHH,new_size__2KHH,new_size2__3KHH,a__4KHH;
+  __UINTEGER_32 new_size__5KHH;
+  __POINTER result__ZKHH,ptr_table__JZIH,next__IZIH,result__KZIH;
+  __INTEGER Self__3WMC;
+  void **Result__W4SB;
+  sz__1KHH=((__UINTEGER_32 )(__INTEGER)(nb_elements__PFQB * ((__INTEGER )(sizeof(void *)))));
+  result__ZKHH=((__POINTER )(NULL));
+  a__0KHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__2KHH=(__UINTEGER_32)((__UINTEGER_32)(sz__1KHH + a__0KHH) & (__UINTEGER_32)(~ a__0KHH));
+  new_size2__3KHH=(__UINTEGER_32)(new_size__2KHH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__3KHH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__4KHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__5KHH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__3KHH + a__4KHH) & (__UINTEGER_32)(~ a__4KHH));
+    ptr_table__JZIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__5KHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__IZIH=((__POINTER )(NULL));
+    result__KZIH=((__POINTER *)ptr_table__JZIH)[ 0];
+    if ((result__KZIH == (void *)NULL)) {
+      result__KZIH=new_lab__RTJ(new_size__5KHH);
+      next__IZIH=(void *)((unsigned long)result__KZIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5KHH)));
+      ((__POINTER *)next__IZIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__JZIH)[ 0]=next__IZIH;
+    } else {
+      next__IZIH=((__POINTER *)result__KZIH)[ 0];
+      if ((next__IZIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__KZIH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__5KHH <<  1)) <=  4096)) {
+          next__IZIH=(void *)((unsigned long)result__KZIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5KHH)));
+        } else {
+          next__IZIH=new_lab__RTJ(new_size__5KHH);
+        };
+        ((__POINTER *)next__IZIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__JZIH)[ 0]=next__IZIH;
+      } else {
+        ((__POINTER *)result__KZIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__IZIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__KZIH=next__IZIH;
+      };
+    };
+    ((__POINTER *)result__KZIH)[ 0]=((__POINTER ) 3);
+    result__ZKHH=(void *)((unsigned long)result__KZIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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__DCLH == (void *)NULL)) {
-      result__DCLH=new_page__YC5();
-    };
-    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__ZKHH=(void *)((unsigned long)((__POINTER )((__MEMORY *)search__XAVB(new_size__2KHH))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__W4SB=((void **)result__ZKHH);
+  Self__3WMC=(__INTEGER)(nb_elements__PFQB -  1);
+  while ((Self__3WMC >=  0)) {
+    Result__W4SB[Self__3WMC]=NULL;
+    Self__3WMC=(__INTEGER)(Self__3WMC -  1);
   };
-  return(Result__JCTB);
+  return(Result__W4SB);
 }
 
-static void** create__Q3PB(__INTEGER nb_elements__S3PB)
+static void** create__3ZPB(__INTEGER nb_elements__5ZPB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__DLHH,a__CLHH,new_size__ELHH,new_size2__FLHH,a__GLHH;
+  __UINTEGER_32 new_size__HLHH;
+  __POINTER result__BLHH,ptr_table__OZIH,next__NZIH,result__PZIH;
+  __INTEGER Self__WVMC;
+  void **Result__LWSB;
+  sz__DLHH=((__UINTEGER_32 )(__INTEGER)(nb_elements__5ZPB * ((__INTEGER )(sizeof(void *)))));
+  result__BLHH=((__POINTER )(NULL));
+  a__CLHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__ELHH=(__UINTEGER_32)((__UINTEGER_32)(sz__DLHH + a__CLHH) & (__UINTEGER_32)(~ a__CLHH));
+  new_size2__FLHH=(__UINTEGER_32)(new_size__ELHH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__FLHH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__GLHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__HLHH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__FLHH + a__GLHH) & (__UINTEGER_32)(~ a__GLHH));
+    ptr_table__OZIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__HLHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__NZIH=((__POINTER )(NULL));
+    result__PZIH=((__POINTER *)ptr_table__OZIH)[ 0];
+    if ((result__PZIH == (void *)NULL)) {
+      result__PZIH=new_lab__RTJ(new_size__HLHH);
+      next__NZIH=(void *)((unsigned long)result__PZIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HLHH)));
+      ((__POINTER *)next__NZIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__OZIH)[ 0]=next__NZIH;
+    } else {
+      next__NZIH=((__POINTER *)result__PZIH)[ 0];
+      if ((next__NZIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__PZIH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__HLHH <<  1)) <=  4096)) {
+          next__NZIH=(void *)((unsigned long)result__PZIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HLHH)));
+        } else {
+          next__NZIH=new_lab__RTJ(new_size__HLHH);
+        };
+        ((__POINTER *)next__NZIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__OZIH)[ 0]=next__NZIH;
+      } else {
+        ((__POINTER *)result__PZIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NZIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__PZIH=next__NZIH;
+      };
+    };
+    ((__POINTER *)result__PZIH)[ 0]=((__POINTER ) 3);
+    result__BLHH=(void *)((unsigned long)result__PZIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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__GCLH == (void *)NULL)) {
-      result__GCLH=new_page__YC5();
-    };
-    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__BLHH=(void *)((unsigned long)((__POINTER )((__MEMORY *)search__XAVB(new_size__ELHH))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__LWSB=((void **)result__BLHH);
+  Self__WVMC=(__INTEGER)(nb_elements__5ZPB -  1);
+  while ((Self__WVMC >=  0)) {
+    Result__LWSB[Self__WVMC]=NULL;
+    Self__WVMC=(__INTEGER)(Self__WVMC -  1);
   };
-  return(Result__4ZSB);
+  return(Result__LWSB);
 }
 
-static void** create__M5ZB(__INTEGER nb_elements__O5ZB)
+static void** create__Z1ZB(__INTEGER nb_elements__11ZB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__LLHH,a__KLHH,new_size__MLHH,new_size2__NLHH,a__OLHH;
+  __UINTEGER_32 new_size__PLHH;
+  __POINTER result__JLHH,ptr_table__TZIH,next__SZIH,result__UZIH;
+  __INTEGER Self__E5OC;
+  void **Result__RC2B;
+  sz__LLHH=((__UINTEGER_32 )(__INTEGER)(nb_elements__11ZB * ((__INTEGER )(sizeof(void *)))));
+  result__JLHH=((__POINTER )(NULL));
+  a__KLHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__MLHH=(__UINTEGER_32)((__UINTEGER_32)(sz__LLHH + a__KLHH) & (__UINTEGER_32)(~ a__KLHH));
+  new_size2__NLHH=(__UINTEGER_32)(new_size__MLHH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__NLHH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__OLHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__PLHH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__NLHH + a__OLHH) & (__UINTEGER_32)(~ a__OLHH));
+    ptr_table__TZIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__PLHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__SZIH=((__POINTER )(NULL));
+    result__UZIH=((__POINTER *)ptr_table__TZIH)[ 0];
+    if ((result__UZIH == (void *)NULL)) {
+      result__UZIH=new_lab__RTJ(new_size__PLHH);
+      next__SZIH=(void *)((unsigned long)result__UZIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PLHH)));
+      ((__POINTER *)next__SZIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__TZIH)[ 0]=next__SZIH;
+    } else {
+      next__SZIH=((__POINTER *)result__UZIH)[ 0];
+      if ((next__SZIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__UZIH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__PLHH <<  1)) <=  4096)) {
+          next__SZIH=(void *)((unsigned long)result__UZIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PLHH)));
+        } else {
+          next__SZIH=new_lab__RTJ(new_size__PLHH);
+        };
+        ((__POINTER *)next__SZIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__TZIH)[ 0]=next__SZIH;
+      } else {
+        ((__POINTER *)result__UZIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__SZIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__UZIH=next__SZIH;
+      };
+    };
+    ((__POINTER *)result__UZIH)[ 0]=((__POINTER ) 3);
+    result__JLHH=(void *)((unsigned long)result__UZIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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__JCLH == (void *)NULL)) {
-      result__JCLH=new_page__YC5();
-    };
-    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__JLHH=(void *)((unsigned long)((__POINTER )((__MEMORY *)search__XAVB(new_size__MLHH))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__RC2B=((void **)result__JLHH);
+  Self__E5OC=(__INTEGER)(nb_elements__11ZB -  1);
+  while ((Self__E5OC >=  0)) {
+    Result__RC2B[Self__E5OC]=NULL;
+    Self__E5OC=(__INTEGER)(Self__E5OC -  1);
   };
-  return(Result__EG2B);
+  return(Result__RC2B);
 }
 
-static __FAST_ARRAYoSTRING_CONSTANTo* create_with_capacity__ZKRC(__INTEGER new_count__1KRC)
+static __FAST_ARRAYoSTRING_CONSTANTo* create_with_capacity__THRC(__INTEGER new_count__VHRC)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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__;
+  __POINTER ptr__ZD1C,ptr_table__YZIH,next__XZIH,result__ZZIH;
+  __POINTER ptr_table__3ZIH,next__2ZIH,result__4ZIH;
+  __INTEGER typ_id__4D1C;
+  __UINTEGER_32 sz__1D1C,a__3CFH,new_size__4CFH,t__CDFH,a__BDFH;
+  __UINTEGER_32 new_size__A0IH,lab_type__5ZIH;
+  __FAST_ARRAYoSTRING_CONSTANTo *result__YD1C,*Self__DBSD;
+  result__YD1C=NULL;
+  ptr__ZD1C=((__POINTER )(NULL));
+  typ_id__4D1C= 0;
+  sz__1D1C=((__UINTEGER_32 )sizeof(__FAST_ARRAYoSTRING_CONSTANTo));
+  if ((sz__1D1C ==  0)) {
+    result__YD1C=FAST_ARRAYoSTRING_CONSTANTo__;
   } else {
-    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);
+    typ_id__4D1C=__FAST_ARRAYoSTRING_CONSTANTo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__1D1C);
+    if ((typ_id__4D1C == (__INTEGER)(-  1))) {
+      a__3CFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__4CFH=(__UINTEGER_32)((__UINTEGER_32)(sz__1D1C + a__3CFH) & (__UINTEGER_32)(~ a__3CFH));
+      ptr_table__YZIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__4CFH / ((__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__RTJ(new_size__4CFH);
+        next__XZIH=(void *)((unsigned long)result__ZZIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4CFH)));
+        ((__POINTER *)next__XZIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__YZIH)[ 0]=next__XZIH;
+      } 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__4XH)))) &  4095) + (__UINTEGER_32)(new_size__4CFH <<  1)) <=  4096)) {
+            next__XZIH=(void *)((unsigned long)result__ZZIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4CFH)));
+          } else {
+            next__XZIH=new_lab__RTJ(new_size__4CFH);
+          };
+          ((__POINTER *)next__XZIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__YZIH)[ 0]=next__XZIH;
+        } else {
+          ((__POINTER *)result__ZZIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XZIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__ZZIH=next__XZIH;
+        };
+      };
+      ptr__ZD1C=result__ZZIH;
+    } else {
+      t__CDFH=((__UINTEGER_32 )typ_id__4D1C);
+      a__BDFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__A0IH=(__UINTEGER_32)((__UINTEGER_32)(sz__1D1C + a__BDFH) & (__UINTEGER_32)(~ a__BDFH));
+      ptr_table__3ZIH=((__POINTER )(&(table_type[(t__CDFH)])));
+      lab_type__5ZIH=(__UINTEGER_32)(t__CDFH |  1);
+      next__2ZIH=((__POINTER )(NULL));
+      result__4ZIH=((__POINTER *)ptr_table__3ZIH)[ 0];
+      if ((result__4ZIH == (void *)NULL)) {
+        result__4ZIH=new_lab__RTJ(lab_type__5ZIH);
+        next__2ZIH=(void *)((unsigned long)result__4ZIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__A0IH)));
+        ((__POINTER *)next__2ZIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__3ZIH)[ 0]=next__2ZIH;
+      } else {
+        next__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__4XH)))) &  4095) + (__UINTEGER_32)(new_size__A0IH <<  1)) <=  4096)) {
+            next__2ZIH=(void *)((unsigned long)result__4ZIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__A0IH)));
+          } else {
+            next__2ZIH=new_lab__RTJ(lab_type__5ZIH);
+          };
+          ((__POINTER *)next__2ZIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__3ZIH)[ 0]=next__2ZIH;
+        } else {
+          ((__POINTER *)result__4ZIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2ZIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__4ZIH=next__2ZIH;
+        };
+      };
+      ptr__ZD1C=result__4ZIH;
+    };
+    result__YD1C=((__FAST_ARRAYoSTRING_CONSTANTo *)ptr__ZD1C);
+    *(result__YD1C) = *(FAST_ARRAYoSTRING_CONSTANTo__);
+  };
+  Self__DBSD=((__FAST_ARRAYoSTRING_CONSTANTo *)result__YD1C);
+  if ((Self__DBSD->parent_arrayed_collection__MBJ.capacity__XEPD < new_count__VHRC)) {
+    Self__DBSD->parent_arrayed_collection__MBJ.storage__SFPD=create__QMHE(new_count__VHRC);
+    Self__DBSD->parent_arrayed_collection__MBJ.capacity__XEPD=new_count__VHRC;
+  };
+  Self__DBSD->parent_arrayed_collection__MBJ.upper__2CPD=(__INTEGER)(-  1);
+  return(result__YD1C);
 }
 
-static void** create__LLUF(__INTEGER nb_elements__NLUF)
+static void** create__FNUF(__INTEGER nb_elements__HNUF)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__TLHH,a__SLHH,new_size__ULHH,new_size2__VLHH,a__WLHH;
+  __UINTEGER_32 new_size__XLHH;
+  __POINTER result__RLHH,ptr_table__C0IH,next__B0IH,result__D0IH;
+  __INTEGER Self__5JAG;
+  void **Result__P3YF;
+  sz__TLHH=((__UINTEGER_32 )(__INTEGER)(nb_elements__HNUF * ((__INTEGER )(sizeof(void *)))));
+  result__RLHH=((__POINTER )(NULL));
+  a__SLHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__ULHH=(__UINTEGER_32)((__UINTEGER_32)(sz__TLHH + a__SLHH) & (__UINTEGER_32)(~ a__SLHH));
+  new_size2__VLHH=(__UINTEGER_32)(new_size__ULHH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__VLHH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__WLHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__XLHH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__VLHH + a__WLHH) & (__UINTEGER_32)(~ a__WLHH));
+    ptr_table__C0IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__XLHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__B0IH=((__POINTER )(NULL));
+    result__D0IH=((__POINTER *)ptr_table__C0IH)[ 0];
+    if ((result__D0IH == (void *)NULL)) {
+      result__D0IH=new_lab__RTJ(new_size__XLHH);
+      next__B0IH=(void *)((unsigned long)result__D0IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XLHH)));
+      ((__POINTER *)next__B0IH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__C0IH)[ 0]=next__B0IH;
+    } else {
+      next__B0IH=((__POINTER *)result__D0IH)[ 0];
+      if ((next__B0IH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__D0IH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__XLHH <<  1)) <=  4096)) {
+          next__B0IH=(void *)((unsigned long)result__D0IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XLHH)));
+        } else {
+          next__B0IH=new_lab__RTJ(new_size__XLHH);
+        };
+        ((__POINTER *)next__B0IH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__C0IH)[ 0]=next__B0IH;
+      } else {
+        ((__POINTER *)result__D0IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__B0IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__D0IH=next__B0IH;
+      };
+    };
+    ((__POINTER *)result__D0IH)[ 0]=((__POINTER ) 3);
+    result__RLHH=(void *)((unsigned long)result__D0IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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__MCLH == (void *)NULL)) {
-      result__MCLH=new_page__YC5();
-    };
-    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__RLHH=(void *)((unsigned long)((__POINTER )((__MEMORY *)search__XAVB(new_size__ULHH))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__P3YF=((void **)result__RLHH);
+  Self__5JAG=(__INTEGER)(nb_elements__HNUF -  1);
+  while ((Self__5JAG >=  0)) {
+    Result__P3YF[Self__5JAG]=NULL;
+    Self__5JAG=(__INTEGER)(Self__5JAG -  1);
   };
-  return(Result__V1YF);
+  return(Result__P3YF);
 }
 
-static void** create__YNGF(__INTEGER nb_elements__0NGF)
+static void** create__JPGF(__INTEGER nb_elements__LPGF)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__1LHH,a__0LHH,new_size__2LHH,new_size2__3LHH,a__4LHH;
+  __UINTEGER_32 new_size__5LHH;
+  __POINTER result__ZLHH,ptr_table__H0IH,next__G0IH,result__I0IH;
+  __INTEGER Self__ECRF;
+  void **Result__CWKF;
+  sz__1LHH=((__UINTEGER_32 )(__INTEGER)(nb_elements__LPGF * ((__INTEGER )(sizeof(void *)))));
+  result__ZLHH=((__POINTER )(NULL));
+  a__0LHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__2LHH=(__UINTEGER_32)((__UINTEGER_32)(sz__1LHH + a__0LHH) & (__UINTEGER_32)(~ a__0LHH));
+  new_size2__3LHH=(__UINTEGER_32)(new_size__2LHH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__3LHH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__4LHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__5LHH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__3LHH + a__4LHH) & (__UINTEGER_32)(~ a__4LHH));
+    ptr_table__H0IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__5LHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__G0IH=((__POINTER )(NULL));
+    result__I0IH=((__POINTER *)ptr_table__H0IH)[ 0];
+    if ((result__I0IH == (void *)NULL)) {
+      result__I0IH=new_lab__RTJ(new_size__5LHH);
+      next__G0IH=(void *)((unsigned long)result__I0IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5LHH)));
+      ((__POINTER *)next__G0IH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__H0IH)[ 0]=next__G0IH;
+    } else {
+      next__G0IH=((__POINTER *)result__I0IH)[ 0];
+      if ((next__G0IH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__I0IH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__5LHH <<  1)) <=  4096)) {
+          next__G0IH=(void *)((unsigned long)result__I0IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5LHH)));
+        } else {
+          next__G0IH=new_lab__RTJ(new_size__5LHH);
+        };
+        ((__POINTER *)next__G0IH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__H0IH)[ 0]=next__G0IH;
+      } else {
+        ((__POINTER *)result__I0IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__G0IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__I0IH=next__G0IH;
+      };
+    };
+    ((__POINTER *)result__I0IH)[ 0]=((__POINTER ) 3);
+    result__ZLHH=(void *)((unsigned long)result__I0IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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__PCLH == (void *)NULL)) {
-      result__PCLH=new_page__YC5();
-    };
-    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__ZLHH=(void *)((unsigned long)((__POINTER )((__MEMORY *)search__XAVB(new_size__2LHH))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__CWKF=((void **)result__ZLHH);
+  Self__ECRF=(__INTEGER)(nb_elements__LPGF -  1);
+  while ((Self__ECRF >=  0)) {
+    Result__CWKF[Self__ECRF]=NULL;
+    Self__ECRF=(__INTEGER)(Self__ECRF -  1);
   };
-  return(Result__IUKF);
+  return(Result__CWKF);
 }
 
-static void** create__GPYF(__INTEGER nb_elements__IPYF)
+static void** create__ARYF(__INTEGER nb_elements__CRYF)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__DMHH,a__CMHH,new_size__EMHH,new_size2__FMHH,a__GMHH;
+  __UINTEGER_32 new_size__HMHH;
+  __POINTER result__BMHH,ptr_table__M0IH,next__L0IH,result__N0IH;
+  __INTEGER Self__ZNAG;
+  void **Result__GC1F;
+  sz__DMHH=((__UINTEGER_32 )(__INTEGER)(nb_elements__CRYF * ((__INTEGER )(sizeof(void *)))));
+  result__BMHH=((__POINTER )(NULL));
+  a__CMHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__EMHH=(__UINTEGER_32)((__UINTEGER_32)(sz__DMHH + a__CMHH) & (__UINTEGER_32)(~ a__CMHH));
+  new_size2__FMHH=(__UINTEGER_32)(new_size__EMHH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__FMHH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__GMHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__HMHH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__FMHH + a__GMHH) & (__UINTEGER_32)(~ a__GMHH));
+    ptr_table__M0IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__HMHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__L0IH=((__POINTER )(NULL));
+    result__N0IH=((__POINTER *)ptr_table__M0IH)[ 0];
+    if ((result__N0IH == (void *)NULL)) {
+      result__N0IH=new_lab__RTJ(new_size__HMHH);
+      next__L0IH=(void *)((unsigned long)result__N0IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HMHH)));
+      ((__POINTER *)next__L0IH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__M0IH)[ 0]=next__L0IH;
+    } else {
+      next__L0IH=((__POINTER *)result__N0IH)[ 0];
+      if ((next__L0IH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__N0IH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__HMHH <<  1)) <=  4096)) {
+          next__L0IH=(void *)((unsigned long)result__N0IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HMHH)));
+        } else {
+          next__L0IH=new_lab__RTJ(new_size__HMHH);
+        };
+        ((__POINTER *)next__L0IH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__M0IH)[ 0]=next__L0IH;
+      } else {
+        ((__POINTER *)result__N0IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__L0IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__N0IH=next__L0IH;
+      };
+    };
+    ((__POINTER *)result__N0IH)[ 0]=((__POINTER ) 3);
+    result__BMHH=(void *)((unsigned long)result__N0IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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__SCLH == (void *)NULL)) {
-      result__SCLH=new_page__YC5();
-    };
-    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__BMHH=(void *)((unsigned long)((__POINTER )((__MEMORY *)search__XAVB(new_size__EMHH))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__GC1F=((void **)result__BMHH);
+  Self__ZNAG=(__INTEGER)(nb_elements__CRYF -  1);
+  while ((Self__ZNAG >=  0)) {
+    Result__GC1F[Self__ZNAG]=NULL;
+    Self__ZNAG=(__INTEGER)(Self__ZNAG -  1);
   };
-  return(Result__MA1F);
+  return(Result__GC1F);
 }
 
-static void** create__C2IE(__INTEGER nb_elements__E2IE)
+static void** create__R2IE(__INTEGER nb_elements__T2IE)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__LLJB,a__FDFH,new_size__NLJB,new_size2__QLJB,a__JDFH;
+  __UINTEGER_32 new_size__KDFH;
+  __POINTER result__TLJB,ptr_table__R0IH,next__Q0IH,result__S0IH;
+  __INTEGER Self__IYYE;
+  void **Result__AAOE;
+  sz__LLJB=((__UINTEGER_32 )(__INTEGER)(nb_elements__T2IE * ((__INTEGER )(sizeof(void *)))));
+  result__TLJB=((__POINTER )(NULL));
+  a__FDFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__NLJB=(__UINTEGER_32)((__UINTEGER_32)(sz__LLJB + a__FDFH) & (__UINTEGER_32)(~ a__FDFH));
+  new_size2__QLJB=(__UINTEGER_32)(new_size__NLJB + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__QLJB <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__JDFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__KDFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__QLJB + a__JDFH) & (__UINTEGER_32)(~ a__JDFH));
+    ptr_table__R0IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__KDFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__Q0IH=((__POINTER )(NULL));
+    result__S0IH=((__POINTER *)ptr_table__R0IH)[ 0];
+    if ((result__S0IH == (void *)NULL)) {
+      result__S0IH=new_lab__RTJ(new_size__KDFH);
+      next__Q0IH=(void *)((unsigned long)result__S0IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KDFH)));
+      ((__POINTER *)next__Q0IH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__R0IH)[ 0]=next__Q0IH;
+    } else {
+      next__Q0IH=((__POINTER *)result__S0IH)[ 0];
+      if ((next__Q0IH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__S0IH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__KDFH <<  1)) <=  4096)) {
+          next__Q0IH=(void *)((unsigned long)result__S0IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KDFH)));
+        } else {
+          next__Q0IH=new_lab__RTJ(new_size__KDFH);
+        };
+        ((__POINTER *)next__Q0IH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__R0IH)[ 0]=next__Q0IH;
+      } else {
+        ((__POINTER *)result__S0IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__Q0IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__S0IH=next__Q0IH;
+      };
+    };
+    ((__POINTER *)result__S0IH)[ 0]=((__POINTER ) 3);
+    result__TLJB=(void *)((unsigned long)result__S0IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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__OEVB == (void *)NULL)) {
-      result__OEVB=new_page__YC5();
-    };
-    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__TLJB=(void *)((unsigned long)((__POINTER )((__MEMORY *)search__XAVB(new_size__NLJB))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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__R5NE);
-}
-
-static void* new_page__YC5()
-// () With resultNo recursive, No inlinable.
-{
-  __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__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));
+  Result__AAOE=((void **)result__TLJB);
+  Self__IYYE=(__INTEGER)(nb_elements__T2IE -  1);
+  while ((Self__IYYE >=  0)) {
+    Result__AAOE[Self__IYYE]=NULL;
+    Self__IYYE=(__INTEGER)(Self__IYYE -  1);
   };
-  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);
+  return(Result__AAOE);
 }
 
-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.
+static void* search__XAVB(__UINTEGER_32 new_size__ZAVB)
+// ({UINTEGER_32}) With resultNo recursive, No inlinable.
 {
-  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__RGOC)->map_next_free__ZTB=next__SGOC;
+  void *result__1AVB;
+  result__1AVB=first_free__0BVB;
+  while ((((void *)result__1AVB != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__1AVB)->map_size_and_id__YTB &  4294967292LU) < new_size__ZAVB))) {
+    result__1AVB=((__MEMORY *)result__1AVB)->map_next_free__ZTB;
   };
-  if (((void *)next__SGOC != (void *)NULL)) {
-    ((__MEMORY *)next__SGOC)->map_previous_free__0TB=prev__RGOC;
+  if (((void *)result__1AVB == (void *)NULL)) {
+    result__1AVB=new_page__H54();
   };
-  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__NFVB=Self__2UCC;
-    if (((__UINTEGER_32)(((__MEMORY *)new__WWFC)->map_size_and_id__YTB &  2) !=  0)) {
-      last_block[(idx__PWFC)] = (new__WWFC);
-    } else {
-      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__NWFC->map_size_and_id__YTB=(__UINTEGER_32)(siz__QWFC |  1);
+  to_busy__index__3SFC(result__1AVB,new_size__ZAVB,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__1AVB)) - (unsigned long)begin_memory__4XH)))) >>  26));
+  return(result__1AVB);
 }
 
-static void** create__IAYC(__INTEGER nb_elements__KAYC)
+static void** create__C3XC(__INTEGER nb_elements__E3XC)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__MAHH,a__LAHH,new_size__NAHH,new_size2__OAHH,a__PAHH;
+  __UINTEGER_32 new_size__QAHH;
+  __POINTER result__KAHH,ptr_table__W0IH,next__V0IH,result__X0IH;
+  __INTEGER Self__BXWD;
+  void **Result__0U5C;
+  sz__MAHH=((__UINTEGER_32 )(__INTEGER)(nb_elements__E3XC * ((__INTEGER )(sizeof(void *)))));
+  result__KAHH=((__POINTER )(NULL));
+  a__LAHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__NAHH=(__UINTEGER_32)((__UINTEGER_32)(sz__MAHH + a__LAHH) & (__UINTEGER_32)(~ a__LAHH));
+  new_size2__OAHH=(__UINTEGER_32)(new_size__NAHH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__OAHH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__PAHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__QAHH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__OAHH + a__PAHH) & (__UINTEGER_32)(~ a__PAHH));
+    ptr_table__W0IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__QAHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__V0IH=((__POINTER )(NULL));
+    result__X0IH=((__POINTER *)ptr_table__W0IH)[ 0];
+    if ((result__X0IH == (void *)NULL)) {
+      result__X0IH=new_lab__RTJ(new_size__QAHH);
+      next__V0IH=(void *)((unsigned long)result__X0IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QAHH)));
+      ((__POINTER *)next__V0IH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__W0IH)[ 0]=next__V0IH;
+    } else {
+      next__V0IH=((__POINTER *)result__X0IH)[ 0];
+      if ((next__V0IH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__X0IH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__QAHH <<  1)) <=  4096)) {
+          next__V0IH=(void *)((unsigned long)result__X0IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QAHH)));
+        } else {
+          next__V0IH=new_lab__RTJ(new_size__QAHH);
+        };
+        ((__POINTER *)next__V0IH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__W0IH)[ 0]=next__V0IH;
+      } else {
+        ((__POINTER *)result__X0IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__V0IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__X0IH=next__V0IH;
+      };
+    };
+    ((__POINTER *)result__X0IH)[ 0]=((__POINTER ) 3);
+    result__KAHH=(void *)((unsigned long)result__X0IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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__UXIH == (void *)NULL)) {
-      result__UXIH=new_page__YC5();
-    };
-    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__KAHH=(void *)((unsigned long)((__POINTER )((__MEMORY *)search__XAVB(new_size__NAHH))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__0U5C=((void **)result__KAHH);
+  Self__BXWD=(__INTEGER)(nb_elements__E3XC -  1);
+  while ((Self__BXWD >=  0)) {
+    Result__0U5C[Self__BXWD]=NULL;
+    Self__BXWD=(__INTEGER)(Self__BXWD -  1);
   };
-  return(Result__AY5C);
+  return(Result__0U5C);
 }
 
-static void** create__LFYC(__INTEGER nb_elements__NFYC)
+static void** create__FCYC(__INTEGER nb_elements__HCYC)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__UAHH,a__TAHH,new_size__VAHH,new_size2__WAHH,a__XAHH;
+  __UINTEGER_32 new_size__YAHH;
+  __POINTER result__SAHH,ptr_table__10IH,next__00IH,result__20IH;
+  __INTEGER Self__10WD;
+  void **Result__E05C;
+  sz__UAHH=((__UINTEGER_32 )(__INTEGER)(nb_elements__HCYC * ((__INTEGER )(sizeof(void *)))));
+  result__SAHH=((__POINTER )(NULL));
+  a__TAHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__VAHH=(__UINTEGER_32)((__UINTEGER_32)(sz__UAHH + a__TAHH) & (__UINTEGER_32)(~ a__TAHH));
+  new_size2__WAHH=(__UINTEGER_32)(new_size__VAHH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__WAHH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__XAHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__YAHH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__WAHH + a__XAHH) & (__UINTEGER_32)(~ a__XAHH));
+    ptr_table__10IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__YAHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__00IH=((__POINTER )(NULL));
+    result__20IH=((__POINTER *)ptr_table__10IH)[ 0];
+    if ((result__20IH == (void *)NULL)) {
+      result__20IH=new_lab__RTJ(new_size__YAHH);
+      next__00IH=(void *)((unsigned long)result__20IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YAHH)));
+      ((__POINTER *)next__00IH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__10IH)[ 0]=next__00IH;
+    } else {
+      next__00IH=((__POINTER *)result__20IH)[ 0];
+      if ((next__00IH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__20IH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__YAHH <<  1)) <=  4096)) {
+          next__00IH=(void *)((unsigned long)result__20IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YAHH)));
+        } else {
+          next__00IH=new_lab__RTJ(new_size__YAHH);
+        };
+        ((__POINTER *)next__00IH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__10IH)[ 0]=next__00IH;
+      } else {
+        ((__POINTER *)result__20IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__00IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__20IH=next__00IH;
+      };
+    };
+    ((__POINTER *)result__20IH)[ 0]=((__POINTER ) 3);
+    result__SAHH=(void *)((unsigned long)result__20IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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__2XIH == (void *)NULL)) {
-      result__2XIH=new_page__YC5();
-    };
-    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__SAHH=(void *)((unsigned long)((__POINTER )((__MEMORY *)search__XAVB(new_size__VAHH))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__E05C=((void **)result__SAHH);
+  Self__10WD=(__INTEGER)(nb_elements__HCYC -  1);
+  while ((Self__10WD >=  0)) {
+    Result__E05C[Self__10WD]=NULL;
+    Self__10WD=(__INTEGER)(Self__10WD -  1);
   };
-  return(Result__K35C);
+  return(Result__E05C);
 }
 
-static void** create__DQBD(__INTEGER nb_elements__FQBD)
+static void** create__3MBD(__INTEGER nb_elements__5MBD)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__2AHH,a__1AHH,new_size__3AHH,new_size2__4AHH,a__5AHH;
+  __UINTEGER_32 new_size__ABHH;
+  __POINTER result__0AHH,ptr_table__A1IH,next__50IH,result__B1IH;
+  __INTEGER Self__GJXD;
+  void **Result__JCGD;
+  sz__2AHH=((__UINTEGER_32 )(__INTEGER)(nb_elements__5MBD * ((__INTEGER )(sizeof(void *)))));
+  result__0AHH=((__POINTER )(NULL));
+  a__1AHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__3AHH=(__UINTEGER_32)((__UINTEGER_32)(sz__2AHH + a__1AHH) & (__UINTEGER_32)(~ a__1AHH));
+  new_size2__4AHH=(__UINTEGER_32)(new_size__3AHH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__4AHH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__5AHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__ABHH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__4AHH + a__5AHH) & (__UINTEGER_32)(~ a__5AHH));
+    ptr_table__A1IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ABHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__50IH=((__POINTER )(NULL));
+    result__B1IH=((__POINTER *)ptr_table__A1IH)[ 0];
+    if ((result__B1IH == (void *)NULL)) {
+      result__B1IH=new_lab__RTJ(new_size__ABHH);
+      next__50IH=(void *)((unsigned long)result__B1IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ABHH)));
+      ((__POINTER *)next__50IH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__A1IH)[ 0]=next__50IH;
+    } else {
+      next__50IH=((__POINTER *)result__B1IH)[ 0];
+      if ((next__50IH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__B1IH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__ABHH <<  1)) <=  4096)) {
+          next__50IH=(void *)((unsigned long)result__B1IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ABHH)));
+        } else {
+          next__50IH=new_lab__RTJ(new_size__ABHH);
+        };
+        ((__POINTER *)next__50IH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__A1IH)[ 0]=next__50IH;
+      } else {
+        ((__POINTER *)result__B1IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__50IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__B1IH=next__50IH;
+      };
+    };
+    ((__POINTER *)result__B1IH)[ 0]=((__POINTER ) 3);
+    result__0AHH=(void *)((unsigned long)result__B1IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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__EYIH == (void *)NULL)) {
-      result__EYIH=new_page__YC5();
-    };
-    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__0AHH=(void *)((unsigned long)((__POINTER )((__MEMORY *)search__XAVB(new_size__3AHH))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__JCGD=((void **)result__0AHH);
+  Self__GJXD=(__INTEGER)(nb_elements__5MBD -  1);
+  while ((Self__GJXD >=  0)) {
+    Result__JCGD[Self__GJXD]=NULL;
+    Self__GJXD=(__INTEGER)(Self__GJXD -  1);
   };
-  return(Result__EEGD);
+  return(Result__JCGD);
 }
 
-static void** create__QHFF(__INTEGER nb_elements__SHFF)
+static void** create__BJFF(__INTEGER nb_elements__DJFF)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__EBHH,a__DBHH,new_size__FBHH,new_size2__GBHH,a__HBHH;
+  __UINTEGER_32 new_size__IBHH;
+  __POINTER result__CBHH,ptr_table__F1IH,next__E1IH,result__G1IH;
+  __INTEGER Self__55QF;
+  void **Result__QZJF;
+  sz__EBHH=((__UINTEGER_32 )(__INTEGER)(nb_elements__DJFF * ((__INTEGER )(sizeof(void *)))));
+  result__CBHH=((__POINTER )(NULL));
+  a__DBHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__FBHH=(__UINTEGER_32)((__UINTEGER_32)(sz__EBHH + a__DBHH) & (__UINTEGER_32)(~ a__DBHH));
+  new_size2__GBHH=(__UINTEGER_32)(new_size__FBHH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__GBHH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__HBHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__IBHH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__GBHH + a__HBHH) & (__UINTEGER_32)(~ a__HBHH));
+    ptr_table__F1IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__IBHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__E1IH=((__POINTER )(NULL));
+    result__G1IH=((__POINTER *)ptr_table__F1IH)[ 0];
+    if ((result__G1IH == (void *)NULL)) {
+      result__G1IH=new_lab__RTJ(new_size__IBHH);
+      next__E1IH=(void *)((unsigned long)result__G1IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IBHH)));
+      ((__POINTER *)next__E1IH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__F1IH)[ 0]=next__E1IH;
+    } else {
+      next__E1IH=((__POINTER *)result__G1IH)[ 0];
+      if ((next__E1IH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__G1IH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__IBHH <<  1)) <=  4096)) {
+          next__E1IH=(void *)((unsigned long)result__G1IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IBHH)));
+        } else {
+          next__E1IH=new_lab__RTJ(new_size__IBHH);
+        };
+        ((__POINTER *)next__E1IH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__F1IH)[ 0]=next__E1IH;
+      } else {
+        ((__POINTER *)result__G1IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__E1IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__G1IH=next__E1IH;
+      };
+    };
+    ((__POINTER *)result__G1IH)[ 0]=((__POINTER ) 3);
+    result__CBHH=(void *)((unsigned long)result__G1IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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__MYIH == (void *)NULL)) {
-      result__MYIH=new_page__YC5();
-    };
-    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__CBHH=(void *)((unsigned long)((__POINTER )((__MEMORY *)search__XAVB(new_size__FBHH))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__QZJF=((void **)result__CBHH);
+  Self__55QF=(__INTEGER)(nb_elements__DJFF -  1);
+  while ((Self__55QF >=  0)) {
+    Result__QZJF[Self__55QF]=NULL;
+    Self__55QF=(__INTEGER)(Self__55QF -  1);
   };
-  return(Result__WXJF);
+  return(Result__QZJF);
 }
 
-static void** create__JK2(__INTEGER nb_elements__LK2)
+static void** create__EI2(__INTEGER nb_elements__GI2)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__MBHH,a__LBHH,new_size__NBHH,new_size2__OBHH,a__PBHH;
+  __UINTEGER_32 new_size__QBHH;
+  __POINTER result__KBHH,ptr_table__K1IH,next__J1IH,result__L1IH;
+  __INTEGER Self__ETJC;
+  void **Result__P3CB;
+  sz__MBHH=((__UINTEGER_32 )(__INTEGER)(nb_elements__GI2 * ((__INTEGER )(sizeof(void *)))));
+  result__KBHH=((__POINTER )(NULL));
+  a__LBHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__NBHH=(__UINTEGER_32)((__UINTEGER_32)(sz__MBHH + a__LBHH) & (__UINTEGER_32)(~ a__LBHH));
+  new_size2__OBHH=(__UINTEGER_32)(new_size__NBHH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__OBHH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__PBHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__QBHH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__OBHH + a__PBHH) & (__UINTEGER_32)(~ a__PBHH));
+    ptr_table__K1IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__QBHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__J1IH=((__POINTER )(NULL));
+    result__L1IH=((__POINTER *)ptr_table__K1IH)[ 0];
+    if ((result__L1IH == (void *)NULL)) {
+      result__L1IH=new_lab__RTJ(new_size__QBHH);
+      next__J1IH=(void *)((unsigned long)result__L1IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QBHH)));
+      ((__POINTER *)next__J1IH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__K1IH)[ 0]=next__J1IH;
+    } else {
+      next__J1IH=((__POINTER *)result__L1IH)[ 0];
+      if ((next__J1IH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__L1IH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__QBHH <<  1)) <=  4096)) {
+          next__J1IH=(void *)((unsigned long)result__L1IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QBHH)));
+        } else {
+          next__J1IH=new_lab__RTJ(new_size__QBHH);
+        };
+        ((__POINTER *)next__J1IH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__K1IH)[ 0]=next__J1IH;
+      } else {
+        ((__POINTER *)result__L1IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__J1IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__L1IH=next__J1IH;
+      };
+    };
+    ((__POINTER *)result__L1IH)[ 0]=((__POINTER ) 3);
+    result__KBHH=(void *)((unsigned long)result__L1IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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__UYIH == (void *)NULL)) {
-      result__UYIH=new_page__YC5();
-    };
-    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__KBHH=(void *)((unsigned long)((__POINTER )((__MEMORY *)search__XAVB(new_size__NBHH))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__P3CB=((void **)result__KBHH);
+  Self__ETJC=(__INTEGER)(nb_elements__GI2 -  1);
+  while ((Self__ETJC >=  0)) {
+    Result__P3CB[Self__ETJC]=NULL;
+    Self__ETJC=(__INTEGER)(Self__ETJC -  1);
   };
-  return(Result__ABDB);
+  return(Result__P3CB);
 }
 
-static void add__YYR(__HASHED_SEToABSTRACT_STRINGo *Self__ZYR,void *e__0YR)
+static void add__EZR(__HASHED_SEToABSTRACT_STRINGo *Self__FZR,void *e__GZR)
 // ({HASHED_SEToABSTRACT_STRINGo},{STRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __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__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__MZIH=new_lab__FTJ(lab_type__PZIH);
-            };
-            ((__POINTER *)next__MZIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__NZIH)[ 0]=next__MZIH;
-          } else {
-            ((__POINTER *)result__OZIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MZIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__OZIH=next__MZIH;
-          };
-        };
-        ptr__3YIH=result__OZIH;
-      };
-      result__2YIH=((__HASHED_SET_NODEoABSTRACT_STRINGo *)ptr__3YIH);
-      *(result__2YIH) = *(HASHED_SET_NODEoABSTRACT_STRINGo__);
-    };
-    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);
+  __INTEGER h__NZR,idx__OZR,typ_id__Q1IH;
+  __POINTER ptr__P1IH,ptr_table__01IH,next__Z1IH,result__11IH;
+  __POINTER ptr_table__51IH,next__41IH,result__A2IH;
+  __UINTEGER_32 sz__R1IH,a__S1IH,new_size__T1IH,t__U1IH,a__V1IH;
+  __UINTEGER_32 new_size__C2IH,lab_type__B2IH;
+  void *node__RZR,*n__Y1IH;
+  __HASHED_SET_NODEoABSTRACT_STRINGo *result__O1IH,*Self__W1IH;
+  has__PPW(Self__FZR,e__GZR);
+  has__PPW(Self__FZR,e__GZR);
+  h__NZR=hash_code__RNW(e__GZR);
+  idx__OZR=(__INTEGER)(h__NZR % Self__FZR->capacity__VZR);
+  node__RZR=((void **)Self__FZR->buckets__0ZR)[idx__OZR];
+  while ((! (((void *)node__RZR == (void *)NULL) || __infix_equal_equal__V2DB(((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__RZR)->item__G0R,e__GZR)))) {
+    node__RZR=((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__RZR)->next__S0R;
+  };
+  if (((void *)node__RZR == (void *)NULL)) {
+    if ((Self__FZR->capacity__VZR == Self__FZR->count__10R)) {
+      increase_capacity__XONB(Self__FZR);
+      idx__OZR=(__INTEGER)(h__NZR % Self__FZR->capacity__VZR);
+    };
+    n__Y1IH=((void **)Self__FZR->buckets__0ZR)[idx__OZR];
+    result__O1IH=NULL;
+    ptr__P1IH=((__POINTER )(NULL));
+    typ_id__Q1IH= 0;
+    sz__R1IH=((__UINTEGER_32 )sizeof(__HASHED_SET_NODEoABSTRACT_STRINGo));
+    if ((sz__R1IH ==  0)) {
+      result__O1IH=HASHED_SET_NODEoABSTRACT_STRINGo__;
+    } else {
+      typ_id__Q1IH=__HASHED_SET_NODEoABSTRACT_STRINGo__;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__R1IH);
+      if ((typ_id__Q1IH == (__INTEGER)(-  1))) {
+        a__S1IH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__T1IH=(__UINTEGER_32)((__UINTEGER_32)(sz__R1IH + a__S1IH) & (__UINTEGER_32)(~ a__S1IH));
+        ptr_table__01IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__T1IH / ((__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__RTJ(new_size__T1IH);
+          next__Z1IH=(void *)((unsigned long)result__11IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__T1IH)));
+          ((__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__4XH)))) &  4095) + (__UINTEGER_32)(new_size__T1IH <<  1)) <=  4096)) {
+              next__Z1IH=(void *)((unsigned long)result__11IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__T1IH)));
+            } else {
+              next__Z1IH=new_lab__RTJ(new_size__T1IH);
+            };
+            ((__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__P1IH=result__11IH;
+      } else {
+        t__U1IH=((__UINTEGER_32 )typ_id__Q1IH);
+        a__V1IH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__C2IH=(__UINTEGER_32)((__UINTEGER_32)(sz__R1IH + a__V1IH) & (__UINTEGER_32)(~ a__V1IH));
+        ptr_table__51IH=((__POINTER )(&(table_type[(t__U1IH)])));
+        lab_type__B2IH=(__UINTEGER_32)(t__U1IH |  1);
+        next__41IH=((__POINTER )(NULL));
+        result__A2IH=((__POINTER *)ptr_table__51IH)[ 0];
+        if ((result__A2IH == (void *)NULL)) {
+          result__A2IH=new_lab__RTJ(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__4XH)))) &  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__RTJ(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__P1IH=result__A2IH;
+      };
+      result__O1IH=((__HASHED_SET_NODEoABSTRACT_STRINGo *)ptr__P1IH);
+      *(result__O1IH) = *(HASHED_SET_NODEoABSTRACT_STRINGo__);
+    };
+    Self__W1IH=((__HASHED_SET_NODEoABSTRACT_STRINGo *)result__O1IH);
+    Self__W1IH->item__G0R=e__GZR;
+    Self__W1IH->next__S0R=n__Y1IH;
+    node__RZR=result__O1IH;
+    ((void **)Self__FZR->buckets__0ZR)[idx__OZR]=result__O1IH;
+    Self__FZR->count__10R=(__INTEGER)(Self__FZR->count__10R +  1);
   };
 }
 
@@ -11089,22 +10642,22 @@ static void* operator__name__GHB(void *op__JHB)
 {
   __INTEGER __tmp__RHB,Self__KWB;
   __CHARACTER c__LHB;
-  __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;
+  __BOOLEAN __tmp__5HB,__tmp__MIB,result__PCDB,__tmp__ZIB,result__BDDB;
+  __BOOLEAN __tmp__GJB,result__TDDB,__tmp__TJB,result__FEDB,__tmp__AKB;
+  __BOOLEAN result__XEDB,__tmp__NKB,result__JFDB,__tmp__0KB;
+  __BOOLEAN result__1FDB,__tmp__HLB,result__NGDB,__tmp__ULB;
+  __BOOLEAN result__5GDB,__tmp__BMB,result__RHDB,__tmp__OMB;
+  __BOOLEAN result__DIDB,__tmp__1MB,result__VIDB,__tmp__INB;
+  __BOOLEAN result__HJDB,__tmp__VNB,result__ZJDB,__tmp__COB;
+  __BOOLEAN result__LKDB,__tmp__POB,result__3KDB;
   c__LHB='\0';
-  copy__JDS(string_tmp__VH,(&__string_81));
+  copy__VDS(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__FRO)[(__INTEGER)(Self__KWB -  1)];
+    c__LHB=((__CHARACTER *)((__STRING_CONSTANT *)op__JHB)->storage__RRO)[(__INTEGER)(Self__KWB -  1)];
     if ((c__LHB == '+')) {
-      append__ROS(string_tmp__VH,(&__string_188));
+      append__3OS(string_tmp__VH,(&__string_188));
       __tmp__5HB=TRUE__;
     } else {
       __tmp__5HB=FALSE__;
@@ -11112,150 +10665,150 @@ static void* operator__name__GHB(void *op__JHB)
     if (__tmp__5HB) {
       __tmp__MIB=TRUE__;
     } else {
-      result__AGDB=(c__LHB == '-');
-      if (result__AGDB) {
-        append__ROS(string_tmp__VH,(&__string_189));
+      result__PCDB=(c__LHB == '-');
+      if (result__PCDB) {
+        append__3OS(string_tmp__VH,(&__string_189));
       };
-      __tmp__MIB=result__AGDB;
+      __tmp__MIB=result__PCDB;
     };
     if (__tmp__MIB) {
       __tmp__ZIB=TRUE__;
     } else {
-      result__SGDB=(c__LHB == '~');
-      if (result__SGDB) {
-        append__ROS(string_tmp__VH,(&__string_190));
+      result__BDDB=(c__LHB == '~');
+      if (result__BDDB) {
+        append__3OS(string_tmp__VH,(&__string_190));
       };
-      __tmp__ZIB=result__SGDB;
+      __tmp__ZIB=result__BDDB;
     };
     if (__tmp__ZIB) {
       __tmp__GJB=TRUE__;
     } else {
-      result__EHDB=(c__LHB == '!');
-      if (result__EHDB) {
-        append__ROS(string_tmp__VH,(&__string_191));
+      result__TDDB=(c__LHB == '!');
+      if (result__TDDB) {
+        append__3OS(string_tmp__VH,(&__string_191));
       };
-      __tmp__GJB=result__EHDB;
+      __tmp__GJB=result__TDDB;
     };
     if (__tmp__GJB) {
       __tmp__TJB=TRUE__;
     } else {
-      result__WHDB=(c__LHB == '/');
-      if (result__WHDB) {
-        append__ROS(string_tmp__VH,(&__string_192));
+      result__FEDB=(c__LHB == '/');
+      if (result__FEDB) {
+        append__3OS(string_tmp__VH,(&__string_192));
       };
-      __tmp__TJB=result__WHDB;
+      __tmp__TJB=result__FEDB;
     };
     if (__tmp__TJB) {
       __tmp__AKB=TRUE__;
     } else {
-      result__IIDB=(c__LHB == '*');
-      if (result__IIDB) {
-        append__ROS(string_tmp__VH,(&__string_193));
+      result__XEDB=(c__LHB == '*');
+      if (result__XEDB) {
+        append__3OS(string_tmp__VH,(&__string_193));
       };
-      __tmp__AKB=result__IIDB;
+      __tmp__AKB=result__XEDB;
     };
     if (__tmp__AKB) {
       __tmp__NKB=TRUE__;
     } else {
-      result__0IDB=(c__LHB == '^');
-      if (result__0IDB) {
-        append__ROS(string_tmp__VH,(&__string_194));
+      result__JFDB=(c__LHB == '^');
+      if (result__JFDB) {
+        append__3OS(string_tmp__VH,(&__string_194));
       };
-      __tmp__NKB=result__0IDB;
+      __tmp__NKB=result__JFDB;
     };
     if (__tmp__NKB) {
       __tmp__0KB=TRUE__;
     } else {
-      result__MJDB=(c__LHB == '%');
-      if (result__MJDB) {
-        append__ROS(string_tmp__VH,(&__string_195));
+      result__1FDB=(c__LHB == '%');
+      if (result__1FDB) {
+        append__3OS(string_tmp__VH,(&__string_195));
       };
-      __tmp__0KB=result__MJDB;
+      __tmp__0KB=result__1FDB;
     };
     if (__tmp__0KB) {
       __tmp__HLB=TRUE__;
     } else {
-      result__4JDB=(c__LHB == '>');
-      if (result__4JDB) {
-        append__ROS(string_tmp__VH,(&__string_196));
+      result__NGDB=(c__LHB == '>');
+      if (result__NGDB) {
+        append__3OS(string_tmp__VH,(&__string_196));
       };
-      __tmp__HLB=result__4JDB;
+      __tmp__HLB=result__NGDB;
     };
     if (__tmp__HLB) {
       __tmp__ULB=TRUE__;
     } else {
-      result__QKDB=(c__LHB == '<');
-      if (result__QKDB) {
-        append__ROS(string_tmp__VH,(&__string_197));
+      result__5GDB=(c__LHB == '<');
+      if (result__5GDB) {
+        append__3OS(string_tmp__VH,(&__string_197));
       };
-      __tmp__ULB=result__QKDB;
+      __tmp__ULB=result__5GDB;
     };
     if (__tmp__ULB) {
       __tmp__BMB=TRUE__;
     } else {
-      result__CLDB=(c__LHB == '=');
-      if (result__CLDB) {
-        append__ROS(string_tmp__VH,(&__string_198));
+      result__RHDB=(c__LHB == '=');
+      if (result__RHDB) {
+        append__3OS(string_tmp__VH,(&__string_198));
       };
-      __tmp__BMB=result__CLDB;
+      __tmp__BMB=result__RHDB;
     };
     if (__tmp__BMB) {
       __tmp__OMB=TRUE__;
     } else {
-      result__ULDB=(c__LHB == '\\');
-      if (result__ULDB) {
-        append__ROS(string_tmp__VH,(&__string_199));
+      result__DIDB=(c__LHB == '\\');
+      if (result__DIDB) {
+        append__3OS(string_tmp__VH,(&__string_199));
       };
-      __tmp__OMB=result__ULDB;
+      __tmp__OMB=result__DIDB;
     };
     if (__tmp__OMB) {
       __tmp__1MB=TRUE__;
     } else {
-      result__GMDB=(c__LHB == '|');
-      if (result__GMDB) {
-        append__ROS(string_tmp__VH,(&__string_200));
+      result__VIDB=(c__LHB == '|');
+      if (result__VIDB) {
+        append__3OS(string_tmp__VH,(&__string_200));
       };
-      __tmp__1MB=result__GMDB;
+      __tmp__1MB=result__VIDB;
     };
     if (__tmp__1MB) {
       __tmp__INB=TRUE__;
     } else {
-      result__YMDB=(c__LHB == '&');
-      if (result__YMDB) {
-        append__ROS(string_tmp__VH,(&__string_201));
+      result__HJDB=(c__LHB == '&');
+      if (result__HJDB) {
+        append__3OS(string_tmp__VH,(&__string_201));
       };
-      __tmp__INB=result__YMDB;
+      __tmp__INB=result__HJDB;
     };
     if (__tmp__INB) {
       __tmp__VNB=TRUE__;
     } else {
-      result__KNDB=(c__LHB == '$');
-      if (result__KNDB) {
-        append__ROS(string_tmp__VH,(&__string_202));
+      result__ZJDB=(c__LHB == '$');
+      if (result__ZJDB) {
+        append__3OS(string_tmp__VH,(&__string_202));
       };
-      __tmp__VNB=result__KNDB;
+      __tmp__VNB=result__ZJDB;
     };
     if (__tmp__VNB) {
       __tmp__COB=TRUE__;
     } else {
-      result__2NDB=(c__LHB == '#');
-      if (result__2NDB) {
-        append__ROS(string_tmp__VH,(&__string_203));
+      result__LKDB=(c__LHB == '#');
+      if (result__LKDB) {
+        append__3OS(string_tmp__VH,(&__string_203));
       };
-      __tmp__COB=result__2NDB;
+      __tmp__COB=result__LKDB;
     };
     if (__tmp__COB) {
       __tmp__POB=TRUE__;
     } else {
-      result__OODB=(c__LHB == '@');
-      if (result__OODB) {
-        append__ROS(string_tmp__VH,(&__string_204));
+      result__3KDB=(c__LHB == '@');
+      if (result__3KDB) {
+        append__3OS(string_tmp__VH,(&__string_204));
       };
-      __tmp__POB=result__OODB;
+      __tmp__POB=result__3KDB;
     };
     if ((! __tmp__POB)) {
       if ((c__LHB == '?')) {
-        append__ROS(string_tmp__VH,(&__string_205));
+        append__3OS(string_tmp__VH,(&__string_205));
       };
     };
     Self__KWB=(__INTEGER)(Self__KWB +  1);
@@ -11263,1422 +10816,1563 @@ static void* operator__name__GHB(void *op__JHB)
   return(get__YWB(string_tmp__VH));
 }
 
-static void print__DJD(__STRING_CONSTANT *Self__EJD)
+static void print__OJD(__STRING_CONSTANT *Self__PJD)
 // ({STRING_CONSTANT}) VoidRecursive, No inlinable.
 {
-  put_string__DJF(Self__EJD);
+  put_string__AKF(Self__PJD);
 }
 
 static void* get__YWB(void *str__0WB)
 // ({NULLxSTRING}) With resultNo recursive, No inlinable.
 {
   void *result__2WB,*__tmp__0XB;
-  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;
+  void *result__LMS;
+  __STRING_CONSTANT *result__ZMD,*result__AJF,*Self__LFT;
+  __POINTER ptr__0MD,ptr_table__E2IH,next__D2IH,result__F2IH;
+  __POINTER ptr_table__J2IH,next__I2IH,result__K2IH,ptr__2CJB;
+  __POINTER ptr_table__O2IH,next__N2IH,result__P2IH,ptr_table__T2IH;
+  __POINTER next__S2IH,result__U2IH;
+  __INTEGER typ_id__5MD,c__NFT,Self__J2LH,h__M4S,idx__N4S,typ_id__BDJB;
+  __UINTEGER_32 sz__2MD,a__AEFH,new_size__BEFH,t__FEFH,a__EEFH;
+  __UINTEGER_32 new_size__M2IH,lab_type__L2IH,sz__4CJB,a__1OFH;
+  __UINTEGER_32 new_size__2OFH,t__APFH,a__5OFH,new_size__W2IH;
+  __UINTEGER_32 lab_type__V2IH;
+  __HASHED_SEToABSTRACT_STRINGo *Self__YLS,*Self__E4S;
+  void *node__KMS,*node__O4S,*n__4GCB;
+  __CHARACTER *Self__K2LH,*model__L2LH;
+  __HASHED_SET_NODEoABSTRACT_STRINGo *result__1CJB,*Self__V5CC;
   result__2WB=NULL;
-  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__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__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)));
+  Self__YLS=((__HASHED_SEToABSTRACT_STRINGo *)list__FK);
+  result__LMS=NULL;
+  node__KMS=((void **)Self__YLS->buckets__0ZR)[(__INTEGER)(hash_code__UFX(str__0WB) % Self__YLS->capacity__VZR)];
+  while ((! (((void *)node__KMS == (void *)NULL) || __infix_equal_equal__V2DB(((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__KMS)->item__G0R,str__0WB)))) {
+    node__KMS=((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__KMS)->next__S0R;
+  };
+  if (((void *)node__KMS != (void *)NULL)) {
+    result__LMS=((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__KMS)->item__G0R;
+  };
+  if (((void *)result__LMS == (void *)NULL)) {
+    result__ZMD=NULL;
+    ptr__0MD=((__POINTER )(NULL));
+    typ_id__5MD= 0;
+    sz__2MD=((__UINTEGER_32 )sizeof(__STRING_CONSTANT));
+    if ((sz__2MD ==  0)) {
+      result__ZMD=STRING_CONSTANT__;
+    } else {
+      typ_id__5MD=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__2MD);
+      if ((typ_id__5MD == (__INTEGER)(-  1))) {
+        a__AEFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__BEFH=(__UINTEGER_32)((__UINTEGER_32)(sz__2MD + a__AEFH) & (__UINTEGER_32)(~ a__AEFH));
+        ptr_table__E2IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__BEFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__D2IH=((__POINTER )(NULL));
+        result__F2IH=((__POINTER *)ptr_table__E2IH)[ 0];
+        if ((result__F2IH == (void *)NULL)) {
+          result__F2IH=new_lab__RTJ(new_size__BEFH);
+          next__D2IH=(void *)((unsigned long)result__F2IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BEFH)));
+          ((__POINTER *)next__D2IH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__E2IH)[ 0]=next__D2IH;
+        } else {
+          next__D2IH=((__POINTER *)result__F2IH)[ 0];
+          if ((next__D2IH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__F2IH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__BEFH <<  1)) <=  4096)) {
+              next__D2IH=(void *)((unsigned long)result__F2IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BEFH)));
+            } else {
+              next__D2IH=new_lab__RTJ(new_size__BEFH);
+            };
+            ((__POINTER *)next__D2IH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__E2IH)[ 0]=next__D2IH;
+          } else {
+            ((__POINTER *)result__F2IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__D2IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__F2IH=next__D2IH;
+          };
+        };
+        ptr__0MD=result__F2IH;
+      } else {
+        t__FEFH=((__UINTEGER_32 )typ_id__5MD);
+        a__EEFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__M2IH=(__UINTEGER_32)((__UINTEGER_32)(sz__2MD + a__EEFH) & (__UINTEGER_32)(~ a__EEFH));
+        ptr_table__J2IH=((__POINTER )(&(table_type[(t__FEFH)])));
+        lab_type__L2IH=(__UINTEGER_32)(t__FEFH |  1);
+        next__I2IH=((__POINTER )(NULL));
+        result__K2IH=((__POINTER *)ptr_table__J2IH)[ 0];
+        if ((result__K2IH == (void *)NULL)) {
+          result__K2IH=new_lab__RTJ(lab_type__L2IH);
+          next__I2IH=(void *)((unsigned long)result__K2IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__M2IH)));
+          ((__POINTER *)next__I2IH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__J2IH)[ 0]=next__I2IH;
+        } else {
+          next__I2IH=((__POINTER *)result__K2IH)[ 0];
+          if ((next__I2IH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__K2IH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__M2IH <<  1)) <=  4096)) {
+              next__I2IH=(void *)((unsigned long)result__K2IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__M2IH)));
+            } else {
+              next__I2IH=new_lab__RTJ(lab_type__L2IH);
+            };
+            ((__POINTER *)next__I2IH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__J2IH)[ 0]=next__I2IH;
+          } else {
+            ((__POINTER *)result__K2IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__I2IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__K2IH=next__I2IH;
+          };
+        };
+        ptr__0MD=result__K2IH;
+      };
+      result__ZMD=((__STRING_CONSTANT *)ptr__0MD);
+      *(result__ZMD) = *(STRING_CONSTANT__);
+    };
+    result__AJF=result__ZMD;
+    Self__LFT=((__STRING_CONSTANT *)result__ZMD);
+    c__NFT=((__STRING *)str__0WB)->count__SGC;
+    if ((c__NFT !=  0)) {
+      Self__LFT->storage__RRO=create__YIEB((__INTEGER)(c__NFT +  1));
+      Self__K2LH=((__CHARACTER *)Self__LFT->storage__RRO);
+      model__L2LH=((__STRING *)str__0WB)->storage__3CS;
+      Self__J2LH=(__INTEGER)(c__NFT -  1);
+      while ((Self__J2LH >=  0)) {
+        Self__K2LH[Self__J2LH]=((__CHARACTER *)model__L2LH)[Self__J2LH];
+        Self__J2LH=(__INTEGER)(Self__J2LH -  1);
+      };
+      ((__CHARACTER *)Self__LFT->storage__RRO)[c__NFT]='\0';
+      Self__LFT->count__DD=c__NFT;
+    };
+    result__2WB=result__ZMD;
+    Self__E4S=((__HASHED_SEToABSTRACT_STRINGo *)list__FK);
+    fast_has__CAY(Self__E4S,result__ZMD);
+    fast_has__CAY(Self__E4S,result__ZMD);
+    h__M4S=hash_code__RNW(result__ZMD);
+    idx__N4S=(__INTEGER)(h__M4S % Self__E4S->capacity__VZR);
+    node__O4S=((void **)Self__E4S->buckets__0ZR)[idx__N4S];
+    while ((! (((void *)node__O4S == (void *)NULL) || ((void *)((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__O4S)->item__G0R == (void *)result__AJF)))) {
+      node__O4S=((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__O4S)->next__S0R;
+    };
+    if (((void *)node__O4S == (void *)NULL)) {
+      if ((Self__E4S->capacity__VZR == Self__E4S->count__10R)) {
+        increase_capacity__XONB(Self__E4S);
+        idx__N4S=(__INTEGER)(h__M4S % Self__E4S->capacity__VZR);
+      };
+      n__4GCB=((void **)Self__E4S->buckets__0ZR)[idx__N4S];
+      result__1CJB=NULL;
+      ptr__2CJB=((__POINTER )(NULL));
+      typ_id__BDJB= 0;
+      sz__4CJB=((__UINTEGER_32 )sizeof(__HASHED_SET_NODEoABSTRACT_STRINGo));
+      if ((sz__4CJB ==  0)) {
+        result__1CJB=HASHED_SET_NODEoABSTRACT_STRINGo__;
+      } else {
+        typ_id__BDJB=__HASHED_SET_NODEoABSTRACT_STRINGo__;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__4CJB);
+        if ((typ_id__BDJB == (__INTEGER)(-  1))) {
+          a__1OFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__2OFH=(__UINTEGER_32)((__UINTEGER_32)(sz__4CJB + a__1OFH) & (__UINTEGER_32)(~ a__1OFH));
+          ptr_table__O2IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__2OFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__N2IH=((__POINTER )(NULL));
+          result__P2IH=((__POINTER *)ptr_table__O2IH)[ 0];
+          if ((result__P2IH == (void *)NULL)) {
+            result__P2IH=new_lab__RTJ(new_size__2OFH);
+            next__N2IH=(void *)((unsigned long)result__P2IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2OFH)));
+            ((__POINTER *)next__N2IH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__O2IH)[ 0]=next__N2IH;
+          } else {
+            next__N2IH=((__POINTER *)result__P2IH)[ 0];
+            if ((next__N2IH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__P2IH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__2OFH <<  1)) <=  4096)) {
+                next__N2IH=(void *)((unsigned long)result__P2IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2OFH)));
               } else {
-                next__A0IH=new_lab__FTJ(new_size__WBGH);
-              };
-              ((__POINTER *)next__A0IH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__B0IH)[ 0]=next__A0IH;
-            } else {
-              ((__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)));
+                next__N2IH=new_lab__RTJ(new_size__2OFH);
+              };
+              ((__POINTER *)next__N2IH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__O2IH)[ 0]=next__N2IH;
+            } else {
+              ((__POINTER *)result__P2IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__N2IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__P2IH=next__N2IH;
+            };
+          };
+          ptr__2CJB=result__P2IH;
+        } else {
+          t__APFH=((__UINTEGER_32 )typ_id__BDJB);
+          a__5OFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__W2IH=(__UINTEGER_32)((__UINTEGER_32)(sz__4CJB + a__5OFH) & (__UINTEGER_32)(~ a__5OFH));
+          ptr_table__T2IH=((__POINTER )(&(table_type[(t__APFH)])));
+          lab_type__V2IH=(__UINTEGER_32)(t__APFH |  1);
+          next__S2IH=((__POINTER )(NULL));
+          result__U2IH=((__POINTER *)ptr_table__T2IH)[ 0];
+          if ((result__U2IH == (void *)NULL)) {
+            result__U2IH=new_lab__RTJ(lab_type__V2IH);
+            next__S2IH=(void *)((unsigned long)result__U2IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__W2IH)));
+            ((__POINTER *)next__S2IH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__T2IH)[ 0]=next__S2IH;
+          } else {
+            next__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__4XH)))) &  4095) + (__UINTEGER_32)(new_size__W2IH <<  1)) <=  4096)) {
+                next__S2IH=(void *)((unsigned long)result__U2IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__W2IH)));
               } else {
-                next__F0IH=new_lab__FTJ(lab_type__I0IH);
+                next__S2IH=new_lab__RTJ(lab_type__V2IH);
               };
-              ((__POINTER *)next__F0IH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__G0IH)[ 0]=next__F0IH;
+              ((__POINTER *)next__S2IH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__T2IH)[ 0]=next__S2IH;
             } else {
-              ((__POINTER *)result__H0IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__F0IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__H0IH=next__F0IH;
+              ((__POINTER *)result__U2IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__S2IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__U2IH=next__S2IH;
             };
           };
-          ptr__NGJB=result__H0IH;
+          ptr__2CJB=result__U2IH;
         };
-        result__MGJB=((__HASHED_SET_NODEoABSTRACT_STRINGo *)ptr__NGJB);
-        *(result__MGJB) = *(HASHED_SET_NODEoABSTRACT_STRINGo__);
+        result__1CJB=((__HASHED_SET_NODEoABSTRACT_STRINGo *)ptr__2CJB);
+        *(result__1CJB) = *(HASHED_SET_NODEoABSTRACT_STRINGo__);
       };
-      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);
+      Self__V5CC=((__HASHED_SET_NODEoABSTRACT_STRINGo *)result__1CJB);
+      Self__V5CC->item__G0R=result__ZMD;
+      Self__V5CC->next__S0R=n__4GCB;
+      node__O4S=result__1CJB;
+      ((void **)Self__E4S->buckets__0ZR)[idx__N4S]=result__1CJB;
+      Self__E4S->count__10R=(__INTEGER)(Self__E4S->count__10R +  1);
     };
   } else {
-    if (result__5LS==NULL) {
+    if (result__LMS==NULL) {
       __tmp__0XB=NULL;
     } else {
-      __tmp__0XB=((void *)result__5LS);
+      __tmp__0XB=((void *)result__LMS);
     };
     result__2WB=__tmp__0XB;
   };
   return(result__2WB);
 }
 
-static void copy__JDS(__STRING *Self__KDS,void *other__LDS)
+static void copy__VDS(__STRING *Self__WDS,void *other__XDS)
 // ({STRING},{NULLxSTRING_CONSTANTxSTRING}) VoidNo recursive, No inlinable.
 {
-  __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;
+  __INTEGER __tmp__YDS,Self__O2LH;
+  __CHARACTER *__tmp__NES,*__tmp__PES,*Self__P2LH,*model__Q2LH;
+  if (((struct ___OBJ *)other__XDS)->__id==__STRING_CONSTANT__) {
+    __tmp__YDS=((__STRING_CONSTANT *)other__XDS)->count__DD;
   } else {
-    __tmp__MDS=((__STRING *)other__LDS)->count__EGC;
+    __tmp__YDS=((__STRING *)other__XDS)->count__SGC;
   };
-  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;
+  Self__WDS->count__SGC=__tmp__YDS;
+  if ((__tmp__YDS >  0)) {
+    if ((Self__WDS->capacity__UCS < __tmp__YDS)) {
+      Self__WDS->storage__3CS=create__YIEB(__tmp__YDS);
+      Self__WDS->capacity__UCS=Self__WDS->count__SGC;
     };
-    __tmp__BES=Self__KDS->storage__RCS;
-    if (((struct ___OBJ *)other__LDS)->__id==__STRING_CONSTANT__) {
-      __tmp__DES=((__STRING_CONSTANT *)other__LDS)->storage__FRO;
+    __tmp__NES=Self__WDS->storage__3CS;
+    if (((struct ___OBJ *)other__XDS)->__id==__STRING_CONSTANT__) {
+      __tmp__PES=((__STRING_CONSTANT *)other__XDS)->storage__RRO;
     } else {
-      __tmp__DES=((__STRING *)other__LDS)->storage__RCS;
+      __tmp__PES=((__STRING *)other__XDS)->storage__3CS;
     };
-    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);
+    Self__P2LH=((__CHARACTER *)__tmp__NES);
+    model__Q2LH=__tmp__PES;
+    Self__O2LH=(__INTEGER)(Self__WDS->count__SGC -  1);
+    while ((Self__O2LH >=  0)) {
+      Self__P2LH[Self__O2LH]=((__CHARACTER *)model__Q2LH)[Self__O2LH];
+      Self__O2LH=(__INTEGER)(Self__O2LH -  1);
     };
   };
 }
 
-static void append__ROS(__STRING *Self__SOS,void *other__TOS)
+static void append__3OS(__STRING *Self__4OS,void *other__5OS)
 // ({STRING},{NULLxSTRING_CONSTANTxSTRING}) VoidNo recursive, No inlinable.
 {
-  __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;
+  __INTEGER __tmp__IPS,needed_capacity__BPS,old_nb_elts__D0DC;
+  __INTEGER upper__02IH,Self__Y2IH,dest__5JBC,src_capacity__AKBC;
+  __INTEGER i2__QKBC,i1__PKBC;
+  __CHARACTER *Self__C0DC,*new__00DC,*__tmp__FQS,*__tmp__GQS,*Self__3JBC;
+  __CHARACTER *src__4JBC;
+  if (((struct ___OBJ *)other__5OS)->__id==__STRING_CONSTANT__) {
+    __tmp__IPS=((__STRING_CONSTANT *)other__5OS)->count__DD;
   } else {
-    __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;
+    __tmp__IPS=((__STRING *)other__5OS)->count__SGC;
+  };
+  needed_capacity__BPS=(__INTEGER)(Self__4OS->count__SGC + __tmp__IPS);
+  if ((Self__4OS->capacity__UCS < needed_capacity__BPS)) {
+    if ((Self__4OS->capacity__UCS ==  0)) {
+      Self__4OS->capacity__UCS=needed_capacity__BPS;
+      Self__4OS->storage__3CS=create__YIEB(needed_capacity__BPS);
+    } else {
+      Self__C0DC=((__CHARACTER *)Self__4OS->storage__3CS);
+      old_nb_elts__D0DC=Self__4OS->capacity__UCS;
+      new__00DC=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__C0DC),((__UINTEGER_32 )old_nb_elts__D0DC),((__UINTEGER_32 )needed_capacity__BPS)));
+      upper__02IH=(__INTEGER)(needed_capacity__BPS -  1);
+      Self__Y2IH=old_nb_elts__D0DC;
+      while ((Self__Y2IH <= upper__02IH)) {
+        new__00DC[Self__Y2IH]='\0';
+        Self__Y2IH=(__INTEGER)(Self__Y2IH +  1);
+      };
+      Self__4OS->storage__3CS=new__00DC;
+      Self__4OS->capacity__UCS=needed_capacity__BPS;
+    };
+  };
+  __tmp__FQS=Self__4OS->storage__3CS;
+  if (((struct ___OBJ *)other__5OS)->__id==__STRING_CONSTANT__) {
+    __tmp__GQS=((__STRING_CONSTANT *)other__5OS)->storage__RRO;
   } else {
-    __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;
+    __tmp__GQS=((__STRING *)other__5OS)->storage__3CS;
+  };
+  Self__3JBC=((__CHARACTER *)__tmp__FQS);
+  src__4JBC=__tmp__GQS;
+  dest__5JBC=Self__4OS->count__SGC;
+  src_capacity__AKBC=__tmp__IPS;
+  i2__QKBC= 0;
+  i1__PKBC=dest__5JBC;
+  while ((i2__QKBC != src_capacity__AKBC)) {
+    Self__3JBC[i1__PKBC]=((__CHARACTER *)src__4JBC)[i2__QKBC];
+    i2__QKBC=(__INTEGER)(i2__QKBC +  1);
+    i1__PKBC=(__INTEGER)(i1__PKBC +  1);
+  };
+  Self__4OS->count__SGC=needed_capacity__BPS;
 }
 
-static void* parent_directory__1FD()
+static void* parent_directory__GGD()
 // () With resultNo recursive, No inlinable.
 {
-  __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';
+  __STRING *Self__SBHH;
+  __INTEGER new_capacity__JMHH,old_nb_elts__MMHH,upper__52IH,Self__32IH;
+  void *__tmp__WGD;
+  void *__tmp__XGD,*result__KGD;
+  __CHARACTER *Self__LMHH,*new__NMHH,*cwd__JGD;
+  ((__STRING *)string_tmp__LGD)->count__SGC= 0;
+  Self__SBHH=((__STRING *)string_tmp__LGD);
+  if ((Self__SBHH->capacity__UCS > Self__SBHH->count__SGC)) {
+    ((__CHARACTER *)Self__SBHH->storage__3CS)[Self__SBHH->count__SGC]='\0';
   } else {
-    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;
+    new_capacity__JMHH= 0;
+    if ((Self__SBHH->capacity__UCS <= Self__SBHH->count__SGC)) {
+      if ((Self__SBHH->capacity__UCS ==  0)) {
+        Self__SBHH->capacity__UCS= 32;
+        Self__SBHH->storage__3CS=create__YIEB( 32);
+      } else {
+        new_capacity__JMHH=(__INTEGER)(Self__SBHH->capacity__UCS <<  1);
+        Self__LMHH=((__CHARACTER *)Self__SBHH->storage__3CS);
+        old_nb_elts__MMHH=Self__SBHH->capacity__UCS;
+        new__NMHH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__LMHH),((__UINTEGER_32 )old_nb_elts__MMHH),((__UINTEGER_32 )new_capacity__JMHH)));
+        upper__52IH=(__INTEGER)(new_capacity__JMHH -  1);
+        Self__32IH=old_nb_elts__MMHH;
+        while ((Self__32IH <= upper__52IH)) {
+          new__NMHH[Self__32IH]='\0';
+          Self__32IH=(__INTEGER)(Self__32IH +  1);
+        };
+        Self__SBHH->storage__3CS=new__NMHH;
+        Self__SBHH->capacity__UCS=new_capacity__JMHH;
+      };
+    };
+    ((__CHARACTER *)Self__SBHH->storage__3CS)[Self__SBHH->count__SGC]='\0';
+    Self__SBHH->count__SGC=(__INTEGER)(Self__SBHH->count__SGC +  1);
+    Self__SBHH->count__SGC=(__INTEGER)(Self__SBHH->count__SGC -  1);
+  };
+  cwd__JGD=Self__SBHH->storage__3CS;
+  getcwd((cwd__JGD),255);
+  from_external__YZS(string_tmp__LGD,cwd__JGD);
+  __tmp__WGD=physical_get_entry__REF(string_tmp__LGD);
+  if (__tmp__WGD==NULL) {
+    __tmp__XGD=NULL;
   } else {
-    switch (((struct ___OBJ *)__tmp__LGD)->__id) {
+    switch (((struct ___OBJ *)__tmp__WGD)->__id) {
     case __DIRECTORY_UNIX__: {
-      __tmp__MGD=((void *)__tmp__LGD);
+      __tmp__XGD=((void *)__tmp__WGD);
     } break;
     case __FILE_UNIX__: {
-      __tmp__MGD=NULL;
+      __tmp__XGD=NULL;
     } break;
     }
   };
-  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);
+  result__KGD=__tmp__XGD;
+  put__to__N1S(alias__2GD,__tmp__XGD,((__DIRECTORY_UNIX *)__tmp__XGD)->parent_entry_unix__RGD.parent_entry__QGD.path__BD);
+  FILE_SYSTEM__->parent_directory__GHD=__tmp__XGD;
+  FILE_SYSTEM__->parent_directory__HHD=0;
+  return(__tmp__XGD);
 }
 
-static void* get_entry__S2AC(void *p__U2AC)
+static void* get_entry__DZAC(void *p__FZAC)
 // ({NULLxSTRING_CONSTANTxSTRING}) With resultNo recursive, No inlinable.
 {
-  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) {
+  void *result__HZAC;
+  __INTEGER idx__IZAC,new_capacity__PMHH,old_nb_elts__SMHH,upper__E3IH;
+  __INTEGER Self__C3IH,n__WMHH,n__XMHH,__tmp__S1AC;
+  void *__tmp__CFIC,*__tmp__31AC,*dir__11AC;
+  __STRING *Self__QMHH,*Self__GEFH,*Self__VMHH;
+  __CHARACTER *Self__RMHH,*new__TMHH;
+  __BOOLEAN __tmp__B1AC,__tmp__M1AC;
+  result__HZAC=NULL;
+  idx__IZAC= 0;
+  if (FILE_SYSTEM__->parent_directory__HHD==0) {
   } else {
-    parent_directory__1FD();
+    parent_directory__GGD();
   };
-  if (FILE_SYSTEM__->parent_directory__2GD==0) {
-    __tmp__RIIC=FILE_SYSTEM__->parent_directory__1GD;
+  if (FILE_SYSTEM__->parent_directory__HHD==0) {
+    __tmp__CFIC=FILE_SYSTEM__->parent_directory__GHD;
   } else {
-    __tmp__RIIC=parent_directory__1FD();
+    __tmp__CFIC=parent_directory__GGD();
   };
-  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) {
+  copy__VDS(string_tmp2__JZAC,((__DIRECTORY_UNIX *)__tmp__CFIC)->parent_entry_unix__RGD.parent_entry__QGD.path__BD);
+  if (FILE_SYSTEM__->parent_directory__HHD==0) {
   } else {
-    parent_directory__1FD();
-  };
-  add_last__GOT(string_tmp2__Y2AC,'/');
-  if (FILE_SYSTEM__->parent_directory__2GD==0) {
+    parent_directory__GGD();
+  };
+  Self__QMHH=((__STRING *)string_tmp2__JZAC);
+  new_capacity__PMHH= 0;
+  if ((Self__QMHH->capacity__UCS <= Self__QMHH->count__SGC)) {
+    if ((Self__QMHH->capacity__UCS ==  0)) {
+      Self__QMHH->capacity__UCS= 32;
+      Self__QMHH->storage__3CS=create__YIEB( 32);
+    } else {
+      new_capacity__PMHH=(__INTEGER)(Self__QMHH->capacity__UCS <<  1);
+      Self__RMHH=((__CHARACTER *)Self__QMHH->storage__3CS);
+      old_nb_elts__SMHH=Self__QMHH->capacity__UCS;
+      new__TMHH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__RMHH),((__UINTEGER_32 )old_nb_elts__SMHH),((__UINTEGER_32 )new_capacity__PMHH)));
+      upper__E3IH=(__INTEGER)(new_capacity__PMHH -  1);
+      Self__C3IH=old_nb_elts__SMHH;
+      while ((Self__C3IH <= upper__E3IH)) {
+        new__TMHH[Self__C3IH]='\0';
+        Self__C3IH=(__INTEGER)(Self__C3IH +  1);
+      };
+      Self__QMHH->storage__3CS=new__TMHH;
+      Self__QMHH->capacity__UCS=new_capacity__PMHH;
+    };
+  };
+  ((__CHARACTER *)Self__QMHH->storage__3CS)[Self__QMHH->count__SGC]='/';
+  Self__QMHH->count__SGC=(__INTEGER)(Self__QMHH->count__SGC +  1);
+  if (FILE_SYSTEM__->parent_directory__HHD==0) {
   } else {
-    parent_directory__1FD();
+    parent_directory__GGD();
   };
-  append__ROS(string_tmp2__Y2AC,p__U2AC);
-  if (FILE_SYSTEM__->parent_directory__2GD==0) {
+  append__3OS(string_tmp2__JZAC,p__FZAC);
+  if (FILE_SYSTEM__->parent_directory__HHD==0) {
   } else {
-    parent_directory__1FD();
+    parent_directory__GGD();
   };
-  if (FILE_SYSTEM__->parent_directory__2GD==0) {
+  if (FILE_SYSTEM__->parent_directory__HHD==0) {
   } else {
-    parent_directory__1FD();
+    parent_directory__GGD();
   };
-  reduce_path__YAIC(string_tmp2__Y2AC);
-  if (FILE_SYSTEM__->parent_directory__2GD==0) {
+  reduce_path__J3HC(string_tmp2__JZAC);
+  if (FILE_SYSTEM__->parent_directory__HHD==0) {
   } else {
-    parent_directory__1FD();
+    parent_directory__GGD();
   };
-  if (FILE_SYSTEM__->parent_directory__2GD==0) {
+  if (FILE_SYSTEM__->parent_directory__HHD==0) {
   } else {
-    parent_directory__1FD();
+    parent_directory__GGD();
   };
-  copy__JDS(string_tmp3__42AC,string_tmp2__Y2AC);
+  copy__VDS(string_tmp3__PZAC,string_tmp2__JZAC);
   do {
-    if (FILE_SYSTEM__->parent_directory__2GD==0) {
+    if (FILE_SYSTEM__->parent_directory__HHD==0) {
     } else {
-      parent_directory__1FD();
+      parent_directory__GGD();
     };
-    if (FILE_SYSTEM__->parent_directory__2GD==0) {
+    if (FILE_SYSTEM__->parent_directory__HHD==0) {
     } else {
-      parent_directory__1FD();
+      parent_directory__GGD();
     };
-    result__W2AC=reference_at__1Y0C(alias__RGD,string_tmp2__Y2AC);
-    if (((void *)result__W2AC == (void *)NULL)) {
-      if (FILE_SYSTEM__->parent_directory__2GD==0) {
+    result__HZAC=reference_at__VV0C(alias__2GD,string_tmp2__JZAC);
+    if (((void *)result__HZAC == (void *)NULL)) {
+      if (FILE_SYSTEM__->parent_directory__HHD==0) {
       } else {
-        parent_directory__1FD();
+        parent_directory__GGD();
       };
-      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__X2AC=(__INTEGER)( 1 + idx__I0HH);
-      if ((idx__X2AC >  0)) {
-        if (FILE_SYSTEM__->parent_directory__2GD==0) {
+      Self__GEFH=((__STRING *)string_tmp2__JZAC);
+      idx__IZAC=(__INTEGER)( 1 + fast_reverse_index_of__from__KA3(Self__GEFH->storage__3CS,'/',(__INTEGER)(Self__GEFH->count__SGC -  1)));
+      if ((idx__IZAC >  0)) {
+        if (FILE_SYSTEM__->parent_directory__HHD==0) {
         } else {
-          parent_directory__1FD();
+          parent_directory__GGD();
         };
-        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;
+        Self__VMHH=((__STRING *)string_tmp2__JZAC);
+        n__WMHH=(__INTEGER)(idx__IZAC -  1);
+        if ((n__WMHH < Self__VMHH->count__SGC)) {
+          n__XMHH=(__INTEGER)(Self__VMHH->count__SGC - n__WMHH);
+          if ((n__XMHH > Self__VMHH->count__SGC)) {
+            Self__VMHH->count__SGC= 0;
           } else {
-            Self__M0HH->count__EGC=(__INTEGER)(Self__M0HH->count__EGC - n__O0HH);
+            Self__VMHH->count__SGC=(__INTEGER)(Self__VMHH->count__SGC - n__XMHH);
           };
         };
       } else {
-        if (FILE_SYSTEM__->parent_directory__2GD==0) {
+        if (FILE_SYSTEM__->parent_directory__HHD==0) {
         } else {
-          parent_directory__1FD();
+          parent_directory__GGD();
         };
-        ((__STRING *)string_tmp2__Y2AC)->count__EGC= 0;
+        ((__STRING *)string_tmp2__JZAC)->count__SGC= 0;
       };
     };
-    if (((void *)result__W2AC == (void *)NULL)) {
-      if (FILE_SYSTEM__->parent_directory__2GD==0) {
+    if (((void *)result__HZAC == (void *)NULL)) {
+      if (FILE_SYSTEM__->parent_directory__HHD==0) {
       } else {
-        parent_directory__1FD();
+        parent_directory__GGD();
       };
-      __tmp__Q4AC=(((__STRING *)string_tmp2__Y2AC)->count__EGC !=  0);
+      __tmp__B1AC=(((__STRING *)string_tmp2__JZAC)->count__SGC !=  0);
     } else {
-      __tmp__Q4AC=FALSE__;
+      __tmp__B1AC=FALSE__;
     };
-  } while (__tmp__Q4AC);
-  if (((void *)result__W2AC == (void *)NULL)) {
-    if (FILE_SYSTEM__->parent_directory__2GD==0) {
+  } while (__tmp__B1AC);
+  if (((void *)result__HZAC == (void *)NULL)) {
+    if (FILE_SYSTEM__->parent_directory__HHD==0) {
     } else {
-      parent_directory__1FD();
+      parent_directory__GGD();
     };
-    if (FILE_SYSTEM__->parent_directory__2GD==0) {
+    if (FILE_SYSTEM__->parent_directory__HHD==0) {
     } else {
-      parent_directory__1FD();
+      parent_directory__GGD();
     };
-    result__W2AC=physical_get_entry__P10C(string_tmp3__42AC);
-    __tmp__14AC=TRUE__;
+    result__HZAC=physical_get_entry__JY0C(string_tmp3__PZAC);
+    __tmp__M1AC=TRUE__;
   } else {
-    __tmp__14AC=FALSE__;
+    __tmp__M1AC=FALSE__;
   };
-  if ((! __tmp__14AC)) {
-    if (FILE_SYSTEM__->parent_directory__2GD==0) {
+  if ((! __tmp__M1AC)) {
+    if (FILE_SYSTEM__->parent_directory__HHD==0) {
     } else {
-      parent_directory__1FD();
+      parent_directory__GGD();
     };
-    __tmp__B5AC=((__STRING *)string_tmp3__42AC)->count__EGC;
-    if (FILE_SYSTEM__->parent_directory__2GD==0) {
+    __tmp__S1AC=((__STRING *)string_tmp3__PZAC)->count__SGC;
+    if (FILE_SYSTEM__->parent_directory__HHD==0) {
     } else {
-      parent_directory__1FD();
+      parent_directory__GGD();
     };
-    if ((__tmp__B5AC != ((__STRING *)string_tmp2__Y2AC)->count__EGC)) {
-      if (result__W2AC==NULL) {
-        __tmp__M5AC=NULL;
+    if ((__tmp__S1AC != ((__STRING *)string_tmp2__JZAC)->count__SGC)) {
+      if (result__HZAC==NULL) {
+        __tmp__31AC=NULL;
       } else {
-        switch (((struct ___OBJ *)result__W2AC)->__id) {
+        switch (((struct ___OBJ *)result__HZAC)->__id) {
         case __DIRECTORY_UNIX__: {
-          __tmp__M5AC=((void *)result__W2AC);
+          __tmp__31AC=((void *)result__HZAC);
         } break;
         case __FILE_UNIX__: {
-          __tmp__M5AC=NULL;
+          __tmp__31AC=NULL;
         } break;
         }
       };
-      dir__K5AC=__tmp__M5AC;
-      if (FILE_SYSTEM__->parent_directory__2GD==0) {
+      dir__11AC=__tmp__31AC;
+      if (FILE_SYSTEM__->parent_directory__HHD==0) {
       } else {
-        parent_directory__1FD();
+        parent_directory__GGD();
       };
-      result__W2AC=physical_get_entry__UDF(string_tmp3__42AC);
+      result__HZAC=physical_get_entry__REF(string_tmp3__PZAC);
     };
   };
-  return(result__W2AC);
+  return(result__HZAC);
 }
 
-static void put_string__P3F(void *s__R3F)
+static void put_string__33F(void *s__53F)
 // ({NULLxSTRING_CONSTANTxSTRING}) VoidNo recursive, No inlinable.
 {
-  __INTEGER __tmp__A4F,__tmp__C4F,Self__1YG,limit_up__2YG;
-  __CHARACTER __tmp__J4F;
-  if (((struct ___OBJ *)s__R3F)->__id==__STRING_CONSTANT__) {
-    __tmp__A4F= 1;
+  __INTEGER __tmp__O4F,__tmp__Q4F,Self__JZG,limit_up__KZG;
+  __CHARACTER *__tmp__NEFH,*__tmp__0XGH;
+  __CHARACTER __tmp__X4F;
+  if (((struct ___OBJ *)s__53F)->__id==__STRING_CONSTANT__) {
+    __tmp__O4F= 1;
   } else {
-    __tmp__A4F= 1;
+    __tmp__O4F= 1;
   };
-  if (((struct ___OBJ *)s__R3F)->__id==__STRING_CONSTANT__) {
-    __tmp__C4F=((__STRING_CONSTANT *)s__R3F)->count__DD;
+  if (((struct ___OBJ *)s__53F)->__id==__STRING_CONSTANT__) {
+    __tmp__Q4F=((__STRING_CONSTANT *)s__53F)->count__DD;
   } else {
-    __tmp__C4F=((__STRING *)s__R3F)->count__EGC;
+    __tmp__Q4F=((__STRING *)s__53F)->count__SGC;
   };
-  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)];
+  Self__JZG=__tmp__O4F;
+  limit_up__KZG=__tmp__Q4F;
+  __tmp__NEFH=((__STRING *)s__53F)->storage__3CS;
+  __tmp__0XGH=((__STRING_CONSTANT *)s__53F)->storage__RRO;
+  while ((Self__JZG <= limit_up__KZG)) {
+    if (((struct ___OBJ *)s__53F)->__id==__STRING_CONSTANT__) {
+      __tmp__X4F=((__CHARACTER *)__tmp__0XGH)[(__INTEGER)(Self__JZG -  1)];
     } else {
-      __tmp__J4F=((__CHARACTER *)((__STRING *)s__R3F)->storage__RCS)[(__INTEGER)(Self__1YG -  1)];
+      __tmp__X4F=((__CHARACTER *)__tmp__NEFH)[(__INTEGER)(Self__JZG -  1)];
     };
-    fputc((int)(__tmp__J4F),stderr);
-    Self__1YG=(__INTEGER)(Self__1YG +  1);
+    fputc((int)(__tmp__X4F),stderr);
+    Self__JZG=(__INTEGER)(Self__JZG +  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__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;
-  sz__MVC=((__UINTEGER_32 )sizeof(__PROTOTYPE));
-  if ((sz__MVC ==  0)) {
-    result__JVC=PROTOTYPE__;
-  } else {
-    typ_id__PVC=__PROTOTYPE__;
-    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__MVC);
-    if ((typ_id__PVC == (__INTEGER)(-  1))) {
-      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__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__N0IH=new_lab__FTJ(new_size__MTFH);
-          };
-          ((__POINTER *)next__N0IH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__O0IH)[ 0]=next__N0IH;
-        } else {
-          ((__POINTER *)result__P0IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__N0IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__P0IH=next__N0IH;
-        };
-      };
-      ptr__KVC=result__P0IH;
-    } else {
-      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__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__S0IH=new_lab__FTJ(lab_type__V0IH);
-          };
-          ((__POINTER *)next__S0IH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__T0IH)[ 0]=next__S0IH;
-        } else {
-          ((__POINTER *)result__U0IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__S0IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__U0IH=next__S0IH;
-        };
-      };
-      ptr__KVC=result__U0IH;
-    };
-    result__JVC=((__PROTOTYPE *)ptr__KVC);
-    *(result__JVC) = *(PROTOTYPE__);
-  };
-  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);
+  __PROTOTYPE *result__XVC,*Self__2TS;
+  __POINTER ptr__YVC,ptr_table__H3IH,next__G3IH,result__I3IH;
+  __POINTER ptr_table__M3IH,next__L3IH,result__N3IH,ptr__JD3;
+  __POINTER ptr_table__R3IH,next__Q3IH,result__S3IH,ptr_table__W3IH;
+  __POINTER next__V3IH,result__X3IH,ptr__E5GD,ptr_table__13IH;
+  __POINTER next__03IH,result__23IH,ptr_table__A4IH,next__53IH;
+  __POINTER result__B4IH,file__AUS,ptr__OJ3,ptr_table__P4IH,next__O4IH;
+  __POINTER result__Q4IH,ptr_table__U4IH,next__T4IH,result__V4IH;
+  __INTEGER typ_id__3VC,idx__DUS,typ_id__OD3,new_capacity__GTX;
+  __INTEGER __tmp__KUX,__tmp__LNEC,Self__FUVD,h__FMBC,idx__GMBC;
+  __INTEGER idx__Z2GD,new_capacity__02GD,i__12GD,typ_id__J5GD;
+  __INTEGER new_capacity__0MHH,old_nb_elts__3MHH,upper__H4IH,Self__F4IH;
+  __INTEGER result__HWX,new_capacity__ANHH,old_nb_elts__DNHH;
+  __INTEGER upper__M4IH,Self__K4IH,typ_id__TJ3,new_capacity__MMJC;
+  __UINTEGER_32 sz__0VC,a__QEFH,new_size__REFH,t__VEFH,a__UEFH;
+  __UINTEGER_32 new_size__P3IH,lab_type__O3IH,sz__LD3,a__YEFH;
+  __UINTEGER_32 new_size__ZEFH,t__3EFH,a__2EFH,new_size__Z3IH;
+  __UINTEGER_32 lab_type__Y3IH,sz__G5GD,a__PFFH,new_size__QFFH,t__UFFH;
+  __UINTEGER_32 a__TFFH,new_size__D4IH,lab_type__C4IH,sz__QJ3,a__XFFH;
+  __UINTEGER_32 new_size__YFFH,t__2FFH,a__1FFH,new_size__X4IH;
+  __UINTEGER_32 lab_type__W4IH;
+  __STRING_CONSTANT *Self__MRX;
+  __STRING *Self__YMHH,*Self__TBHH,*Self__UBHH;
+  void *__tmp__RVS;
+  __FAST_ARRAYoITM_TYPE_PARAMETERo *result__ID3,*Self__Z1BC;
+  __FAST_ARRAYoPROTOTYPEo *Self__ETX;
+  __BOOLEAN __tmp__UTX;
+  void **__tmp__JUX,**new__XMEC;
+  __HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *Self__2LBC;
+  void *node__IMBC,*node1__32GD,*node2__42GD,*__tmp__2NBC;
+  void **old_buckets__22GD;
+  __HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *result__D5GD;
+  __HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *Self__0ATD;
+  __CHARACTER *Self__2MHH,*new__4MHH,*Self__CNHH,*new__ENHH,*ptr__QWX;
+  __HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *result__NJ3,*Self__P3BC;
+  result__XVC=NULL;
+  ptr__YVC=((__POINTER )(NULL));
+  typ_id__3VC= 0;
+  sz__0VC=((__UINTEGER_32 )sizeof(__PROTOTYPE));
+  if ((sz__0VC ==  0)) {
+    result__XVC=PROTOTYPE__;
   } else {
-    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__;
+    typ_id__3VC=__PROTOTYPE__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__0VC);
+    if ((typ_id__3VC == (__INTEGER)(-  1))) {
+      a__QEFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__REFH=(__UINTEGER_32)((__UINTEGER_32)(sz__0VC + a__QEFH) & (__UINTEGER_32)(~ a__QEFH));
+      ptr_table__H3IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__REFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__G3IH=((__POINTER )(NULL));
+      result__I3IH=((__POINTER *)ptr_table__H3IH)[ 0];
+      if ((result__I3IH == (void *)NULL)) {
+        result__I3IH=new_lab__RTJ(new_size__REFH);
+        next__G3IH=(void *)((unsigned long)result__I3IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__REFH)));
+        ((__POINTER *)next__G3IH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__H3IH)[ 0]=next__G3IH;
+      } else {
+        next__G3IH=((__POINTER *)result__I3IH)[ 0];
+        if ((next__G3IH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__I3IH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__REFH <<  1)) <=  4096)) {
+            next__G3IH=(void *)((unsigned long)result__I3IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__REFH)));
+          } else {
+            next__G3IH=new_lab__RTJ(new_size__REFH);
+          };
+          ((__POINTER *)next__G3IH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__H3IH)[ 0]=next__G3IH;
+        } else {
+          ((__POINTER *)result__I3IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__G3IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__I3IH=next__G3IH;
+        };
+      };
+      ptr__YVC=result__I3IH;
+    } else {
+      t__VEFH=((__UINTEGER_32 )typ_id__3VC);
+      a__UEFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__P3IH=(__UINTEGER_32)((__UINTEGER_32)(sz__0VC + a__UEFH) & (__UINTEGER_32)(~ a__UEFH));
+      ptr_table__M3IH=((__POINTER )(&(table_type[(t__VEFH)])));
+      lab_type__O3IH=(__UINTEGER_32)(t__VEFH |  1);
+      next__L3IH=((__POINTER )(NULL));
+      result__N3IH=((__POINTER *)ptr_table__M3IH)[ 0];
+      if ((result__N3IH == (void *)NULL)) {
+        result__N3IH=new_lab__RTJ(lab_type__O3IH);
+        next__L3IH=(void *)((unsigned long)result__N3IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__P3IH)));
+        ((__POINTER *)next__L3IH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__M3IH)[ 0]=next__L3IH;
+      } else {
+        next__L3IH=((__POINTER *)result__N3IH)[ 0];
+        if ((next__L3IH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__N3IH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__P3IH <<  1)) <=  4096)) {
+            next__L3IH=(void *)((unsigned long)result__N3IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__P3IH)));
+          } else {
+            next__L3IH=new_lab__RTJ(lab_type__O3IH);
+          };
+          ((__POINTER *)next__L3IH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__M3IH)[ 0]=next__L3IH;
+        } else {
+          ((__POINTER *)result__N3IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__L3IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__N3IH=next__L3IH;
+        };
+      };
+      ptr__YVC=result__N3IH;
+    };
+    result__XVC=((__PROTOTYPE *)ptr__YVC);
+    *(result__XVC) = *(PROTOTYPE__);
+  };
+  Self__2TS=((__PROTOTYPE *)result__XVC);
+  Self__2TS->filename__FSG=f__LBC;
+  Self__2TS->parent_named__5.name__LI=n__MBC;
+  Self__MRX=((__STRING_CONSTANT *)n__MBC);
+  idx__DUS=(__INTEGER)( 1 + fast_reverse_index_of__from__KA3(Self__MRX->storage__RRO,'.',(__INTEGER)(Self__MRX->count__DD -  1)));
+  if ((idx__DUS !=  0)) {
+    copy__VDS(string_tmp__VH,n__MBC);
+    Self__YMHH=((__STRING *)string_tmp__VH);
+    if ((idx__DUS > Self__YMHH->count__SGC)) {
+      Self__YMHH->count__SGC= 0;
+    } else {
+      if ((idx__DUS >  0)) {
+        remove_between__to__MIT(Self__YMHH, 1,idx__DUS);
+      };
+    };
+    Self__2TS->shortname__3JE=get__YWB(string_tmp__VH);
   } else {
-    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__;
+    Self__2TS->shortname__3JE=n__MBC;
+  };
+  result__ID3=NULL;
+  ptr__JD3=((__POINTER )(NULL));
+  typ_id__OD3= 0;
+  sz__LD3=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_TYPE_PARAMETERo));
+  if ((sz__LD3 ==  0)) {
+    result__ID3=FAST_ARRAYoITM_TYPE_PARAMETERo__;
   } else {
-    __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__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__U1IH=new_lab__FTJ(lab_type__X1IH);
-            };
-            ((__POINTER *)next__U1IH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__V1IH)[ 0]=next__U1IH;
-          } else {
-            ((__POINTER *)result__W1IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__U1IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__W1IH=next__U1IH;
-          };
-        };
-        ptr__O5GD=result__W1IH;
-      };
-      result__N5GD=((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)ptr__O5GD);
-      *(result__N5GD) = *(HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__);
-    };
-    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);
+    typ_id__OD3=__FAST_ARRAYoITM_TYPE_PARAMETERo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__LD3);
+    if ((typ_id__OD3 == (__INTEGER)(-  1))) {
+      a__YEFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__ZEFH=(__UINTEGER_32)((__UINTEGER_32)(sz__LD3 + a__YEFH) & (__UINTEGER_32)(~ a__YEFH));
+      ptr_table__R3IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ZEFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__Q3IH=((__POINTER )(NULL));
+      result__S3IH=((__POINTER *)ptr_table__R3IH)[ 0];
+      if ((result__S3IH == (void *)NULL)) {
+        result__S3IH=new_lab__RTJ(new_size__ZEFH);
+        next__Q3IH=(void *)((unsigned long)result__S3IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZEFH)));
+        ((__POINTER *)next__Q3IH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__R3IH)[ 0]=next__Q3IH;
+      } else {
+        next__Q3IH=((__POINTER *)result__S3IH)[ 0];
+        if ((next__Q3IH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__S3IH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__ZEFH <<  1)) <=  4096)) {
+            next__Q3IH=(void *)((unsigned long)result__S3IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZEFH)));
+          } else {
+            next__Q3IH=new_lab__RTJ(new_size__ZEFH);
+          };
+          ((__POINTER *)next__Q3IH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__R3IH)[ 0]=next__Q3IH;
+        } else {
+          ((__POINTER *)result__S3IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__Q3IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__S3IH=next__Q3IH;
+        };
+      };
+      ptr__JD3=result__S3IH;
+    } else {
+      t__3EFH=((__UINTEGER_32 )typ_id__OD3);
+      a__2EFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__Z3IH=(__UINTEGER_32)((__UINTEGER_32)(sz__LD3 + a__2EFH) & (__UINTEGER_32)(~ a__2EFH));
+      ptr_table__W3IH=((__POINTER )(&(table_type[(t__3EFH)])));
+      lab_type__Y3IH=(__UINTEGER_32)(t__3EFH |  1);
+      next__V3IH=((__POINTER )(NULL));
+      result__X3IH=((__POINTER *)ptr_table__W3IH)[ 0];
+      if ((result__X3IH == (void *)NULL)) {
+        result__X3IH=new_lab__RTJ(lab_type__Y3IH);
+        next__V3IH=(void *)((unsigned long)result__X3IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Z3IH)));
+        ((__POINTER *)next__V3IH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__W3IH)[ 0]=next__V3IH;
+      } else {
+        next__V3IH=((__POINTER *)result__X3IH)[ 0];
+        if ((next__V3IH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__X3IH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__Z3IH <<  1)) <=  4096)) {
+            next__V3IH=(void *)((unsigned long)result__X3IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Z3IH)));
+          } else {
+            next__V3IH=new_lab__RTJ(lab_type__Y3IH);
+          };
+          ((__POINTER *)next__V3IH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__W3IH)[ 0]=next__V3IH;
+        } else {
+          ((__POINTER *)result__X3IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__V3IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__X3IH=next__V3IH;
+        };
+      };
+      ptr__JD3=result__X3IH;
+    };
+    result__ID3=((__FAST_ARRAYoITM_TYPE_PARAMETERo *)ptr__JD3);
+    *(result__ID3) = *(FAST_ARRAYoITM_TYPE_PARAMETERo__);
+  };
+  Self__Z1BC=((__FAST_ARRAYoITM_TYPE_PARAMETERo *)result__ID3);
+  if ((Self__Z1BC->parent_arrayed_collection__LOE.capacity__TABC <  0)) {
+    Self__Z1BC->parent_arrayed_collection__LOE.storage__PBBC=create__G01C( 0);
+    Self__Z1BC->parent_arrayed_collection__LOE.capacity__TABC= 0;
+  };
+  Self__Z1BC->parent_arrayed_collection__LOE.upper__RABC=(__INTEGER)(-  1);
+  Self__2TS->idf_generic_list__MOE=result__ID3;
+  Self__2TS->index__GPG=(__INTEGER)(((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.upper__HJ +  1);
+  Self__ETX=((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ);
+  new_capacity__GTX= 0;
+  if (((__INTEGER)(Self__ETX->parent_arrayed_collection__AJ.upper__HJ +  1) <= (__INTEGER)(Self__ETX->parent_arrayed_collection__AJ.capacity__WEU -  1))) {
+    Self__ETX->parent_arrayed_collection__AJ.upper__HJ=(__INTEGER)(Self__ETX->parent_arrayed_collection__AJ.upper__HJ +  1);
+    __tmp__UTX=TRUE__;
   } else {
-    ((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__XPBC)->item__XBHD=Self__QTS;
-  };
-  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__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__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__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)));
+    __tmp__UTX=FALSE__;
+  };
+  if ((! __tmp__UTX)) {
+    if ((Self__ETX->parent_arrayed_collection__AJ.capacity__WEU ==  0)) {
+      Self__ETX->parent_arrayed_collection__AJ.storage__DVT=create__JDSB( 2);
+      Self__ETX->parent_arrayed_collection__AJ.capacity__WEU= 2;
+      Self__ETX->parent_arrayed_collection__AJ.upper__HJ= 0;
+    } else {
+      new_capacity__GTX=(__INTEGER)(Self__ETX->parent_arrayed_collection__AJ.capacity__WEU <<  1);
+      __tmp__JUX=Self__ETX->parent_arrayed_collection__AJ.storage__DVT;
+      __tmp__KUX=Self__ETX->parent_arrayed_collection__AJ.capacity__WEU;
+      new__XMEC=((void **)realloc_dynamic__old_size__new_size__KELC(((__POINTER )((void **)__tmp__JUX)),((__UINTEGER_32 )(__INTEGER)(__tmp__KUX * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__GTX * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__LNEC=(__INTEGER)(new_capacity__GTX -  1);
+      Self__FUVD=__tmp__KUX;
+      while ((Self__FUVD <= __tmp__LNEC)) {
+        new__XMEC[Self__FUVD]=NULL;
+        Self__FUVD=(__INTEGER)(Self__FUVD +  1);
+      };
+      Self__ETX->parent_arrayed_collection__AJ.storage__DVT=new__XMEC;
+      Self__ETX->parent_arrayed_collection__AJ.capacity__WEU=new_capacity__GTX;
+      Self__ETX->parent_arrayed_collection__AJ.upper__HJ=(__INTEGER)(Self__ETX->parent_arrayed_collection__AJ.upper__HJ +  1);
+    };
+  };
+  ((void **)Self__ETX->parent_arrayed_collection__AJ.storage__DVT)[Self__ETX->parent_arrayed_collection__AJ.upper__HJ]=Self__2TS;
+  Self__2LBC=((__HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *)prototype_dico__LUS);
+  h__FMBC=hash_code__RNW(f__LBC);
+  idx__GMBC=(__INTEGER)(h__FMBC % Self__2LBC->capacity__KMBC);
+  node__IMBC=((void **)Self__2LBC->buckets__PMBC)[idx__GMBC];
+  while ((! (((void *)node__IMBC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__IMBC)->key__1MBC == (void *)f__LBC)))) {
+    node__IMBC=((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__IMBC)->next__GNBC;
+  };
+  if (((void *)node__IMBC == (void *)NULL)) {
+    if ((Self__2LBC->capacity__KMBC == Self__2LBC->count__PNBC)) {
+      idx__Z2GD= 0;
+      node1__32GD=NULL;
+      node2__42GD=NULL;
+      old_buckets__22GD=Self__2LBC->buckets__PMBC;
+      new_capacity__02GD=prime_number_ceiling__021((__INTEGER)(Self__2LBC->capacity__KMBC +  1));
+      Self__2LBC->buckets__PMBC=create__ZITC(new_capacity__02GD);
+      i__12GD=(__INTEGER)(Self__2LBC->capacity__KMBC -  1);
+      Self__2LBC->capacity__KMBC=new_capacity__02GD;
+      while ((i__12GD >=  0)) {
+        node1__32GD=((void **)old_buckets__22GD)[i__12GD];
+        while (((void *)node1__32GD != (void *)NULL)) {
+          node2__42GD=((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node1__32GD)->next__GNBC;
+          idx__Z2GD=(__INTEGER)(hash_code__RNW(((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node1__32GD)->key__1MBC) % Self__2LBC->capacity__KMBC);
+          ((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node1__32GD)->next__GNBC=((void **)Self__2LBC->buckets__PMBC)[idx__Z2GD];
+          ((void **)Self__2LBC->buckets__PMBC)[idx__Z2GD]=node1__32GD;
+          node1__32GD=node2__42GD;
+        };
+        i__12GD=(__INTEGER)(i__12GD -  1);
+      };
+      idx__GMBC=(__INTEGER)(h__FMBC % Self__2LBC->capacity__KMBC);
+    };
+    __tmp__2NBC=((void **)Self__2LBC->buckets__PMBC)[idx__GMBC];
+    result__D5GD=NULL;
+    ptr__E5GD=((__POINTER )(NULL));
+    typ_id__J5GD= 0;
+    sz__G5GD=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo));
+    if ((sz__G5GD ==  0)) {
+      result__D5GD=HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__;
+    } else {
+      typ_id__J5GD=__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__G5GD);
+      if ((typ_id__J5GD == (__INTEGER)(-  1))) {
+        a__PFFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__QFFH=(__UINTEGER_32)((__UINTEGER_32)(sz__G5GD + a__PFFH) & (__UINTEGER_32)(~ a__PFFH));
+        ptr_table__13IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__QFFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__03IH=((__POINTER )(NULL));
+        result__23IH=((__POINTER *)ptr_table__13IH)[ 0];
+        if ((result__23IH == (void *)NULL)) {
+          result__23IH=new_lab__RTJ(new_size__QFFH);
+          next__03IH=(void *)((unsigned long)result__23IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QFFH)));
+          ((__POINTER *)next__03IH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__13IH)[ 0]=next__03IH;
+        } else {
+          next__03IH=((__POINTER *)result__23IH)[ 0];
+          if ((next__03IH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__23IH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__QFFH <<  1)) <=  4096)) {
+              next__03IH=(void *)((unsigned long)result__23IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QFFH)));
+            } else {
+              next__03IH=new_lab__RTJ(new_size__QFFH);
+            };
+            ((__POINTER *)next__03IH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__13IH)[ 0]=next__03IH;
+          } else {
+            ((__POINTER *)result__23IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__03IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__23IH=next__03IH;
+          };
+        };
+        ptr__E5GD=result__23IH;
+      } else {
+        t__UFFH=((__UINTEGER_32 )typ_id__J5GD);
+        a__TFFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__D4IH=(__UINTEGER_32)((__UINTEGER_32)(sz__G5GD + a__TFFH) & (__UINTEGER_32)(~ a__TFFH));
+        ptr_table__A4IH=((__POINTER )(&(table_type[(t__UFFH)])));
+        lab_type__C4IH=(__UINTEGER_32)(t__UFFH |  1);
+        next__53IH=((__POINTER )(NULL));
+        result__B4IH=((__POINTER *)ptr_table__A4IH)[ 0];
+        if ((result__B4IH == (void *)NULL)) {
+          result__B4IH=new_lab__RTJ(lab_type__C4IH);
+          next__53IH=(void *)((unsigned long)result__B4IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__D4IH)));
+          ((__POINTER *)next__53IH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__A4IH)[ 0]=next__53IH;
+        } else {
+          next__53IH=((__POINTER *)result__B4IH)[ 0];
+          if ((next__53IH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__B4IH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__D4IH <<  1)) <=  4096)) {
+              next__53IH=(void *)((unsigned long)result__B4IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__D4IH)));
+            } else {
+              next__53IH=new_lab__RTJ(lab_type__C4IH);
+            };
+            ((__POINTER *)next__53IH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__A4IH)[ 0]=next__53IH;
           } else {
-            next__41IH=new_lab__FTJ(lab_type__B2IH);
+            ((__POINTER *)result__B4IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__53IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__B4IH=next__53IH;
           };
-          ((__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__E5GD=result__B4IH;
       };
-      ptr__TL3=result__A2IH;
+      result__D5GD=((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)ptr__E5GD);
+      *(result__D5GD) = *(HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__);
     };
-    result__SL3=((__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *)ptr__TL3);
-    *(result__SL3) = *(HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo__);
+    Self__0ATD=((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)result__D5GD);
+    Self__0ATD->item__NBHD=Self__2TS;
+    Self__0ATD->key__1MBC=f__LBC;
+    Self__0ATD->next__GNBC=__tmp__2NBC;
+    node__IMBC=result__D5GD;
+    ((void **)Self__2LBC->buckets__PMBC)[idx__GMBC]=result__D5GD;
+    Self__2LBC->count__PNBC=(__INTEGER)(Self__2LBC->count__PNBC +  1);
+  } else {
+    ((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__IMBC)->item__NBHD=Self__2TS;
   };
-  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);
+  copy__VDS(string_tmp__4VX,f__LBC);
+  Self__TBHH=((__STRING *)string_tmp__4VX);
+  if ((Self__TBHH->capacity__UCS > Self__TBHH->count__SGC)) {
+    ((__CHARACTER *)Self__TBHH->storage__3CS)[Self__TBHH->count__SGC]='\0';
+  } else {
+    new_capacity__0MHH= 0;
+    if ((Self__TBHH->capacity__UCS <= Self__TBHH->count__SGC)) {
+      if ((Self__TBHH->capacity__UCS ==  0)) {
+        Self__TBHH->capacity__UCS= 32;
+        Self__TBHH->storage__3CS=create__YIEB( 32);
+      } else {
+        new_capacity__0MHH=(__INTEGER)(Self__TBHH->capacity__UCS <<  1);
+        Self__2MHH=((__CHARACTER *)Self__TBHH->storage__3CS);
+        old_nb_elts__3MHH=Self__TBHH->capacity__UCS;
+        new__4MHH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__2MHH),((__UINTEGER_32 )old_nb_elts__3MHH),((__UINTEGER_32 )new_capacity__0MHH)));
+        upper__H4IH=(__INTEGER)(new_capacity__0MHH -  1);
+        Self__F4IH=old_nb_elts__3MHH;
+        while ((Self__F4IH <= upper__H4IH)) {
+          new__4MHH[Self__F4IH]='\0';
+          Self__F4IH=(__INTEGER)(Self__F4IH +  1);
+        };
+        Self__TBHH->storage__3CS=new__4MHH;
+        Self__TBHH->capacity__UCS=new_capacity__0MHH;
+      };
+    };
+    ((__CHARACTER *)Self__TBHH->storage__3CS)[Self__TBHH->count__SGC]='\0';
+    Self__TBHH->count__SGC=(__INTEGER)(Self__TBHH->count__SGC +  1);
+    Self__TBHH->count__SGC=(__INTEGER)(Self__TBHH->count__SGC -  1);
+  };
+  file__AUS=((__POINTER )(fopen((char*)(Self__TBHH->storage__3CS),"rb")));
+  fseek((FILE*)((file__AUS)),0,SEEK_END);
+  result__HWX=((__INTEGER )(ftell((FILE *)(file__AUS))));
+  fseek((FILE*)((file__AUS)),0,SEEK_SET);
+  Self__2TS->source__3BC=create__ZBB((__INTEGER)(result__HWX +  1));
+  __tmp__RVS=Self__2TS->source__3BC;
+  Self__UBHH=((__STRING *)__tmp__RVS);
+  if ((Self__UBHH->capacity__UCS > Self__UBHH->count__SGC)) {
+    ((__CHARACTER *)Self__UBHH->storage__3CS)[Self__UBHH->count__SGC]='\0';
+  } else {
+    new_capacity__ANHH= 0;
+    if ((Self__UBHH->capacity__UCS <= Self__UBHH->count__SGC)) {
+      if ((Self__UBHH->capacity__UCS ==  0)) {
+        Self__UBHH->capacity__UCS= 32;
+        Self__UBHH->storage__3CS=create__YIEB( 32);
+      } else {
+        new_capacity__ANHH=(__INTEGER)(Self__UBHH->capacity__UCS <<  1);
+        Self__CNHH=((__CHARACTER *)Self__UBHH->storage__3CS);
+        old_nb_elts__DNHH=Self__UBHH->capacity__UCS;
+        new__ENHH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__CNHH),((__UINTEGER_32 )old_nb_elts__DNHH),((__UINTEGER_32 )new_capacity__ANHH)));
+        upper__M4IH=(__INTEGER)(new_capacity__ANHH -  1);
+        Self__K4IH=old_nb_elts__DNHH;
+        while ((Self__K4IH <= upper__M4IH)) {
+          new__ENHH[Self__K4IH]='\0';
+          Self__K4IH=(__INTEGER)(Self__K4IH +  1);
+        };
+        Self__UBHH->storage__3CS=new__ENHH;
+        Self__UBHH->capacity__UCS=new_capacity__ANHH;
+      };
+    };
+    ((__CHARACTER *)Self__UBHH->storage__3CS)[Self__UBHH->count__SGC]='\0';
+    Self__UBHH->count__SGC=(__INTEGER)(Self__UBHH->count__SGC +  1);
+    Self__UBHH->count__SGC=(__INTEGER)(Self__UBHH->count__SGC -  1);
+  };
+  ptr__QWX=Self__UBHH->storage__3CS;
+  fread((void *)((ptr__QWX)),(size_t)(1), (size_t)((result__HWX)),(FILE*)((file__AUS)));
+  ((__CHARACTER *)ptr__QWX)[result__HWX]='\0';
+  from_external__YZS(__tmp__RVS,ptr__QWX);
+  fclose((FILE*)((file__AUS)));
+  result__NJ3=NULL;
+  ptr__OJ3=((__POINTER )(NULL));
+  typ_id__TJ3= 0;
+  sz__QJ3=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo));
+  if ((sz__QJ3 ==  0)) {
+    result__NJ3=HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo__;
+  } else {
+    typ_id__TJ3=__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__QJ3);
+    if ((typ_id__TJ3 == (__INTEGER)(-  1))) {
+      a__XFFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__YFFH=(__UINTEGER_32)((__UINTEGER_32)(sz__QJ3 + a__XFFH) & (__UINTEGER_32)(~ a__XFFH));
+      ptr_table__P4IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__YFFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__O4IH=((__POINTER )(NULL));
+      result__Q4IH=((__POINTER *)ptr_table__P4IH)[ 0];
+      if ((result__Q4IH == (void *)NULL)) {
+        result__Q4IH=new_lab__RTJ(new_size__YFFH);
+        next__O4IH=(void *)((unsigned long)result__Q4IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YFFH)));
+        ((__POINTER *)next__O4IH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__P4IH)[ 0]=next__O4IH;
+      } else {
+        next__O4IH=((__POINTER *)result__Q4IH)[ 0];
+        if ((next__O4IH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__Q4IH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__YFFH <<  1)) <=  4096)) {
+            next__O4IH=(void *)((unsigned long)result__Q4IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YFFH)));
+          } else {
+            next__O4IH=new_lab__RTJ(new_size__YFFH);
+          };
+          ((__POINTER *)next__O4IH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__P4IH)[ 0]=next__O4IH;
+        } else {
+          ((__POINTER *)result__Q4IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__O4IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__Q4IH=next__O4IH;
+        };
+      };
+      ptr__OJ3=result__Q4IH;
+    } else {
+      t__2FFH=((__UINTEGER_32 )typ_id__TJ3);
+      a__1FFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__X4IH=(__UINTEGER_32)((__UINTEGER_32)(sz__QJ3 + a__1FFH) & (__UINTEGER_32)(~ a__1FFH));
+      ptr_table__U4IH=((__POINTER )(&(table_type[(t__2FFH)])));
+      lab_type__W4IH=(__UINTEGER_32)(t__2FFH |  1);
+      next__T4IH=((__POINTER )(NULL));
+      result__V4IH=((__POINTER *)ptr_table__U4IH)[ 0];
+      if ((result__V4IH == (void *)NULL)) {
+        result__V4IH=new_lab__RTJ(lab_type__W4IH);
+        next__T4IH=(void *)((unsigned long)result__V4IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__X4IH)));
+        ((__POINTER *)next__T4IH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__U4IH)[ 0]=next__T4IH;
+      } else {
+        next__T4IH=((__POINTER *)result__V4IH)[ 0];
+        if ((next__T4IH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__V4IH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__X4IH <<  1)) <=  4096)) {
+            next__T4IH=(void *)((unsigned long)result__V4IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__X4IH)));
+          } else {
+            next__T4IH=new_lab__RTJ(lab_type__W4IH);
+          };
+          ((__POINTER *)next__T4IH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__U4IH)[ 0]=next__T4IH;
+        } else {
+          ((__POINTER *)result__V4IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__T4IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__V4IH=next__T4IH;
+        };
+      };
+      ptr__OJ3=result__V4IH;
+    };
+    result__NJ3=((__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *)ptr__OJ3);
+    *(result__NJ3) = *(HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo__);
+  };
+  Self__P3BC=((__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *)result__NJ3);
+  new_capacity__MMJC=prime_number_ceiling__021( 193);
+  Self__P3BC->buckets__NAGC=create__PRSC(new_capacity__MMJC);
+  Self__P3BC->capacity__W3BC=new_capacity__MMJC;
+  Self__P3BC->count__YOGC= 0;
+  Self__2TS->slot_list__YVS=result__NJ3;
+  Self__2TS->parent_named__5.parent_itm_object__4.position__SFJ=((__POSITION )(__UINTEGER_32)(((__UINTEGER_32 )Self__2TS->index__GPG) |  131072));
+  return(result__XVC);
 }
 
-static __BOOLEAN read_space__MTD()
+static __BOOLEAN read_space__XTD()
 // () With resultNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER pos2__2TD,level_comment__3TD,stat__4TD,pos__1TD,posold__0TD;
+  __INTEGER __tmp__K1DH,__tmp__L1DH,__tmp__M1DH,Self__1RDD;
+  __INTEGER new_capacity__SQHH,old_nb_elts__VQHH,upper__VBJH,Self__TBJH;
+  __INTEGER new_capacity__YQHH,old_nb_elts__1QHH,upper__0BJH,Self__YBJH;
+  __INTEGER new_capacity__4QHH,old_nb_elts__BRHH,upper__5BJH,Self__3BJH;
+  __INTEGER new_capacity__ERHH,old_nb_elts__HRHH,upper__ECJH,Self__CCJH;
+  __INTEGER Self__KCEB,up__MCEB,nb__I1D,p__J1D,__tmp__44DH,__tmp__54DH;
+  __INTEGER __tmp__A5DH;
+  __STRING *Self__TQHH,*Self__ZQHH,*Self__5QHH,*Self__FRHH;
+  __POSITION pos__A1VG;
+  __CHARACTER *__tmp__YYGH,*__tmp__ZYGH,*__tmp__0YGH,*Self__UQHH;
+  __CHARACTER *new__WQHH,*Self__0QHH,*new__2QHH,*Self__ARHH,*new__CRHH;
+  __CHARACTER *Self__GRHH,*new__IRHH,*__tmp__NHFH,*__tmp__OHFH;
+  __CHARACTER *__tmp__PHFH,*__tmp__QHFH,*__tmp__1YGH,*__tmp__2YGH;
+  __CHARACTER *__tmp__3YGH;
+  __CHARACTER result__L0DH,result__Y0DH,result__B1DH,result__N1DH;
+  __CHARACTER result__01DH,result__H2DH,result__Q2DH,result__Z2DH;
+  __CHARACTER result__K3DH,result__X3DH,result__E4DH,result__R4DH;
+  __CHARACTER result__ACF;
+  __BOOLEAN __tmp__IVD,__tmp__LYD,__tmp__25D;
+  pos2__2TD= 0;
+  level_comment__3TD= 0;
+  stat__4TD= 0;
+  pos__1TD=position__CCC;
+  posold__0TD=(__INTEGER)(-  1);
   if (is_shorter2__VI) {
-    ((__STRING *)string_tmp3__2TD)->count__EGC= 0;
-    ((__STRING *)string_tmp4__4TD)->count__EGC= 0;
-  };
-  while ((posold__PTD != position__CCC)) {
-    posold__PTD=position__CCC;
-    until_do__MPI:
+    ((__STRING *)string_tmp3__HUD)->count__SGC= 0;
+    ((__STRING *)string_tmp4__JUD)->count__SGC= 0;
+  };
+  while ((posold__0TD != position__CCC)) {
+    posold__0TD=position__CCC;
+    __tmp__K1DH=((__STRING *)source__5BC)->count__SGC;
+    __tmp__L1DH=((__STRING *)source__5BC)->count__SGC;
+    __tmp__M1DH=((__STRING *)source__5BC)->count__SGC;
+    __tmp__YYGH=((__STRING *)source__5BC)->storage__3CS;
+    __tmp__ZYGH=((__STRING *)source__5BC)->storage__3CS;
+    __tmp__0YGH=((__STRING *)source__5BC)->storage__3CS;
+    until_do__YPI:
     {
-      result__FZDH='\0';
-      if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__FZDH=((__CHARACTER )(( 0)));
+      result__L0DH='\0';
+      if ((position__CCC > __tmp__K1DH)) {
+        result__L0DH=((__CHARACTER )(( 0)));
       } else {
-        result__FZDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+        result__L0DH=((__CHARACTER *)__tmp__YYGH)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__FZDH == ((__CHARACTER )(( 0))))) {
-        __tmp__3UD=TRUE__;
+      if ((result__L0DH == ((__CHARACTER )(( 0))))) {
+        __tmp__IVD=TRUE__;
       } else {
-        result__SZDH='\0';
-        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__SZDH=((__CHARACTER )(( 0)));
+        result__Y0DH='\0';
+        if ((position__CCC > __tmp__L1DH)) {
+          result__Y0DH=((__CHARACTER )(( 0)));
         } else {
-          result__SZDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+          result__Y0DH=((__CHARACTER *)__tmp__ZYGH)[(__INTEGER)(position__CCC -  1)];
         };
-        __tmp__3UD=(((__INTEGER_8 )result__SZDH) > ((__INTEGER_8 )' '));
+        __tmp__IVD=(((__INTEGER_8 )result__Y0DH) > ((__INTEGER_8 )' '));
       };
-      if ((! __tmp__3UD)) {
+      if ((! __tmp__IVD)) {
         if ((is_shorter2__VI | is_shorter__LZ)) {
-          result__1ZDH='\0';
-          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__1ZDH=((__CHARACTER )(( 0)));
+          result__B1DH='\0';
+          if ((position__CCC > __tmp__M1DH)) {
+            result__B1DH=((__CHARACTER )(( 0)));
           } else {
-            result__1ZDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+            result__B1DH=((__CHARACTER *)__tmp__0YGH)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__1ZDH == '\n')) {
-            Self__WTDD=stat__TTD;
-            if ((stat__TTD ==  0)) {
-              stat__TTD= 1;
+          if ((result__B1DH == '\n')) {
+            Self__1RDD=stat__4TD;
+            if ((stat__4TD ==  0)) {
+              stat__4TD= 1;
             };
-            if ((Self__WTDD ==  1)) {
-              stat__TTD= 2;
+            if ((Self__1RDD ==  1)) {
+              stat__4TD= 2;
             };
           };
         };
         position__CCC=(__INTEGER)(position__CCC +  1);
-        goto until_do__MPI;
+        goto until_do__YPI;
       };
     };
-    if ((position__CCC < ((__STRING *)source__5BC)->count__EGC)) {
-      result__E0DH='\0';
-      if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__E0DH=((__CHARACTER )(( 0)));
+    if ((position__CCC < ((__STRING *)source__5BC)->count__SGC)) {
+      result__N1DH='\0';
+      if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+        result__N1DH=((__CHARACTER )(( 0)));
       } else {
-        result__E0DH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+        result__N1DH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
       };
-      if (((result__E0DH == '/') && (((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)((__INTEGER)(position__CCC +  1) -  1)] == '/'))) {
+      if (((result__N1DH == '/') && (((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)((__INTEGER)(position__CCC +  1) -  1)] == '/'))) {
         position__CCC=(__INTEGER)(position__CCC +  2);
-        pos2__RTD=position__CCC;
-        until_do__YW2D:
+        pos2__2TD=position__CCC;
+        until_do__ZX2D:
         {
-          result__R0DH='\0';
-          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__R0DH=((__CHARACTER )(( 0)));
+          result__01DH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+            result__01DH=((__CHARACTER )(( 0)));
           } else {
-            result__R0DH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+            result__01DH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__R0DH == ((__CHARACTER )(( 0))))) {
-            __tmp__AYD=TRUE__;
+          if ((result__01DH == ((__CHARACTER )(( 0))))) {
+            __tmp__LYD=TRUE__;
           } else {
-            result__40DH='\0';
-            if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-              result__40DH=((__CHARACTER )(( 0)));
+            result__H2DH='\0';
+            if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+              result__H2DH=((__CHARACTER )(( 0)));
             } else {
-              result__40DH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+              result__H2DH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
             };
-            __tmp__AYD=(result__40DH == '\n');
+            __tmp__LYD=(result__H2DH == '\n');
           };
-          if ((! __tmp__AYD)) {
+          if ((! __tmp__LYD)) {
             if (is_shorter2__VI) {
-              if (((stat__TTD ==  0) || (stat__TTD ==  1))) {
-                result__H1DH='\0';
-                if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                  result__H1DH=((__CHARACTER )(( 0)));
+              if (((stat__4TD ==  0) || (stat__4TD ==  1))) {
+                result__Q2DH='\0';
+                if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+                  result__Q2DH=((__CHARACTER )(( 0)));
                 } else {
-                  result__H1DH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+                  result__Q2DH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
+                };
+                Self__TQHH=((__STRING *)string_tmp3__HUD);
+                new_capacity__SQHH= 0;
+                if ((Self__TQHH->capacity__UCS <= Self__TQHH->count__SGC)) {
+                  if ((Self__TQHH->capacity__UCS ==  0)) {
+                    Self__TQHH->capacity__UCS= 32;
+                    Self__TQHH->storage__3CS=create__YIEB( 32);
+                  } else {
+                    new_capacity__SQHH=(__INTEGER)(Self__TQHH->capacity__UCS <<  1);
+                    Self__UQHH=((__CHARACTER *)Self__TQHH->storage__3CS);
+                    old_nb_elts__VQHH=Self__TQHH->capacity__UCS;
+                    new__WQHH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__UQHH),((__UINTEGER_32 )old_nb_elts__VQHH),((__UINTEGER_32 )new_capacity__SQHH)));
+                    upper__VBJH=(__INTEGER)(new_capacity__SQHH -  1);
+                    Self__TBJH=old_nb_elts__VQHH;
+                    while ((Self__TBJH <= upper__VBJH)) {
+                      new__WQHH[Self__TBJH]='\0';
+                      Self__TBJH=(__INTEGER)(Self__TBJH +  1);
+                    };
+                    Self__TQHH->storage__3CS=new__WQHH;
+                    Self__TQHH->capacity__UCS=new_capacity__SQHH;
+                  };
                 };
-                add_last__GOT(string_tmp3__2TD,result__H1DH);
+                ((__CHARACTER *)Self__TQHH->storage__3CS)[Self__TQHH->count__SGC]=result__Q2DH;
+                Self__TQHH->count__SGC=(__INTEGER)(Self__TQHH->count__SGC +  1);
               };
-              if ((stat__TTD ==  2)) {
-                result__Q1DH='\0';
-                if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                  result__Q1DH=((__CHARACTER )(( 0)));
+              if ((stat__4TD ==  2)) {
+                result__Z2DH='\0';
+                if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+                  result__Z2DH=((__CHARACTER )(( 0)));
                 } else {
-                  result__Q1DH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+                  result__Z2DH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
                 };
-                add_last__GOT(string_tmp4__4TD,result__Q1DH);
+                Self__ZQHH=((__STRING *)string_tmp4__JUD);
+                new_capacity__YQHH= 0;
+                if ((Self__ZQHH->capacity__UCS <= Self__ZQHH->count__SGC)) {
+                  if ((Self__ZQHH->capacity__UCS ==  0)) {
+                    Self__ZQHH->capacity__UCS= 32;
+                    Self__ZQHH->storage__3CS=create__YIEB( 32);
+                  } else {
+                    new_capacity__YQHH=(__INTEGER)(Self__ZQHH->capacity__UCS <<  1);
+                    Self__0QHH=((__CHARACTER *)Self__ZQHH->storage__3CS);
+                    old_nb_elts__1QHH=Self__ZQHH->capacity__UCS;
+                    new__2QHH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__0QHH),((__UINTEGER_32 )old_nb_elts__1QHH),((__UINTEGER_32 )new_capacity__YQHH)));
+                    upper__0BJH=(__INTEGER)(new_capacity__YQHH -  1);
+                    Self__YBJH=old_nb_elts__1QHH;
+                    while ((Self__YBJH <= upper__0BJH)) {
+                      new__2QHH[Self__YBJH]='\0';
+                      Self__YBJH=(__INTEGER)(Self__YBJH +  1);
+                    };
+                    Self__ZQHH->storage__3CS=new__2QHH;
+                    Self__ZQHH->capacity__UCS=new_capacity__YQHH;
+                  };
+                };
+                ((__CHARACTER *)Self__ZQHH->storage__3CS)[Self__ZQHH->count__SGC]=result__Z2DH;
+                Self__ZQHH->count__SGC=(__INTEGER)(Self__ZQHH->count__SGC +  1);
               };
             };
             position__CCC=(__INTEGER)(position__CCC +  1);
-            goto until_do__YW2D;
+            goto until_do__ZX2D;
           };
         };
         if (is_shorter2__VI) {
-          if (((stat__TTD ==  0) || (stat__TTD ==  1))) {
-            add_last__GOT(string_tmp3__2TD,'\n');
+          if (((stat__4TD ==  0) || (stat__4TD ==  1))) {
+            Self__5QHH=((__STRING *)string_tmp3__HUD);
+            new_capacity__4QHH= 0;
+            if ((Self__5QHH->capacity__UCS <= Self__5QHH->count__SGC)) {
+              if ((Self__5QHH->capacity__UCS ==  0)) {
+                Self__5QHH->capacity__UCS= 32;
+                Self__5QHH->storage__3CS=create__YIEB( 32);
+              } else {
+                new_capacity__4QHH=(__INTEGER)(Self__5QHH->capacity__UCS <<  1);
+                Self__ARHH=((__CHARACTER *)Self__5QHH->storage__3CS);
+                old_nb_elts__BRHH=Self__5QHH->capacity__UCS;
+                new__CRHH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__ARHH),((__UINTEGER_32 )old_nb_elts__BRHH),((__UINTEGER_32 )new_capacity__4QHH)));
+                upper__5BJH=(__INTEGER)(new_capacity__4QHH -  1);
+                Self__3BJH=old_nb_elts__BRHH;
+                while ((Self__3BJH <= upper__5BJH)) {
+                  new__CRHH[Self__3BJH]='\0';
+                  Self__3BJH=(__INTEGER)(Self__3BJH +  1);
+                };
+                Self__5QHH->storage__3CS=new__CRHH;
+                Self__5QHH->capacity__UCS=new_capacity__4QHH;
+              };
+            };
+            ((__CHARACTER *)Self__5QHH->storage__3CS)[Self__5QHH->count__SGC]='\n';
+            Self__5QHH->count__SGC=(__INTEGER)(Self__5QHH->count__SGC +  1);
           };
-          if ((stat__TTD ==  2)) {
-            add_last__GOT(string_tmp4__4TD,'\n');
+          if ((stat__4TD ==  2)) {
+            Self__FRHH=((__STRING *)string_tmp4__JUD);
+            new_capacity__ERHH= 0;
+            if ((Self__FRHH->capacity__UCS <= Self__FRHH->count__SGC)) {
+              if ((Self__FRHH->capacity__UCS ==  0)) {
+                Self__FRHH->capacity__UCS= 32;
+                Self__FRHH->storage__3CS=create__YIEB( 32);
+              } else {
+                new_capacity__ERHH=(__INTEGER)(Self__FRHH->capacity__UCS <<  1);
+                Self__GRHH=((__CHARACTER *)Self__FRHH->storage__3CS);
+                old_nb_elts__HRHH=Self__FRHH->capacity__UCS;
+                new__IRHH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__GRHH),((__UINTEGER_32 )old_nb_elts__HRHH),((__UINTEGER_32 )new_capacity__ERHH)));
+                upper__ECJH=(__INTEGER)(new_capacity__ERHH -  1);
+                Self__CCJH=old_nb_elts__HRHH;
+                while ((Self__CCJH <= upper__ECJH)) {
+                  new__IRHH[Self__CCJH]='\0';
+                  Self__CCJH=(__INTEGER)(Self__CCJH +  1);
+                };
+                Self__FRHH->storage__3CS=new__IRHH;
+                Self__FRHH->capacity__UCS=new_capacity__ERHH;
+              };
+            };
+            ((__CHARACTER *)Self__FRHH->storage__3CS)[Self__FRHH->count__SGC]='\n';
+            Self__FRHH->count__SGC=(__INTEGER)(Self__FRHH->count__SGC +  1);
           };
         };
         if (is_shorter__LZ) {
-          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);
+          Self__KCEB=(__INTEGER)((__INTEGER)(pos2__2TD -  2) + short_derive__PCC);
+          up__MCEB=((__STRING *)output_code__SI)->count__SGC;
+          if ((( 1 <= Self__KCEB) && (up__MCEB >= Self__KCEB))) {
+            remove_between__to__MIT(output_code__SI,(__INTEGER)((__INTEGER)(pos2__2TD -  2) + short_derive__PCC),(__INTEGER)((__INTEGER)(pos2__2TD -  1) + short_derive__PCC));
+            short_derive__PCC=(__INTEGER)(short_derive__PCC -  2);
           };
-          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);
+          nb__I1D= 0;
+          p__J1D=(__INTEGER)(pos2__2TD -  3);
+          __tmp__NHFH=((__STRING *)source__5BC)->storage__3CS;
+          __tmp__OHFH=((__STRING *)source__5BC)->storage__3CS;
+          while (((p__J1D >=  1) && (((__INTEGER_8 )((__CHARACTER *)__tmp__NHFH)[(__INTEGER)(p__J1D -  1)]) <= ((__INTEGER_8 )' ')))) {
+            if ((((__CHARACTER *)__tmp__OHFH)[(__INTEGER)(p__J1D -  1)] == '\n')) {
+              nb__I1D=(__INTEGER)(nb__I1D +  1);
             };
-            p__M0D=(__INTEGER)(p__M0D -  1);
+            p__J1D=(__INTEGER)(p__J1D -  1);
           };
-          if ((nb__L0D >  1)) {
-            stat__TTD= 2;
+          if ((nb__I1D >  1)) {
+            stat__4TD= 2;
           };
-          if (((stat__TTD ==  0) || (stat__TTD ==  1))) {
-            short__token__to__YCD((&__string_128),pos2__RTD,position__CCC);
+          if (((stat__4TD ==  0) || (stat__4TD ==  1))) {
+            short__token__to__GDD((&__string_128),pos2__2TD,position__CCC);
           };
-          if ((stat__TTD ==  2)) {
-            short__token__to__YCD((&__string_127),pos2__RTD,position__CCC);
+          if ((stat__4TD ==  2)) {
+            short__token__to__GDD((&__string_127),pos2__2TD,position__CCC);
           };
         };
         position__CCC=(__INTEGER)(position__CCC +  1);
       };
     };
-    if ((position__CCC < ((__STRING *)source__5BC)->count__EGC)) {
-      pos2__RTD=position__CCC;
-      result__B2DH='\0';
-      if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__B2DH=((__CHARACTER )(( 0)));
+    if ((position__CCC < ((__STRING *)source__5BC)->count__SGC)) {
+      pos2__2TD=position__CCC;
+      result__K3DH='\0';
+      if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+        result__K3DH=((__CHARACTER )(( 0)));
       } else {
-        result__B2DH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+        result__K3DH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
       };
-      if (((result__B2DH == '/') && (((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)((__INTEGER)(position__CCC +  1) -  1)] == '*'))) {
+      if (((result__K3DH == '/') && (((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)((__INTEGER)(position__CCC +  1) -  1)] == '*'))) {
         position__CCC=(__INTEGER)(position__CCC +  2);
-        level_comment__STD= 1;
-        until_do__0X2D:
+        level_comment__3TD= 1;
+        __tmp__44DH=((__STRING *)source__5BC)->count__SGC;
+        __tmp__54DH=((__STRING *)source__5BC)->count__SGC;
+        __tmp__A5DH=((__STRING *)source__5BC)->count__SGC;
+        __tmp__PHFH=((__STRING *)source__5BC)->storage__3CS;
+        __tmp__QHFH=((__STRING *)source__5BC)->storage__3CS;
+        __tmp__1YGH=((__STRING *)source__5BC)->storage__3CS;
+        __tmp__2YGH=((__STRING *)source__5BC)->storage__3CS;
+        __tmp__3YGH=((__STRING *)source__5BC)->storage__3CS;
+        until_do__1Y2D:
         {
-          result__O2DH='\0';
-          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__O2DH=((__CHARACTER )(( 0)));
+          result__X3DH='\0';
+          if ((position__CCC > __tmp__44DH)) {
+            result__X3DH=((__CHARACTER )(( 0)));
           } else {
-            result__O2DH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+            result__X3DH=((__CHARACTER *)__tmp__PHFH)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((! ((result__O2DH == ((__CHARACTER )(( 0)))) || (level_comment__STD ==  0)))) {
-            result__12DH='\0';
-            if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-              result__12DH=((__CHARACTER )(( 0)));
+          if ((! ((result__X3DH == ((__CHARACTER )(( 0)))) || (level_comment__3TD ==  0)))) {
+            result__E4DH='\0';
+            if ((position__CCC > __tmp__54DH)) {
+              result__E4DH=((__CHARACTER )(( 0)));
             } else {
-              result__12DH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+              result__E4DH=((__CHARACTER *)__tmp__QHFH)[(__INTEGER)(position__CCC -  1)];
             };
-            if (((result__12DH == '/') && (((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)((__INTEGER)(position__CCC +  1) -  1)] == '*'))) {
-              level_comment__STD=(__INTEGER)(level_comment__STD +  1);
+            if (((result__E4DH == '/') && (((__CHARACTER *)__tmp__1YGH)[(__INTEGER)((__INTEGER)(position__CCC +  1) -  1)] == '*'))) {
+              level_comment__3TD=(__INTEGER)(level_comment__3TD +  1);
               position__CCC=(__INTEGER)(position__CCC +  2);
-              __tmp__54D=TRUE__;
+              __tmp__25D=TRUE__;
             } else {
-              __tmp__54D=FALSE__;
+              __tmp__25D=FALSE__;
             };
-            if ((! __tmp__54D)) {
-              result__I3DH='\0';
-              if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                result__I3DH=((__CHARACTER )(( 0)));
+            if ((! __tmp__25D)) {
+              result__R4DH='\0';
+              if ((position__CCC > __tmp__A5DH)) {
+                result__R4DH=((__CHARACTER )(( 0)));
               } else {
-                result__I3DH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+                result__R4DH=((__CHARACTER *)__tmp__2YGH)[(__INTEGER)(position__CCC -  1)];
               };
-              if (((result__I3DH == '*') && (((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)((__INTEGER)(position__CCC +  1) -  1)] == '/'))) {
-                level_comment__STD=(__INTEGER)(level_comment__STD -  1);
+              if (((result__R4DH == '*') && (((__CHARACTER *)__tmp__3YGH)[(__INTEGER)((__INTEGER)(position__CCC +  1) -  1)] == '/'))) {
+                level_comment__3TD=(__INTEGER)(level_comment__3TD -  1);
                 position__CCC=(__INTEGER)(position__CCC +  2);
               } else {
                 position__CCC=(__INTEGER)(position__CCC +  1);
               };
             };
-            goto until_do__0X2D;
+            goto until_do__1Y2D;
           };
         };
-        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)) {
+        if ((level_comment__3TD !=  0)) {
+          position__CCC=pos2__2TD;
+          pos__A1VG=current_position__B0F();
+          put_error__text__1PG( 0,(&__string_206));
+          put_position__FRG(pos__A1VG);
+          put_string__33F(msg_err__AQG);
+          if ((type_error__5PG !=  2)) {
             exit(( 1));
           };
         };
-        short__token__to__YCD((&__string_70),pos2__RTD,position__CCC);
+        short__token__to__GDD((&__string_70),pos2__2TD,position__CCC);
       };
     };
   };
-  if ((is_shorter2__VI && (! skip_comment__2AE))) {
-    if ((((__STRING *)string_tmp3__2TD)->count__EGC ==  0)) {
-      last_comment_slot__OBE=NULL;
+  if ((is_shorter2__VI && (! skip_comment__ZBE))) {
+    if ((((__STRING *)string_tmp3__HUD)->count__SGC ==  0)) {
+      last_comment_slot__LCE=NULL;
     } else {
-      last_comment_slot__OBE=get__YWB(string_tmp3__2TD);
+      last_comment_slot__LCE=get__YWB(string_tmp3__HUD);
     };
-    if ((((__STRING *)string_tmp4__4TD)->count__EGC !=  0)) {
-      last_comment_extern__JZC=get__YWB(string_tmp4__4TD);
+    if ((((__STRING *)string_tmp4__JUD)->count__SGC !=  0)) {
+      last_comment_extern__XZC=get__YWB(string_tmp4__JUD);
     };
   };
-  begin_position__ECE=position__CCC;
-  result__DBF='\0';
-  if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-    result__DBF=((__CHARACTER )(( 0)));
+  begin_position__BDE=position__CCC;
+  result__ACF='\0';
+  if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+    result__ACF=((__CHARACTER )(( 0)));
   } else {
-    result__DBF=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+    result__ACF=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
   };
-  return(((position__CCC != pos__QTD) | (result__DBF != ((__CHARACTER )(( 0))))));
+  return(((position__CCC != pos__1TD) | (result__ACF != ((__CHARACTER )(( 0))))));
 }
 
-static __BOOLEAN read_identifier__QBL()
+static __BOOLEAN read_identifier__2BL()
 // () With resultNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER posold__ACL,idx__BCL,new_capacity__GNHH,old_nb_elts__JNHH;
+  __INTEGER upper__14IH,Self__Z4IH;
+  __STRING *Self__HNHH;
+  __POSITION pos__J31G;
+  __BOOLEAN result__5BL,__tmp__OCL,result__3FFH,__tmp__4DL,result__AGFH;
+  __BOOLEAN result__JYGH,__tmp__0DL,__tmp__1DL;
+  __CHARACTER result__HWDH,result__VWDH,result__CXDH,result__LXDH;
+  __CHARACTER result__UXDH,result__3XDH;
+  __CHARACTER *Self__INHH,*new__KNHH;
+  result__5BL=FALSE__;
+  posold__ACL= 0;
+  idx__BCL= 0;
+  if ((! read_space__XTD())) {
+    __tmp__OCL=TRUE__;
   } else {
-    result__BVDH='\0';
-    if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-      result__BVDH=((__CHARACTER )(( 0)));
+    result__HWDH='\0';
+    if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+      result__HWDH=((__CHARACTER )(( 0)));
     } else {
-      result__BVDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+      result__HWDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
     };
-    result__YUFH=FALSE__;
-    if ((((__INTEGER_8 )result__BVDH) >= ((__INTEGER_8 )'a'))) {
-      result__YUFH=(((__INTEGER_8 )result__BVDH) <= ((__INTEGER_8 )'z'));
+    result__3FFH=FALSE__;
+    if ((((__INTEGER_8 )result__HWDH) >= ((__INTEGER_8 )'a'))) {
+      result__3FFH=(((__INTEGER_8 )result__HWDH) <= ((__INTEGER_8 )'z'));
     };
-    __tmp__CCL=(! result__YUFH);
+    __tmp__OCL=(! result__3FFH);
   };
-  if (__tmp__CCL) {
-    result__TBL=FALSE__;
+  if (__tmp__OCL) {
+    result__5BL=FALSE__;
   } else {
-    posold__UBL=position__CCC;
-    ((__STRING *)string_tmp__VH)->count__EGC= 0;
-    until_do__W0ZE:
+    posold__ACL=position__CCC;
+    ((__STRING *)string_tmp__VH)->count__SGC= 0;
+    until_do__P1ZE:
     {
-      result__PVDH='\0';
-      if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__PVDH=((__CHARACTER )(( 0)));
+      result__VWDH='\0';
+      if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+        result__VWDH=((__CHARACTER )(( 0)));
       } else {
-        result__PVDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+        result__VWDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__PVDH == ((__CHARACTER )(( 0))))) {
-        __tmp__SDL=TRUE__;
+      if ((result__VWDH == ((__CHARACTER )(( 0))))) {
+        __tmp__4DL=TRUE__;
       } else {
-        result__2VDH='\0';
-        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__2VDH=((__CHARACTER )(( 0)));
+        result__CXDH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+          result__CXDH=((__CHARACTER )(( 0)));
         } else {
-          result__2VDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+          result__CXDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
         };
-        result__1UFH=FALSE__;
-        if ((((__INTEGER_8 )result__2VDH) >= ((__INTEGER_8 )'a'))) {
-          result__1UFH=(((__INTEGER_8 )result__2VDH) <= ((__INTEGER_8 )'z'));
+        result__AGFH=FALSE__;
+        if ((((__INTEGER_8 )result__CXDH) >= ((__INTEGER_8 )'a'))) {
+          result__AGFH=(((__INTEGER_8 )result__CXDH) <= ((__INTEGER_8 )'z'));
         };
-        if ((! result__1UFH)) {
-          result__FWDH='\0';
-          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__FWDH=((__CHARACTER )(( 0)));
+        if ((! result__AGFH)) {
+          result__LXDH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+            result__LXDH=((__CHARACTER )(( 0)));
           } else {
-            result__FWDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+            result__LXDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
           };
-          result__4UFH=FALSE__;
-          if ((((__INTEGER_8 )result__FWDH) >= ((__INTEGER_8 )'0'))) {
-            result__4UFH=(((__INTEGER_8 )result__FWDH) <= ((__INTEGER_8 )'9'));
+          result__JYGH=FALSE__;
+          if ((((__INTEGER_8 )result__LXDH) >= ((__INTEGER_8 )'0'))) {
+            result__JYGH=(((__INTEGER_8 )result__LXDH) <= ((__INTEGER_8 )'9'));
           };
-          __tmp__ODL=(! result__4UFH);
+          __tmp__0DL=(! result__JYGH);
         } else {
-          __tmp__ODL=FALSE__;
+          __tmp__0DL=FALSE__;
         };
-        if (__tmp__ODL) {
-          result__OWDH='\0';
-          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__OWDH=((__CHARACTER )(( 0)));
+        if (__tmp__0DL) {
+          result__UXDH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+            result__UXDH=((__CHARACTER )(( 0)));
           } else {
-            result__OWDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+            result__UXDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
           };
-          __tmp__PDL=(result__OWDH != '_');
+          __tmp__1DL=(result__UXDH != '_');
         } else {
-          __tmp__PDL=FALSE__;
+          __tmp__1DL=FALSE__;
         };
-        __tmp__SDL=__tmp__PDL;
+        __tmp__4DL=__tmp__1DL;
       };
-      if ((! __tmp__SDL)) {
-        result__XWDH='\0';
-        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__XWDH=((__CHARACTER )(( 0)));
+      if ((! __tmp__4DL)) {
+        result__3XDH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+          result__3XDH=((__CHARACTER )(( 0)));
         } else {
-          result__XWDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+          result__3XDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
+        };
+        Self__HNHH=((__STRING *)string_tmp__VH);
+        new_capacity__GNHH= 0;
+        if ((Self__HNHH->capacity__UCS <= Self__HNHH->count__SGC)) {
+          if ((Self__HNHH->capacity__UCS ==  0)) {
+            Self__HNHH->capacity__UCS= 32;
+            Self__HNHH->storage__3CS=create__YIEB( 32);
+          } else {
+            new_capacity__GNHH=(__INTEGER)(Self__HNHH->capacity__UCS <<  1);
+            Self__INHH=((__CHARACTER *)Self__HNHH->storage__3CS);
+            old_nb_elts__JNHH=Self__HNHH->capacity__UCS;
+            new__KNHH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__INHH),((__UINTEGER_32 )old_nb_elts__JNHH),((__UINTEGER_32 )new_capacity__GNHH)));
+            upper__14IH=(__INTEGER)(new_capacity__GNHH -  1);
+            Self__Z4IH=old_nb_elts__JNHH;
+            while ((Self__Z4IH <= upper__14IH)) {
+              new__KNHH[Self__Z4IH]='\0';
+              Self__Z4IH=(__INTEGER)(Self__Z4IH +  1);
+            };
+            Self__HNHH->storage__3CS=new__KNHH;
+            Self__HNHH->capacity__UCS=new_capacity__GNHH;
+          };
         };
-        add_last__GOT(string_tmp__VH,result__XWDH);
+        ((__CHARACTER *)Self__HNHH->storage__3CS)[Self__HNHH->count__SGC]=result__3XDH;
+        Self__HNHH->count__SGC=(__INTEGER)(Self__HNHH->count__SGC +  1);
         position__CCC=(__INTEGER)(position__CCC +  1);
-        goto until_do__W0ZE;
-      };
-    };
-    if ((((__STRING *)string_tmp__VH)->count__EGC !=  0)) {
-      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)) {
+        goto until_do__P1ZE;
+      };
+    };
+    if ((((__STRING *)string_tmp__VH)->count__SGC !=  0)) {
+      idx__BCL=first_substring_index__W0ZE(string_tmp__VH);
+      if ((idx__BCL !=  0)) {
+        position__CCC=(__INTEGER)(posold__ACL + idx__BCL);
+        pos__J31G=current_position__B0F();
+        put_error__text__1PG( 0,(&__string_207));
+        put_position__FRG(pos__J31G);
+        put_string__33F(msg_err__AQG);
+        if ((type_error__5PG !=  2)) {
           exit(( 1));
         };
       };
-      last_string__V1C=get__YWB(string_tmp__VH);
-      result__TBL=TRUE__;
+      last_string__D2C=get__YWB(string_tmp__VH);
+      result__5BL=TRUE__;
     };
   };
-  return(result__TBL);
+  return(result__5BL);
 }
 
-static __POSITION current_position__EZF()
+static __POSITION current_position__B0F()
 // () With resultNo recursive, No inlinable.
 {
-  __POSITION result__HZF;
-  result__HZF=((__POSITION ) 0);
+  __POSITION result__E0F;
+  __CHARACTER *__tmp__LYGH;
+  result__E0F=((__POSITION ) 0);
+  __tmp__LYGH=((__STRING *)source__5BC)->storage__3CS;
   while ((pos_cur__FCC != position__CCC)) {
-    if ((((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(pos_cur__FCC -  1)] == '\n')) {
+    if ((((__CHARACTER *)__tmp__LYGH)[(__INTEGER)(pos_cur__FCC -  1)] == '\n')) {
       pos_col__HCC= 0;
       pos_line__GCC=(__INTEGER)(pos_line__GCC +  1);
     } else {
@@ -12687,383 +12381,803 @@ static __POSITION current_position__EZF()
     pos_cur__FCC=(__INTEGER)(pos_cur__FCC +  1);
   };
   if ((pos_line__GCC >  32767)) {
-    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)) {
+    result__E0F=((__POSITION )(__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((__PROTOTYPE *)object__ZBC)->index__GPG) | ((__UINTEGER_32 )(__INTEGER)(pos_col__HCC <<  9))) |  4294836224LU));
+    put_error__text__1PG( 0,(&__string_208));
+    put_position__FRG(result__E0F);
+    put_string__33F(msg_err__AQG);
+    if ((type_error__5PG !=  2)) {
       exit(( 1));
     };
   };
   if ((pos_col__HCC >  255)) {
-    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)) {
+    result__E0F=((__POSITION )(__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((__PROTOTYPE *)object__ZBC)->index__GPG) |  130560) | ((__UINTEGER_32 )(__INTEGER)(pos_line__GCC <<  17))));
+    put_error__text__1PG( 0,(&__string_209));
+    put_position__FRG(result__E0F);
+    put_string__33F(msg_err__AQG);
+    if ((type_error__5PG !=  2)) {
       exit(( 1));
     };
   };
-  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)))));
+  return(((__POSITION )(__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((__PROTOTYPE *)object__ZBC)->index__GPG) | ((__UINTEGER_32 )(__INTEGER)(pos_col__HCC <<  9))) | ((__UINTEGER_32 )(__INTEGER)(pos_line__GCC <<  17)))));
 }
 
-static void put_error__text__NPG(__INTEGER type__PPG,void *txt__QPG)
+static void put_error__text__1PG(__INTEGER type__3PG,void *txt__4PG)
 // ({INTEGER},{NULLxSTRING_CONSTANTxSTRING}) VoidNo recursive, No inlinable.
 {
-  type_error__RPG=type__PPG;
-  ((__STRING *)msg_err__SPG)->count__EGC= 0;
-  if ((type__PPG ==  0)) {
-    append__ROS(msg_err__SPG,(&__string_210));
+  type_error__5PG=type__3PG;
+  ((__STRING *)msg_err__AQG)->count__SGC= 0;
+  if ((type__3PG ==  0)) {
+    append__3OS(msg_err__AQG,(&__string_210));
   };
-  if ((type__PPG ==  1)) {
-    append__ROS(msg_err__SPG,(&__string_211));
+  if ((type__3PG ==  1)) {
+    append__3OS(msg_err__AQG,(&__string_211));
   };
-  if ((type__PPG ==  2)) {
-    append__ROS(msg_err__SPG,(&__string_212));
+  if ((type__3PG ==  2)) {
+    append__3OS(msg_err__AQG,(&__string_212));
   };
-  if ((type__PPG ==  3)) {
-    append__ROS(msg_err__SPG,(&__string_213));
+  if ((type__3PG ==  3)) {
+    append__3OS(msg_err__AQG,(&__string_213));
   };
-  append__ROS(msg_err__SPG,txt__QPG);
+  append__3OS(msg_err__AQG,txt__4PG);
 }
 
-static void put_position__XQG(__POSITION Self__YQG)
+static void put_position__FRG(__POSITION Self__GRG)
 // ({POSITION}) VoidNo recursive, No inlinable.
 {
-  __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__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__GOT(string_tmp__VH,' ');
-      };
-    };
-    c__0QG=(__UINTEGER_32)(c__0QG +  1);
-    pos__ZQG=(__INTEGER)(pos__ZQG +  1);
-  };
-  add_last__GOT(msg_err__SPG,'\n');
-  append__ROS(msg_err__SPG,string_tmp__VH);
-  append__ROS(msg_err__SPG,(&__string_218));
+  __UINTEGER_32 c__IRG,__tmp__QSG,cols__LRG;
+  __STRING *Self__NNHH,*Self__TNHH,*Self__ZNHH,*Self__5NHH,*Self__FOHH;
+  __INTEGER new_capacity__MNHH,old_nb_elts__PNHH,upper__A5IH,Self__44IH;
+  __INTEGER pos__HRG,Self__3NH,limit_up__4NH,new_capacity__SNHH;
+  __INTEGER old_nb_elts__VNHH,upper__F5IH,Self__D5IH,new_capacity__YNHH;
+  __INTEGER old_nb_elts__1NHH,upper__K5IH,Self__I5IH,new_capacity__4NHH;
+  __INTEGER old_nb_elts__BOHH,upper__P5IH,Self__N5IH,new_capacity__EOHH;
+  __INTEGER old_nb_elts__HOHH,upper__U5IH,Self__S5IH;
+  void *src__ORG;
+  __CHARACTER char__PRG;
+  __CHARACTER *Self__ONHH,*new__QNHH,*__tmp__TGFH,*Self__UNHH,*new__WNHH;
+  __CHARACTER *Self__0NHH,*new__2NHH,*Self__AOHH,*new__COHH,*Self__GOHH;
+  __CHARACTER *new__IOHH;
+  c__IRG= 0;
+  char__PRG='\0';
+  append__3OS(msg_err__AQG,(&__string_214));
+  append_in__5KH((__UINTEGER_32)(((__UINTEGER_32 )Self__GRG) >>  17),msg_err__AQG);
+  append__3OS(msg_err__AQG,(&__string_215));
+  append_in__5KH((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )Self__GRG) >>  9) &  255),msg_err__AQG);
+  append__3OS(msg_err__AQG,(&__string_216));
+  append__3OS(msg_err__AQG,((__PROTOTYPE *)((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__DVT)[(__INTEGER)(((__INTEGER )((__UINTEGER_32 )Self__GRG)) &  511)])->parent_named__5.name__LI);
+  Self__NNHH=((__STRING *)msg_err__AQG);
+  new_capacity__MNHH= 0;
+  if ((Self__NNHH->capacity__UCS <= Self__NNHH->count__SGC)) {
+    if ((Self__NNHH->capacity__UCS ==  0)) {
+      Self__NNHH->capacity__UCS= 32;
+      Self__NNHH->storage__3CS=create__YIEB( 32);
+    } else {
+      new_capacity__MNHH=(__INTEGER)(Self__NNHH->capacity__UCS <<  1);
+      Self__ONHH=((__CHARACTER *)Self__NNHH->storage__3CS);
+      old_nb_elts__PNHH=Self__NNHH->capacity__UCS;
+      new__QNHH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__ONHH),((__UINTEGER_32 )old_nb_elts__PNHH),((__UINTEGER_32 )new_capacity__MNHH)));
+      upper__A5IH=(__INTEGER)(new_capacity__MNHH -  1);
+      Self__44IH=old_nb_elts__PNHH;
+      while ((Self__44IH <= upper__A5IH)) {
+        new__QNHH[Self__44IH]='\0';
+        Self__44IH=(__INTEGER)(Self__44IH +  1);
+      };
+      Self__NNHH->storage__3CS=new__QNHH;
+      Self__NNHH->capacity__UCS=new_capacity__MNHH;
+    };
+  };
+  ((__CHARACTER *)Self__NNHH->storage__3CS)[Self__NNHH->count__SGC]='(';
+  Self__NNHH->count__SGC=(__INTEGER)(Self__NNHH->count__SGC +  1);
+  append__3OS(msg_err__AQG,((__PROTOTYPE *)((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__DVT)[(__INTEGER)(((__INTEGER )((__UINTEGER_32 )Self__GRG)) &  511)])->filename__FSG);
+  append__3OS(msg_err__AQG,(&__string_217));
+  src__ORG=((__PROTOTYPE *)((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__DVT)[(__INTEGER)(((__INTEGER )((__UINTEGER_32 )Self__GRG)) &  511)])->source__3BC;
+  pos__HRG= 1;
+  __tmp__QSG=(__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )Self__GRG) >>  17) -  1);
+  Self__3NH= 1;
+  limit_up__4NH=((__INTEGER )__tmp__QSG);
+  __tmp__TGFH=((__STRING *)src__ORG)->storage__3CS;
+  while ((Self__3NH <= limit_up__4NH)) {
+    while ((((__CHARACTER *)__tmp__TGFH)[(__INTEGER)(pos__HRG -  1)] != '\n')) {
+      pos__HRG=(__INTEGER)(pos__HRG +  1);
+    };
+    pos__HRG=(__INTEGER)(pos__HRG +  1);
+    Self__3NH=(__INTEGER)(Self__3NH +  1);
+  };
+  ((__STRING *)string_tmp__VH)->count__SGC= 0;
+  cols__LRG=(__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )Self__GRG) >>  9) &  255);
+  while ((! ((pos__HRG > ((__STRING *)src__ORG)->count__SGC) || (((__CHARACTER *)((__STRING *)src__ORG)->storage__3CS)[(__INTEGER)(pos__HRG -  1)] == '\n')))) {
+    char__PRG=((__CHARACTER *)((__STRING *)src__ORG)->storage__3CS)[(__INTEGER)(pos__HRG -  1)];
+    Self__TNHH=((__STRING *)msg_err__AQG);
+    new_capacity__SNHH= 0;
+    if ((Self__TNHH->capacity__UCS <= Self__TNHH->count__SGC)) {
+      if ((Self__TNHH->capacity__UCS ==  0)) {
+        Self__TNHH->capacity__UCS= 32;
+        Self__TNHH->storage__3CS=create__YIEB( 32);
+      } else {
+        new_capacity__SNHH=(__INTEGER)(Self__TNHH->capacity__UCS <<  1);
+        Self__UNHH=((__CHARACTER *)Self__TNHH->storage__3CS);
+        old_nb_elts__VNHH=Self__TNHH->capacity__UCS;
+        new__WNHH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__UNHH),((__UINTEGER_32 )old_nb_elts__VNHH),((__UINTEGER_32 )new_capacity__SNHH)));
+        upper__F5IH=(__INTEGER)(new_capacity__SNHH -  1);
+        Self__D5IH=old_nb_elts__VNHH;
+        while ((Self__D5IH <= upper__F5IH)) {
+          new__WNHH[Self__D5IH]='\0';
+          Self__D5IH=(__INTEGER)(Self__D5IH +  1);
+        };
+        Self__TNHH->storage__3CS=new__WNHH;
+        Self__TNHH->capacity__UCS=new_capacity__SNHH;
+      };
+    };
+    ((__CHARACTER *)Self__TNHH->storage__3CS)[Self__TNHH->count__SGC]=char__PRG;
+    Self__TNHH->count__SGC=(__INTEGER)(Self__TNHH->count__SGC +  1);
+    if ((c__IRG < cols__LRG)) {
+      if ((char__PRG == '\t')) {
+        Self__ZNHH=((__STRING *)string_tmp__VH);
+        new_capacity__YNHH= 0;
+        if ((Self__ZNHH->capacity__UCS <= Self__ZNHH->count__SGC)) {
+          if ((Self__ZNHH->capacity__UCS ==  0)) {
+            Self__ZNHH->capacity__UCS= 32;
+            Self__ZNHH->storage__3CS=create__YIEB( 32);
+          } else {
+            new_capacity__YNHH=(__INTEGER)(Self__ZNHH->capacity__UCS <<  1);
+            Self__0NHH=((__CHARACTER *)Self__ZNHH->storage__3CS);
+            old_nb_elts__1NHH=Self__ZNHH->capacity__UCS;
+            new__2NHH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__0NHH),((__UINTEGER_32 )old_nb_elts__1NHH),((__UINTEGER_32 )new_capacity__YNHH)));
+            upper__K5IH=(__INTEGER)(new_capacity__YNHH -  1);
+            Self__I5IH=old_nb_elts__1NHH;
+            while ((Self__I5IH <= upper__K5IH)) {
+              new__2NHH[Self__I5IH]='\0';
+              Self__I5IH=(__INTEGER)(Self__I5IH +  1);
+            };
+            Self__ZNHH->storage__3CS=new__2NHH;
+            Self__ZNHH->capacity__UCS=new_capacity__YNHH;
+          };
+        };
+        ((__CHARACTER *)Self__ZNHH->storage__3CS)[Self__ZNHH->count__SGC]='\t';
+        Self__ZNHH->count__SGC=(__INTEGER)(Self__ZNHH->count__SGC +  1);
+      } else {
+        Self__5NHH=((__STRING *)string_tmp__VH);
+        new_capacity__4NHH= 0;
+        if ((Self__5NHH->capacity__UCS <= Self__5NHH->count__SGC)) {
+          if ((Self__5NHH->capacity__UCS ==  0)) {
+            Self__5NHH->capacity__UCS= 32;
+            Self__5NHH->storage__3CS=create__YIEB( 32);
+          } else {
+            new_capacity__4NHH=(__INTEGER)(Self__5NHH->capacity__UCS <<  1);
+            Self__AOHH=((__CHARACTER *)Self__5NHH->storage__3CS);
+            old_nb_elts__BOHH=Self__5NHH->capacity__UCS;
+            new__COHH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__AOHH),((__UINTEGER_32 )old_nb_elts__BOHH),((__UINTEGER_32 )new_capacity__4NHH)));
+            upper__P5IH=(__INTEGER)(new_capacity__4NHH -  1);
+            Self__N5IH=old_nb_elts__BOHH;
+            while ((Self__N5IH <= upper__P5IH)) {
+              new__COHH[Self__N5IH]='\0';
+              Self__N5IH=(__INTEGER)(Self__N5IH +  1);
+            };
+            Self__5NHH->storage__3CS=new__COHH;
+            Self__5NHH->capacity__UCS=new_capacity__4NHH;
+          };
+        };
+        ((__CHARACTER *)Self__5NHH->storage__3CS)[Self__5NHH->count__SGC]=' ';
+        Self__5NHH->count__SGC=(__INTEGER)(Self__5NHH->count__SGC +  1);
+      };
+    };
+    c__IRG=(__UINTEGER_32)(c__IRG +  1);
+    pos__HRG=(__INTEGER)(pos__HRG +  1);
+  };
+  Self__FOHH=((__STRING *)msg_err__AQG);
+  new_capacity__EOHH= 0;
+  if ((Self__FOHH->capacity__UCS <= Self__FOHH->count__SGC)) {
+    if ((Self__FOHH->capacity__UCS ==  0)) {
+      Self__FOHH->capacity__UCS= 32;
+      Self__FOHH->storage__3CS=create__YIEB( 32);
+    } else {
+      new_capacity__EOHH=(__INTEGER)(Self__FOHH->capacity__UCS <<  1);
+      Self__GOHH=((__CHARACTER *)Self__FOHH->storage__3CS);
+      old_nb_elts__HOHH=Self__FOHH->capacity__UCS;
+      new__IOHH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__GOHH),((__UINTEGER_32 )old_nb_elts__HOHH),((__UINTEGER_32 )new_capacity__EOHH)));
+      upper__U5IH=(__INTEGER)(new_capacity__EOHH -  1);
+      Self__S5IH=old_nb_elts__HOHH;
+      while ((Self__S5IH <= upper__U5IH)) {
+        new__IOHH[Self__S5IH]='\0';
+        Self__S5IH=(__INTEGER)(Self__S5IH +  1);
+      };
+      Self__FOHH->storage__3CS=new__IOHH;
+      Self__FOHH->capacity__UCS=new_capacity__EOHH;
+    };
+  };
+  ((__CHARACTER *)Self__FOHH->storage__3CS)[Self__FOHH->count__SGC]='\n';
+  Self__FOHH->count__SGC=(__INTEGER)(Self__FOHH->count__SGC +  1);
+  append__3OS(msg_err__AQG,string_tmp__VH);
+  append__3OS(msg_err__AQG,(&__string_218));
+}
+
+static __BOOLEAN fast_has__IDT(__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__JDT,void *k__KDT)
+// ({HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
+{
+  void *node__UDT;
+  node__UDT=((void **)Self__JDT->buckets__1DT)[(__INTEGER)(hash_code__RNW(k__KDT) % Self__JDT->capacity__WDT)];
+  while ((! (((void *)node__UDT == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__UDT)->key__HET == (void *)k__KDT)))) {
+    node__UDT=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__UDT)->next__SET;
+  };
+  return(((void *)node__UDT != (void *)NULL));
 }
 
-static __BOOLEAN read_symbol__SYJ(void *st__UYJ)
+static __INTEGER hash_code__RNW(__STRING_CONSTANT *Self__SNW)
 // ({STRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER result__UNW,__tmp__VNW,Self__0R1;
+  __CHARACTER *__tmp__YGFH;
+  result__UNW= 0;
+  __tmp__VNW=Self__SNW->count__DD;
+  Self__0R1= 1;
+  __tmp__YGFH=Self__SNW->storage__RRO;
+  while ((Self__0R1 <= __tmp__VNW)) {
+    result__UNW=(__INTEGER)((__INTEGER)( 5 * result__UNW) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)__tmp__YGFH)[(__INTEGER)(Self__0R1 -  1)])));
+    Self__0R1=(__INTEGER)(Self__0R1 +  1);
+  };
+  if ((result__UNW <  0)) {
+    result__UNW=(__INTEGER)(~ result__UNW);
+  };
+  return(result__UNW);
+}
+
+static __BOOLEAN read_symbol__4YJ(void *st__AZJ)
+// ({STRING_CONSTANT}) With resultNo recursive, No inlinable.
+{
+  __INTEGER posold__CZJ,j__DZJ,__tmp__3GFH,__tmp__4GFH,__tmp__5GFH;
+  __BOOLEAN result__EZJ,__tmp__M0J,__tmp__J0J;
+  __CHARACTER *__tmp__AHFH,*__tmp__WYGH,*__tmp__XYGH;
+  __CHARACTER result__DZDH,result__QZDH;
+  posold__CZJ= 0;
+  j__DZJ= 0;
+  result__EZJ=FALSE__;
+  if ((! read_space__XTD())) {
+    result__EZJ=FALSE__;
   } else {
-    posold__WYJ=position__CCC;
-    j__XYJ= 1;
-    until_do__IF5:
+    posold__CZJ=position__CCC;
+    j__DZJ= 1;
+    __tmp__3GFH=((__STRING *)source__5BC)->count__SGC;
+    __tmp__4GFH=((__STRING_CONSTANT *)st__AZJ)->count__DD;
+    __tmp__5GFH=((__STRING *)source__5BC)->count__SGC;
+    __tmp__AHFH=((__STRING_CONSTANT *)st__AZJ)->storage__RRO;
+    __tmp__WYGH=((__STRING *)source__5BC)->storage__3CS;
+    __tmp__XYGH=((__STRING *)source__5BC)->storage__3CS;
+    until_do__XB5:
     {
-      result__3XDH='\0';
-      if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__3XDH=((__CHARACTER )(( 0)));
+      result__DZDH='\0';
+      if ((position__CCC > __tmp__3GFH)) {
+        result__DZDH=((__CHARACTER )(( 0)));
       } else {
-        result__3XDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+        result__DZDH=((__CHARACTER *)__tmp__WYGH)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__3XDH == ((__CHARACTER )(( 0))))) {
-        __tmp__A0J=TRUE__;
+      if ((result__DZDH == ((__CHARACTER )(( 0))))) {
+        __tmp__M0J=TRUE__;
       } else {
-        if ((j__XYJ > ((__STRING_CONSTANT *)st__UYJ)->count__DD)) {
-          __tmp__3ZJ=TRUE__;
+        if ((j__DZJ > __tmp__4GFH)) {
+          __tmp__J0J=TRUE__;
         } else {
-          result__KYDH='\0';
-          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__KYDH=((__CHARACTER )(( 0)));
+          result__QZDH='\0';
+          if ((position__CCC > __tmp__5GFH)) {
+            result__QZDH=((__CHARACTER )(( 0)));
           } else {
-            result__KYDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+            result__QZDH=((__CHARACTER *)__tmp__XYGH)[(__INTEGER)(position__CCC -  1)];
           };
-          __tmp__3ZJ=(result__KYDH != ((__CHARACTER *)((__STRING_CONSTANT *)st__UYJ)->storage__FRO)[(__INTEGER)(j__XYJ -  1)]);
+          __tmp__J0J=(result__QZDH != ((__CHARACTER *)__tmp__AHFH)[(__INTEGER)(j__DZJ -  1)]);
         };
-        __tmp__A0J=__tmp__3ZJ;
+        __tmp__M0J=__tmp__J0J;
       };
-      if ((! __tmp__A0J)) {
-        j__XYJ=(__INTEGER)(j__XYJ +  1);
+      if ((! __tmp__M0J)) {
+        j__DZJ=(__INTEGER)(j__DZJ +  1);
         position__CCC=(__INTEGER)(position__CCC +  1);
-        goto until_do__IF5;
+        goto until_do__XB5;
       };
     };
-    if ((j__XYJ > ((__STRING_CONSTANT *)st__UYJ)->count__DD)) {
-      result__YYJ=TRUE__;
-      last_string__V1C=st__UYJ;
+    if ((j__DZJ > ((__STRING_CONSTANT *)st__AZJ)->count__DD)) {
+      result__EZJ=TRUE__;
+      last_string__D2C=st__AZJ;
     } else {
-      position__CCC=posold__WYJ;
-      result__YYJ=FALSE__;
+      position__CCC=posold__CZJ;
+      result__EZJ=FALSE__;
     };
   };
-  return(result__YYJ);
+  return(result__EZJ);
 }
 
-static __BOOLEAN read_short_elt__VLKB()
+static __BOOLEAN read_short_elt__EIKB()
 // () With resultNo recursive, No inlinable.
 {
-  __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)) {
+  __INTEGER j__IIKB,new_capacity__KOHH,old_nb_elts__NOHH,upper__Z5IH;
+  __INTEGER Self__X5IH,new_capacity__QOHH,old_nb_elts__TOHH,upper__45IH;
+  __INTEGER Self__25IH,new_capacity__WOHH,old_nb_elts__ZOHH,upper__DAJH;
+  __INTEGER Self__BAJH,new_capacity__2OHH,old_nb_elts__5OHH,upper__IAJH;
+  __INTEGER Self__GAJH,new_capacity__CPHH,old_nb_elts__FPHH,upper__NAJH;
+  __INTEGER Self__LAJH,new_capacity__IPHH,old_nb_elts__LPHH,upper__SAJH;
+  __INTEGER Self__QAJH,new_capacity__OPHH,old_nb_elts__RPHH,upper__XAJH;
+  __INTEGER Self__VAJH,new_capacity__UPHH,old_nb_elts__XPHH,upper__2AJH;
+  __INTEGER Self__0AJH,new_capacity__0PHH,old_nb_elts__3PHH,upper__BBJH;
+  __INTEGER Self__5AJH,new_capacity__AQHH,old_nb_elts__DQHH,upper__GBJH;
+  __INTEGER Self__EBJH,new_capacity__GQHH,old_nb_elts__JQHH,upper__LBJH;
+  __INTEGER Self__JBJH,new_capacity__MQHH,old_nb_elts__PQHH,upper__QBJH;
+  __INTEGER Self__OBJH;
+  __POSITION pos__LLG;
+  __STRING *Self__LOHH,*Self__ROHH,*Self__XOHH,*Self__3OHH,*Self__DPHH;
+  __STRING *Self__JPHH,*Self__PPHH,*Self__VPHH,*Self__1PHH,*Self__BQHH;
+  __STRING *Self__HQHH,*Self__NQHH;
+  __BOOLEAN result__HIKB,__tmp__1IKB;
+  __CHARACTER __tmp__AKKB,ch__RQHH;
+  __CHARACTER *Self__MOHH,*new__OOHH,*Self__SOHH,*new__UOHH,*Self__YOHH;
+  __CHARACTER *new__0OHH,*Self__4OHH,*new__APHH,*Self__EPHH,*new__GPHH;
+  __CHARACTER *Self__KPHH,*new__MPHH,*Self__QPHH,*new__SPHH,*Self__WPHH;
+  __CHARACTER *new__YPHH,*Self__2PHH,*new__4PHH,*Self__CQHH,*new__EQHH;
+  __CHARACTER *Self__IQHH,*new__KQHH,*Self__OQHH,*new__QQHH;
+  result__HIKB=FALSE__;
+  j__IIKB= 0;
+  if (read_identifier__2BL()) {
+    if (((void *)last_string__D2C != (void *)(&__string_115))) {
+      pos__LLG=current_position__B0F();
+      put_error__text__1PG( 2,(&__string_219));
+      put_position__FRG(pos__LLG);
+      put_string__33F(msg_err__AQG);
+      if ((type_error__5PG !=  2)) {
         exit(( 1));
       };
     };
-    last_string__V1C=NULL;
-    result__YLKB=TRUE__;
-    __tmp__MMKB=TRUE__;
+    last_string__D2C=NULL;
+    result__HIKB=TRUE__;
+    __tmp__1IKB=TRUE__;
   } else {
-    __tmp__MMKB=FALSE__;
-  };
-  if ((! __tmp__MMKB)) {
-    if (read_string__1FQ()) {
-      ((__STRING *)string_tmp__VH)->count__EGC= 0;
-      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');
+    __tmp__1IKB=FALSE__;
+  };
+  if ((! __tmp__1IKB)) {
+    if (read_string__HGQ()) {
+      ((__STRING *)string_tmp__VH)->count__SGC= 0;
+      j__IIKB= 1;
+      while ((j__IIKB <= ((__STRING_CONSTANT *)last_string__D2C)->count__DD)) {
+        if ((((__CHARACTER *)((__STRING_CONSTANT *)last_string__D2C)->storage__RRO)[(__INTEGER)(j__IIKB -  1)] == '\\')) {
+          j__IIKB=(__INTEGER)(j__IIKB +  1);
+          __tmp__AKKB=((__CHARACTER *)((__STRING_CONSTANT *)last_string__D2C)->storage__RRO)[(__INTEGER)(j__IIKB -  1)];
+          if ((__tmp__AKKB == 'a')) {
+            Self__LOHH=((__STRING *)string_tmp__VH);
+            new_capacity__KOHH= 0;
+            if ((Self__LOHH->capacity__UCS <= Self__LOHH->count__SGC)) {
+              if ((Self__LOHH->capacity__UCS ==  0)) {
+                Self__LOHH->capacity__UCS= 32;
+                Self__LOHH->storage__3CS=create__YIEB( 32);
+              } else {
+                new_capacity__KOHH=(__INTEGER)(Self__LOHH->capacity__UCS <<  1);
+                Self__MOHH=((__CHARACTER *)Self__LOHH->storage__3CS);
+                old_nb_elts__NOHH=Self__LOHH->capacity__UCS;
+                new__OOHH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__MOHH),((__UINTEGER_32 )old_nb_elts__NOHH),((__UINTEGER_32 )new_capacity__KOHH)));
+                upper__Z5IH=(__INTEGER)(new_capacity__KOHH -  1);
+                Self__X5IH=old_nb_elts__NOHH;
+                while ((Self__X5IH <= upper__Z5IH)) {
+                  new__OOHH[Self__X5IH]='\0';
+                  Self__X5IH=(__INTEGER)(Self__X5IH +  1);
+                };
+                Self__LOHH->storage__3CS=new__OOHH;
+                Self__LOHH->capacity__UCS=new_capacity__KOHH;
+              };
+            };
+            ((__CHARACTER *)Self__LOHH->storage__3CS)[Self__LOHH->count__SGC]='\a';
+            Self__LOHH->count__SGC=(__INTEGER)(Self__LOHH->count__SGC +  1);
           };
-          if ((__tmp__RNKB == 'b')) {
-            add_last__GOT(string_tmp__VH,'\b');
+          if ((__tmp__AKKB == 'b')) {
+            Self__ROHH=((__STRING *)string_tmp__VH);
+            new_capacity__QOHH= 0;
+            if ((Self__ROHH->capacity__UCS <= Self__ROHH->count__SGC)) {
+              if ((Self__ROHH->capacity__UCS ==  0)) {
+                Self__ROHH->capacity__UCS= 32;
+                Self__ROHH->storage__3CS=create__YIEB( 32);
+              } else {
+                new_capacity__QOHH=(__INTEGER)(Self__ROHH->capacity__UCS <<  1);
+                Self__SOHH=((__CHARACTER *)Self__ROHH->storage__3CS);
+                old_nb_elts__TOHH=Self__ROHH->capacity__UCS;
+                new__UOHH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__SOHH),((__UINTEGER_32 )old_nb_elts__TOHH),((__UINTEGER_32 )new_capacity__QOHH)));
+                upper__45IH=(__INTEGER)(new_capacity__QOHH -  1);
+                Self__25IH=old_nb_elts__TOHH;
+                while ((Self__25IH <= upper__45IH)) {
+                  new__UOHH[Self__25IH]='\0';
+                  Self__25IH=(__INTEGER)(Self__25IH +  1);
+                };
+                Self__ROHH->storage__3CS=new__UOHH;
+                Self__ROHH->capacity__UCS=new_capacity__QOHH;
+              };
+            };
+            ((__CHARACTER *)Self__ROHH->storage__3CS)[Self__ROHH->count__SGC]='\b';
+            Self__ROHH->count__SGC=(__INTEGER)(Self__ROHH->count__SGC +  1);
           };
-          if ((__tmp__RNKB == 'f')) {
-            add_last__GOT(string_tmp__VH,'\f');
+          if ((__tmp__AKKB == 'f')) {
+            Self__XOHH=((__STRING *)string_tmp__VH);
+            new_capacity__WOHH= 0;
+            if ((Self__XOHH->capacity__UCS <= Self__XOHH->count__SGC)) {
+              if ((Self__XOHH->capacity__UCS ==  0)) {
+                Self__XOHH->capacity__UCS= 32;
+                Self__XOHH->storage__3CS=create__YIEB( 32);
+              } else {
+                new_capacity__WOHH=(__INTEGER)(Self__XOHH->capacity__UCS <<  1);
+                Self__YOHH=((__CHARACTER *)Self__XOHH->storage__3CS);
+                old_nb_elts__ZOHH=Self__XOHH->capacity__UCS;
+                new__0OHH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__YOHH),((__UINTEGER_32 )old_nb_elts__ZOHH),((__UINTEGER_32 )new_capacity__WOHH)));
+                upper__DAJH=(__INTEGER)(new_capacity__WOHH -  1);
+                Self__BAJH=old_nb_elts__ZOHH;
+                while ((Self__BAJH <= upper__DAJH)) {
+                  new__0OHH[Self__BAJH]='\0';
+                  Self__BAJH=(__INTEGER)(Self__BAJH +  1);
+                };
+                Self__XOHH->storage__3CS=new__0OHH;
+                Self__XOHH->capacity__UCS=new_capacity__WOHH;
+              };
+            };
+            ((__CHARACTER *)Self__XOHH->storage__3CS)[Self__XOHH->count__SGC]='\f';
+            Self__XOHH->count__SGC=(__INTEGER)(Self__XOHH->count__SGC +  1);
           };
-          if ((__tmp__RNKB == 'n')) {
-            add_last__GOT(string_tmp__VH,'\n');
+          if ((__tmp__AKKB == 'n')) {
+            Self__3OHH=((__STRING *)string_tmp__VH);
+            new_capacity__2OHH= 0;
+            if ((Self__3OHH->capacity__UCS <= Self__3OHH->count__SGC)) {
+              if ((Self__3OHH->capacity__UCS ==  0)) {
+                Self__3OHH->capacity__UCS= 32;
+                Self__3OHH->storage__3CS=create__YIEB( 32);
+              } else {
+                new_capacity__2OHH=(__INTEGER)(Self__3OHH->capacity__UCS <<  1);
+                Self__4OHH=((__CHARACTER *)Self__3OHH->storage__3CS);
+                old_nb_elts__5OHH=Self__3OHH->capacity__UCS;
+                new__APHH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__4OHH),((__UINTEGER_32 )old_nb_elts__5OHH),((__UINTEGER_32 )new_capacity__2OHH)));
+                upper__IAJH=(__INTEGER)(new_capacity__2OHH -  1);
+                Self__GAJH=old_nb_elts__5OHH;
+                while ((Self__GAJH <= upper__IAJH)) {
+                  new__APHH[Self__GAJH]='\0';
+                  Self__GAJH=(__INTEGER)(Self__GAJH +  1);
+                };
+                Self__3OHH->storage__3CS=new__APHH;
+                Self__3OHH->capacity__UCS=new_capacity__2OHH;
+              };
+            };
+            ((__CHARACTER *)Self__3OHH->storage__3CS)[Self__3OHH->count__SGC]='\n';
+            Self__3OHH->count__SGC=(__INTEGER)(Self__3OHH->count__SGC +  1);
           };
-          if ((__tmp__RNKB == 'r')) {
-            add_last__GOT(string_tmp__VH,'\r');
+          if ((__tmp__AKKB == 'r')) {
+            Self__DPHH=((__STRING *)string_tmp__VH);
+            new_capacity__CPHH= 0;
+            if ((Self__DPHH->capacity__UCS <= Self__DPHH->count__SGC)) {
+              if ((Self__DPHH->capacity__UCS ==  0)) {
+                Self__DPHH->capacity__UCS= 32;
+                Self__DPHH->storage__3CS=create__YIEB( 32);
+              } else {
+                new_capacity__CPHH=(__INTEGER)(Self__DPHH->capacity__UCS <<  1);
+                Self__EPHH=((__CHARACTER *)Self__DPHH->storage__3CS);
+                old_nb_elts__FPHH=Self__DPHH->capacity__UCS;
+                new__GPHH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__EPHH),((__UINTEGER_32 )old_nb_elts__FPHH),((__UINTEGER_32 )new_capacity__CPHH)));
+                upper__NAJH=(__INTEGER)(new_capacity__CPHH -  1);
+                Self__LAJH=old_nb_elts__FPHH;
+                while ((Self__LAJH <= upper__NAJH)) {
+                  new__GPHH[Self__LAJH]='\0';
+                  Self__LAJH=(__INTEGER)(Self__LAJH +  1);
+                };
+                Self__DPHH->storage__3CS=new__GPHH;
+                Self__DPHH->capacity__UCS=new_capacity__CPHH;
+              };
+            };
+            ((__CHARACTER *)Self__DPHH->storage__3CS)[Self__DPHH->count__SGC]='\r';
+            Self__DPHH->count__SGC=(__INTEGER)(Self__DPHH->count__SGC +  1);
           };
-          if ((__tmp__RNKB == 't')) {
-            add_last__GOT(string_tmp__VH,'\t');
+          if ((__tmp__AKKB == 't')) {
+            Self__JPHH=((__STRING *)string_tmp__VH);
+            new_capacity__IPHH= 0;
+            if ((Self__JPHH->capacity__UCS <= Self__JPHH->count__SGC)) {
+              if ((Self__JPHH->capacity__UCS ==  0)) {
+                Self__JPHH->capacity__UCS= 32;
+                Self__JPHH->storage__3CS=create__YIEB( 32);
+              } else {
+                new_capacity__IPHH=(__INTEGER)(Self__JPHH->capacity__UCS <<  1);
+                Self__KPHH=((__CHARACTER *)Self__JPHH->storage__3CS);
+                old_nb_elts__LPHH=Self__JPHH->capacity__UCS;
+                new__MPHH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__KPHH),((__UINTEGER_32 )old_nb_elts__LPHH),((__UINTEGER_32 )new_capacity__IPHH)));
+                upper__SAJH=(__INTEGER)(new_capacity__IPHH -  1);
+                Self__QAJH=old_nb_elts__LPHH;
+                while ((Self__QAJH <= upper__SAJH)) {
+                  new__MPHH[Self__QAJH]='\0';
+                  Self__QAJH=(__INTEGER)(Self__QAJH +  1);
+                };
+                Self__JPHH->storage__3CS=new__MPHH;
+                Self__JPHH->capacity__UCS=new_capacity__IPHH;
+              };
+            };
+            ((__CHARACTER *)Self__JPHH->storage__3CS)[Self__JPHH->count__SGC]='\t';
+            Self__JPHH->count__SGC=(__INTEGER)(Self__JPHH->count__SGC +  1);
           };
-          if ((__tmp__RNKB == 'v')) {
-            add_last__GOT(string_tmp__VH,'\v');
+          if ((__tmp__AKKB == 'v')) {
+            Self__PPHH=((__STRING *)string_tmp__VH);
+            new_capacity__OPHH= 0;
+            if ((Self__PPHH->capacity__UCS <= Self__PPHH->count__SGC)) {
+              if ((Self__PPHH->capacity__UCS ==  0)) {
+                Self__PPHH->capacity__UCS= 32;
+                Self__PPHH->storage__3CS=create__YIEB( 32);
+              } else {
+                new_capacity__OPHH=(__INTEGER)(Self__PPHH->capacity__UCS <<  1);
+                Self__QPHH=((__CHARACTER *)Self__PPHH->storage__3CS);
+                old_nb_elts__RPHH=Self__PPHH->capacity__UCS;
+                new__SPHH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__QPHH),((__UINTEGER_32 )old_nb_elts__RPHH),((__UINTEGER_32 )new_capacity__OPHH)));
+                upper__XAJH=(__INTEGER)(new_capacity__OPHH -  1);
+                Self__VAJH=old_nb_elts__RPHH;
+                while ((Self__VAJH <= upper__XAJH)) {
+                  new__SPHH[Self__VAJH]='\0';
+                  Self__VAJH=(__INTEGER)(Self__VAJH +  1);
+                };
+                Self__PPHH->storage__3CS=new__SPHH;
+                Self__PPHH->capacity__UCS=new_capacity__OPHH;
+              };
+            };
+            ((__CHARACTER *)Self__PPHH->storage__3CS)[Self__PPHH->count__SGC]='\v';
+            Self__PPHH->count__SGC=(__INTEGER)(Self__PPHH->count__SGC +  1);
           };
-          if ((__tmp__RNKB == '\\')) {
-            add_last__GOT(string_tmp__VH,'\\');
+          if ((__tmp__AKKB == '\\')) {
+            Self__VPHH=((__STRING *)string_tmp__VH);
+            new_capacity__UPHH= 0;
+            if ((Self__VPHH->capacity__UCS <= Self__VPHH->count__SGC)) {
+              if ((Self__VPHH->capacity__UCS ==  0)) {
+                Self__VPHH->capacity__UCS= 32;
+                Self__VPHH->storage__3CS=create__YIEB( 32);
+              } else {
+                new_capacity__UPHH=(__INTEGER)(Self__VPHH->capacity__UCS <<  1);
+                Self__WPHH=((__CHARACTER *)Self__VPHH->storage__3CS);
+                old_nb_elts__XPHH=Self__VPHH->capacity__UCS;
+                new__YPHH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__WPHH),((__UINTEGER_32 )old_nb_elts__XPHH),((__UINTEGER_32 )new_capacity__UPHH)));
+                upper__2AJH=(__INTEGER)(new_capacity__UPHH -  1);
+                Self__0AJH=old_nb_elts__XPHH;
+                while ((Self__0AJH <= upper__2AJH)) {
+                  new__YPHH[Self__0AJH]='\0';
+                  Self__0AJH=(__INTEGER)(Self__0AJH +  1);
+                };
+                Self__VPHH->storage__3CS=new__YPHH;
+                Self__VPHH->capacity__UCS=new_capacity__UPHH;
+              };
+            };
+            ((__CHARACTER *)Self__VPHH->storage__3CS)[Self__VPHH->count__SGC]='\\';
+            Self__VPHH->count__SGC=(__INTEGER)(Self__VPHH->count__SGC +  1);
           };
-          if ((__tmp__RNKB == '?')) {
-            add_last__GOT(string_tmp__VH,'\?');
+          if ((__tmp__AKKB == '?')) {
+            Self__1PHH=((__STRING *)string_tmp__VH);
+            new_capacity__0PHH= 0;
+            if ((Self__1PHH->capacity__UCS <= Self__1PHH->count__SGC)) {
+              if ((Self__1PHH->capacity__UCS ==  0)) {
+                Self__1PHH->capacity__UCS= 32;
+                Self__1PHH->storage__3CS=create__YIEB( 32);
+              } else {
+                new_capacity__0PHH=(__INTEGER)(Self__1PHH->capacity__UCS <<  1);
+                Self__2PHH=((__CHARACTER *)Self__1PHH->storage__3CS);
+                old_nb_elts__3PHH=Self__1PHH->capacity__UCS;
+                new__4PHH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__2PHH),((__UINTEGER_32 )old_nb_elts__3PHH),((__UINTEGER_32 )new_capacity__0PHH)));
+                upper__BBJH=(__INTEGER)(new_capacity__0PHH -  1);
+                Self__5AJH=old_nb_elts__3PHH;
+                while ((Self__5AJH <= upper__BBJH)) {
+                  new__4PHH[Self__5AJH]='\0';
+                  Self__5AJH=(__INTEGER)(Self__5AJH +  1);
+                };
+                Self__1PHH->storage__3CS=new__4PHH;
+                Self__1PHH->capacity__UCS=new_capacity__0PHH;
+              };
+            };
+            ((__CHARACTER *)Self__1PHH->storage__3CS)[Self__1PHH->count__SGC]='\?';
+            Self__1PHH->count__SGC=(__INTEGER)(Self__1PHH->count__SGC +  1);
           };
-          if ((__tmp__RNKB == '\'')) {
-            add_last__GOT(string_tmp__VH,'\'');
+          if ((__tmp__AKKB == '\'')) {
+            Self__BQHH=((__STRING *)string_tmp__VH);
+            new_capacity__AQHH= 0;
+            if ((Self__BQHH->capacity__UCS <= Self__BQHH->count__SGC)) {
+              if ((Self__BQHH->capacity__UCS ==  0)) {
+                Self__BQHH->capacity__UCS= 32;
+                Self__BQHH->storage__3CS=create__YIEB( 32);
+              } else {
+                new_capacity__AQHH=(__INTEGER)(Self__BQHH->capacity__UCS <<  1);
+                Self__CQHH=((__CHARACTER *)Self__BQHH->storage__3CS);
+                old_nb_elts__DQHH=Self__BQHH->capacity__UCS;
+                new__EQHH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__CQHH),((__UINTEGER_32 )old_nb_elts__DQHH),((__UINTEGER_32 )new_capacity__AQHH)));
+                upper__GBJH=(__INTEGER)(new_capacity__AQHH -  1);
+                Self__EBJH=old_nb_elts__DQHH;
+                while ((Self__EBJH <= upper__GBJH)) {
+                  new__EQHH[Self__EBJH]='\0';
+                  Self__EBJH=(__INTEGER)(Self__EBJH +  1);
+                };
+                Self__BQHH->storage__3CS=new__EQHH;
+                Self__BQHH->capacity__UCS=new_capacity__AQHH;
+              };
+            };
+            ((__CHARACTER *)Self__BQHH->storage__3CS)[Self__BQHH->count__SGC]='\'';
+            Self__BQHH->count__SGC=(__INTEGER)(Self__BQHH->count__SGC +  1);
           };
-          if ((__tmp__RNKB == '\"')) {
-            add_last__GOT(string_tmp__VH,'\"');
+          if ((__tmp__AKKB == '\"')) {
+            Self__HQHH=((__STRING *)string_tmp__VH);
+            new_capacity__GQHH= 0;
+            if ((Self__HQHH->capacity__UCS <= Self__HQHH->count__SGC)) {
+              if ((Self__HQHH->capacity__UCS ==  0)) {
+                Self__HQHH->capacity__UCS= 32;
+                Self__HQHH->storage__3CS=create__YIEB( 32);
+              } else {
+                new_capacity__GQHH=(__INTEGER)(Self__HQHH->capacity__UCS <<  1);
+                Self__IQHH=((__CHARACTER *)Self__HQHH->storage__3CS);
+                old_nb_elts__JQHH=Self__HQHH->capacity__UCS;
+                new__KQHH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__IQHH),((__UINTEGER_32 )old_nb_elts__JQHH),((__UINTEGER_32 )new_capacity__GQHH)));
+                upper__LBJH=(__INTEGER)(new_capacity__GQHH -  1);
+                Self__JBJH=old_nb_elts__JQHH;
+                while ((Self__JBJH <= upper__LBJH)) {
+                  new__KQHH[Self__JBJH]='\0';
+                  Self__JBJH=(__INTEGER)(Self__JBJH +  1);
+                };
+                Self__HQHH->storage__3CS=new__KQHH;
+                Self__HQHH->capacity__UCS=new_capacity__GQHH;
+              };
+            };
+            ((__CHARACTER *)Self__HQHH->storage__3CS)[Self__HQHH->count__SGC]='\"';
+            Self__HQHH->count__SGC=(__INTEGER)(Self__HQHH->count__SGC +  1);
           };
         } else {
-          add_last__GOT(string_tmp__VH,((__CHARACTER *)((__STRING_CONSTANT *)last_string__V1C)->storage__FRO)[(__INTEGER)(j__ZLKB -  1)]);
+          Self__NQHH=((__STRING *)string_tmp__VH);
+          ch__RQHH=((__CHARACTER *)((__STRING_CONSTANT *)last_string__D2C)->storage__RRO)[(__INTEGER)(j__IIKB -  1)];
+          new_capacity__MQHH= 0;
+          if ((Self__NQHH->capacity__UCS <= Self__NQHH->count__SGC)) {
+            if ((Self__NQHH->capacity__UCS ==  0)) {
+              Self__NQHH->capacity__UCS= 32;
+              Self__NQHH->storage__3CS=create__YIEB( 32);
+            } else {
+              new_capacity__MQHH=(__INTEGER)(Self__NQHH->capacity__UCS <<  1);
+              Self__OQHH=((__CHARACTER *)Self__NQHH->storage__3CS);
+              old_nb_elts__PQHH=Self__NQHH->capacity__UCS;
+              new__QQHH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__OQHH),((__UINTEGER_32 )old_nb_elts__PQHH),((__UINTEGER_32 )new_capacity__MQHH)));
+              upper__QBJH=(__INTEGER)(new_capacity__MQHH -  1);
+              Self__OBJH=old_nb_elts__PQHH;
+              while ((Self__OBJH <= upper__QBJH)) {
+                new__QQHH[Self__OBJH]='\0';
+                Self__OBJH=(__INTEGER)(Self__OBJH +  1);
+              };
+              Self__NQHH->storage__3CS=new__QQHH;
+              Self__NQHH->capacity__UCS=new_capacity__MQHH;
+            };
+          };
+          ((__CHARACTER *)Self__NQHH->storage__3CS)[Self__NQHH->count__SGC]=ch__RQHH;
+          Self__NQHH->count__SGC=(__INTEGER)(Self__NQHH->count__SGC +  1);
         };
-        j__ZLKB=(__INTEGER)(j__ZLKB +  1);
+        j__IIKB=(__INTEGER)(j__IIKB +  1);
       };
-      last_string__V1C=get__YWB(string_tmp__VH);
-      result__YLKB=TRUE__;
+      last_string__D2C=get__YWB(string_tmp__VH);
+      result__HIKB=TRUE__;
     };
   };
-  return(result__YLKB);
+  return(result__HIKB);
 }
 
-static void fast_put__to__I2R(__HASHED_DICTIONARYoTYPExSTRING_CONSTANTo *Self__J2R,void *k__L2R)
+static void fast_put__to__U2R(__HASHED_DICTIONARYoTYPExSTRING_CONSTANTo *Self__V2R,void *k__X2R)
 // ({HASHED_DICTIONARYoTYPExSTRING_CONSTANTo},{STRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __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__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__R2IH=new_lab__FTJ(lab_type__U2IH);
-            };
-            ((__POINTER *)next__R2IH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__S2IH)[ 0]=next__R2IH;
-          } else {
-            ((__POINTER *)result__T2IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__R2IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__T2IH=next__R2IH;
-          };
-        };
-        ptr__BXNB=result__T2IH;
-      };
-      result__AXNB=((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)ptr__BXNB);
-      *(result__AXNB) = *(HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo__);
-    };
-    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);
+  __INTEGER h__42R,idx__52R,idx__ERNB,new_capacity__FRNB,i__GRNB;
+  __INTEGER typ_id__VTNB;
+  __POINTER ptr__QTNB,ptr_table__HCJH,next__GCJH,result__ICJH;
+  __POINTER ptr_table__MCJH,next__LCJH,result__NCJH;
+  __UINTEGER_32 sz__STNB,a__2HFH,new_size__3HFH,t__BIFH,a__AIFH;
+  __UINTEGER_32 new_size__PCJH,lab_type__OCJH;
+  void *node__C3R,*node1__IRNB,*node2__JRNB,*__tmp__W4R;
+  void **old_buckets__HRNB;
+  __HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *result__PTNB;
+  __HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *Self__BTDC;
+  h__42R=hash_code__RNW(k__X2R);
+  idx__52R=(__INTEGER)(h__42R % Self__V2R->capacity__E3R);
+  node__C3R=((void **)Self__V2R->buckets__J3R)[idx__52R];
+  while ((! (((void *)node__C3R == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)node__C3R)->key__V3R == (void *)k__X2R)))) {
+    node__C3R=((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)node__C3R)->next__A4R;
+  };
+  if (((void *)node__C3R == (void *)NULL)) {
+    if ((Self__V2R->capacity__E3R == Self__V2R->count__J4R)) {
+      idx__ERNB= 0;
+      node1__IRNB=NULL;
+      node2__JRNB=NULL;
+      old_buckets__HRNB=Self__V2R->buckets__J3R;
+      new_capacity__FRNB=prime_number_ceiling__021((__INTEGER)(Self__V2R->capacity__E3R +  1));
+      Self__V2R->buckets__J3R=create__PX2(new_capacity__FRNB);
+      i__GRNB=(__INTEGER)(Self__V2R->capacity__E3R -  1);
+      Self__V2R->capacity__E3R=new_capacity__FRNB;
+      while ((i__GRNB >=  0)) {
+        node1__IRNB=((void **)old_buckets__HRNB)[i__GRNB];
+        while (((void *)node1__IRNB != (void *)NULL)) {
+          node2__JRNB=((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)node1__IRNB)->next__A4R;
+          idx__ERNB=(__INTEGER)(hash_code__RNW(((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)node1__IRNB)->key__V3R) % Self__V2R->capacity__E3R);
+          ((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)node1__IRNB)->next__A4R=((void **)Self__V2R->buckets__J3R)[idx__ERNB];
+          ((void **)Self__V2R->buckets__J3R)[idx__ERNB]=node1__IRNB;
+          node1__IRNB=node2__JRNB;
+        };
+        i__GRNB=(__INTEGER)(i__GRNB -  1);
+      };
+      idx__52R=(__INTEGER)(h__42R % Self__V2R->capacity__E3R);
+    };
+    __tmp__W4R=((void **)Self__V2R->buckets__J3R)[idx__52R];
+    result__PTNB=NULL;
+    ptr__QTNB=((__POINTER )(NULL));
+    typ_id__VTNB= 0;
+    sz__STNB=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo));
+    if ((sz__STNB ==  0)) {
+      result__PTNB=HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo__;
+    } else {
+      typ_id__VTNB=__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo__;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__STNB);
+      if ((typ_id__VTNB == (__INTEGER)(-  1))) {
+        a__2HFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__3HFH=(__UINTEGER_32)((__UINTEGER_32)(sz__STNB + a__2HFH) & (__UINTEGER_32)(~ a__2HFH));
+        ptr_table__HCJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__3HFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__GCJH=((__POINTER )(NULL));
+        result__ICJH=((__POINTER *)ptr_table__HCJH)[ 0];
+        if ((result__ICJH == (void *)NULL)) {
+          result__ICJH=new_lab__RTJ(new_size__3HFH);
+          next__GCJH=(void *)((unsigned long)result__ICJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3HFH)));
+          ((__POINTER *)next__GCJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__HCJH)[ 0]=next__GCJH;
+        } else {
+          next__GCJH=((__POINTER *)result__ICJH)[ 0];
+          if ((next__GCJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ICJH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__3HFH <<  1)) <=  4096)) {
+              next__GCJH=(void *)((unsigned long)result__ICJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3HFH)));
+            } else {
+              next__GCJH=new_lab__RTJ(new_size__3HFH);
+            };
+            ((__POINTER *)next__GCJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__HCJH)[ 0]=next__GCJH;
+          } else {
+            ((__POINTER *)result__ICJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GCJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__ICJH=next__GCJH;
+          };
+        };
+        ptr__QTNB=result__ICJH;
+      } else {
+        t__BIFH=((__UINTEGER_32 )typ_id__VTNB);
+        a__AIFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__PCJH=(__UINTEGER_32)((__UINTEGER_32)(sz__STNB + a__AIFH) & (__UINTEGER_32)(~ a__AIFH));
+        ptr_table__MCJH=((__POINTER )(&(table_type[(t__BIFH)])));
+        lab_type__OCJH=(__UINTEGER_32)(t__BIFH |  1);
+        next__LCJH=((__POINTER )(NULL));
+        result__NCJH=((__POINTER *)ptr_table__MCJH)[ 0];
+        if ((result__NCJH == (void *)NULL)) {
+          result__NCJH=new_lab__RTJ(lab_type__OCJH);
+          next__LCJH=(void *)((unsigned long)result__NCJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PCJH)));
+          ((__POINTER *)next__LCJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__MCJH)[ 0]=next__LCJH;
+        } else {
+          next__LCJH=((__POINTER *)result__NCJH)[ 0];
+          if ((next__LCJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__NCJH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__PCJH <<  1)) <=  4096)) {
+              next__LCJH=(void *)((unsigned long)result__NCJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PCJH)));
+            } else {
+              next__LCJH=new_lab__RTJ(lab_type__OCJH);
+            };
+            ((__POINTER *)next__LCJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__MCJH)[ 0]=next__LCJH;
+          } else {
+            ((__POINTER *)result__NCJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LCJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__NCJH=next__LCJH;
+          };
+        };
+        ptr__QTNB=result__NCJH;
+      };
+      result__PTNB=((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)ptr__QTNB);
+      *(result__PTNB) = *(HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo__);
+    };
+    Self__BTDC=((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)result__PTNB);
+    Self__BTDC->key__V3R=k__X2R;
+    Self__BTDC->next__A4R=__tmp__W4R;
+    node__C3R=result__PTNB;
+    ((void **)Self__V2R->buckets__J3R)[idx__52R]=result__PTNB;
+    Self__V2R->count__J4R=(__INTEGER)(Self__V2R->count__J4R +  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__EGS;
-  __POINTER ptr__M1B,ptr_table__X2IH,next__W2IH,result__Y2IH;
-  __POINTER ptr_table__22IH,next__12IH,result__32IH;
+  __TYPE_FULL *result__L1B,*Self__QGS;
+  __POINTER ptr__M1B,ptr_table__RCJH,next__QCJH,result__SCJH;
+  __POINTER ptr_table__WCJH,next__VCJH,result__XCJH;
   __INTEGER typ_id__R1B;
-  __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;
+  __UINTEGER_32 sz__O1B,a__EIFH,new_size__FIFH,t__JIFH,a__IIFH;
+  __UINTEGER_32 new_size__ZCJH,lab_type__YCJH;
+  void *__tmp__2GS,*__tmp__EHS;
+  __BOOLEAN __tmp__QHS,__tmp__RHS;
   result__L1B=NULL;
   ptr__M1B=((__POINTER )(NULL));
   typ_id__R1B= 0;
@@ -13074,1423 +13188,1468 @@ 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__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;
+      a__EIFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__FIFH=(__UINTEGER_32)((__UINTEGER_32)(sz__O1B + a__EIFH) & (__UINTEGER_32)(~ a__EIFH));
+      ptr_table__RCJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__FIFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__QCJH=((__POINTER )(NULL));
+      result__SCJH=((__POINTER *)ptr_table__RCJH)[ 0];
+      if ((result__SCJH == (void *)NULL)) {
+        result__SCJH=new_lab__RTJ(new_size__FIFH);
+        next__QCJH=(void *)((unsigned long)result__SCJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FIFH)));
+        ((__POINTER *)next__QCJH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__RCJH)[ 0]=next__QCJH;
       } else {
-        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)));
+        next__QCJH=((__POINTER *)result__SCJH)[ 0];
+        if ((next__QCJH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__SCJH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__FIFH <<  1)) <=  4096)) {
+            next__QCJH=(void *)((unsigned long)result__SCJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FIFH)));
           } else {
-            next__W2IH=new_lab__FTJ(new_size__ZWFH);
+            next__QCJH=new_lab__RTJ(new_size__FIFH);
           };
-          ((__POINTER *)next__W2IH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__X2IH)[ 0]=next__W2IH;
+          ((__POINTER *)next__QCJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__RCJH)[ 0]=next__QCJH;
         } else {
-          ((__POINTER *)result__Y2IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__W2IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__Y2IH=next__W2IH;
+          ((__POINTER *)result__SCJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QCJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__SCJH=next__QCJH;
         };
       };
-      ptr__M1B=result__Y2IH;
+      ptr__M1B=result__SCJH;
     } else {
-      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;
+      t__JIFH=((__UINTEGER_32 )typ_id__R1B);
+      a__IIFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__ZCJH=(__UINTEGER_32)((__UINTEGER_32)(sz__O1B + a__IIFH) & (__UINTEGER_32)(~ a__IIFH));
+      ptr_table__WCJH=((__POINTER )(&(table_type[(t__JIFH)])));
+      lab_type__YCJH=(__UINTEGER_32)(t__JIFH |  1);
+      next__VCJH=((__POINTER )(NULL));
+      result__XCJH=((__POINTER *)ptr_table__WCJH)[ 0];
+      if ((result__XCJH == (void *)NULL)) {
+        result__XCJH=new_lab__RTJ(lab_type__YCJH);
+        next__VCJH=(void *)((unsigned long)result__XCJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZCJH)));
+        ((__POINTER *)next__VCJH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__WCJH)[ 0]=next__VCJH;
       } else {
-        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)));
+        next__VCJH=((__POINTER *)result__XCJH)[ 0];
+        if ((next__VCJH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XCJH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__ZCJH <<  1)) <=  4096)) {
+            next__VCJH=(void *)((unsigned long)result__XCJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZCJH)));
           } else {
-            next__12IH=new_lab__FTJ(lab_type__42IH);
+            next__VCJH=new_lab__RTJ(lab_type__YCJH);
           };
-          ((__POINTER *)next__12IH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__22IH)[ 0]=next__12IH;
+          ((__POINTER *)next__VCJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__WCJH)[ 0]=next__VCJH;
         } else {
-          ((__POINTER *)result__32IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__12IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__32IH=next__12IH;
+          ((__POINTER *)result__XCJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VCJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__XCJH=next__VCJH;
         };
       };
-      ptr__M1B=result__32IH;
+      ptr__M1B=result__XCJH;
     };
     result__L1B=((__TYPE_FULL *)ptr__M1B);
     *(result__L1B) = *(TYPE_FULL__);
   };
-  Self__EGS=((__TYPE_FULL *)result__L1B);
-  Self__EGS->flag__IGS=code__FRB;
+  Self__QGS=((__TYPE_FULL *)result__L1B);
+  Self__QGS->flag__UGS=code__FRB;
   if (((void *)typ__ERB != (void *)NULL)) {
     switch (((struct ___OBJ *)typ__ERB)->__id) {
     case __TYPE_NULL__: {
-      __tmp__QGS=(&__string_2);
+      __tmp__2GS=(&__string_2);
     } break;
     case __TYPE_VOID__: {
-      __tmp__QGS=(&__string_3);
+      __tmp__2GS=(&__string_3);
     } break;
     case __TYPE_CONTEXT__: {
-      __tmp__QGS=(&__string_45);
+      __tmp__2GS=(&__string_45);
     } break;
     case __TYPE_ID__: {
-      __tmp__QGS=(&__string_47);
+      __tmp__2GS=(&__string_47);
     } break;
     };
-    __tmp__EHS=((void *)__tmp__QGS != (void *)NULL);
+    __tmp__QHS=((void *)__tmp__2GS != (void *)NULL);
   } else {
-    __tmp__EHS=FALSE__;
+    __tmp__QHS=FALSE__;
   };
-  if (__tmp__EHS) {
+  if (__tmp__QHS) {
     switch (((struct ___OBJ *)typ__ERB)->__id) {
     case __TYPE_NULL__: {
-      __tmp__YGS=(&__string_2);
+      __tmp__EHS=(&__string_2);
     } break;
     case __TYPE_VOID__: {
-      __tmp__YGS=(&__string_3);
+      __tmp__EHS=(&__string_3);
     } break;
     case __TYPE_CONTEXT__: {
-      __tmp__YGS=(&__string_45);
+      __tmp__EHS=(&__string_45);
     } break;
     case __TYPE_ID__: {
-      __tmp__YGS=(&__string_47);
+      __tmp__EHS=(&__string_47);
     } break;
     };
-    __tmp__FHS=__infix_equal_equal__GAEB(__tmp__YGS,(&__string_33));
+    __tmp__RHS=__infix_equal_equal__V2DB(__tmp__EHS,(&__string_33));
   } else {
-    __tmp__FHS=FALSE__;
+    __tmp__RHS=FALSE__;
   };
-  if ((__tmp__FHS && (! ((__UINTEGER_8)(Self__EGS->flag__IGS &  1) !=  0)))) {
-    print__DJD((&__string_220));
+  if ((__tmp__RHS && (! ((__UINTEGER_8)(Self__QGS->flag__UGS &  1) !=  0)))) {
+    print__OJD((&__string_220));
     fputc((int)('\n'),stdout);
     exit(( 1));
   };
   return(result__L1B);
 }
 
-static void** create__MZNB(__INTEGER nb_elements__OZNB)
+static void** create__1VNB(__INTEGER nb_elements__3VNB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__XBHH,a__WBHH,new_size__YBHH,new_size2__ZBHH,a__0BHH;
+  __UINTEGER_32 new_size__1BHH;
+  __POINTER result__VBHH,ptr_table__1CJH,next__0CJH,result__2CJH;
+  __INTEGER Self__UFMC;
+  void **Result__I2RB;
+  sz__XBHH=((__UINTEGER_32 )(__INTEGER)(nb_elements__3VNB * ((__INTEGER )(sizeof(void *)))));
+  result__VBHH=((__POINTER )(NULL));
+  a__WBHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__YBHH=(__UINTEGER_32)((__UINTEGER_32)(sz__XBHH + a__WBHH) & (__UINTEGER_32)(~ a__WBHH));
+  new_size2__ZBHH=(__UINTEGER_32)(new_size__YBHH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__ZBHH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__0BHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__1BHH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__ZBHH + a__0BHH) & (__UINTEGER_32)(~ a__0BHH));
+    ptr_table__1CJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__1BHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__0CJH=((__POINTER )(NULL));
+    result__2CJH=((__POINTER *)ptr_table__1CJH)[ 0];
+    if ((result__2CJH == (void *)NULL)) {
+      result__2CJH=new_lab__RTJ(new_size__1BHH);
+      next__0CJH=(void *)((unsigned long)result__2CJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1BHH)));
+      ((__POINTER *)next__0CJH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__1CJH)[ 0]=next__0CJH;
+    } else {
+      next__0CJH=((__POINTER *)result__2CJH)[ 0];
+      if ((next__0CJH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2CJH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__1BHH <<  1)) <=  4096)) {
+          next__0CJH=(void *)((unsigned long)result__2CJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1BHH)));
+        } else {
+          next__0CJH=new_lab__RTJ(new_size__1BHH);
+        };
+        ((__POINTER *)next__0CJH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__1CJH)[ 0]=next__0CJH;
+      } else {
+        ((__POINTER *)result__2CJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0CJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__2CJH=next__0CJH;
+      };
+    };
+    ((__POINTER *)result__2CJH)[ 0]=((__POINTER ) 3);
+    result__VBHH=(void *)((unsigned long)result__2CJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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__F3IH == (void *)NULL)) {
-      result__F3IH=new_page__YC5();
-    };
-    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__VBHH=(void *)((unsigned long)((__POINTER )((__MEMORY *)search__XAVB(new_size__YBHH))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__I2RB=((void **)result__VBHH);
+  Self__UFMC=(__INTEGER)(nb_elements__3VNB -  1);
+  while ((Self__UFMC >=  0)) {
+    Result__I2RB[Self__UFMC]=NULL;
+    Self__UFMC=(__INTEGER)(Self__UFMC -  1);
   };
-  return(Result__15RB);
+  return(Result__I2RB);
 }
 
-static void add_last__44R(__FAST_ARRAYoTYPE_IDo *Self__54R,void *element__A5R)
+static void add_last__K5R(__FAST_ARRAYoTYPE_IDo *Self__L5R,void *element__M5R)
 // ({FAST_ARRAYoTYPE_IDo},{NULLxTYPE_ID}) VoidNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER new_capacity__N5R,__tmp__WAS,__tmp__HVDC,Self__NEVD;
+  __BOOLEAN __tmp__35R;
+  void **__tmp__VAS,**new__TUDC;
+  new_capacity__N5R= 0;
+  if (((__INTEGER)(Self__L5R->parent_arrayed_collection__ABB.upper__O5R +  1) <= (__INTEGER)(Self__L5R->parent_arrayed_collection__ABB.capacity__Q5R -  1))) {
+    Self__L5R->parent_arrayed_collection__ABB.upper__O5R=(__INTEGER)(Self__L5R->parent_arrayed_collection__ABB.upper__O5R +  1);
+    __tmp__35R=TRUE__;
   } else {
-    __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;
+    __tmp__35R=FALSE__;
+  };
+  if ((! __tmp__35R)) {
+    if ((Self__L5R->parent_arrayed_collection__ABB.capacity__Q5R ==  0)) {
+      Self__L5R->parent_arrayed_collection__ABB.storage__MAS=create__1VNB( 2);
+      Self__L5R->parent_arrayed_collection__ABB.capacity__Q5R= 2;
+      Self__L5R->parent_arrayed_collection__ABB.upper__O5R= 0;
+    } else {
+      new_capacity__N5R=(__INTEGER)(Self__L5R->parent_arrayed_collection__ABB.capacity__Q5R <<  1);
+      __tmp__VAS=Self__L5R->parent_arrayed_collection__ABB.storage__MAS;
+      __tmp__WAS=Self__L5R->parent_arrayed_collection__ABB.capacity__Q5R;
+      new__TUDC=((void **)realloc_dynamic__old_size__new_size__KELC(((__POINTER )((void **)__tmp__VAS)),((__UINTEGER_32 )(__INTEGER)(__tmp__WAS * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__N5R * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__HVDC=(__INTEGER)(new_capacity__N5R -  1);
+      Self__NEVD=__tmp__WAS;
+      while ((Self__NEVD <= __tmp__HVDC)) {
+        new__TUDC[Self__NEVD]=NULL;
+        Self__NEVD=(__INTEGER)(Self__NEVD +  1);
+      };
+      Self__L5R->parent_arrayed_collection__ABB.storage__MAS=new__TUDC;
+      Self__L5R->parent_arrayed_collection__ABB.capacity__Q5R=new_capacity__N5R;
+      Self__L5R->parent_arrayed_collection__ABB.upper__O5R=(__INTEGER)(Self__L5R->parent_arrayed_collection__ABB.upper__O5R +  1);
+    };
+  };
+  ((void **)Self__L5R->parent_arrayed_collection__ABB.storage__MAS)[Self__L5R->parent_arrayed_collection__ABB.upper__O5R]=element__M5R;
 }
 
-static __BOOLEAN open__TGRD(__DIRECTORY_UNIX *Self__UGRD)
+static __BOOLEAN open__WHRD(__DIRECTORY_UNIX *Self__XHRD)
 // ({DIRECTORY_UNIX}) With resultNo recursive, No inlinable.
 {
-  __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__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__N3IH=new_lab__FTJ(lab_type__Q3IH);
-            };
-            ((__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;
-          };
-        };
-        ptr__EXLE=result__P3IH;
-      };
-      result__DXLE=((__LINKED_LISToENTRYo *)ptr__EXLE);
-      *(result__DXLE) = *(LINKED_LISToENTRYo__);
-    };
-    Self__UGRD->parent_directory__HGD.list__CHRD=result__DXLE;
+  __POINTER dirent__3HRD,ptr__KXLE,ptr_table__ADJH,next__5CJH;
+  __POINTER result__BDJH,ptr_table__FDJH,next__EDJH,result__GDJH;
+  __POINTER dir__1HRD,ptr__ZDJH,ptr_table__DEJH,next__CEJH,result__EEJH;
+  __POINTER ptr_table__IEJH,next__HEJH,result__JEJH,ptr__KFOF;
+  __POINTER ptr_table__NEJH,next__MEJH,result__OEJH,ptr_table__SEJH;
+  __POINTER next__REJH,result__TEJH;
+  __INTEGER i__BIRD,typ_id__PXLE,new_capacity__KRHH,old_nb_elts__NRHH;
+  __INTEGER upper__MDJH,Self__KDJH,new_capacity__TRHH,old_nb_elts__WRHH;
+  __INTEGER upper__RDJH,Self__PDJH,Self__YVFF,i__0RHH,j__2RHH;
+  __INTEGER Self__T2LH,idx__SV3E,new_capacity__3RHH,old_nb_elts__ASHH;
+  __INTEGER upper__WDJH,Self__UDJH,n__GZTD,n__NQFH,typ_id__0DJH;
+  __INTEGER typ_id__PFOF;
+  __UINTEGER_32 sz__MXLE,a__UIFH,new_size__VIFH,t__ZIFH,a__YIFH;
+  __UINTEGER_32 new_size__IDJH,lab_type__HDJH,sz__1DJH,a__2DJH;
+  __UINTEGER_32 new_size__3DJH,t__4DJH,a__5DJH,new_size__LEJH;
+  __UINTEGER_32 lab_type__KEJH,sz__MFOF,a__5QFH,new_size__ARFH,t__ERFH;
+  __UINTEGER_32 a__DRFH,new_size__VEJH,lab_type__UEJH;
+  __STRING *Self__LRHH,*new__EZQE,*Self__RRHH,*Self__MN3E,*Self__ZRHH;
+  __STRING *Self__4RHH,*Self__C1SD,*Self__FZTD;
+  void *other__1RHH;
+  void *result__RV3E;
+  void *__tmp__FY3E,*dir__DY3E;
+  void *__tmp__QKRD;
+  __CHARACTER *n__0HRD,*Self__MRHH,*new__ORHH,*Self__VRHH,*new__XRHH;
+  __CHARACTER *__tmp__MZGH,*__tmp__NZGH,*Self__U2LH,*model__V2LH;
+  __CHARACTER *Self__5RHH,*new__BSHH;
+  __BOOLEAN result__AIRD,result__QRHH,__tmp__UX3E;
+  __LINKED_LISToENTRYo *result__JXLE,*Self__MMWE,*Self__UQMF;
+  __CHARACTER ch__PRHH;
+  __LINKED_LIST_NODEoENTRYo *result__YDJH,*Self__AEJH,*result__JFOF;
+  __LINKED_LIST_NODEoENTRYo *Self__RNQF;
+  n__0HRD=NULL;
+  dirent__3HRD=((__POINTER )(NULL));
+  result__AIRD=FALSE__;
+  i__BIRD= 0;
+  if (((void *)Self__XHRD->parent_directory__SGD.list__FIRD == (void *)NULL)) {
+    result__JXLE=NULL;
+    ptr__KXLE=((__POINTER )(NULL));
+    typ_id__PXLE= 0;
+    sz__MXLE=((__UINTEGER_32 )sizeof(__LINKED_LISToENTRYo));
+    if ((sz__MXLE ==  0)) {
+      result__JXLE=LINKED_LISToENTRYo__;
+    } else {
+      typ_id__PXLE=__LINKED_LISToENTRYo__;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__MXLE);
+      if ((typ_id__PXLE == (__INTEGER)(-  1))) {
+        a__UIFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__VIFH=(__UINTEGER_32)((__UINTEGER_32)(sz__MXLE + a__UIFH) & (__UINTEGER_32)(~ a__UIFH));
+        ptr_table__ADJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__VIFH / ((__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__RTJ(new_size__VIFH);
+          next__5CJH=(void *)((unsigned long)result__BDJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VIFH)));
+          ((__POINTER *)next__5CJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__ADJH)[ 0]=next__5CJH;
+        } else {
+          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__4XH)))) &  4095) + (__UINTEGER_32)(new_size__VIFH <<  1)) <=  4096)) {
+              next__5CJH=(void *)((unsigned long)result__BDJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VIFH)));
+            } else {
+              next__5CJH=new_lab__RTJ(new_size__VIFH);
+            };
+            ((__POINTER *)next__5CJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__ADJH)[ 0]=next__5CJH;
+          } else {
+            ((__POINTER *)result__BDJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5CJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__BDJH=next__5CJH;
+          };
+        };
+        ptr__KXLE=result__BDJH;
+      } else {
+        t__ZIFH=((__UINTEGER_32 )typ_id__PXLE);
+        a__YIFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__IDJH=(__UINTEGER_32)((__UINTEGER_32)(sz__MXLE + a__YIFH) & (__UINTEGER_32)(~ a__YIFH));
+        ptr_table__FDJH=((__POINTER )(&(table_type[(t__ZIFH)])));
+        lab_type__HDJH=(__UINTEGER_32)(t__ZIFH |  1);
+        next__EDJH=((__POINTER )(NULL));
+        result__GDJH=((__POINTER *)ptr_table__FDJH)[ 0];
+        if ((result__GDJH == (void *)NULL)) {
+          result__GDJH=new_lab__RTJ(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__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__4XH)))) &  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__EDJH=new_lab__RTJ(lab_type__HDJH);
+            };
+            ((__POINTER *)next__EDJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__FDJH)[ 0]=next__EDJH;
+          } else {
+            ((__POINTER *)result__GDJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EDJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__GDJH=next__EDJH;
+          };
+        };
+        ptr__KXLE=result__GDJH;
+      };
+      result__JXLE=((__LINKED_LISToENTRYo *)ptr__KXLE);
+      *(result__JXLE) = *(LINKED_LISToENTRYo__);
+    };
+    Self__XHRD->parent_directory__SGD.list__FIRD=result__JXLE;
   } else {
-    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__;
+    Self__MMWE=((__LINKED_LISToENTRYo *)Self__XHRD->parent_directory__SGD.list__FIRD);
+    if (((void *)Self__MMWE->first_link__OMWE != (void *)NULL)) {
+      Self__MMWE->first_link__OMWE=NULL;
+      Self__MMWE->mem_idx__VMWE= 0;
+      Self__MMWE->mem_lnk__WMWE=NULL;
+      Self__MMWE->parent_linked_collection__EIRD.upper__HR3D= 0;
+      Self__MMWE->last_link__XMWE=NULL;
+    };
+  };
+  dir__1HRD=((__POINTER )(opendir((((__STRING_CONSTANT *)Self__XHRD->parent_entry_unix__RGD.parent_entry__QGD.path__BD)->storage__RRO))));
+  if ((dir__1HRD != (void *)NULL)) {
+    result__AIRD=TRUE__;
     do {
-      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);
+      dirent__3HRD=((__POINTER )(readdir((dir__1HRD))));
+      if ((dirent__3HRD != (void *)NULL)) {
+        n__0HRD=((__CHARACTER *)(((struct dirent *)(dirent__3HRD))->d_name));
+        ((__STRING *)string_tmp__LGD)->count__SGC= 0;
+        i__BIRD= 0;
+        while ((((__CHARACTER *)n__0HRD)[i__BIRD] != '\0')) {
+          Self__LRHH=((__STRING *)string_tmp__LGD);
+          ch__PRHH=((__CHARACTER *)n__0HRD)[i__BIRD];
+          new_capacity__KRHH= 0;
+          if ((Self__LRHH->capacity__UCS <= Self__LRHH->count__SGC)) {
+            if ((Self__LRHH->capacity__UCS ==  0)) {
+              Self__LRHH->capacity__UCS= 32;
+              Self__LRHH->storage__3CS=create__YIEB( 32);
+            } else {
+              new_capacity__KRHH=(__INTEGER)(Self__LRHH->capacity__UCS <<  1);
+              Self__MRHH=((__CHARACTER *)Self__LRHH->storage__3CS);
+              old_nb_elts__NRHH=Self__LRHH->capacity__UCS;
+              new__ORHH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__MRHH),((__UINTEGER_32 )old_nb_elts__NRHH),((__UINTEGER_32 )new_capacity__KRHH)));
+              upper__MDJH=(__INTEGER)(new_capacity__KRHH -  1);
+              Self__KDJH=old_nb_elts__NRHH;
+              while ((Self__KDJH <= upper__MDJH)) {
+                new__ORHH[Self__KDJH]='\0';
+                Self__KDJH=(__INTEGER)(Self__KDJH +  1);
+              };
+              Self__LRHH->storage__3CS=new__ORHH;
+              Self__LRHH->capacity__UCS=new_capacity__KRHH;
+            };
+          };
+          ((__CHARACTER *)Self__LRHH->storage__3CS)[Self__LRHH->count__SGC]=ch__PRHH;
+          Self__LRHH->count__SGC=(__INTEGER)(Self__LRHH->count__SGC +  1);
+          i__BIRD=(__INTEGER)(i__BIRD +  1);
+        };
+        new__EZQE=create__ZBB(((__STRING_CONSTANT *)(&__string_221))->count__DD);
+        copy__VDS(new__EZQE,(&__string_221));
+        Self__RRHH=((__STRING *)string_tmp__LGD);
+        result__QRHH=FALSE__;
+        if ((Self__RRHH->count__SGC == new__EZQE->count__SGC)) {
+          result__QRHH=((Self__RRHH->count__SGC ==  0) || fast_memcmp__until__FYYB(Self__RRHH->storage__3CS,new__EZQE->storage__3CS,Self__RRHH->count__SGC));
+        };
+        if ((! result__QRHH)) {
+          Self__MN3E=((__STRING *)string_tmp__LGD);
+          new_capacity__TRHH= 0;
+          if ((Self__MN3E->capacity__UCS <= Self__MN3E->count__SGC)) {
+            if ((Self__MN3E->capacity__UCS ==  0)) {
+              Self__MN3E->capacity__UCS= 32;
+              Self__MN3E->storage__3CS=create__YIEB( 32);
+            } else {
+              new_capacity__TRHH=(__INTEGER)(Self__MN3E->capacity__UCS <<  1);
+              Self__VRHH=((__CHARACTER *)Self__MN3E->storage__3CS);
+              old_nb_elts__WRHH=Self__MN3E->capacity__UCS;
+              new__XRHH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__VRHH),((__UINTEGER_32 )old_nb_elts__WRHH),((__UINTEGER_32 )new_capacity__TRHH)));
+              upper__RDJH=(__INTEGER)(new_capacity__TRHH -  1);
+              Self__PDJH=old_nb_elts__WRHH;
+              while ((Self__PDJH <= upper__RDJH)) {
+                new__XRHH[Self__PDJH]='\0';
+                Self__PDJH=(__INTEGER)(Self__PDJH +  1);
+              };
+              Self__MN3E->storage__3CS=new__XRHH;
+              Self__MN3E->capacity__UCS=new_capacity__TRHH;
+            };
+          };
+          ((__CHARACTER *)Self__MN3E->storage__3CS)[Self__MN3E->count__SGC]=' ';
+          Self__MN3E->count__SGC=(__INTEGER)(Self__MN3E->count__SGC +  1);
+          Self__YVFF=Self__MN3E->count__SGC;
+          __tmp__MZGH=Self__MN3E->storage__3CS;
+          __tmp__NZGH=Self__MN3E->storage__3CS;
+          while ((Self__YVFF >=  2)) {
+            ((__CHARACTER *)__tmp__NZGH)[(__INTEGER)(Self__YVFF -  1)]=((__CHARACTER *)__tmp__MZGH)[(__INTEGER)((__INTEGER)(Self__YVFF -  1) -  1)];
+            Self__YVFF=(__INTEGER)(Self__YVFF -  1);
+          };
+          ((__CHARACTER *)Self__MN3E->storage__3CS)[ 0]='/';
+          Self__ZRHH=((__STRING *)string_tmp__LGD);
+          other__1RHH=Self__XHRD->parent_entry_unix__RGD.parent_entry__QGD.path__BD;
+          i__0RHH=Self__ZRHH->count__SGC;
+          j__2RHH=((__STRING_CONSTANT *)other__1RHH)->count__DD;
+          resize__1VZ(Self__ZRHH,(__INTEGER)(i__0RHH + j__2RHH));
+          if (((i__0RHH >  0) && (j__2RHH >  0))) {
+            move__to__by__LVCC(Self__ZRHH->storage__3CS, 0,(__INTEGER)(i__0RHH -  1),j__2RHH);
+          };
+          Self__U2LH=((__CHARACTER *)Self__ZRHH->storage__3CS);
+          model__V2LH=((__STRING_CONSTANT *)other__1RHH)->storage__RRO;
+          Self__T2LH=(__INTEGER)(j__2RHH -  1);
+          while ((Self__T2LH >=  0)) {
+            Self__U2LH[Self__T2LH]=((__CHARACTER *)model__V2LH)[Self__T2LH];
+            Self__T2LH=(__INTEGER)(Self__T2LH -  1);
+          };
+          reduce_path__UO3E(string_tmp__LGD);
+          result__RV3E=NULL;
+          idx__SV3E= 0;
+          copy__VDS(string_tmp2__JZAC,Self__XHRD->parent_entry_unix__RGD.parent_entry__QGD.path__BD);
+          Self__4RHH=((__STRING *)string_tmp2__JZAC);
+          new_capacity__3RHH= 0;
+          if ((Self__4RHH->capacity__UCS <= Self__4RHH->count__SGC)) {
+            if ((Self__4RHH->capacity__UCS ==  0)) {
+              Self__4RHH->capacity__UCS= 32;
+              Self__4RHH->storage__3CS=create__YIEB( 32);
+            } else {
+              new_capacity__3RHH=(__INTEGER)(Self__4RHH->capacity__UCS <<  1);
+              Self__5RHH=((__CHARACTER *)Self__4RHH->storage__3CS);
+              old_nb_elts__ASHH=Self__4RHH->capacity__UCS;
+              new__BSHH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__5RHH),((__UINTEGER_32 )old_nb_elts__ASHH),((__UINTEGER_32 )new_capacity__3RHH)));
+              upper__WDJH=(__INTEGER)(new_capacity__3RHH -  1);
+              Self__UDJH=old_nb_elts__ASHH;
+              while ((Self__UDJH <= upper__WDJH)) {
+                new__BSHH[Self__UDJH]='\0';
+                Self__UDJH=(__INTEGER)(Self__UDJH +  1);
+              };
+              Self__4RHH->storage__3CS=new__BSHH;
+              Self__4RHH->capacity__UCS=new_capacity__3RHH;
+            };
+          };
+          ((__CHARACTER *)Self__4RHH->storage__3CS)[Self__4RHH->count__SGC]='/';
+          Self__4RHH->count__SGC=(__INTEGER)(Self__4RHH->count__SGC +  1);
+          append__3OS(string_tmp2__JZAC,string_tmp__LGD);
+          reduce_path__UO3E(string_tmp2__JZAC);
+          copy__VDS(string_tmp3__PZAC,string_tmp2__JZAC);
           do {
-            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;
+            result__RV3E=reference_at__VV0C(alias__2GD,string_tmp2__JZAC);
+            if (((void *)result__RV3E == (void *)NULL)) {
+              Self__C1SD=((__STRING *)string_tmp2__JZAC);
+              idx__SV3E=(__INTEGER)( 1 + fast_reverse_index_of__from__KA3(Self__C1SD->storage__3CS,'/',(__INTEGER)(Self__C1SD->count__SGC -  1)));
+              if ((idx__SV3E >  0)) {
+                Self__FZTD=((__STRING *)string_tmp2__JZAC);
+                n__GZTD=(__INTEGER)(idx__SV3E -  1);
+                if ((n__GZTD < Self__FZTD->count__SGC)) {
+                  n__NQFH=(__INTEGER)(Self__FZTD->count__SGC - n__GZTD);
+                  if ((n__NQFH > Self__FZTD->count__SGC)) {
+                    Self__FZTD->count__SGC= 0;
                   } else {
-                    Self__4XTD->count__EGC=(__INTEGER)(Self__4XTD->count__EGC - n__JDGH);
+                    Self__FZTD->count__SGC=(__INTEGER)(Self__FZTD->count__SGC - n__NQFH);
                   };
                 };
               } else {
-                ((__STRING *)string_tmp2__Y2AC)->count__EGC= 0;
+                ((__STRING *)string_tmp2__JZAC)->count__SGC= 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) {
+          } while ((((void *)result__RV3E == (void *)NULL) && (((__STRING *)string_tmp2__JZAC)->count__SGC !=  0)));
+          if (((void *)result__RV3E == (void *)NULL)) {
+            if (FILE_SYSTEM__->parent_directory__HHD==0) {
             } else {
-              parent_directory__1FD();
+              parent_directory__GGD();
             };
-            result__SU3E=physical_get_entry__P10C(string_tmp3__42AC);
-            __tmp__VW3E=TRUE__;
+            result__RV3E=physical_get_entry__JY0C(string_tmp3__PZAC);
+            __tmp__UX3E=TRUE__;
           } else {
-            __tmp__VW3E=FALSE__;
+            __tmp__UX3E=FALSE__;
           };
-          if ((! __tmp__VW3E)) {
-            if ((((__STRING *)string_tmp3__42AC)->count__EGC != ((__STRING *)string_tmp2__Y2AC)->count__EGC)) {
-              if (result__SU3E==NULL) {
-                __tmp__GX3E=NULL;
+          if ((! __tmp__UX3E)) {
+            if ((((__STRING *)string_tmp3__PZAC)->count__SGC != ((__STRING *)string_tmp2__JZAC)->count__SGC)) {
+              if (result__RV3E==NULL) {
+                __tmp__FY3E=NULL;
               } else {
-                switch (((struct ___OBJ *)result__SU3E)->__id) {
+                switch (((struct ___OBJ *)result__RV3E)->__id) {
                 case __DIRECTORY_UNIX__: {
-                  __tmp__GX3E=((void *)result__SU3E);
+                  __tmp__FY3E=((void *)result__RV3E);
                 } break;
                 case __FILE_UNIX__: {
-                  __tmp__GX3E=NULL;
+                  __tmp__FY3E=NULL;
                 } break;
                 }
               };
-              dir__EX3E=__tmp__GX3E;
-              result__SU3E=physical_get_entry__UDF(string_tmp3__42AC);
+              dir__DY3E=__tmp__FY3E;
+              result__RV3E=physical_get_entry__REF(string_tmp3__PZAC);
             };
           };
-          if (((void *)result__SU3E == (void *)NULL)) {
-            result__3GRD=FALSE__;
+          if (((void *)result__RV3E == (void *)NULL)) {
+            result__AIRD=FALSE__;
           } else {
-            if (((struct ___OBJ *)result__SU3E)->__id==__DIRECTORY_UNIX__) {
-              __tmp__NJRD=((__DIRECTORY_UNIX *)result__SU3E)->parent_entry_unix__GGD.parent_entry__FGD.path__BD;
+            if (((struct ___OBJ *)result__RV3E)->__id==__DIRECTORY_UNIX__) {
+              __tmp__QKRD=((__DIRECTORY_UNIX *)result__RV3E)->parent_entry_unix__RGD.parent_entry__QGD.path__BD;
             } else {
-              __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__;
+              __tmp__QKRD=((__FILE_UNIX *)result__RV3E)->parent_entry_unix__EFF.parent_entry__QGD.path__BD;
+            };
+            if ((((__STRING_CONSTANT *)__tmp__QKRD)->count__DD >= ((__STRING_CONSTANT *)Self__XHRD->parent_entry_unix__RGD.parent_entry__QGD.path__BD)->count__DD)) {
+              Self__UQMF=((__LINKED_LISToENTRYo *)Self__XHRD->parent_directory__SGD.list__FIRD);
+              if (((void *)Self__UQMF->first_link__OMWE == (void *)NULL)) {
+                result__YDJH=NULL;
+                ptr__ZDJH=((__POINTER )(NULL));
+                typ_id__0DJH= 0;
+                sz__1DJH=((__UINTEGER_32 )sizeof(__LINKED_LIST_NODEoENTRYo));
+                if ((sz__1DJH ==  0)) {
+                  result__YDJH=LINKED_LIST_NODEoENTRYo__;
                 } else {
-                  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;
+                  typ_id__0DJH=__LINKED_LIST_NODEoENTRYo__;
+                  clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__1DJH);
+                  if ((typ_id__0DJH == (__INTEGER)(-  1))) {
+                    a__2DJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__3DJH=(__UINTEGER_32)((__UINTEGER_32)(sz__1DJH + a__2DJH) & (__UINTEGER_32)(~ a__2DJH));
+                    ptr_table__DEJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__3DJH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                    next__CEJH=((__POINTER )(NULL));
+                    result__EEJH=((__POINTER *)ptr_table__DEJH)[ 0];
+                    if ((result__EEJH == (void *)NULL)) {
+                      result__EEJH=new_lab__RTJ(new_size__3DJH);
+                      next__CEJH=(void *)((unsigned long)result__EEJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3DJH)));
+                      ((__POINTER *)next__CEJH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__DEJH)[ 0]=next__CEJH;
                     } else {
-                      next__B4IH=((__POINTER *)result__D4IH)[ 0];
-                      if ((next__B4IH == (void *)NULL)) {
-                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__D4IH - (unsigned long)begin_memory__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)));
+                      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__4XH)))) &  4095) + (__UINTEGER_32)(new_size__3DJH <<  1)) <=  4096)) {
+                          next__CEJH=(void *)((unsigned long)result__EEJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3DJH)));
                         } else {
-                          next__B4IH=new_lab__FTJ(new_size__23IH);
+                          next__CEJH=new_lab__RTJ(new_size__3DJH);
                         };
-                        ((__POINTER *)next__B4IH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__C4IH)[ 0]=next__B4IH;
+                        ((__POINTER *)next__CEJH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__DEJH)[ 0]=next__CEJH;
                       } else {
-                        ((__POINTER *)result__D4IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__B4IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__D4IH=next__B4IH;
+                        ((__POINTER *)result__EEJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CEJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__EEJH=next__CEJH;
                       };
                     };
-                    ptr__Y3IH=result__D4IH;
+                    ptr__ZDJH=result__EEJH;
                   } else {
-                    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;
+                    t__4DJH=((__UINTEGER_32 )typ_id__0DJH);
+                    a__5DJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__LEJH=(__UINTEGER_32)((__UINTEGER_32)(sz__1DJH + a__5DJH) & (__UINTEGER_32)(~ a__5DJH));
+                    ptr_table__IEJH=((__POINTER )(&(table_type[(t__4DJH)])));
+                    lab_type__KEJH=(__UINTEGER_32)(t__4DJH |  1);
+                    next__HEJH=((__POINTER )(NULL));
+                    result__JEJH=((__POINTER *)ptr_table__IEJH)[ 0];
+                    if ((result__JEJH == (void *)NULL)) {
+                      result__JEJH=new_lab__RTJ(lab_type__KEJH);
+                      next__HEJH=(void *)((unsigned long)result__JEJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LEJH)));
+                      ((__POINTER *)next__HEJH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__IEJH)[ 0]=next__HEJH;
                     } else {
-                      next__G4IH=((__POINTER *)result__I4IH)[ 0];
-                      if ((next__G4IH == (void *)NULL)) {
-                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__I4IH - (unsigned long)begin_memory__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)));
+                      next__HEJH=((__POINTER *)result__JEJH)[ 0];
+                      if ((next__HEJH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__JEJH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__LEJH <<  1)) <=  4096)) {
+                          next__HEJH=(void *)((unsigned long)result__JEJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LEJH)));
                         } else {
-                          next__G4IH=new_lab__FTJ(lab_type__J4IH);
+                          next__HEJH=new_lab__RTJ(lab_type__KEJH);
                         };
-                        ((__POINTER *)next__G4IH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__H4IH)[ 0]=next__G4IH;
+                        ((__POINTER *)next__HEJH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__IEJH)[ 0]=next__HEJH;
                       } else {
-                        ((__POINTER *)result__I4IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__G4IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__I4IH=next__G4IH;
+                        ((__POINTER *)result__JEJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HEJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__JEJH=next__HEJH;
                       };
                     };
-                    ptr__Y3IH=result__I4IH;
+                    ptr__ZDJH=result__JEJH;
                   };
-                  result__X3IH=((__LINKED_LIST_NODEoENTRYo *)ptr__Y3IH);
-                  *(result__X3IH) = *(LINKED_LIST_NODEoENTRYo__);
+                  result__YDJH=((__LINKED_LIST_NODEoENTRYo *)ptr__ZDJH);
+                  *(result__YDJH) = *(LINKED_LIST_NODEoENTRYo__);
                 };
-                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;
+                Self__AEJH=((__LINKED_LIST_NODEoENTRYo *)result__YDJH);
+                Self__AEJH->item__IAXE=result__RV3E;
+                Self__AEJH->next__G3FF=NULL;
+                Self__UQMF->first_link__OMWE=result__YDJH;
+                Self__UQMF->parent_linked_collection__EIRD.upper__HR3D= 1;
+                Self__UQMF->last_link__XMWE=result__YDJH;
+                Self__UQMF->mem_idx__VMWE= 1;
+                Self__UQMF->mem_lnk__WMWE=result__YDJH;
               } else {
-                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__;
+                result__JFOF=NULL;
+                ptr__KFOF=((__POINTER )(NULL));
+                typ_id__PFOF= 0;
+                sz__MFOF=((__UINTEGER_32 )sizeof(__LINKED_LIST_NODEoENTRYo));
+                if ((sz__MFOF ==  0)) {
+                  result__JFOF=LINKED_LIST_NODEoENTRYo__;
                 } else {
-                  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;
+                  typ_id__PFOF=__LINKED_LIST_NODEoENTRYo__;
+                  clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__MFOF);
+                  if ((typ_id__PFOF == (__INTEGER)(-  1))) {
+                    a__5QFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__ARFH=(__UINTEGER_32)((__UINTEGER_32)(sz__MFOF + a__5QFH) & (__UINTEGER_32)(~ a__5QFH));
+                    ptr_table__NEJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ARFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                    next__MEJH=((__POINTER )(NULL));
+                    result__OEJH=((__POINTER *)ptr_table__NEJH)[ 0];
+                    if ((result__OEJH == (void *)NULL)) {
+                      result__OEJH=new_lab__RTJ(new_size__ARFH);
+                      next__MEJH=(void *)((unsigned long)result__OEJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ARFH)));
+                      ((__POINTER *)next__MEJH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__NEJH)[ 0]=next__MEJH;
                     } else {
-                      next__L4IH=((__POINTER *)result__N4IH)[ 0];
-                      if ((next__L4IH == (void *)NULL)) {
-                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__N4IH - (unsigned long)begin_memory__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)));
+                      next__MEJH=((__POINTER *)result__OEJH)[ 0];
+                      if ((next__MEJH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__OEJH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__ARFH <<  1)) <=  4096)) {
+                          next__MEJH=(void *)((unsigned long)result__OEJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ARFH)));
                         } else {
-                          next__L4IH=new_lab__FTJ(new_size__TEGH);
+                          next__MEJH=new_lab__RTJ(new_size__ARFH);
                         };
-                        ((__POINTER *)next__L4IH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__M4IH)[ 0]=next__L4IH;
+                        ((__POINTER *)next__MEJH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__NEJH)[ 0]=next__MEJH;
                       } else {
-                        ((__POINTER *)result__N4IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__L4IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__N4IH=next__L4IH;
+                        ((__POINTER *)result__OEJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MEJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__OEJH=next__MEJH;
                       };
                     };
-                    ptr__QDOF=result__N4IH;
+                    ptr__KFOF=result__OEJH;
                   } else {
-                    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;
+                    t__ERFH=((__UINTEGER_32 )typ_id__PFOF);
+                    a__DRFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__VEJH=(__UINTEGER_32)((__UINTEGER_32)(sz__MFOF + a__DRFH) & (__UINTEGER_32)(~ a__DRFH));
+                    ptr_table__SEJH=((__POINTER )(&(table_type[(t__ERFH)])));
+                    lab_type__UEJH=(__UINTEGER_32)(t__ERFH |  1);
+                    next__REJH=((__POINTER )(NULL));
+                    result__TEJH=((__POINTER *)ptr_table__SEJH)[ 0];
+                    if ((result__TEJH == (void *)NULL)) {
+                      result__TEJH=new_lab__RTJ(lab_type__UEJH);
+                      next__REJH=(void *)((unsigned long)result__TEJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VEJH)));
+                      ((__POINTER *)next__REJH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__SEJH)[ 0]=next__REJH;
                     } else {
-                      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)));
+                      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__4XH)))) &  4095) + (__UINTEGER_32)(new_size__VEJH <<  1)) <=  4096)) {
+                          next__REJH=(void *)((unsigned long)result__TEJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VEJH)));
                         } else {
-                          next__Q4IH=new_lab__FTJ(lab_type__T4IH);
+                          next__REJH=new_lab__RTJ(lab_type__UEJH);
                         };
-                        ((__POINTER *)next__Q4IH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__R4IH)[ 0]=next__Q4IH;
+                        ((__POINTER *)next__REJH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__SEJH)[ 0]=next__REJH;
                       } else {
-                        ((__POINTER *)result__S4IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__Q4IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__S4IH=next__Q4IH;
+                        ((__POINTER *)result__TEJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__REJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__TEJH=next__REJH;
                       };
                     };
-                    ptr__QDOF=result__S4IH;
+                    ptr__KFOF=result__TEJH;
                   };
-                  result__PDOF=((__LINKED_LIST_NODEoENTRYo *)ptr__QDOF);
-                  *(result__PDOF) = *(LINKED_LIST_NODEoENTRYo__);
+                  result__JFOF=((__LINKED_LIST_NODEoENTRYo *)ptr__KFOF);
+                  *(result__JFOF) = *(LINKED_LIST_NODEoENTRYo__);
                 };
-                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;
+                Self__RNQF=((__LINKED_LIST_NODEoENTRYo *)result__JFOF);
+                Self__RNQF->item__IAXE=result__RV3E;
+                Self__RNQF->next__G3FF=NULL;
+                ((__LINKED_LIST_NODEoENTRYo *)Self__UQMF->last_link__XMWE)->next__G3FF=result__JFOF;
+                Self__UQMF->parent_linked_collection__EIRD.upper__HR3D=(__INTEGER)(Self__UQMF->parent_linked_collection__EIRD.upper__HR3D +  1);
+                Self__UQMF->last_link__XMWE=result__JFOF;
               };
             };
           };
         };
       };
-    } while (((dirent__0GRD != (void *)NULL) & result__3GRD));
-    closedir((dir__YGRD));
+    } while (((dirent__3HRD != (void *)NULL) & result__AIRD));
+    closedir((dir__1HRD));
   };
-  return(result__3GRD);
+  return(result__AIRD);
 }
 
-static void check_in__begin__IUQC(void *entry__KUQC,__INTEGER n__LUQC)
+static void check_in__begin__ZQQC(void *entry__1QQC,__INTEGER n__2QQC)
 // ({NULLxDIRECTORY_UNIXxFILE_UNIX},{INTEGER}) VoidRecursive, No inlinable.
 {
-  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);
+  void *tok__4QQC,*__tmp__IRQC,*__tmp__YSQC,*k__3VDC,*k__2CFG;
+  void *__tmp__EVQC,*__tmp__JVQC;
+  void *dir__ARQC,*__tmp__PRQC;
+  __FILE_UNIX *Self__423G;
+  __INTEGER __tmp__URQC,Self__LR3D,__tmp__JSQC,Self__2R3D,__tmp__UTQC;
+  __INTEGER Self__MCFG,new_capacity__DSHH,old_nb_elts__GSHH,upper__ZEJH;
+  __INTEGER Self__XEJH,new_capacity__JSHH,old_nb_elts__MSHH,upper__4EJH;
+  __INTEGER Self__2EJH,i__B0BD,j__C0BD,Self__HAKB,__tmp__CYQC;
+  __INTEGER Self__UGSE,new_capacity__PSHH,old_nb_elts__SSHH,upper__EFJH;
+  __INTEGER Self__CFJH;
+  void *__tmp__0RQC,*__tmp__PSQC,*__tmp__XSQC,*__tmp__DVQC,*__tmp__IVQC;
+  __STRING *Self__KSS,*Self__ESHH,*Self__KSHH,*Self__5ZBD,*Self__212;
+  __STRING *Self__QSHH;
+  void *tok_lst__5QQC;
+  __BOOLEAN __tmp__BRQC,__tmp__1RQC,__tmp__QSQC;
+  __CHARACTER *Self__FSHH,*new__HSHH,*Self__LSHH,*new__NSHH,*Self__SJEB;
+  __CHARACTER *model__TJEB,*Self__RSHH,*new__TSHH;
+  __HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *Self__2VDC,*Self__1CFG;
+  void *node__GWDC,*node__GDFG;
+  tok__4QQC=NULL;
+  tok_lst__5QQC=NULL;
+  dir__ARQC=NULL;
+  if (((struct ___OBJ *)entry__1QQC)->__id==__DIRECTORY_UNIX__) {
+    __tmp__BRQC=open__WHRD(entry__1QQC);
   } else {
-    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);
+    Self__423G=((__FILE_UNIX *)entry__1QQC);
+    Self__423G->stream__BMRD=((__POINTER )(fopen((char*)(((__STRING_CONSTANT *)Self__423G->parent_entry_unix__EFF.parent_entry__QGD.path__BD)->storage__RRO),"r+b")));
+    __tmp__BRQC=(Self__423G->stream__BMRD != (void *)NULL);
   };
-  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;
+  if ((! __tmp__BRQC)) {
+    print__OJD((&__string_222));
+    if (((struct ___OBJ *)entry__1QQC)->__id==__DIRECTORY_UNIX__) {
+      __tmp__IRQC=((__DIRECTORY_UNIX *)entry__1QQC)->parent_entry_unix__RGD.parent_entry__QGD.path__BD;
     } else {
-      __tmp__XUQC=((__FILE_UNIX *)entry__KUQC)->parent_entry_unix__HEF.parent_entry__FGD.path__BD;
+      __tmp__IRQC=((__FILE_UNIX *)entry__1QQC)->parent_entry_unix__EFF.parent_entry__QGD.path__BD;
     };
-    print__DJD(__tmp__XUQC);
-    print__DJD((&__string_171));
+    print__OJD(__tmp__IRQC);
+    print__OJD((&__string_171));
   } else {
-    if (entry__KUQC==NULL) {
-      __tmp__4UQC=NULL;
+    if (entry__1QQC==NULL) {
+      __tmp__PRQC=NULL;
     } else {
-      switch (((struct ___OBJ *)entry__KUQC)->__id) {
+      switch (((struct ___OBJ *)entry__1QQC)->__id) {
       case __DIRECTORY_UNIX__: {
-        __tmp__4UQC=((void *)entry__KUQC);
+        __tmp__PRQC=((void *)entry__1QQC);
       } break;
       case __FILE_UNIX__: {
-        __tmp__4UQC=NULL;
+        __tmp__PRQC=NULL;
       } break;
       }
     };
-    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__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);
+    dir__ARQC=__tmp__PRQC;
+    __tmp__URQC=((__LINKED_LISToENTRYo *)((__DIRECTORY_UNIX *)__tmp__PRQC)->parent_directory__SGD.list__FIRD)->parent_linked_collection__EIRD.upper__HR3D;
+    Self__LR3D= 1;
+    while ((Self__LR3D <= __tmp__URQC)) {
+      __tmp__0RQC=item__V3PE(dir__ARQC,Self__LR3D);
+      if (((struct ___OBJ *)__tmp__0RQC)->__id==__DIRECTORY_UNIX__) {
+        __tmp__1RQC=((void *)((__DIRECTORY_UNIX *)__tmp__0RQC) != (void *)NULL);
+      } else {
+        __tmp__1RQC=FALSE__;
+      };
+      if (__tmp__1RQC) {
+        check_in__begin__ZQQC(item__V3PE(dir__ARQC,Self__LR3D),n__2QQC);
+      };
+      Self__LR3D=(__INTEGER)(Self__LR3D +  1);
+    };
+    __tmp__JSQC=((__LINKED_LISToENTRYo *)((__DIRECTORY_UNIX *)__tmp__PRQC)->parent_directory__SGD.list__FIRD)->parent_linked_collection__EIRD.upper__HR3D;
+    Self__2R3D= 1;
+    while ((Self__2R3D <= __tmp__JSQC)) {
+      __tmp__PSQC=item__V3PE(dir__ARQC,Self__2R3D);
+      if (((struct ___OBJ *)__tmp__PSQC)->__id==__DIRECTORY_UNIX__) {
+        __tmp__QSQC=((void *)((__DIRECTORY_UNIX *)__tmp__PSQC) != (void *)NULL);
+      } else {
+        __tmp__QSQC=FALSE__;
+      };
+      if ((! __tmp__QSQC)) {
+        __tmp__XSQC=item__V3PE(dir__ARQC,Self__2R3D);
+        if (((struct ___OBJ *)__tmp__XSQC)->__id==__DIRECTORY_UNIX__) {
+          __tmp__YSQC=((__DIRECTORY_UNIX *)__tmp__XSQC)->parent_entry_unix__RGD.parent_entry__QGD.name__OPT;
+        } else {
+          __tmp__YSQC=((__FILE_UNIX *)__tmp__XSQC)->parent_entry_unix__EFF.parent_entry__QGD.name__OPT;
+        };
+        if (has_suffix__QJS(__tmp__YSQC)) {
+          copy__VDS(string_tmp__VH,__tmp__YSQC);
+          Self__KSS=((__STRING *)string_tmp__VH);
+          if (( 3 > Self__KSS->count__SGC)) {
+            Self__KSS->count__SGC= 0;
+          } else {
+            Self__KSS->count__SGC=(__INTEGER)(Self__KSS->count__SGC -  3);
+          };
+          to_upper__PTS(string_tmp__VH);
+          tok__4QQC=get__YWB(string_tmp__VH);
+          if (fast_has__IDT(short_dico__QD,(&__string_155))) {
+            tok_lst__5QQC=fast_at__LV3(short_dico__QD,(&__string_155));
+            __tmp__UTQC=((__LINKED_LISToSTRING_CONSTANTo *)tok_lst__5QQC)->parent_linked_collection__LD.upper__0ED;
+            Self__MCFG= 1;
+            while ((Self__MCFG <= __tmp__UTQC)) {
+              if (((void *)item__X3ND(tok_lst__5QQC,Self__MCFG) == (void *)NULL)) {
+                append__3OS(current_list__2B,tok__4QQC);
+                append__3OS(file_list__0B,tok__4QQC);
+              } else {
+                append__3OS(current_list__2B,item__X3ND(tok_lst__5QQC,Self__MCFG));
+                append__3OS(file_list__0B,item__X3ND(tok_lst__5QQC,Self__MCFG));
+              };
+              Self__MCFG=(__INTEGER)(Self__MCFG +  1);
+            };
+          } else {
+            append__3OS(current_list__2B,tok__4QQC);
+            Self__ESHH=((__STRING *)current_list__2B);
+            new_capacity__DSHH= 0;
+            if ((Self__ESHH->capacity__UCS <= Self__ESHH->count__SGC)) {
+              if ((Self__ESHH->capacity__UCS ==  0)) {
+                Self__ESHH->capacity__UCS= 32;
+                Self__ESHH->storage__3CS=create__YIEB( 32);
               } else {
-                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);
+                new_capacity__DSHH=(__INTEGER)(Self__ESHH->capacity__UCS <<  1);
+                Self__FSHH=((__CHARACTER *)Self__ESHH->storage__3CS);
+                old_nb_elts__GSHH=Self__ESHH->capacity__UCS;
+                new__HSHH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__FSHH),((__UINTEGER_32 )old_nb_elts__GSHH),((__UINTEGER_32 )new_capacity__DSHH)));
+                upper__ZEJH=(__INTEGER)(new_capacity__DSHH -  1);
+                Self__XEJH=old_nb_elts__GSHH;
+                while ((Self__XEJH <= upper__ZEJH)) {
+                  new__HSHH[Self__XEJH]='\0';
+                  Self__XEJH=(__INTEGER)(Self__XEJH +  1);
+                };
+                Self__ESHH->storage__3CS=new__HSHH;
+                Self__ESHH->capacity__UCS=new_capacity__DSHH;
+              };
+            };
+            ((__CHARACTER *)Self__ESHH->storage__3CS)[Self__ESHH->count__SGC]='\n';
+            Self__ESHH->count__SGC=(__INTEGER)(Self__ESHH->count__SGC +  1);
+            append__3OS(file_list__0B,tok__4QQC);
+            Self__KSHH=((__STRING *)file_list__0B);
+            new_capacity__JSHH= 0;
+            if ((Self__KSHH->capacity__UCS <= Self__KSHH->count__SGC)) {
+              if ((Self__KSHH->capacity__UCS ==  0)) {
+                Self__KSHH->capacity__UCS= 32;
+                Self__KSHH->storage__3CS=create__YIEB( 32);
+              } else {
+                new_capacity__JSHH=(__INTEGER)(Self__KSHH->capacity__UCS <<  1);
+                Self__LSHH=((__CHARACTER *)Self__KSHH->storage__3CS);
+                old_nb_elts__MSHH=Self__KSHH->capacity__UCS;
+                new__NSHH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__LSHH),((__UINTEGER_32 )old_nb_elts__MSHH),((__UINTEGER_32 )new_capacity__JSHH)));
+                upper__4EJH=(__INTEGER)(new_capacity__JSHH -  1);
+                Self__2EJH=old_nb_elts__MSHH;
+                while ((Self__2EJH <= upper__4EJH)) {
+                  new__NSHH[Self__2EJH]='\0';
+                  Self__2EJH=(__INTEGER)(Self__2EJH +  1);
+                };
+                Self__KSHH->storage__3CS=new__NSHH;
+                Self__KSHH->capacity__UCS=new_capacity__JSHH;
+              };
+            };
+            ((__CHARACTER *)Self__KSHH->storage__3CS)[Self__KSHH->count__SGC]='\n';
+            Self__KSHH->count__SGC=(__INTEGER)(Self__KSHH->count__SGC +  1);
+          };
+          Self__2VDC=((__HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *)prototype_dico__LUS);
+          k__3VDC=tok__4QQC;
+          node__GWDC=((void **)Self__2VDC->buckets__PMBC)[(__INTEGER)(hash_code__RNW(tok__4QQC) % Self__2VDC->capacity__KMBC)];
+          while ((! (((void *)node__GWDC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__GWDC)->key__1MBC == (void *)k__3VDC)))) {
+            node__GWDC=((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__GWDC)->next__GNBC;
+          };
+          if (((void *)node__GWDC != (void *)NULL)) {
+            print__OJD((&__string_223));
+            Self__1CFG=((__HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *)prototype_dico__LUS);
+            k__2CFG=tok__4QQC;
+            node__GDFG=((void **)Self__1CFG->buckets__PMBC)[(__INTEGER)(hash_code__RNW(tok__4QQC) % Self__1CFG->capacity__KMBC)];
+            while (((void *)((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__GDFG)->key__1MBC != (void *)k__2CFG)) {
+              node__GDFG=((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__GDFG)->next__GNBC;
+            };
+            print__OJD(((__PROTOTYPE *)((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__GDFG)->item__NBHD)->filename__FSG);
             fputc((int)('\n'),stdout);
-            __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;
+            __tmp__DVQC=item__V3PE(dir__ARQC,Self__2R3D);
+            if (((struct ___OBJ *)__tmp__DVQC)->__id==__DIRECTORY_UNIX__) {
+              __tmp__EVQC=((__DIRECTORY_UNIX *)__tmp__DVQC)->parent_entry_unix__RGD.parent_entry__QGD.path__BD;
             } else {
-              __tmp__TYQC=((__FILE_UNIX *)__tmp__SYQC)->parent_entry_unix__HEF.parent_entry__FGD.path__BD;
+              __tmp__EVQC=((__FILE_UNIX *)__tmp__DVQC)->parent_entry_unix__EFF.parent_entry__QGD.path__BD;
             };
-            print__DJD(__tmp__TYQC);
+            print__OJD(__tmp__EVQC);
             fputc((int)('\n'),stdout);
             exit(( 1));
           };
-          __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;
+          __tmp__IVQC=item__V3PE(dir__ARQC,Self__2R3D);
+          if (((struct ___OBJ *)__tmp__IVQC)->__id==__DIRECTORY_UNIX__) {
+            __tmp__JVQC=((__DIRECTORY_UNIX *)__tmp__IVQC)->parent_entry_unix__RGD.parent_entry__QGD.path__BD;
           } else {
-            __tmp__YYQC=((__FILE_UNIX *)__tmp__XYQC)->parent_entry_unix__HEF.parent_entry__FGD.path__BD;
+            __tmp__JVQC=((__FILE_UNIX *)__tmp__IVQC)->parent_entry_unix__EFF.parent_entry__QGD.path__BD;
           };
-          proto_input__BI=create__name__generic_count__JBC(__tmp__YYQC,tok__NUQC);
+          proto_input__BI=create__name__generic_count__JBC(__tmp__JVQC,tok__4QQC);
           go_on__SBC(proto_input__BI);
           if (is_shorter__LZ) {
-            save_file__with__3DC(add_ext__PCF(tok__NUQC),output_code__SI);
-          };
-        };
-      };
-      Self__1Q3D=(__INTEGER)(Self__1Q3D +  1);
-    };
-    if ((((__STRING *)current_list__2B)->count__EGC !=  0)) {
-      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__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__ROS(directory_list__YB,item__Q2ND(tok_lst__OUQC,Self__5FSE));
-            };
-            Self__5FSE=(__INTEGER)(Self__5FSE +  1);
-          };
-        } else {
-          append__ROS(directory_list__YB,tok__NUQC);
-          add_last__GOT(directory_list__YB,'\n');
-        };
-        save_file__with__3DC(add_ext__PCF(tok__NUQC),current_list__2B);
-        ((__STRING *)current_list__2B)->count__EGC= 0;
+            copy__VDS(string_tmp__VH,tok__4QQC);
+            if (fast_has__IDT(short_dico__QD,(&__string_116))) {
+              append__3OS(string_tmp__VH,((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)fast_at__LV3(short_dico__QD,(&__string_116)))->first_link__OTEC)->item__L0HD);
+            } else {
+              append__3OS(string_tmp__VH,(&__string_172));
+            };
+            save_file__with__3DC(get__YWB(string_tmp__VH),output_code__SI);
+          };
+        };
+      };
+      Self__2R3D=(__INTEGER)(Self__2R3D +  1);
+    };
+    if ((((__STRING *)current_list__2B)->count__SGC !=  0)) {
+      if (fast_has__IDT(short_dico__QD,(&__string_154))) {
+        tok__4QQC=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)fast_at__LV3(short_dico__QD,(&__string_154)))->first_link__OTEC)->item__L0HD;
+        Self__5ZBD=((__STRING *)current_list__2B);
+        i__B0BD=Self__5ZBD->count__SGC;
+        j__C0BD=((__STRING_CONSTANT *)tok__4QQC)->count__DD;
+        resize__1VZ(Self__5ZBD,(__INTEGER)(i__B0BD + j__C0BD));
+        if (((i__B0BD >  0) && (j__C0BD >  0))) {
+          move__to__by__LVCC(Self__5ZBD->storage__3CS, 0,(__INTEGER)(i__B0BD -  1),j__C0BD);
+        };
+        Self__SJEB=((__CHARACTER *)Self__5ZBD->storage__3CS);
+        model__TJEB=((__STRING_CONSTANT *)tok__4QQC)->storage__RRO;
+        Self__HAKB=(__INTEGER)(j__C0BD -  1);
+        while ((Self__HAKB >=  0)) {
+          Self__SJEB[Self__HAKB]=((__CHARACTER *)model__TJEB)[Self__HAKB];
+          Self__HAKB=(__INTEGER)(Self__HAKB -  1);
+        };
+      };
+      if (fast_has__IDT(short_dico__QD,(&__string_156))) {
+        tok__4QQC=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)fast_at__LV3(short_dico__QD,(&__string_156)))->first_link__OTEC)->item__L0HD;
+        append__3OS(current_list__2B,tok__4QQC);
+      };
+      copy__VDS(string_tmp__VH,((__DIRECTORY_UNIX *)__tmp__PRQC)->parent_entry_unix__RGD.parent_entry__QGD.path__BD);
+      Self__212=((__STRING *)string_tmp__VH);
+      if ((n__2QQC > Self__212->count__SGC)) {
+        Self__212->count__SGC= 0;
+      } else {
+        if ((n__2QQC >  0)) {
+          remove_between__to__MIT(Self__212, 1,n__2QQC);
+        };
+      };
+      if ((((__STRING *)string_tmp__VH)->count__SGC !=  0)) {
+        replace_all__with__CRS(string_tmp__VH,'/','-');
+        tok__4QQC=get__YWB(string_tmp__VH);
+        if (fast_has__IDT(short_dico__QD,(&__string_152))) {
+          tok_lst__5QQC=fast_at__LV3(short_dico__QD,(&__string_152));
+          __tmp__CYQC=((__LINKED_LISToSTRING_CONSTANTo *)tok_lst__5QQC)->parent_linked_collection__LD.upper__0ED;
+          Self__UGSE= 1;
+          while ((Self__UGSE <= __tmp__CYQC)) {
+            if (((void *)item__X3ND(tok_lst__5QQC,Self__UGSE) == (void *)NULL)) {
+              append__3OS(directory_list__YB,tok__4QQC);
+            } else {
+              append__3OS(directory_list__YB,item__X3ND(tok_lst__5QQC,Self__UGSE));
+            };
+            Self__UGSE=(__INTEGER)(Self__UGSE +  1);
+          };
+        } else {
+          append__3OS(directory_list__YB,tok__4QQC);
+          Self__QSHH=((__STRING *)directory_list__YB);
+          new_capacity__PSHH= 0;
+          if ((Self__QSHH->capacity__UCS <= Self__QSHH->count__SGC)) {
+            if ((Self__QSHH->capacity__UCS ==  0)) {
+              Self__QSHH->capacity__UCS= 32;
+              Self__QSHH->storage__3CS=create__YIEB( 32);
+            } else {
+              new_capacity__PSHH=(__INTEGER)(Self__QSHH->capacity__UCS <<  1);
+              Self__RSHH=((__CHARACTER *)Self__QSHH->storage__3CS);
+              old_nb_elts__SSHH=Self__QSHH->capacity__UCS;
+              new__TSHH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__RSHH),((__UINTEGER_32 )old_nb_elts__SSHH),((__UINTEGER_32 )new_capacity__PSHH)));
+              upper__EFJH=(__INTEGER)(new_capacity__PSHH -  1);
+              Self__CFJH=old_nb_elts__SSHH;
+              while ((Self__CFJH <= upper__EFJH)) {
+                new__TSHH[Self__CFJH]='\0';
+                Self__CFJH=(__INTEGER)(Self__CFJH +  1);
+              };
+              Self__QSHH->storage__3CS=new__TSHH;
+              Self__QSHH->capacity__UCS=new_capacity__PSHH;
+            };
+          };
+          ((__CHARACTER *)Self__QSHH->storage__3CS)[Self__QSHH->count__SGC]='\n';
+          Self__QSHH->count__SGC=(__INTEGER)(Self__QSHH->count__SGC +  1);
+        };
+        copy__VDS(string_tmp__VH,tok__4QQC);
+        if (fast_has__IDT(short_dico__QD,(&__string_116))) {
+          append__3OS(string_tmp__VH,((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)fast_at__LV3(short_dico__QD,(&__string_116)))->first_link__OTEC)->item__L0HD);
+        } else {
+          append__3OS(string_tmp__VH,(&__string_172));
+        };
+        save_file__with__3DC(get__YWB(string_tmp__VH),current_list__2B);
+        ((__STRING *)current_list__2B)->count__SGC= 0;
       };
     };
   };
 }
 
-static void* add_ext__PCF(void *n__RCF)
-// ({NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
+static void* fast_at__LV3(__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__MV3,void *k__NV3)
+// ({HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __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__ROS(string_tmp__VH,(&__string_224));
+  void *node__XV3;
+  node__XV3=((void **)Self__MV3->buckets__1DT)[(__INTEGER)(hash_code__RNW(k__NV3) % Self__MV3->capacity__WDT)];
+  while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__XV3)->key__HET != (void *)k__NV3)) {
+    node__XV3=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__XV3)->next__SET;
   };
-  return(get__YWB(string_tmp__VH));
+  return(((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__XV3)->item__KW3);
 }
 
 static void save_file__with__3DC(void *n__5DC,void *buf__AEC)
 // ({NULLxSTRING_CONSTANT},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __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__ZHIC;
-  if (((void *)output_name__DI != (void *)NULL)) {
-    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__TET=((__STRING *)string_tmp__VH);
-      __tmp__XEC=(((__CHARACTER *)Self__TET->storage__RCS)[(__INTEGER)(Self__TET->count__EGC -  1)] != '\\');
-    };
-    if (__tmp__XEC) {
-      add_last__GOT(string_tmp__VH,'/');
+  __STRING *Self__4IFH,*Self__U1BD,*Self__WSHH,*Self__2SHH,*Self__TYS;
+  __INTEGER new_capacity__VSHH,old_nb_elts__YSHH,upper__JFJH,Self__HFJH;
+  __INTEGER new_capacity__1SHH,old_nb_elts__4SHH,upper__OFJH,Self__MFJH;
+  __INTEGER new_capacity__BTHH,old_nb_elts__ETHH,upper__TFJH,Self__RFJH;
+  __INTEGER __tmp__UGC;
+  void *result__BYAC,*__tmp__RYAC,*__tmp__PGC,*file__CEC;
+  void *__tmp__02HC;
+  __POINTER stream__IEIC,ptr__2NPF;
+  void *__tmp__QYAC;
+  __FILE_UNIX *Self__S33G,*Self__QIUE,*Self__ZJUE;
+  __BOOLEAN __tmp__3EC,result__KEIC;
+  __CHARACTER *Self__XSHH,*new__ZSHH,*Self__3SHH,*new__5SHH,*Self__DTHH;
+  __CHARACTER *new__FTHH;
+  if (is_short_recursive__JB) {
+    if (((void *)output_name__DI != (void *)NULL)) {
+      copy__VDS(string_tmp__VH,output_name__DI);
+      Self__4IFH=((__STRING *)string_tmp__VH);
+      if ((((__CHARACTER *)Self__4IFH->storage__3CS)[(__INTEGER)(Self__4IFH->count__SGC -  1)] != '/')) {
+        __tmp__3EC=TRUE__;
+      } else {
+        Self__U1BD=((__STRING *)string_tmp__VH);
+        __tmp__3EC=(((__CHARACTER *)Self__U1BD->storage__3CS)[(__INTEGER)(Self__U1BD->count__SGC -  1)] != '\\');
+      };
+      if (__tmp__3EC) {
+        Self__WSHH=((__STRING *)string_tmp__VH);
+        new_capacity__VSHH= 0;
+        if ((Self__WSHH->capacity__UCS <= Self__WSHH->count__SGC)) {
+          if ((Self__WSHH->capacity__UCS ==  0)) {
+            Self__WSHH->capacity__UCS= 32;
+            Self__WSHH->storage__3CS=create__YIEB( 32);
+          } else {
+            new_capacity__VSHH=(__INTEGER)(Self__WSHH->capacity__UCS <<  1);
+            Self__XSHH=((__CHARACTER *)Self__WSHH->storage__3CS);
+            old_nb_elts__YSHH=Self__WSHH->capacity__UCS;
+            new__ZSHH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__XSHH),((__UINTEGER_32 )old_nb_elts__YSHH),((__UINTEGER_32 )new_capacity__VSHH)));
+            upper__JFJH=(__INTEGER)(new_capacity__VSHH -  1);
+            Self__HFJH=old_nb_elts__YSHH;
+            while ((Self__HFJH <= upper__JFJH)) {
+              new__ZSHH[Self__HFJH]='\0';
+              Self__HFJH=(__INTEGER)(Self__HFJH +  1);
+            };
+            Self__WSHH->storage__3CS=new__ZSHH;
+            Self__WSHH->capacity__UCS=new_capacity__VSHH;
+          };
+        };
+        ((__CHARACTER *)Self__WSHH->storage__3CS)[Self__WSHH->count__SGC]='/';
+        Self__WSHH->count__SGC=(__INTEGER)(Self__WSHH->count__SGC +  1);
+      };
+    } else {
+      ((__STRING *)string_tmp__VH)->count__SGC= 0;
     };
+    append__3OS(string_tmp__VH,n__5DC);
   } else {
-    ((__STRING *)string_tmp__VH)->count__EGC= 0;
+    copy__VDS(string_tmp__VH,output_name__DI);
   };
-  append__ROS(string_tmp__VH,n__5DC);
-  if (FILE_SYSTEM__->parent_directory__2GD==0) {
+  if (FILE_SYSTEM__->parent_directory__HHD==0) {
   } else {
-    parent_directory__1FD();
+    parent_directory__GGD();
   };
-  result__Q1AC=NULL;
-  if (FILE_SYSTEM__->parent_directory__2GD==0) {
+  result__BYAC=NULL;
+  if (FILE_SYSTEM__->parent_directory__HHD==0) {
   } else {
-    parent_directory__1FD();
+    parent_directory__GGD();
   };
-  if (FILE_SYSTEM__->parent_directory__2GD==0) {
-    __tmp__JAIC=FILE_SYSTEM__->parent_directory__1GD;
+  if (FILE_SYSTEM__->parent_directory__HHD==0) {
+    __tmp__02HC=FILE_SYSTEM__->parent_directory__GHD;
   } else {
-    __tmp__JAIC=parent_directory__1FD();
+    __tmp__02HC=parent_directory__GGD();
   };
-  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) {
+  copy__VDS(string_tmp__LGD,((__DIRECTORY_UNIX *)__tmp__02HC)->parent_entry_unix__RGD.parent_entry__QGD.path__BD);
+  if (FILE_SYSTEM__->parent_directory__HHD==0) {
   } else {
-    parent_directory__1FD();
-  };
-  add_last__GOT(string_tmp__AGD,'/');
-  if (FILE_SYSTEM__->parent_directory__2GD==0) {
+    parent_directory__GGD();
+  };
+  Self__2SHH=((__STRING *)string_tmp__LGD);
+  new_capacity__1SHH= 0;
+  if ((Self__2SHH->capacity__UCS <= Self__2SHH->count__SGC)) {
+    if ((Self__2SHH->capacity__UCS ==  0)) {
+      Self__2SHH->capacity__UCS= 32;
+      Self__2SHH->storage__3CS=create__YIEB( 32);
+    } else {
+      new_capacity__1SHH=(__INTEGER)(Self__2SHH->capacity__UCS <<  1);
+      Self__3SHH=((__CHARACTER *)Self__2SHH->storage__3CS);
+      old_nb_elts__4SHH=Self__2SHH->capacity__UCS;
+      new__5SHH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__3SHH),((__UINTEGER_32 )old_nb_elts__4SHH),((__UINTEGER_32 )new_capacity__1SHH)));
+      upper__OFJH=(__INTEGER)(new_capacity__1SHH -  1);
+      Self__MFJH=old_nb_elts__4SHH;
+      while ((Self__MFJH <= upper__OFJH)) {
+        new__5SHH[Self__MFJH]='\0';
+        Self__MFJH=(__INTEGER)(Self__MFJH +  1);
+      };
+      Self__2SHH->storage__3CS=new__5SHH;
+      Self__2SHH->capacity__UCS=new_capacity__1SHH;
+    };
+  };
+  ((__CHARACTER *)Self__2SHH->storage__3CS)[Self__2SHH->count__SGC]='/';
+  Self__2SHH->count__SGC=(__INTEGER)(Self__2SHH->count__SGC +  1);
+  if (FILE_SYSTEM__->parent_directory__HHD==0) {
   } else {
-    parent_directory__1FD();
+    parent_directory__GGD();
   };
-  append__ROS(string_tmp__AGD,string_tmp__VH);
-  if (FILE_SYSTEM__->parent_directory__2GD==0) {
+  append__3OS(string_tmp__LGD,string_tmp__VH);
+  if (FILE_SYSTEM__->parent_directory__HHD==0) {
   } else {
-    parent_directory__1FD();
+    parent_directory__GGD();
   };
-  if (FILE_SYSTEM__->parent_directory__2GD==0) {
+  if (FILE_SYSTEM__->parent_directory__HHD==0) {
   } else {
-    parent_directory__1FD();
+    parent_directory__GGD();
   };
-  reduce_path__YAIC(string_tmp__AGD);
-  if (FILE_SYSTEM__->parent_directory__2GD==0) {
+  reduce_path__J3HC(string_tmp__LGD);
+  if (FILE_SYSTEM__->parent_directory__HHD==0) {
   } else {
-    parent_directory__1FD();
+    parent_directory__GGD();
   };
-  if (FILE_SYSTEM__->parent_directory__2GD==0) {
+  if (FILE_SYSTEM__->parent_directory__HHD==0) {
   } else {
-    parent_directory__1FD();
+    parent_directory__GGD();
   };
-  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';
+  result__KEIC=FALSE__;
+  Self__TYS=((__STRING *)string_tmp__LGD);
+  if ((Self__TYS->capacity__UCS > Self__TYS->count__SGC)) {
+    ((__CHARACTER *)Self__TYS->storage__3CS)[Self__TYS->count__SGC]='\0';
   } else {
-    add_last__GOT(Self__HYS,'\0');
-    Self__HYS->count__EGC=(__INTEGER)(Self__HYS->count__EGC -  1);
+    new_capacity__BTHH= 0;
+    if ((Self__TYS->capacity__UCS <= Self__TYS->count__SGC)) {
+      if ((Self__TYS->capacity__UCS ==  0)) {
+        Self__TYS->capacity__UCS= 32;
+        Self__TYS->storage__3CS=create__YIEB( 32);
+      } else {
+        new_capacity__BTHH=(__INTEGER)(Self__TYS->capacity__UCS <<  1);
+        Self__DTHH=((__CHARACTER *)Self__TYS->storage__3CS);
+        old_nb_elts__ETHH=Self__TYS->capacity__UCS;
+        new__FTHH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__DTHH),((__UINTEGER_32 )old_nb_elts__ETHH),((__UINTEGER_32 )new_capacity__BTHH)));
+        upper__TFJH=(__INTEGER)(new_capacity__BTHH -  1);
+        Self__RFJH=old_nb_elts__ETHH;
+        while ((Self__RFJH <= upper__TFJH)) {
+          new__FTHH[Self__RFJH]='\0';
+          Self__RFJH=(__INTEGER)(Self__RFJH +  1);
+        };
+        Self__TYS->storage__3CS=new__FTHH;
+        Self__TYS->capacity__UCS=new_capacity__BTHH;
+      };
+    };
+    ((__CHARACTER *)Self__TYS->storage__3CS)[Self__TYS->count__SGC]='\0';
+    Self__TYS->count__SGC=(__INTEGER)(Self__TYS->count__SGC +  1);
+    Self__TYS->count__SGC=(__INTEGER)(Self__TYS->count__SGC -  1);
   };
-  stream__XHIC=((__POINTER )(fopen((char*)(Self__HYS->storage__RCS),"w+b")));
-  if ((stream__XHIC != (void *)NULL)) {
-    result__ZHIC=(((__INTEGER )(fclose((FILE*)(stream__XHIC)))) ==  0);
+  stream__IEIC=((__POINTER )(fopen((char*)(Self__TYS->storage__3CS),"w+b")));
+  if ((stream__IEIC != (void *)NULL)) {
+    result__KEIC=(((__INTEGER )(fclose((FILE*)(stream__IEIC)))) ==  0);
   };
-  if (result__ZHIC) {
-    if (FILE_SYSTEM__->parent_directory__2GD==0) {
+  if (result__KEIC) {
+    if (FILE_SYSTEM__->parent_directory__HHD==0) {
     } else {
-      parent_directory__1FD();
+      parent_directory__GGD();
     };
-    if (FILE_SYSTEM__->parent_directory__2GD==0) {
+    if (FILE_SYSTEM__->parent_directory__HHD==0) {
     } else {
-      parent_directory__1FD();
+      parent_directory__GGD();
     };
-    __tmp__51AC=get_entry__S2AC(string_tmp__AGD);
-    if (__tmp__51AC==NULL) {
-      __tmp__A2AC=NULL;
+    __tmp__QYAC=get_entry__DZAC(string_tmp__LGD);
+    if (__tmp__QYAC==NULL) {
+      __tmp__RYAC=NULL;
     } else {
-      switch (((struct ___OBJ *)__tmp__51AC)->__id) {
+      switch (((struct ___OBJ *)__tmp__QYAC)->__id) {
       case __DIRECTORY_UNIX__: {
-        __tmp__A2AC=NULL;
+        __tmp__RYAC=NULL;
       } break;
       case __FILE_UNIX__: {
-        __tmp__A2AC=((void *)__tmp__51AC);
+        __tmp__RYAC=((void *)__tmp__QYAC);
       } break;
       }
     };
-    result__Q1AC=__tmp__A2AC;
+    result__BYAC=__tmp__RYAC;
   };
-  if (((void *)result__Q1AC == (void *)NULL)) {
-    put_string__P3F((&__string_225));
-    put_string__P3F(string_tmp__VH);
-    put_string__P3F((&__string_226));
+  if (((void *)result__BYAC == (void *)NULL)) {
+    put_string__33F((&__string_224));
+    put_string__33F(string_tmp__VH);
+    put_string__33F((&__string_225));
     exit(( 1));
   };
-  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));
+  Self__S33G=((__FILE_UNIX *)result__BYAC);
+  Self__S33G->stream__BMRD=((__POINTER )(fopen((char*)(((__STRING_CONSTANT *)Self__S33G->parent_entry_unix__EFF.parent_entry__QGD.path__BD)->storage__RRO),"r+b")));
+  if ((! (Self__S33G->stream__BMRD != (void *)NULL))) {
+    put_string__33F((&__string_224));
+    put_string__33F(string_tmp__VH);
+    put_string__33F((&__string_226));
     exit(( 1));
   };
-  if (result__Q1AC==NULL) {
-    __tmp__BGC=NULL;
+  if (result__BYAC==NULL) {
+    __tmp__PGC=NULL;
   } else {
-    __tmp__BGC=((void *)result__Q1AC);
-  };
-  file__CEC=__tmp__BGC;
-  __tmp__GGC=((__STRING *)buf__AEC)->count__EGC;
-  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;
+    __tmp__PGC=((void *)result__BYAC);
+  };
+  file__CEC=__tmp__PGC;
+  __tmp__UGC=((__STRING *)buf__AEC)->count__SGC;
+  Self__QIUE=((__FILE_UNIX *)__tmp__PGC);
+  ptr__2NPF=((__POINTER )((__UINTEGER_8 *)((__STRING *)buf__AEC)->storage__3CS));
+  ptr__2NPF=(void *)((unsigned long)ptr__2NPF - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 0)));
+  fwrite((void *)((((__UINTEGER_8 *)ptr__2NPF))),(size_t)(1), (size_t)((__tmp__UGC)),(FILE*)((Self__QIUE->stream__BMRD)));
+  Self__ZJUE=((__FILE_UNIX *)__tmp__PGC);
+  fclose((FILE*)((Self__ZJUE->stream__BMRD)));
+  Self__ZJUE->stream__BMRD=NULL;
 }
 
-static void resize__AYZ(__STRING *Self__BYZ,__INTEGER new_count__CYZ)
+static void resize__1VZ(__STRING *Self__2VZ,__INTEGER new_count__3VZ)
 // ({STRING},{INTEGER}) VoidNo recursive, No inlinable.
 {
-  __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;
+  __INTEGER old_nb_elts__GIEH,upper__YFJH,Self__WFJH,lower__0FJH;
+  __INTEGER upper__3FJH,Self__1FJH;
+  __CHARACTER *Self__FIEH,*new__IIEH,*Self__2FJH;
+  if ((! (new_count__3VZ <= Self__2VZ->count__SGC))) {
+    if ((Self__2VZ->capacity__UCS < new_count__3VZ)) {
+      if ((Self__2VZ->capacity__UCS ==  0)) {
+        Self__2VZ->storage__3CS=create__YIEB(new_count__3VZ);
+      } else {
+        Self__FIEH=((__CHARACTER *)Self__2VZ->storage__3CS);
+        old_nb_elts__GIEH=Self__2VZ->capacity__UCS;
+        new__IIEH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__FIEH),((__UINTEGER_32 )old_nb_elts__GIEH),((__UINTEGER_32 )new_count__3VZ)));
+        upper__YFJH=(__INTEGER)(new_count__3VZ -  1);
+        Self__WFJH=old_nb_elts__GIEH;
+        while ((Self__WFJH <= upper__YFJH)) {
+          new__IIEH[Self__WFJH]='\0';
+          Self__WFJH=(__INTEGER)(Self__WFJH +  1);
+        };
+        Self__2VZ->storage__3CS=new__IIEH;
+      };
+      Self__2VZ->capacity__UCS=new_count__3VZ;
+    } else {
+      Self__2FJH=((__CHARACTER *)Self__2VZ->storage__3CS);
+      lower__0FJH=Self__2VZ->count__SGC;
+      upper__3FJH=(__INTEGER)(new_count__3VZ -  1);
+      Self__1FJH=lower__0FJH;
+      while ((Self__1FJH <= upper__3FJH)) {
+        Self__2FJH[Self__1FJH]='\0';
+        Self__1FJH=(__INTEGER)(Self__1FJH +  1);
+      };
+    };
+  };
+  Self__2VZ->count__SGC=new_count__3VZ;
 }
 
-static void move__to__by__0YCC(__CHARACTER *Self__1YCC,__INTEGER lower__2YCC,__INTEGER upper__3YCC,__INTEGER offset__4YCC)
+static void move__to__by__LVCC(__CHARACTER *Self__MVCC,__INTEGER lower__NVCC,__INTEGER upper__OVCC,__INTEGER offset__PVCC)
 // ({NATIVE_ARRAYoExpanded_CHARACTERo},{INTEGER},{INTEGER},{INTEGER}) VoidNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER Self__0NHD,Self__JOHD;
+  if ((offset__PVCC !=  0)) {
+    if ((offset__PVCC <  0)) {
+      Self__0NHD=lower__NVCC;
+      while ((Self__0NHD <= upper__OVCC)) {
+        Self__MVCC[(__INTEGER)(Self__0NHD + offset__PVCC)]=Self__MVCC[Self__0NHD];
+        Self__0NHD=(__INTEGER)(Self__0NHD +  1);
       };
     } else {
-      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);
+      Self__JOHD=upper__OVCC;
+      while ((Self__JOHD >= lower__NVCC)) {
+        Self__MVCC[(__INTEGER)(Self__JOHD + offset__PVCC)]=Self__MVCC[Self__JOHD];
+        Self__JOHD=(__INTEGER)(Self__JOHD -  1);
       };
     };
   };
 }
 
-static __BOOLEAN __infix_equal_equal__GAEB(__STRING_CONSTANT *Self__HAEB,void *other__IAEB)
+static __BOOLEAN __infix_equal_equal__V2DB(__STRING_CONSTANT *Self__W2DB,void *other__X2DB)
 // ({STRING_CONSTANT},{NULLxSTRING_CONSTANTxSTRING}) With resultNo recursive, No inlinable.
 {
-  __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;
+  __INTEGER __tmp__A3DB,__tmp__B3DB;
+  __BOOLEAN result__Z2DB;
+  __CHARACTER *__tmp__S3DB,*__tmp__T3DB;
+  result__Z2DB=FALSE__;
+  __tmp__A3DB=Self__W2DB->count__DD;
+  if (((struct ___OBJ *)other__X2DB)->__id==__STRING_CONSTANT__) {
+    __tmp__B3DB=((__STRING_CONSTANT *)other__X2DB)->count__DD;
   } else {
-    __tmp__SAEB=((__STRING *)other__IAEB)->count__EGC;
+    __tmp__B3DB=((__STRING *)other__X2DB)->count__SGC;
   };
-  if ((__tmp__RAEB == __tmp__SAEB)) {
-    if ((Self__HAEB->count__DD ==  0)) {
-      result__KAEB=TRUE__;
+  if ((__tmp__A3DB == __tmp__B3DB)) {
+    if ((Self__W2DB->count__DD ==  0)) {
+      result__Z2DB=TRUE__;
     } else {
-      __tmp__DBEB=Self__HAEB->storage__FRO;
-      if (((struct ___OBJ *)other__IAEB)->__id==__STRING_CONSTANT__) {
-        __tmp__EBEB=((__STRING_CONSTANT *)other__IAEB)->storage__FRO;
+      __tmp__S3DB=Self__W2DB->storage__RRO;
+      if (((struct ___OBJ *)other__X2DB)->__id==__STRING_CONSTANT__) {
+        __tmp__T3DB=((__STRING_CONSTANT *)other__X2DB)->storage__RRO;
       } else {
-        __tmp__EBEB=((__STRING *)other__IAEB)->storage__RCS;
-      };
-      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);
+        __tmp__T3DB=((__STRING *)other__X2DB)->storage__3CS;
       };
-      result__KAEB=(i__W4IH <  0);
+      result__Z2DB=fast_memcmp__until__FYYB(__tmp__S3DB,__tmp__T3DB,Self__W2DB->count__DD);
     };
   };
-  return(result__KAEB);
+  return(result__Z2DB);
 }
 
-static void* at__0N4(__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__1N4,void *k__2N4)
+static void* at__JK4(__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__KK4,void *k__LK4)
 // ({HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo},{STRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __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);
+  void *node__VK4;
+  node__VK4=((void **)Self__KK4->buckets__1DT)[(__INTEGER)(hash_code__RNW(k__LK4) % Self__KK4->capacity__WDT)];
+  while ((! __infix_equal_equal__V2DB(((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__VK4)->key__HET,k__LK4))) {
+    node__VK4=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__VK4)->next__SET;
+  };
+  return(((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__VK4)->item__KW3);
+}
+
+static __BOOLEAN has_suffix__QJS(__STRING_CONSTANT *Self__RJS)
+// ({STRING_CONSTANT}) With resultNo recursive, No inlinable.
+{
+  __INTEGER i1__VJS,i2__WJS,__tmp__KJFH,__tmp__LJFH;
+  __BOOLEAN result__UJS;
+  __CHARACTER *__tmp__MJFH,*__tmp__NJFH;
+  result__UJS=FALSE__;
+  i1__VJS= 0;
+  i2__WJS= 0;
+  if ((((__STRING_CONSTANT *)(&__string_159))->count__DD <= Self__RJS->count__DD)) {
+    i1__VJS=(__INTEGER)((__INTEGER)(Self__RJS->count__DD - ((__STRING_CONSTANT *)(&__string_159))->count__DD) +  1);
+    i2__WJS= 1;
+    __tmp__KJFH=Self__RJS->count__DD;
+    __tmp__LJFH=((__STRING_CONSTANT *)(&__string_159))->count__DD;
+    __tmp__MJFH=Self__RJS->storage__RRO;
+    __tmp__NJFH=((__STRING_CONSTANT *)(&__string_159))->storage__RRO;
+    while ((! (((i1__VJS > __tmp__KJFH) || (i2__WJS > __tmp__LJFH)) || (((__CHARACTER *)__tmp__MJFH)[(__INTEGER)(i1__VJS -  1)] != ((__CHARACTER *)__tmp__NJFH)[(__INTEGER)(i2__WJS -  1)])))) {
+      i1__VJS=(__INTEGER)(i1__VJS +  1);
+      i2__WJS=(__INTEGER)(i2__WJS +  1);
+    };
+    result__UJS=(i1__VJS > Self__RJS->count__DD);
+  };
+  return(result__UJS);
+}
+
+static void replace_all__with__CRS(__STRING *Self__DRS,__CHARACTER old_char__ERS,__CHARACTER new_char__FRS)
+// ({STRING},{CHARACTER},{CHARACTER}) VoidNo recursive, No inlinable.
+{
+  __INTEGER __tmp__LRS,Self__BSIC;
+  __CHARACTER *__tmp__IRS,*Self__BLBC;
+  __tmp__IRS=Self__DRS->storage__3CS;
+  __tmp__LRS=(__INTEGER)(Self__DRS->count__SGC -  1);
+  Self__BLBC=((__CHARACTER *)__tmp__IRS);
+  Self__BSIC=__tmp__LRS;
+  while ((Self__BSIC >=  0)) {
+    if ((old_char__ERS == Self__BLBC[Self__BSIC])) {
+      Self__BLBC[Self__BSIC]=new_char__FRS;
+    };
+    Self__BSIC=(__INTEGER)(Self__BSIC -  1);
+  };
+}
+
+static __INTEGER last_index__NTC(void *n__PTC,__CHARACTER c__QTC)
+// ({NULLxSTRING},{CHARACTER}) With resultNo recursive, No inlinable.
+{
+  __INTEGER result__STC;
+  __CHARACTER *__tmp__OJFH;
+  result__STC=((__STRING *)n__PTC)->count__SGC;
+  __tmp__OJFH=((__STRING *)n__PTC)->storage__3CS;
+  while ((! ((result__STC <  1) || (((__CHARACTER *)__tmp__OJFH)[(__INTEGER)(result__STC -  1)] == c__QTC)))) {
+    result__STC=(__INTEGER)(result__STC -  1);
+  };
+  return(result__STC);
+}
+
+static void remove_between__to__MIT(__STRING *Self__NIT,__INTEGER start__OIT,__INTEGER end__PIT)
+// ({STRING},{INTEGER},{INTEGER}) VoidNo recursive, No inlinable.
+{
+  __INTEGER len__QIT,__tmp__NJT,__tmp__OJT,Self__XUEB;
+  __CHARACTER *__tmp__E2GH,*__tmp__F2GH;
+  len__QIT=(__INTEGER)((__INTEGER)(end__PIT - start__OIT) +  1);
+  if ((len__QIT >  0)) {
+    __tmp__NJT=(__INTEGER)(end__PIT +  1);
+    __tmp__OJT=Self__NIT->count__SGC;
+    Self__XUEB=__tmp__NJT;
+    __tmp__E2GH=Self__NIT->storage__3CS;
+    __tmp__F2GH=Self__NIT->storage__3CS;
+    while ((Self__XUEB <= __tmp__OJT)) {
+      ((__CHARACTER *)__tmp__F2GH)[(__INTEGER)((__INTEGER)(Self__XUEB - len__QIT) -  1)]=((__CHARACTER *)__tmp__E2GH)[(__INTEGER)(Self__XUEB -  1)];
+      Self__XUEB=(__INTEGER)(Self__XUEB +  1);
+    };
+    Self__NIT->count__SGC=(__INTEGER)(Self__NIT->count__SGC - len__QIT);
+  };
+}
+
+static void to_upper__PTS(__STRING *Self__QTS)
+// ({STRING}) VoidNo recursive, No inlinable.
+{
+  __INTEGER Self__MPX;
+  __CHARACTER *__tmp__4ZGH,*__tmp__5ZGH;
+  __CHARACTER Self__3ZGH,result__2ZGH;
+  Self__MPX=Self__QTS->count__SGC;
+  __tmp__4ZGH=Self__QTS->storage__3CS;
+  __tmp__5ZGH=Self__QTS->storage__3CS;
+  while ((Self__MPX >=  1)) {
+    Self__3ZGH=((__CHARACTER *)__tmp__4ZGH)[(__INTEGER)(Self__MPX -  1)];
+    result__2ZGH='\0';
+    if (((((__INTEGER_8 )Self__3ZGH) <  97) || (((__INTEGER_8 )Self__3ZGH) >  122))) {
+      result__2ZGH=Self__3ZGH;
+    } else {
+      result__2ZGH=((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )Self__3ZGH) -  32))));
+    };
+    ((__CHARACTER *)__tmp__5ZGH)[(__INTEGER)(Self__MPX -  1)]=result__2ZGH;
+    Self__MPX=(__INTEGER)(Self__MPX -  1);
+  };
 }
 
 static void go_on__SBC(void *obj__UBC)
 // ({NULLxPROTOTYPE}) VoidNo recursive, No inlinable.
 {
-  __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;
+  __POINTER ptr__NHG,ptr_table__AGJH,next__5FJH,result__BGJH;
+  __POINTER ptr_table__FGJH,next__EGJH,result__GGJH,ptr__ZGJH;
+  __POINTER ptr_table__BHJH,next__AHJH,result__CHJH,ptr_table__GHJH;
+  __POINTER next__FHJH,result__HHJH,ptr__JKID,ptr_table__LHJH;
+  __POINTER next__KHJH,result__MHJH,ptr_table__QHJH,next__PHJH;
+  __POINTER result__RHJH,ptr__YHJH,ptr_table__EIJH,next__DIJH;
+  __POINTER result__FIJH,ptr_table__JIJH,next__IIJH,result__KIJH;
+  __POINTER ptr__5IJH,ptr_table__LJJH,next__KJJH,result__MJJH;
+  __POINTER ptr_table__QJJH,next__PJJH,result__RJJH,ptr__VJJH;
+  __POINTER ptr_table__BKJH,next__AKJH,result__CKJH,ptr_table__GKJH;
+  __POINTER next__FKJH,result__HKJH,ptr__LKJH,ptr_table__UKJH;
+  __POINTER next__TKJH,result__VKJH,ptr_table__ZKJH,next__YKJH;
+  __POINTER result__0KJH,ptr__4KJH,ptr_table__HLJH,next__GLJH;
+  __POINTER result__ILJH,ptr_table__MLJH,next__LLJH,result__NLJH;
+  __INTEGER typ_id__SHG,new_capacity__WFY,old_derive__LYC,pos_sec__KYC;
+  __INTEGER new_capacity__HTHH,old_nb_elts__KTHH,upper__MGJH,Self__KGJH;
+  __INTEGER new_capacity__NTHH,old_nb_elts__QTHH,upper__RGJH,Self__PGJH;
+  __INTEGER new_capacity__TTHH,old_nb_elts__WTHH,upper__WGJH,Self__UGJH;
+  __INTEGER typ_id__0GJH,h__A0FC,idx__B0FC,idx__5HID,new_capacity__AIID;
+  __INTEGER i__BIID,typ_id__OKID,old_pos__LUOB,old_derive__MUOB;
+  __INTEGER typ_id__ZHJH,new_capacity__YLHC,other_upper__XLHC;
+  __INTEGER Self__IBXD,new_capacity__DUHC,__tmp__HVHC,__tmp__LMTD;
+  __INTEGER Self__3GYE,__tmp__2DHC,typ_id__AJJH,typ_id__WJJH;
+  __INTEGER typ_id__MKJH,typ_id__5KJH,__tmp__1CEH,__tmp__2CEH;
+  __INTEGER __tmp__3CEH,__tmp__CI3B,Self__OZPC;
+  __UINTEGER_32 sz__PHG,a__RJFH,new_size__SJFH,t__WJFH,a__VJFH;
+  __UINTEGER_32 new_size__IGJH,lab_type__HGJH,sz__1GJH,a__2GJH;
+  __UINTEGER_32 new_size__3GJH,t__4GJH,a__5GJH,new_size__JHJH;
+  __UINTEGER_32 lab_type__IHJH,sz__LKID,a__IKFH,new_size__JKFH,t__NKFH;
+  __UINTEGER_32 a__MKFH,new_size__THJH,lab_type__SHJH,sz__0HJH,a__1HJH;
+  __UINTEGER_32 new_size__2HJH,t__3HJH,a__4HJH,new_size__MIJH;
+  __UINTEGER_32 lab_type__LIJH,sz__BJJH,a__CJJH,new_size__DJJH,t__EJJH;
+  __UINTEGER_32 a__FJJH,new_size__TJJH,lab_type__SJJH,sz__XJJH,a__YJJH;
+  __UINTEGER_32 new_size__ZJJH,t__0JJH,a__1JJH,new_size__JKJH;
+  __UINTEGER_32 lab_type__IKJH,sz__NKJH,a__OKJH,new_size__PKJH,t__QKJH;
+  __UINTEGER_32 a__RKJH,new_size__2KJH,lab_type__1KJH,sz__ALJH,a__BLJH;
+  __UINTEGER_32 new_size__CLJH,t__DLJH,a__ELJH,new_size__PLJH;
+  __UINTEGER_32 lab_type__OLJH;
+  __POSITION pos__KGWG,pos__MGWG,pos__OGWG,pos__ZGWG,pos__1GWG;
+  __POSITION pos__4GWG,pos__AHWG,p__AIJH,__tmp__OEHC,__tmp__1EHC;
+  __POSITION pos__PLWG,pos__RLWG,pos__TLWG,pos__VLWG,pos__C4ID;
+  __POSITION pos__3LWG,__tmp__AGBD,__tmp__IGBD,__tmp__2GBD,__tmp__FHBD;
+  __POSITION pos__HMWG,__tmp__A4OB,__tmp__C4OB,pos__CNWG,pos__ENWG;
+  __STRING *Self__ITHH,*Self__OTHH,*Self__UTHH;
+  void *n__XPOB,*__tmp__RYOB,*n__TFBD,*__tmp__XZOB,*__tmp__H0OB;
+  void *__tmp__V3OB,*__tmp__0DZB;
+  __SECTION_ *Self__1B4G,*Self__2B4G,*result__YGJH,*Self__RHWG;
+  __SECTION_ *Self__TF4G,*Self__UF4G;
+  void *__tmp__S3C,*s__NUOB,*result__U5YB,*__tmp__2XOB,*__tmp__LH3B;
+  void *s__YDZB,*__tmp__IEZB;
+  void *__tmp__U3C,*result__LQEC,*result__TTOB,*sec__UFBD;
+  void *t__HUOB;
+  void *arg__T5YB,*__tmp__1DHC,*__tmp__NEHC,*__tmp__0EHC;
+  __ITM_ARG *result__XHJH,*Self__5HJH,*result__4IJH,*Self__GJJH;
+  __ITM_SLOT_OPERATOR *Self__SDHC,*Self__C4FC,*Self__3FHC;
+  void *tm__E4FC,*__tmp__N4FC;
+  void *expr__4G3B;
+  void *__tmp__MH3B;
+  __ITM_SLOT *result__UJJH,*Self__2JJH;
+  __ITM_PROTOTYPE *result__KKJH;
+  __ITM_READ_ARG1 *result__3KJH;
+  __PROTOTYPE *Self__XDZB;
+  __HASHED_SEToSTRING_CONSTANTo *result__MHG,*Self__ZHT,*Self__3H3B;
+  void *t__TYC,*k__AQEC,*k__ZZFC,*lt__IUOB;
+  __BOOLEAN result__Y2LH,result__02LH,result__XDE,result__FDEB;
+  __BOOLEAN __tmp__SDEB,result__QC5,result__XJFH,result__PW5;
+  __BOOLEAN __tmp__KFEB,result__ESAB,__tmp__LFEB,__tmp__OFEB,__tmp__F4C;
+  __BOOLEAN __tmp__03C,result__GUOB,result__UHJH,result__NIJH;
+  __BOOLEAN __tmp__EBZB,result__QIJH,__tmp__RUHC,__tmp__AEHC;
+  __BOOLEAN result__VIJH,__tmp__YVOB,result__YIJH,result__1IJH;
+  __BOOLEAN result__QLJH,__tmp__L2OB,__tmp__M2OB;
+  __CHARACTER result__KA4G,result__PA4G,result__UA4G,result__ZA4G;
+  __CHARACTER result__4A4G,result__HB4G,result__MB4G,result__RB4G;
+  __CHARACTER result__WB4G,affect__KUOB,style__JUOB,result__VHJH;
+  __CHARACTER result__OIJH,result__RIJH,result__WIJH,result__ZIJH;
+  __CHARACTER result__2IJH,result__RLJH,result__4F4G,result__HG4G;
+  __CHARACTER result__MG4G,result__RG4G,result__IH4G;
+  __CHARACTER *Self__JTHH,*new__LTHH,*Self__PTHH,*new__RTHH,*Self__VTHH;
+  __CHARACTER *new__XTHH,*__tmp__Q0GH,*__tmp__R0GH,*__tmp__S0GH;
+  __HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *Self__5PEC;
+  __HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *Self__XZFC;
+  void *node__KQEC,*node__C0FC,*node1__DIID,*node2__EIID,*__tmp__Q1FC;
+  void **old_buckets__CIID;
+  __HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *result__IKID;
+  __HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *Self__KHTD;
+  void *result__KS1B,*result__MS4B,*larg__VFBD;
+  __FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *Self__HEZC,*Self__3EZC;
+  __FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *Self__BUHC;
+  __FAST_ARRAYoITM_ARGUMENTo *Self__VLHC,*Self__K0GH,*Self__N0GH;
+  void **__tmp__LMHC,**__tmp__NMHC,**Self__JKSD;
+  void **__tmp__GVHC,**new__XLTD;
+  void *__tmp__T3OB,*__tmp__ZDZB;
+  void **__tmp__5H3B,**Self__3GHC;
   object__ZBC=obj__UBC;
   source__5BC=((__PROTOTYPE *)obj__UBC)->source__3BC;
   position__CCC= 1;
@@ -14500,12654 +14659,14450 @@ static void go_on__SBC(void *obj__UBC)
   if (is_shorter__LZ) {
     is_active_short__OCC=TRUE__;
     short_derive__PCC= 0;
-    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__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__54IH=new_lab__FTJ(lab_type__C5IH);
-            };
-            ((__POINTER *)next__54IH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__A5IH)[ 0]=next__54IH;
-          } else {
-            ((__POINTER *)result__B5IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__54IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__B5IH=next__54IH;
-          };
-        };
-        ptr__5GG=result__B5IH;
-      };
-      result__4GG=((__HASHED_SEToSTRING_CONSTANTo *)ptr__5GG);
-      *(result__4GG) = *(HASHED_SEToSTRING_CONSTANTo__);
-    };
-    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;
-  old_derive__3XC=short_derive__PCC;
-  read_space__MTD();
+    copy__VDS(output_code__SI,source__5BC);
+    result__MHG=NULL;
+    ptr__NHG=((__POINTER )(NULL));
+    typ_id__SHG= 0;
+    sz__PHG=((__UINTEGER_32 )sizeof(__HASHED_SEToSTRING_CONSTANTo));
+    if ((sz__PHG ==  0)) {
+      result__MHG=HASHED_SEToSTRING_CONSTANTo__;
+    } else {
+      typ_id__SHG=__HASHED_SEToSTRING_CONSTANTo__;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__PHG);
+      if ((typ_id__SHG == (__INTEGER)(-  1))) {
+        a__RJFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__SJFH=(__UINTEGER_32)((__UINTEGER_32)(sz__PHG + a__RJFH) & (__UINTEGER_32)(~ a__RJFH));
+        ptr_table__AGJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__SJFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__5FJH=((__POINTER )(NULL));
+        result__BGJH=((__POINTER *)ptr_table__AGJH)[ 0];
+        if ((result__BGJH == (void *)NULL)) {
+          result__BGJH=new_lab__RTJ(new_size__SJFH);
+          next__5FJH=(void *)((unsigned long)result__BGJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SJFH)));
+          ((__POINTER *)next__5FJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__AGJH)[ 0]=next__5FJH;
+        } else {
+          next__5FJH=((__POINTER *)result__BGJH)[ 0];
+          if ((next__5FJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BGJH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__SJFH <<  1)) <=  4096)) {
+              next__5FJH=(void *)((unsigned long)result__BGJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SJFH)));
+            } else {
+              next__5FJH=new_lab__RTJ(new_size__SJFH);
+            };
+            ((__POINTER *)next__5FJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__AGJH)[ 0]=next__5FJH;
+          } else {
+            ((__POINTER *)result__BGJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5FJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__BGJH=next__5FJH;
+          };
+        };
+        ptr__NHG=result__BGJH;
+      } else {
+        t__WJFH=((__UINTEGER_32 )typ_id__SHG);
+        a__VJFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__IGJH=(__UINTEGER_32)((__UINTEGER_32)(sz__PHG + a__VJFH) & (__UINTEGER_32)(~ a__VJFH));
+        ptr_table__FGJH=((__POINTER )(&(table_type[(t__WJFH)])));
+        lab_type__HGJH=(__UINTEGER_32)(t__WJFH |  1);
+        next__EGJH=((__POINTER )(NULL));
+        result__GGJH=((__POINTER *)ptr_table__FGJH)[ 0];
+        if ((result__GGJH == (void *)NULL)) {
+          result__GGJH=new_lab__RTJ(lab_type__HGJH);
+          next__EGJH=(void *)((unsigned long)result__GGJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IGJH)));
+          ((__POINTER *)next__EGJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__FGJH)[ 0]=next__EGJH;
+        } else {
+          next__EGJH=((__POINTER *)result__GGJH)[ 0];
+          if ((next__EGJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GGJH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__IGJH <<  1)) <=  4096)) {
+              next__EGJH=(void *)((unsigned long)result__GGJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IGJH)));
+            } else {
+              next__EGJH=new_lab__RTJ(lab_type__HGJH);
+            };
+            ((__POINTER *)next__EGJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__FGJH)[ 0]=next__EGJH;
+          } else {
+            ((__POINTER *)result__GGJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EGJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__GGJH=next__EGJH;
+          };
+        };
+        ptr__NHG=result__GGJH;
+      };
+      result__MHG=((__HASHED_SEToSTRING_CONSTANTo *)ptr__NHG);
+      *(result__MHG) = *(HASHED_SEToSTRING_CONSTANTo__);
+    };
+    Self__ZHT=((__HASHED_SEToSTRING_CONSTANTo *)result__MHG);
+    new_capacity__WFY=prime_number_ceiling__021( 53);
+    Self__ZHT->buckets__DEV=create__KZ3(new_capacity__WFY);
+    Self__ZHT->capacity__HIT=new_capacity__WFY;
+    Self__ZHT->count__1FY= 0;
+    short_local__XCC=result__MHG;
+    short__token__to__GDD((&__string_117), 1, 1);
+  };
+  t__TYC=NULL;
+  old_derive__LYC=short_derive__PCC;
+  read_space__XTD();
   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__JZC=NULL;
-  result__WCLH=read_word__LRF((&__string_4));
+    remove_between__to__MIT(output_code__SI,(__INTEGER)( 1 + old_derive__LYC),(__INTEGER)((__INTEGER)(position__CCC -  1) + short_derive__PCC));
+    short_derive__PCC=(__INTEGER)(short_derive__PCC - (__INTEGER)((__INTEGER)(position__CCC + short_derive__PCC) - (__INTEGER)( 1 + old_derive__LYC)));
+  };
+  pos_sec__KYC=position__CCC;
+  old_derive__LYC=short_derive__PCC;
+  last_comment_extern__XZC=NULL;
+  result__Y2LH=read_word__ISF((&__string_4));
   if (is_shorter__LZ) {
-    if (result__WCLH) {
-      short__token__to__YCD((&__string_120),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V1C)->count__DD),position__CCC);
+    if (result__Y2LH) {
+      short__token__to__GDD((&__string_120),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__D2C)->count__DD),position__CCC);
     };
   };
-  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)) {
+  if ((! result__Y2LH)) {
+    pos__KGWG=current_position__B0F();
+    put_error__text__1PG( 0,(&__string_227));
+    put_position__FRG(pos__KGWG);
+    put_string__33F(msg_err__AQG);
+    if ((type_error__5PG !=  2)) {
       exit(( 1));
     };
   };
-  result__YCLH=read_word__LRF((&__string_22));
+  result__02LH=read_word__ISF((&__string_22));
   if (is_shorter__LZ) {
-    if (result__YCLH) {
+    if (result__02LH) {
       if (((void *)(&__string_22) == (void *)(&__string_4))) {
-        short__token__to__YCD((&__string_120),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V1C)->count__DD),position__CCC);
+        short__token__to__GDD((&__string_120),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__D2C)->count__DD),position__CCC);
       } else {
-        short__token__to__YCD((&__string_119),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V1C)->count__DD),position__CCC);
+        short__token__to__GDD((&__string_119),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__D2C)->count__DD),position__CCC);
       };
     };
   };
-  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)) {
+  if ((! result__02LH)) {
+    pos__MGWG=current_position__B0F();
+    put_error__text__1PG( 0,(&__string_228));
+    put_position__FRG(pos__MGWG);
+    put_string__33F(msg_err__AQG);
+    if ((type_error__5PG !=  2)) {
       exit(( 1));
     };
   };
-  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)) {
+  if ((! read_slot_header__KFE(TRUE__))) {
+    pos__OGWG=current_position__B0F();
+    put_error__text__1PG( 0,(&__string_229));
+    put_position__FRG(pos__OGWG);
+    put_string__33F(msg_err__AQG);
+    if ((type_error__5PG !=  2)) {
       exit(( 1));
     };
   };
-  while (read_slot_header__NEE(FALSE__)) {
+  while (read_slot_header__KFE(FALSE__)) {
   };
   if (is_shorter2__VI) {
-    ((__PROTOTYPE *)object__ZBC)->comment_header__WBRC=last_comment_extern__JZC;
+    ((__PROTOTYPE *)object__ZBC)->comment_header__Q4QC=last_comment_extern__XZC;
   };
-  while_do__IAF:
+  while_do__FBF:
   {
-    result__0CE=read_word__LRF((&__string_4));
+    result__XDE=read_word__ISF((&__string_4));
     if (is_shorter__LZ) {
-      if (result__0CE) {
-        short__token__to__YCD((&__string_120),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V1C)->count__DD),position__CCC);
+      if (result__XDE) {
+        short__token__to__GDD((&__string_120),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__D2C)->count__DD),position__CCC);
       };
     };
-    if (result__0CE) {
-      last_comment_extern__JZC=NULL;
-      result__WGEB=FALSE__;
-      if ((! read_space__MTD())) {
-        __tmp__DHEB=TRUE__;
+    if (result__XDE) {
+      last_comment_extern__XZC=NULL;
+      result__FDEB=FALSE__;
+      if ((! read_space__XTD())) {
+        __tmp__SDEB=TRUE__;
       } else {
-        result__K43G='\0';
-        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__K43G=((__CHARACTER )(( 0)));
+        result__KA4G='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+          result__KA4G=((__CHARACTER )(( 0)));
         } else {
-          result__K43G=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+          result__KA4G=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
         };
-        result__BG5=FALSE__;
-        if ((((__INTEGER_8 )result__K43G) >= ((__INTEGER_8 )'A'))) {
-          result__BG5=(((__INTEGER_8 )result__K43G) <= ((__INTEGER_8 )'Z'));
+        result__QC5=FALSE__;
+        if ((((__INTEGER_8 )result__KA4G) >= ((__INTEGER_8 )'A'))) {
+          result__QC5=(((__INTEGER_8 )result__KA4G) <= ((__INTEGER_8 )'Z'));
         };
-        __tmp__DHEB=(! result__BG5);
+        __tmp__SDEB=(! result__QC5);
       };
-      if (__tmp__DHEB) {
-        result__WGEB=FALSE__;
+      if (__tmp__SDEB) {
+        result__FDEB=FALSE__;
       } else {
-        ((__STRING *)string_tmp__VH)->count__EGC= 0;
-        result__P43G='\0';
-        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__P43G=((__CHARACTER )(( 0)));
+        ((__STRING *)string_tmp__VH)->count__SGC= 0;
+        result__PA4G='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+          result__PA4G=((__CHARACTER )(( 0)));
         } else {
-          result__P43G=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+          result__PA4G=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
+        };
+        Self__ITHH=((__STRING *)string_tmp__VH);
+        new_capacity__HTHH= 0;
+        if ((Self__ITHH->capacity__UCS <= Self__ITHH->count__SGC)) {
+          if ((Self__ITHH->capacity__UCS ==  0)) {
+            Self__ITHH->capacity__UCS= 32;
+            Self__ITHH->storage__3CS=create__YIEB( 32);
+          } else {
+            new_capacity__HTHH=(__INTEGER)(Self__ITHH->capacity__UCS <<  1);
+            Self__JTHH=((__CHARACTER *)Self__ITHH->storage__3CS);
+            old_nb_elts__KTHH=Self__ITHH->capacity__UCS;
+            new__LTHH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__JTHH),((__UINTEGER_32 )old_nb_elts__KTHH),((__UINTEGER_32 )new_capacity__HTHH)));
+            upper__MGJH=(__INTEGER)(new_capacity__HTHH -  1);
+            Self__KGJH=old_nb_elts__KTHH;
+            while ((Self__KGJH <= upper__MGJH)) {
+              new__LTHH[Self__KGJH]='\0';
+              Self__KGJH=(__INTEGER)(Self__KGJH +  1);
+            };
+            Self__ITHH->storage__3CS=new__LTHH;
+            Self__ITHH->capacity__UCS=new_capacity__HTHH;
+          };
         };
-        add_last__GOT(string_tmp__VH,result__P43G);
+        ((__CHARACTER *)Self__ITHH->storage__3CS)[Self__ITHH->count__SGC]=result__PA4G;
+        Self__ITHH->count__SGC=(__INTEGER)(Self__ITHH->count__SGC +  1);
         position__CCC=(__INTEGER)(position__CCC +  1);
-        result__U43G='\0';
-        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__U43G=((__CHARACTER )(( 0)));
+        result__UA4G='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+          result__UA4G=((__CHARACTER )(( 0)));
         } else {
-          result__U43G=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+          result__UA4G=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
         };
-        result__OZFH=FALSE__;
-        if ((((__INTEGER_8 )result__U43G) >= ((__INTEGER_8 )'a'))) {
-          result__OZFH=(((__INTEGER_8 )result__U43G) <= ((__INTEGER_8 )'z'));
+        result__XJFH=FALSE__;
+        if ((((__INTEGER_8 )result__UA4G) >= ((__INTEGER_8 )'a'))) {
+          result__XJFH=(((__INTEGER_8 )result__UA4G) <= ((__INTEGER_8 )'z'));
         };
-        if (result__OZFH) {
-          result__Z43G='\0';
-          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__Z43G=((__CHARACTER )(( 0)));
+        if (result__XJFH) {
+          result__ZA4G='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+            result__ZA4G=((__CHARACTER )(( 0)));
           } else {
-            result__Z43G=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+            result__ZA4G=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
           };
-          add_last__GOT(string_tmp__VH,result__Z43G);
+          Self__OTHH=((__STRING *)string_tmp__VH);
+          new_capacity__NTHH= 0;
+          if ((Self__OTHH->capacity__UCS <= Self__OTHH->count__SGC)) {
+            if ((Self__OTHH->capacity__UCS ==  0)) {
+              Self__OTHH->capacity__UCS= 32;
+              Self__OTHH->storage__3CS=create__YIEB( 32);
+            } else {
+              new_capacity__NTHH=(__INTEGER)(Self__OTHH->capacity__UCS <<  1);
+              Self__PTHH=((__CHARACTER *)Self__OTHH->storage__3CS);
+              old_nb_elts__QTHH=Self__OTHH->capacity__UCS;
+              new__RTHH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__PTHH),((__UINTEGER_32 )old_nb_elts__QTHH),((__UINTEGER_32 )new_capacity__NTHH)));
+              upper__RGJH=(__INTEGER)(new_capacity__NTHH -  1);
+              Self__PGJH=old_nb_elts__QTHH;
+              while ((Self__PGJH <= upper__RGJH)) {
+                new__RTHH[Self__PGJH]='\0';
+                Self__PGJH=(__INTEGER)(Self__PGJH +  1);
+              };
+              Self__OTHH->storage__3CS=new__RTHH;
+              Self__OTHH->capacity__UCS=new_capacity__NTHH;
+            };
+          };
+          ((__CHARACTER *)Self__OTHH->storage__3CS)[Self__OTHH->count__SGC]=result__ZA4G;
+          Self__OTHH->count__SGC=(__INTEGER)(Self__OTHH->count__SGC +  1);
           position__CCC=(__INTEGER)(position__CCC +  1);
-          while_do__G0GF:
+          while_do__O1GF:
           {
-            result__443G='\0';
-            if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-              result__443G=((__CHARACTER )(( 0)));
+            result__4A4G='\0';
+            if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+              result__4A4G=((__CHARACTER )(( 0)));
             } else {
-              result__443G=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+              result__4A4G=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
             };
-            if ((result__443G != ((__CHARACTER )(( 0))))) {
-              result__H53G='\0';
-              if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                result__H53G=((__CHARACTER )(( 0)));
+            if ((result__4A4G != ((__CHARACTER )(( 0))))) {
+              result__HB4G='\0';
+              if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+                result__HB4G=((__CHARACTER )(( 0)));
               } else {
-                result__H53G=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+                result__HB4G=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
               };
-              result__A05=FALSE__;
-              if ((((__INTEGER_8 )result__H53G) >= ((__INTEGER_8 )'a'))) {
-                result__A05=(((__INTEGER_8 )result__H53G) <= ((__INTEGER_8 )'z'));
+              result__PW5=FALSE__;
+              if ((((__INTEGER_8 )result__HB4G) >= ((__INTEGER_8 )'a'))) {
+                result__PW5=(((__INTEGER_8 )result__HB4G) <= ((__INTEGER_8 )'z'));
               };
-              if (result__A05) {
-                __tmp__1IEB=TRUE__;
+              if (result__PW5) {
+                __tmp__KFEB=TRUE__;
               } else {
-                result__M53G='\0';
-                if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                  result__M53G=((__CHARACTER )(( 0)));
+                result__MB4G='\0';
+                if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+                  result__MB4G=((__CHARACTER )(( 0)));
                 } else {
-                  result__M53G=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+                  result__MB4G=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
                 };
-                result__VVAB=FALSE__;
-                if ((((__INTEGER_8 )result__M53G) >= ((__INTEGER_8 )'0'))) {
-                  result__VVAB=(((__INTEGER_8 )result__M53G) <= ((__INTEGER_8 )'9'));
+                result__ESAB=FALSE__;
+                if ((((__INTEGER_8 )result__MB4G) >= ((__INTEGER_8 )'0'))) {
+                  result__ESAB=(((__INTEGER_8 )result__MB4G) <= ((__INTEGER_8 )'9'));
                 };
-                __tmp__1IEB=result__VVAB;
+                __tmp__KFEB=result__ESAB;
               };
-              if (__tmp__1IEB) {
-                __tmp__2IEB=TRUE__;
+              if (__tmp__KFEB) {
+                __tmp__LFEB=TRUE__;
               } else {
-                result__R53G='\0';
-                if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                  result__R53G=((__CHARACTER )(( 0)));
+                result__RB4G='\0';
+                if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+                  result__RB4G=((__CHARACTER )(( 0)));
                 } else {
-                  result__R53G=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+                  result__RB4G=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
                 };
-                __tmp__2IEB=(result__R53G == '_');
+                __tmp__LFEB=(result__RB4G == '_');
               };
-              __tmp__5IEB=__tmp__2IEB;
+              __tmp__OFEB=__tmp__LFEB;
             } else {
-              __tmp__5IEB=FALSE__;
+              __tmp__OFEB=FALSE__;
             };
-            if (__tmp__5IEB) {
-              result__W53G='\0';
-              if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                result__W53G=((__CHARACTER )(( 0)));
+            if (__tmp__OFEB) {
+              result__WB4G='\0';
+              if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+                result__WB4G=((__CHARACTER )(( 0)));
               } else {
-                result__W53G=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+                result__WB4G=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
+              };
+              Self__UTHH=((__STRING *)string_tmp__VH);
+              new_capacity__TTHH= 0;
+              if ((Self__UTHH->capacity__UCS <= Self__UTHH->count__SGC)) {
+                if ((Self__UTHH->capacity__UCS ==  0)) {
+                  Self__UTHH->capacity__UCS= 32;
+                  Self__UTHH->storage__3CS=create__YIEB( 32);
+                } else {
+                  new_capacity__TTHH=(__INTEGER)(Self__UTHH->capacity__UCS <<  1);
+                  Self__VTHH=((__CHARACTER *)Self__UTHH->storage__3CS);
+                  old_nb_elts__WTHH=Self__UTHH->capacity__UCS;
+                  new__XTHH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__VTHH),((__UINTEGER_32 )old_nb_elts__WTHH),((__UINTEGER_32 )new_capacity__TTHH)));
+                  upper__WGJH=(__INTEGER)(new_capacity__TTHH -  1);
+                  Self__UGJH=old_nb_elts__WTHH;
+                  while ((Self__UGJH <= upper__WGJH)) {
+                    new__XTHH[Self__UGJH]='\0';
+                    Self__UGJH=(__INTEGER)(Self__UGJH +  1);
+                  };
+                  Self__UTHH->storage__3CS=new__XTHH;
+                  Self__UTHH->capacity__UCS=new_capacity__TTHH;
+                };
               };
-              add_last__GOT(string_tmp__VH,result__W53G);
+              ((__CHARACTER *)Self__UTHH->storage__3CS)[Self__UTHH->count__SGC]=result__WB4G;
+              Self__UTHH->count__SGC=(__INTEGER)(Self__UTHH->count__SGC +  1);
               position__CCC=(__INTEGER)(position__CCC +  1);
-              goto while_do__G0GF;
+              goto while_do__O1GF;
             };
           };
-          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);
+          last_string__D2C=get__YWB(string_tmp__VH);
+          result__FDEB=TRUE__;
+          short__token__to__GDD((&__string_119),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__D2C)->count__DD),position__CCC);
         } else {
           position__CCC=(__INTEGER)(position__CCC -  1);
-          result__WGEB=FALSE__;
+          result__FDEB=FALSE__;
         };
       };
-      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)) {
+      if (result__FDEB) {
+        n__XPOB=last_string__D2C;
+        if ((! (((((((((void *)n__XPOB == (void *)(&__string_23)) || ((void *)n__XPOB == (void *)(&__string_24))) || ((void *)n__XPOB == (void *)(&__string_25))) || ((void *)n__XPOB == (void *)(&__string_26))) || ((void *)n__XPOB == (void *)(&__string_27))) || ((void *)n__XPOB == (void *)(&__string_28))) || ((void *)n__XPOB == (void *)(&__string_29))) || ((void *)n__XPOB == (void *)(&__string_30))))) {
+          pos__ZGWG=current_position__B0F();
+          put_error__text__1PG( 0,(&__string_230));
+          put_position__FRG(pos__ZGWG);
+          put_string__33F(msg_err__AQG);
+          if ((type_error__5PG !=  2)) {
             exit(( 1));
           };
         };
-        last_section__E2C=get_name__EVOB(last_string__V1C);
-        if (((void *)((__SECTION_ *)last_section__E2C)->name__11DC == (void *)(&__string_28))) {
-          __tmp__X3C=TRUE__;
+        last_section__S2C=get_name__TROB(last_string__D2C);
+        if (((void *)((__SECTION_ *)last_section__S2C)->name__MYDC == (void *)(&__string_28))) {
+          __tmp__F4C=TRUE__;
         } else {
-          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;
+          Self__1B4G=((__SECTION_ *)last_section__S2C);
+          if (((((void *)Self__1B4G->name__MYDC == (void *)(&__string_23)) || ((void *)Self__1B4G->name__MYDC == (void *)(&__string_24))) && ((void *)((__PROTOTYPE *)object__ZBC)->last_slot__J3C != (void *)NULL))) {
+            __tmp__S3C=((__PROTOTYPE *)object__ZBC)->last_slot__J3C;
+            if (((struct ___OBJ *)__tmp__S3C)->__id==__ITM_SLOT__) {
+              __tmp__U3C=((__ITM_SLOT *)__tmp__S3C)->id_section__T3C;
             } else {
-              __tmp__G3C=((__ITM_SLOT_OPERATOR *)__tmp__E3C)->parent_itm_slot__NW5B.id_section__F3C;
+              __tmp__U3C=((__ITM_SLOT_OPERATOR *)__tmp__S3C)->parent_itm_slot__0S5B.id_section__T3C;
             };
-            Self__253G=((__SECTION_ *)__tmp__G3C);
-            __tmp__M3C=(! (((void *)Self__253G->name__11DC == (void *)(&__string_23)) || ((void *)Self__253G->name__11DC == (void *)(&__string_24))));
+            Self__2B4G=((__SECTION_ *)__tmp__U3C);
+            __tmp__03C=(! (((void *)Self__2B4G->name__MYDC == (void *)(&__string_23)) || ((void *)Self__2B4G->name__MYDC == (void *)(&__string_24))));
           } else {
-            __tmp__M3C=FALSE__;
+            __tmp__03C=FALSE__;
           };
-          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)) {
+          if (__tmp__03C) {
+            pos__1GWG=current_position__B0F();
+            put_error__text__1PG( 0,(&__string_231));
+            put_position__FRG(pos__1GWG);
+            put_string__33F(msg_err__AQG);
+            if ((type_error__5PG !=  2)) {
               exit(( 1));
             };
           };
-          __tmp__X3C=__tmp__M3C;
+          __tmp__F4C=__tmp__03C;
         };
-        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)) {
+        if ((! __tmp__F4C)) {
+          if ((((((void *)((__SECTION_ *)last_section__S2C)->name__MYDC == (void *)(&__string_23)) && ((void *)((__PROTOTYPE *)object__ZBC)->type_style__S4C == (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__4GWG=current_position__B0F();
+            put_error__text__1PG( 2,(&__string_232));
+            put_position__FRG(pos__4GWG);
+            put_string__33F(msg_err__AQG);
+            if ((type_error__5PG !=  2)) {
               exit(( 1));
             };
           };
         };
       } else {
-        t__FYC=read_type_list__YMO(PARSER__,TRUE__);
-        if (((void *)t__FYC == (void *)NULL)) {
-          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)) {
+        t__TYC=read_type_list__ENO(PARSER__,TRUE__);
+        if (((void *)t__TYC == (void *)NULL)) {
+          pos__AHWG=current_position__B0F();
+          put_error__text__1PG( 0,(&__string_230));
+          put_position__FRG(pos__AHWG);
+          put_string__33F(msg_err__AQG);
+          if ((type_error__5PG !=  2)) {
             exit(( 1));
           };
         };
-        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;
+        Self__5PEC=((__HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)bucket_list__XTOB);
+        k__AQEC=t__TYC;
+        result__LQEC=NULL;
+        node__KQEC=((void **)Self__5PEC->buckets__SQEC)[(__INTEGER)(hash_code__S30(t__TYC) % Self__5PEC->capacity__NQEC)];
+        while ((! (((void *)node__KQEC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node__KQEC)->key__4QEC == (void *)k__AQEC)))) {
+          node__KQEC=((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node__KQEC)->next__JREC;
+        };
+        if (((void *)node__KQEC != (void *)NULL)) {
+          result__LQEC=((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node__KQEC)->item__RREC;
+        };
+        result__TTOB=result__LQEC;
+        if (((void *)result__LQEC == (void *)NULL)) {
+          result__YGJH=NULL;
+          ptr__ZGJH=((__POINTER )(NULL));
+          typ_id__0GJH= 0;
+          sz__1GJH=((__UINTEGER_32 )sizeof(__SECTION_));
+          if ((sz__1GJH ==  0)) {
+            result__YGJH=SECTION___;
+          } else {
+            typ_id__0GJH=__SECTION___;
+            clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__1GJH);
+            if ((typ_id__0GJH == (__INTEGER)(-  1))) {
+              a__2GJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__3GJH=(__UINTEGER_32)((__UINTEGER_32)(sz__1GJH + a__2GJH) & (__UINTEGER_32)(~ a__2GJH));
+              ptr_table__BHJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__3GJH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__AHJH=((__POINTER )(NULL));
+              result__CHJH=((__POINTER *)ptr_table__BHJH)[ 0];
+              if ((result__CHJH == (void *)NULL)) {
+                result__CHJH=new_lab__RTJ(new_size__3GJH);
+                next__AHJH=(void *)((unsigned long)result__CHJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3GJH)));
+                ((__POINTER *)next__AHJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__BHJH)[ 0]=next__AHJH;
               } else {
-                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)));
+                next__AHJH=((__POINTER *)result__CHJH)[ 0];
+                if ((next__AHJH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__CHJH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__3GJH <<  1)) <=  4096)) {
+                    next__AHJH=(void *)((unsigned long)result__CHJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3GJH)));
                   } else {
-                    next__M5IH=new_lab__FTJ(new_size__J5IH);
+                    next__AHJH=new_lab__RTJ(new_size__3GJH);
                   };
-                  ((__POINTER *)next__M5IH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__N5IH)[ 0]=next__M5IH;
+                  ((__POINTER *)next__AHJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__BHJH)[ 0]=next__AHJH;
                 } else {
-                  ((__POINTER *)result__O5IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__M5IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__O5IH=next__M5IH;
+                  ((__POINTER *)result__CHJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__AHJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__CHJH=next__AHJH;
                 };
               };
-              ptr__F5IH=result__O5IH;
-            } else {
-              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;
+              ptr__ZGJH=result__CHJH;
+            } else {
+              t__4GJH=((__UINTEGER_32 )typ_id__0GJH);
+              a__5GJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__JHJH=(__UINTEGER_32)((__UINTEGER_32)(sz__1GJH + a__5GJH) & (__UINTEGER_32)(~ a__5GJH));
+              ptr_table__GHJH=((__POINTER )(&(table_type[(t__4GJH)])));
+              lab_type__IHJH=(__UINTEGER_32)(t__4GJH |  1);
+              next__FHJH=((__POINTER )(NULL));
+              result__HHJH=((__POINTER *)ptr_table__GHJH)[ 0];
+              if ((result__HHJH == (void *)NULL)) {
+                result__HHJH=new_lab__RTJ(lab_type__IHJH);
+                next__FHJH=(void *)((unsigned long)result__HHJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JHJH)));
+                ((__POINTER *)next__FHJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__GHJH)[ 0]=next__FHJH;
               } else {
-                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)));
+                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__4XH)))) &  4095) + (__UINTEGER_32)(new_size__JHJH <<  1)) <=  4096)) {
+                    next__FHJH=(void *)((unsigned long)result__HHJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JHJH)));
                   } else {
-                    next__R5IH=new_lab__FTJ(lab_type__U5IH);
+                    next__FHJH=new_lab__RTJ(lab_type__IHJH);
                   };
-                  ((__POINTER *)next__R5IH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__S5IH)[ 0]=next__R5IH;
+                  ((__POINTER *)next__FHJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__GHJH)[ 0]=next__FHJH;
                 } else {
-                  ((__POINTER *)result__T5IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__R5IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__T5IH=next__R5IH;
+                  ((__POINTER *)result__HHJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FHJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__HHJH=next__FHJH;
                 };
               };
-              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;
+              ptr__ZGJH=result__HHJH;
+            };
+            result__YGJH=((__SECTION_ *)ptr__ZGJH);
+            *(result__YGJH) = *(SECTION___);
+          };
+          result__TTOB=result__YGJH;
+          Self__RHWG=((__SECTION_ *)result__YGJH);
+          Self__RHWG->name__MYDC=NULL;
+          Self__RHWG->type_list__1WFC=t__TYC;
+          Self__XZFC=((__HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)bucket_list__XTOB);
+          k__ZZFC=t__TYC;
+          h__A0FC=hash_code__S30(t__TYC);
+          idx__B0FC=(__INTEGER)(h__A0FC % Self__XZFC->capacity__NQEC);
+          node__C0FC=((void **)Self__XZFC->buckets__SQEC)[idx__B0FC];
+          while ((! (((void *)node__C0FC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node__C0FC)->key__4QEC == (void *)k__ZZFC)))) {
+            node__C0FC=((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node__C0FC)->next__JREC;
+          };
+          if (((void *)node__C0FC == (void *)NULL)) {
+            if ((Self__XZFC->capacity__NQEC == Self__XZFC->count__D1FC)) {
+              idx__5HID= 0;
+              node1__DIID=NULL;
+              node2__EIID=NULL;
+              old_buckets__CIID=Self__XZFC->buckets__SQEC;
+              new_capacity__AIID=prime_number_ceiling__021((__INTEGER)(Self__XZFC->capacity__NQEC +  1));
+              Self__XZFC->buckets__SQEC=create__FCYC(new_capacity__AIID);
+              i__BIID=(__INTEGER)(Self__XZFC->capacity__NQEC -  1);
+              Self__XZFC->capacity__NQEC=new_capacity__AIID;
+              while ((i__BIID >=  0)) {
+                node1__DIID=((void **)old_buckets__CIID)[i__BIID];
+                while (((void *)node1__DIID != (void *)NULL)) {
+                  node2__EIID=((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node1__DIID)->next__JREC;
+                  idx__5HID=(__INTEGER)(hash_code__S30(((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node1__DIID)->key__4QEC) % Self__XZFC->capacity__NQEC);
+                  ((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node1__DIID)->next__JREC=((void **)Self__XZFC->buckets__SQEC)[idx__5HID];
+                  ((void **)Self__XZFC->buckets__SQEC)[idx__5HID]=node1__DIID;
+                  node1__DIID=node2__EIID;
                 };
-                i__LIID=(__INTEGER)(i__LIID -  1);
-              };
-              idx__Q3FC=(__INTEGER)(h__P3FC % Self__G3FC->capacity__2TEC);
-            };
-            __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__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;
+                i__BIID=(__INTEGER)(i__BIID -  1);
+              };
+              idx__B0FC=(__INTEGER)(h__A0FC % Self__XZFC->capacity__NQEC);
+            };
+            __tmp__Q1FC=((void **)Self__XZFC->buckets__SQEC)[idx__B0FC];
+            result__IKID=NULL;
+            ptr__JKID=((__POINTER )(NULL));
+            typ_id__OKID= 0;
+            sz__LKID=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo));
+            if ((sz__LKID ==  0)) {
+              result__IKID=HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__;
+            } else {
+              typ_id__OKID=__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__;
+              clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__LKID);
+              if ((typ_id__OKID == (__INTEGER)(-  1))) {
+                a__IKFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                new_size__JKFH=(__UINTEGER_32)((__UINTEGER_32)(sz__LKID + a__IKFH) & (__UINTEGER_32)(~ a__IKFH));
+                ptr_table__LHJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__JKFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                next__KHJH=((__POINTER )(NULL));
+                result__MHJH=((__POINTER *)ptr_table__LHJH)[ 0];
+                if ((result__MHJH == (void *)NULL)) {
+                  result__MHJH=new_lab__RTJ(new_size__JKFH);
+                  next__KHJH=(void *)((unsigned long)result__MHJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JKFH)));
+                  ((__POINTER *)next__KHJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__LHJH)[ 0]=next__KHJH;
                 } else {
-                  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)));
+                  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__4XH)))) &  4095) + (__UINTEGER_32)(new_size__JKFH <<  1)) <=  4096)) {
+                      next__KHJH=(void *)((unsigned long)result__MHJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JKFH)));
                     } else {
-                      next__W5IH=new_lab__FTJ(new_size__A0FH);
+                      next__KHJH=new_lab__RTJ(new_size__JKFH);
                     };
-                    ((__POINTER *)next__W5IH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__X5IH)[ 0]=next__W5IH;
+                    ((__POINTER *)next__KHJH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__LHJH)[ 0]=next__KHJH;
                   } else {
-                    ((__POINTER *)result__Y5IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__W5IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__Y5IH=next__W5IH;
+                    ((__POINTER *)result__MHJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KHJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__MHJH=next__KHJH;
                   };
                 };
-                ptr__TKID=result__Y5IH;
+                ptr__JKID=result__MHJH;
               } else {
-                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;
+                t__NKFH=((__UINTEGER_32 )typ_id__OKID);
+                a__MKFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                new_size__THJH=(__UINTEGER_32)((__UINTEGER_32)(sz__LKID + a__MKFH) & (__UINTEGER_32)(~ a__MKFH));
+                ptr_table__QHJH=((__POINTER )(&(table_type[(t__NKFH)])));
+                lab_type__SHJH=(__UINTEGER_32)(t__NKFH |  1);
+                next__PHJH=((__POINTER )(NULL));
+                result__RHJH=((__POINTER *)ptr_table__QHJH)[ 0];
+                if ((result__RHJH == (void *)NULL)) {
+                  result__RHJH=new_lab__RTJ(lab_type__SHJH);
+                  next__PHJH=(void *)((unsigned long)result__RHJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__THJH)));
+                  ((__POINTER *)next__PHJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__QHJH)[ 0]=next__PHJH;
                 } else {
-                  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)));
+                  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__4XH)))) &  4095) + (__UINTEGER_32)(new_size__THJH <<  1)) <=  4096)) {
+                      next__PHJH=(void *)((unsigned long)result__RHJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__THJH)));
                     } else {
-                      next__15IH=new_lab__FTJ(lab_type__45IH);
+                      next__PHJH=new_lab__RTJ(lab_type__SHJH);
                     };
-                    ((__POINTER *)next__15IH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__25IH)[ 0]=next__15IH;
+                    ((__POINTER *)next__PHJH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__QHJH)[ 0]=next__PHJH;
                   } else {
-                    ((__POINTER *)result__35IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__15IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__35IH=next__15IH;
+                    ((__POINTER *)result__RHJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PHJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__RHJH=next__PHJH;
                   };
                 };
-                ptr__TKID=result__35IH;
+                ptr__JKID=result__RHJH;
               };
-              result__SKID=((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)ptr__TKID);
-              *(result__SKID) = *(HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__);
+              result__IKID=((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)ptr__JKID);
+              *(result__IKID) = *(HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__);
             };
-            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);
+            Self__KHTD=((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)result__IKID);
+            Self__KHTD->item__RREC=result__YGJH;
+            Self__KHTD->key__4QEC=t__TYC;
+            Self__KHTD->next__JREC=__tmp__Q1FC;
+            node__C0FC=result__IKID;
+            ((void **)Self__XZFC->buckets__SQEC)[idx__B0FC]=result__IKID;
+            Self__XZFC->count__D1FC=(__INTEGER)(Self__XZFC->count__D1FC +  1);
           } else {
-            ((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node__R3FC)->item__AVEC=result__E5IH;
+            ((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node__C0FC)->item__RREC=result__YGJH;
           };
         };
-        last_section__E2C=result__EXOB;
+        last_section__S2C=result__TTOB;
       };
       do {
-        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__BAJH='\0';
-              if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                result__BAJH=((__CHARACTER )(( 0)));
+        result__GUOB=FALSE__;
+        t__HUOB=NULL;
+        lt__IUOB=NULL;
+        affect__KUOB='\0';
+        old_pos__LUOB= 0;
+        old_derive__MUOB= 0;
+        s__NUOB=NULL;
+        style__JUOB=read_style__PUF();
+        if ((style__JUOB != ' ')) {
+          result__GUOB=TRUE__;
+          result__U5YB=NULL;
+          result__KS1B=NULL;
+          if ((((__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *)free_list__QS1B)->parent_arrayed_collection__PS1B.upper__0SGC <  0)) {
+            result__KS1B=create_with_capacity__LJ5B( 16);
+          } else {
+            Self__HEZC=((__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *)free_list__QS1B);
+            result__KS1B=((void **)Self__HEZC->parent_arrayed_collection__PS1B.storage__NKHC)[Self__HEZC->parent_arrayed_collection__PS1B.upper__0SGC];
+            Self__3EZC=((__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *)free_list__QS1B);
+            Self__3EZC->parent_arrayed_collection__PS1B.upper__0SGC=(__INTEGER)(Self__3EZC->parent_arrayed_collection__PS1B.upper__0SGC -  1);
+          };
+          arg__T5YB=read_loc_arg__with_self__BBHB(PARSER__,FALSE__,TRUE__);
+          if (((void *)arg__T5YB == (void *)NULL)) {
+            result__UHJH=FALSE__;
+            if ((! read_space__XTD())) {
+              result__UHJH=FALSE__;
+            } else {
+              result__VHJH='\0';
+              if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+                result__VHJH=((__CHARACTER )(( 0)));
               } else {
-                result__BAJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+                result__VHJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
               };
-              if ((result__BAJH == '\'')) {
+              if ((result__VHJH == '\'')) {
                 position__CCC=(__INTEGER)(position__CCC +  1);
-                result__AAJH=TRUE__;
+                result__UHJH=TRUE__;
               };
             };
-            if (result__AAJH) {
-              result__HDZB=read_slot_operator__EW5B(result__3V1B);
+            if (result__UHJH) {
+              result__U5YB=read_slot_operator__RS5B(result__KS1B);
             } else {
-              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__;
+              p__AIJH=current_position__B0F();
+              result__XHJH=NULL;
+              ptr__YHJH=((__POINTER )(NULL));
+              typ_id__ZHJH= 0;
+              sz__0HJH=((__UINTEGER_32 )sizeof(__ITM_ARG));
+              if ((sz__0HJH ==  0)) {
+                result__XHJH=ITM_ARG__;
               } else {
-                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;
+                typ_id__ZHJH=-1;
+                clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__0HJH);
+                if ((typ_id__ZHJH == (__INTEGER)(-  1))) {
+                  a__1HJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                  new_size__2HJH=(__UINTEGER_32)((__UINTEGER_32)(sz__0HJH + a__1HJH) & (__UINTEGER_32)(~ a__1HJH));
+                  ptr_table__EIJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__2HJH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                  next__DIJH=((__POINTER )(NULL));
+                  result__FIJH=((__POINTER *)ptr_table__EIJH)[ 0];
+                  if ((result__FIJH == (void *)NULL)) {
+                    result__FIJH=new_lab__RTJ(new_size__2HJH);
+                    next__DIJH=(void *)((unsigned long)result__FIJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2HJH)));
+                    ((__POINTER *)next__DIJH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__EIJH)[ 0]=next__DIJH;
                   } else {
-                    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)));
+                    next__DIJH=((__POINTER *)result__FIJH)[ 0];
+                    if ((next__DIJH == (void *)NULL)) {
+                      if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__FIJH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__2HJH <<  1)) <=  4096)) {
+                        next__DIJH=(void *)((unsigned long)result__FIJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2HJH)));
                       } else {
-                        next__PAJH=new_lab__FTJ(new_size__IAJH);
+                        next__DIJH=new_lab__RTJ(new_size__2HJH);
                       };
-                      ((__POINTER *)next__PAJH)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__QAJH)[ 0]=next__PAJH;
+                      ((__POINTER *)next__DIJH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__EIJH)[ 0]=next__DIJH;
                     } else {
-                      ((__POINTER *)result__RAJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PAJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                      result__RAJH=next__PAJH;
+                      ((__POINTER *)result__FIJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DIJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                      result__FIJH=next__DIJH;
                     };
                   };
-                  ptr__EAJH=result__RAJH;
+                  ptr__YHJH=result__FIJH;
                 } else {
-                  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;
+                  t__3HJH=((__UINTEGER_32 )typ_id__ZHJH);
+                  a__4HJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                  new_size__MIJH=(__UINTEGER_32)((__UINTEGER_32)(sz__0HJH + a__4HJH) & (__UINTEGER_32)(~ a__4HJH));
+                  ptr_table__JIJH=((__POINTER )(&(table_type[(t__3HJH)])));
+                  lab_type__LIJH=(__UINTEGER_32)(t__3HJH |  1);
+                  next__IIJH=((__POINTER )(NULL));
+                  result__KIJH=((__POINTER *)ptr_table__JIJH)[ 0];
+                  if ((result__KIJH == (void *)NULL)) {
+                    result__KIJH=new_lab__RTJ(lab_type__LIJH);
+                    next__IIJH=(void *)((unsigned long)result__KIJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MIJH)));
+                    ((__POINTER *)next__IIJH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__JIJH)[ 0]=next__IIJH;
                   } else {
-                    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)));
+                    next__IIJH=((__POINTER *)result__KIJH)[ 0];
+                    if ((next__IIJH == (void *)NULL)) {
+                      if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__KIJH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__MIJH <<  1)) <=  4096)) {
+                        next__IIJH=(void *)((unsigned long)result__KIJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MIJH)));
                       } else {
-                        next__UAJH=new_lab__FTJ(lab_type__XAJH);
+                        next__IIJH=new_lab__RTJ(lab_type__LIJH);
                       };
-                      ((__POINTER *)next__UAJH)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__VAJH)[ 0]=next__UAJH;
+                      ((__POINTER *)next__IIJH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__JIJH)[ 0]=next__IIJH;
                     } else {
-                      ((__POINTER *)result__WAJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UAJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                      result__WAJH=next__UAJH;
+                      ((__POINTER *)result__KIJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__IIJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                      result__KIJH=next__IIJH;
                     };
                   };
-                  ptr__EAJH=result__WAJH;
+                  ptr__YHJH=result__KIJH;
                 };
-                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__0AJH='\0';
-              if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                result__0AJH=((__CHARACTER )(( 0)));
+                result__XHJH=((__ITM_ARG *)ptr__YHJH);
+                *(result__XHJH) = *(ITM_ARG__);
+              };
+              Self__5HJH=((__ITM_ARG *)result__XHJH);
+              Self__5HJH->parent_itm_argument__SEHB.parent_itm_code__O5M.position__SFJ=p__AIJH;
+              Self__5HJH->name__F0HC=(&__string_58);
+              Self__5HJH->type__G0HC=type_self__DVN;
+              arg__T5YB=result__XHJH;
+              add_last__E5GC(result__KS1B,result__XHJH);
+              result__U5YB=read_slot_keyword__4X5B(result__KS1B);
+            };
+          } else {
+            add_last__E5GC(result__KS1B,arg__T5YB);
+            result__NIJH=FALSE__;
+            if ((! read_space__XTD())) {
+              result__NIJH=FALSE__;
+            } else {
+              result__OIJH='\0';
+              if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+                result__OIJH=((__CHARACTER )(( 0)));
               } else {
-                result__0AJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+                result__OIJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
               };
-              if ((result__0AJH == '.')) {
+              if ((result__OIJH == '.')) {
                 position__CCC=(__INTEGER)(position__CCC +  1);
-                result__ZAJH=TRUE__;
+                result__NIJH=TRUE__;
               };
             };
-            if (result__ZAJH) {
-              result__HDZB=read_slot_keyword__R15B(result__3V1B);
-              __tmp__XEZB=TRUE__;
+            if (result__NIJH) {
+              result__U5YB=read_slot_keyword__4X5B(result__KS1B);
+              __tmp__EBZB=TRUE__;
             } else {
-              __tmp__XEZB=FALSE__;
+              __tmp__EBZB=FALSE__;
             };
-            if ((! __tmp__XEZB)) {
-              result__2AJH=FALSE__;
-              if ((! read_space__MTD())) {
-                result__2AJH=FALSE__;
+            if ((! __tmp__EBZB)) {
+              result__QIJH=FALSE__;
+              if ((! read_space__XTD())) {
+                result__QIJH=FALSE__;
               } else {
-                result__3AJH='\0';
-                if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                  result__3AJH=((__CHARACTER )(( 0)));
+                result__RIJH='\0';
+                if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+                  result__RIJH=((__CHARACTER )(( 0)));
                 } else {
-                  result__3AJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+                  result__RIJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
                 };
-                if ((result__3AJH == '\'')) {
+                if ((result__RIJH == '\'')) {
                   position__CCC=(__INTEGER)(position__CCC +  1);
-                  result__2AJH=TRUE__;
+                  result__QIJH=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__AYHC=FALSE__;
-            };
-            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;
+              if (result__QIJH) {
+                result__U5YB=read_slot_operator__RS5B(result__KS1B);
+              };
+            };
+          };
+          if (((void *)result__U5YB != (void *)NULL)) {
+            result__MS4B=create_with_capacity__LJ5B((__INTEGER)(((__FAST_ARRAYoITM_ARGUMENTo *)result__KS1B)->parent_arrayed_collection__Z5YB.upper__I5GC +  1));
+            Self__VLHC=((__FAST_ARRAYoITM_ARGUMENTo *)result__MS4B);
+            new_capacity__YLHC= 0;
+            other_upper__XLHC=((__FAST_ARRAYoITM_ARGUMENTo *)result__KS1B)->parent_arrayed_collection__Z5YB.upper__I5GC;
+            if ((other_upper__XLHC >=  0)) {
+              new_capacity__YLHC=(__INTEGER)(other_upper__XLHC +  1);
+              if ((Self__VLHC->parent_arrayed_collection__Z5YB.capacity__K5GC < new_capacity__YLHC)) {
+                Self__VLHC->parent_arrayed_collection__Z5YB.storage__GAHC=create__PRBD(new_capacity__YLHC);
+                Self__VLHC->parent_arrayed_collection__Z5YB.capacity__K5GC=new_capacity__YLHC;
+              };
+              __tmp__LMHC=Self__VLHC->parent_arrayed_collection__Z5YB.storage__GAHC;
+              __tmp__NMHC=((__FAST_ARRAYoITM_ARGUMENTo *)result__KS1B)->parent_arrayed_collection__Z5YB.storage__GAHC;
+              Self__JKSD=((void **)__tmp__LMHC);
+              Self__IBXD=other_upper__XLHC;
+              while ((Self__IBXD >=  0)) {
+                Self__JKSD[Self__IBXD]=((void **)__tmp__NMHC)[Self__IBXD];
+                Self__IBXD=(__INTEGER)(Self__IBXD -  1);
+              };
+            };
+            Self__VLHC->parent_arrayed_collection__Z5YB.upper__I5GC=other_upper__XLHC;
+            ((__FAST_ARRAYoITM_ARGUMENTo *)result__KS1B)->parent_arrayed_collection__Z5YB.upper__I5GC=(__INTEGER)(-  1);
+            Self__BUHC=((__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *)free_list__QS1B);
+            new_capacity__DUHC= 0;
+            if (((__INTEGER)(Self__BUHC->parent_arrayed_collection__PS1B.upper__0SGC +  1) <= (__INTEGER)(Self__BUHC->parent_arrayed_collection__PS1B.capacity__CKHC -  1))) {
+              Self__BUHC->parent_arrayed_collection__PS1B.upper__0SGC=(__INTEGER)(Self__BUHC->parent_arrayed_collection__PS1B.upper__0SGC +  1);
+              __tmp__RUHC=TRUE__;
+            } else {
+              __tmp__RUHC=FALSE__;
+            };
+            if ((! __tmp__RUHC)) {
+              if ((Self__BUHC->parent_arrayed_collection__PS1B.capacity__CKHC ==  0)) {
+                Self__BUHC->parent_arrayed_collection__PS1B.storage__NKHC=create__3MBD( 2);
+                Self__BUHC->parent_arrayed_collection__PS1B.capacity__CKHC= 2;
+                Self__BUHC->parent_arrayed_collection__PS1B.upper__0SGC= 0;
               } else {
-                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);
+                new_capacity__DUHC=(__INTEGER)(Self__BUHC->parent_arrayed_collection__PS1B.capacity__CKHC <<  1);
+                __tmp__GVHC=Self__BUHC->parent_arrayed_collection__PS1B.storage__NKHC;
+                __tmp__HVHC=Self__BUHC->parent_arrayed_collection__PS1B.capacity__CKHC;
+                new__XLTD=((void **)realloc_dynamic__old_size__new_size__KELC(((__POINTER )((void **)__tmp__GVHC)),((__UINTEGER_32 )(__INTEGER)(__tmp__HVHC * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__DUHC * ((__INTEGER )(sizeof(void *)))))));
+                __tmp__LMTD=(__INTEGER)(new_capacity__DUHC -  1);
+                Self__3GYE=__tmp__HVHC;
+                while ((Self__3GYE <= __tmp__LMTD)) {
+                  new__XLTD[Self__3GYE]=NULL;
+                  Self__3GYE=(__INTEGER)(Self__3GYE +  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);
+                Self__BUHC->parent_arrayed_collection__PS1B.storage__NKHC=new__XLTD;
+                Self__BUHC->parent_arrayed_collection__PS1B.capacity__CKHC=new_capacity__DUHC;
+                Self__BUHC->parent_arrayed_collection__PS1B.upper__0SGC=(__INTEGER)(Self__BUHC->parent_arrayed_collection__PS1B.upper__0SGC +  1);
               };
             };
-            ((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);
+            ((void **)Self__BUHC->parent_arrayed_collection__PS1B.storage__NKHC)[Self__BUHC->parent_arrayed_collection__PS1B.upper__0SGC]=result__KS1B;
+            if (((struct ___OBJ *)result__U5YB)->__id==__ITM_SLOT__) {
+              set_argument_list__5BHC(result__U5YB,result__MS4B);
             } else {
-              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__;
+              Self__SDHC=((__ITM_SLOT_OPERATOR *)result__U5YB);
+              if (((__INTEGER)(((__FAST_ARRAYoITM_ARGUMENTo *)result__MS4B)->parent_arrayed_collection__Z5YB.upper__I5GC +  1) >  1)) {
+                __tmp__AEHC=TRUE__;
               } else {
-                __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;
+                __tmp__1DHC=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)result__MS4B)->parent_arrayed_collection__Z5YB.storage__GAHC)[ 0];
+                if (((struct ___OBJ *)__tmp__1DHC)->__id==__ITM_ARG__) {
+                  __tmp__2DHC= 1;
                 } else {
-                  __tmp__LHHC=(__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)((__ITM_ARGS *)__tmp__KHHC)->name__3BQF)->parent_arrayed_collection__ABJ.upper__VBPD +  1);
+                  __tmp__2DHC=(__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)((__ITM_ARGS *)__tmp__1DHC)->name__XDQF)->parent_arrayed_collection__MBJ.upper__2CPD +  1);
                 };
-                __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;
+                __tmp__AEHC=(__tmp__2DHC >  1);
+              };
+              if (__tmp__AEHC) {
+                if (((void *)((__SECTION_ *)Self__SDHC->parent_itm_slot__0S5B.id_section__T3C)->name__MYDC == (void *)(&__string_25))) {
+                  Self__K0GH=((__FAST_ARRAYoITM_ARGUMENTo *)result__MS4B);
+                  __tmp__NEHC=((void **)Self__K0GH->parent_arrayed_collection__Z5YB.storage__GAHC)[Self__K0GH->parent_arrayed_collection__Z5YB.upper__I5GC];
+                  if (((struct ___OBJ *)__tmp__NEHC)->__id==__ITM_ARG__) {
+                    __tmp__OEHC=((__ITM_ARG *)__tmp__NEHC)->parent_itm_argument__SEHB.parent_itm_code__O5M.position__SFJ;
                   } else {
-                    __tmp__3HHC=((__ITM_ARGS *)__tmp__2HHC)->parent_itm_argument__TDFE.parent_itm_code__C5M.position__GFJ;
+                    __tmp__OEHC=((__ITM_ARGS *)__tmp__NEHC)->parent_itm_argument__CEFE.parent_itm_code__O5M.position__SFJ;
                   };
-                  put_error__text__NPG( 1,(&__string_234));
-                  put_position__XQG(__tmp__3HHC);
-                  put_string__P3F(msg_err__SPG);
-                  if ((type_error__RPG !=  2)) {
+                  put_error__text__1PG( 1,(&__string_233));
+                  put_position__FRG(__tmp__OEHC);
+                  put_string__33F(msg_err__AQG);
+                  if ((type_error__5PG !=  2)) {
                     exit(( 1));
                   };
                 };
-                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;
+                Self__TF4G=((__SECTION_ *)Self__SDHC->parent_itm_slot__0S5B.id_section__T3C);
+                if ((((void *)Self__TF4G->name__MYDC == (void *)(&__string_23)) || ((void *)Self__TF4G->name__MYDC == (void *)(&__string_24)))) {
+                  Self__N0GH=((__FAST_ARRAYoITM_ARGUMENTo *)result__MS4B);
+                  __tmp__0EHC=((void **)Self__N0GH->parent_arrayed_collection__Z5YB.storage__GAHC)[Self__N0GH->parent_arrayed_collection__Z5YB.upper__I5GC];
+                  if (((struct ___OBJ *)__tmp__0EHC)->__id==__ITM_ARG__) {
+                    __tmp__1EHC=((__ITM_ARG *)__tmp__0EHC)->parent_itm_argument__SEHB.parent_itm_code__O5M.position__SFJ;
                   } else {
-                    __tmp__KIHC=((__ITM_ARGS *)__tmp__JIHC)->parent_itm_argument__TDFE.parent_itm_code__C5M.position__GFJ;
+                    __tmp__1EHC=((__ITM_ARGS *)__tmp__0EHC)->parent_itm_argument__CEFE.parent_itm_code__O5M.position__SFJ;
                   };
-                  put_error__text__NPG( 1,(&__string_235));
-                  put_position__XQG(__tmp__KIHC);
-                  put_string__P3F(msg_err__SPG);
-                  if ((type_error__RPG !=  2)) {
+                  put_error__text__1PG( 1,(&__string_234));
+                  put_position__FRG(__tmp__1EHC);
+                  put_string__33F(msg_err__AQG);
+                  if ((type_error__5PG !=  2)) {
                     exit(( 1));
                   };
                 };
               };
-              Self__BHHC->parent_itm_slot__NW5B.argument_list__5GHC=result__5V4B;
+              Self__SDHC->parent_itm_slot__0S5B.argument_list__QDHC=result__MS4B;
             };
           };
-          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)) {
+          last_slot__VUOB=result__U5YB;
+          if (((void *)result__U5YB == (void *)NULL)) {
+            pos__PLWG=current_position__B0F();
+            put_error__text__1PG( 0,(&__string_235));
+            put_position__FRG(pos__PLWG);
+            put_string__33F(msg_err__AQG);
+            if ((type_error__5PG !=  2)) {
               exit(( 1));
             };
           };
-          if (((struct ___OBJ *)last_slot__GYOB)->__id==__ITM_SLOT__) {
-            ((__ITM_SLOT *)last_slot__GYOB)->parent_named__15.style__OGU=style__0XOB;
+          if (((struct ___OBJ *)last_slot__VUOB)->__id==__ITM_SLOT__) {
+            ((__ITM_SLOT *)last_slot__VUOB)->parent_named__15.style__0FU=style__JUOB;
           } else {
-            ((__ITM_SLOT_OPERATOR *)last_slot__GYOB)->parent_itm_slot__NW5B.parent_named__15.style__OGU=style__0XOB;
+            ((__ITM_SLOT_OPERATOR *)last_slot__VUOB)->parent_itm_slot__0S5B.parent_named__15.style__0FU=style__JUOB;
           };
-          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];
+          if (((read_symbol__4YJ((&__string_12)) || read_symbol__4YJ((&__string_13))) || read_symbol__4YJ((&__string_14)))) {
+            affect__KUOB=((__CHARACTER *)((__STRING_CONSTANT *)last_string__D2C)->storage__RRO)[ 0];
           } else {
-            affect__1XOB=' ';
+            affect__KUOB=' ';
           };
-          if ((affect__1XOB == ' ')) {
-            result__BBJH=FALSE__;
-            if ((! read_space__MTD())) {
-              result__BBJH=FALSE__;
+          if ((affect__KUOB == ' ')) {
+            result__VIJH=FALSE__;
+            if ((! read_space__XTD())) {
+              result__VIJH=FALSE__;
             } else {
-              result__CBJH='\0';
-              if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                result__CBJH=((__CHARACTER )(( 0)));
+              result__WIJH='\0';
+              if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+                result__WIJH=((__CHARACTER )(( 0)));
               } else {
-                result__CBJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+                result__WIJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
               };
-              if ((result__CBJH == ':')) {
+              if ((result__WIJH == ':')) {
                 position__CCC=(__INTEGER)(position__CCC +  1);
-                result__BBJH=TRUE__;
+                result__VIJH=TRUE__;
               };
             };
-            __tmp__JZOB=result__BBJH;
+            __tmp__YVOB=result__VIJH;
           } else {
-            __tmp__JZOB=FALSE__;
+            __tmp__YVOB=FALSE__;
           };
-          if (__tmp__JZOB) {
-            result__EBJH=FALSE__;
-            if ((! read_space__MTD())) {
-              result__EBJH=FALSE__;
+          if (__tmp__YVOB) {
+            result__YIJH=FALSE__;
+            if ((! read_space__XTD())) {
+              result__YIJH=FALSE__;
             } else {
-              result__FBJH='\0';
-              if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                result__FBJH=((__CHARACTER )(( 0)));
+              result__ZIJH='\0';
+              if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+                result__ZIJH=((__CHARACTER )(( 0)));
               } else {
-                result__FBJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+                result__ZIJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
               };
-              if ((result__FBJH == '(')) {
+              if ((result__ZIJH == '(')) {
                 position__CCC=(__INTEGER)(position__CCC +  1);
-                result__EBJH=TRUE__;
+                result__YIJH=TRUE__;
               };
             };
-            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)) {
+            if (result__YIJH) {
+              lt__IUOB=read_type_list__ENO(PARSER__,FALSE__);
+              if (((void *)lt__IUOB == (void *)NULL)) {
+                pos__RLWG=current_position__B0F();
+                put_error__text__1PG( 0,(&__string_236));
+                put_position__FRG(pos__RLWG);
+                put_string__33F(msg_err__AQG);
+                if ((type_error__5PG !=  2)) {
                   exit(( 1));
                 };
               };
-              result__HBJH=FALSE__;
-              if ((! read_space__MTD())) {
-                result__HBJH=FALSE__;
+              result__1IJH=FALSE__;
+              if ((! read_space__XTD())) {
+                result__1IJH=FALSE__;
               } else {
-                result__IBJH='\0';
-                if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                  result__IBJH=((__CHARACTER )(( 0)));
+                result__2IJH='\0';
+                if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+                  result__2IJH=((__CHARACTER )(( 0)));
                 } else {
-                  result__IBJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+                  result__2IJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
                 };
-                if ((result__IBJH == ')')) {
+                if ((result__2IJH == ')')) {
                   position__CCC=(__INTEGER)(position__CCC +  1);
-                  result__HBJH=TRUE__;
+                  result__1IJH=TRUE__;
                 };
               };
-              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)) {
+              if ((! result__1IJH)) {
+                pos__TLWG=current_position__B0F();
+                put_error__text__1PG( 2,(&__string_237));
+                put_position__FRG(pos__TLWG);
+                put_string__33F(msg_err__AQG);
+                if ((type_error__5PG !=  2)) {
                   exit(( 1));
                 };
               };
-              t__YXOB=get__SJP(lt__ZXOB);
+              t__HUOB=get__4JP(lt__IUOB);
             } else {
-              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)) {
+              t__HUOB=read_type__CDM(PARSER__,FALSE__);
+              if (((void *)t__HUOB == (void *)NULL)) {
+                pos__VLWG=current_position__B0F();
+                put_error__text__1PG( 0,(&__string_236));
+                put_position__FRG(pos__VLWG);
+                put_string__33F(msg_err__AQG);
+                if ((type_error__5PG !=  2)) {
                   exit(( 1));
                 };
               };
             };
-            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];
+            if (((read_symbol__4YJ((&__string_12)) || read_symbol__4YJ((&__string_13))) || read_symbol__4YJ((&__string_14)))) {
+              affect__KUOB=((__CHARACTER *)((__STRING_CONSTANT *)last_string__D2C)->storage__RRO)[ 0];
             };
           } else {
-            t__YXOB=type_void__ZXF;
+            t__HUOB=type_void__WYF;
           };
-          __tmp__N1OB=last_slot__GYOB;
-          if (((struct ___OBJ *)last_slot__GYOB)->__id==__ITM_SLOT__) {
-            set_result_type__FAGC(last_slot__GYOB,t__YXOB);
+          __tmp__2XOB=last_slot__VUOB;
+          if (((struct ___OBJ *)last_slot__VUOB)->__id==__ITM_SLOT__) {
+            set_result_type__W2FC(last_slot__VUOB,t__HUOB);
           } else {
-            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;
+            Self__C4FC=((__ITM_SLOT_OPERATOR *)__tmp__2XOB);
+            tm__E4FC=NULL;
+            Self__UF4G=((__SECTION_ *)Self__C4FC->parent_itm_slot__0S5B.id_section__T3C);
+            if ((((void *)Self__UF4G->name__MYDC == (void *)(&__string_23)) || ((void *)Self__UF4G->name__MYDC == (void *)(&__string_24)))) {
+              if (t__HUOB==NULL) {
+                __tmp__N4FC=NULL;
               } else {
-                switch (((struct ___OBJ *)t__YXOB)->__id) {
+                switch (((struct ___OBJ *)t__HUOB)->__id) {
                 case __ITM_TYPE_PARAMETER__: {
-                  __tmp__2BGC=((void *)t__YXOB);
+                  __tmp__N4FC=((void *)t__HUOB);
                 } break;
                 case __ITM_TYPE_SIMPLE__: {
-                  __tmp__2BGC=((void *)t__YXOB);
+                  __tmp__N4FC=((void *)t__HUOB);
                 } break;
                 case __ITM_TYPE_MULTI__: {
-                  __tmp__2BGC=NULL;
+                  __tmp__N4FC=NULL;
                 } break;
                 case __ITM_TYPE_BLOCK__: {
-                  __tmp__2BGC=((void *)t__YXOB);
+                  __tmp__N4FC=((void *)t__HUOB);
                 } break;
                 case __ITM_TYPE_GENERIC__: {
-                  __tmp__2BGC=((void *)t__YXOB);
+                  __tmp__N4FC=((void *)t__HUOB);
                 } break;
                 case __ITM_TYPE_STYLE__: {
-                  __tmp__2BGC=((void *)t__YXOB);
+                  __tmp__N4FC=((void *)t__HUOB);
                 } break;
                 }
               };
-              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)) {
+              tm__E4FC=__tmp__N4FC;
+              if (((((void *)__tmp__N4FC == (void *)NULL) || ((void *)__tmp__N4FC == (void *)type_self__DVN)) || ((void *)__tmp__N4FC == (void *)type_void__WYF))) {
+                pos__C4ID=Self__C4FC->parent_itm_slot__0S5B.parent_named__15.parent_itm_object__4.position__SFJ;
+                put_error__text__1PG( 1,(&__string_238));
+                put_position__FRG(pos__C4ID);
+                put_string__33F(msg_err__AQG);
+                if ((type_error__5PG !=  2)) {
                   exit(( 1));
                 };
               };
             };
-            Self__RBGC->parent_itm_slot__NW5B.result_type__PBGC=t__YXOB;
+            Self__C4FC->parent_itm_slot__0S5B.result_type__A4FC=t__HUOB;
           };
-          if (((struct ___OBJ *)last_slot__GYOB)->__id==__ITM_SLOT__) {
-            ((__ITM_SLOT *)last_slot__GYOB)->affect__4CGC=affect__1XOB;
+          if (((struct ___OBJ *)last_slot__VUOB)->__id==__ITM_SLOT__) {
+            ((__ITM_SLOT *)last_slot__VUOB)->affect__P5FC=affect__KUOB;
           } else {
-            ((__ITM_SLOT_OPERATOR *)last_slot__GYOB)->parent_itm_slot__NW5B.affect__4CGC=affect__1XOB;
+            ((__ITM_SLOT_OPERATOR *)last_slot__VUOB)->parent_itm_slot__0S5B.affect__P5FC=affect__KUOB;
           };
-          if ((affect__1XOB != ' ')) {
-            read_space__MTD();
+          if ((affect__KUOB != ' ')) {
+            read_space__XTD();
             if (is_shorter2__VI) {
-              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;
+              if (((void *)last_comment_slot__LCE != (void *)NULL)) {
+                __tmp__RYOB=last_comment_slot__LCE;
+                if (((struct ___OBJ *)last_slot__VUOB)->__id==__ITM_SLOT__) {
+                  ((__ITM_SLOT *)last_slot__VUOB)->comment__WZOB=__tmp__RYOB;
                 } else {
-                  ((__ITM_SLOT_OPERATOR *)last_slot__GYOB)->parent_itm_slot__NW5B.comment__H3OB=__tmp__C2OB;
+                  ((__ITM_SLOT_OPERATOR *)last_slot__VUOB)->parent_itm_slot__0S5B.comment__WZOB=__tmp__RYOB;
                 };
               };
-              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;
+              if (((void *)last_comment_extern__XZC != (void *)NULL)) {
+                if (((struct ___OBJ *)last_slot__VUOB)->__id==__ITM_SLOT__) {
+                  ((__ITM_SLOT *)last_slot__VUOB)->comment_chapter__S0HC=last_comment_extern__XZC;
                 } else {
-                  ((__ITM_SLOT_OPERATOR *)last_slot__GYOB)->parent_itm_slot__NW5B.comment_chapter__B4HC=last_comment_extern__JZC;
+                  ((__ITM_SLOT_OPERATOR *)last_slot__VUOB)->parent_itm_slot__0S5B.comment_chapter__S0HC=last_comment_extern__XZC;
                 };
               };
-              skip_comment__2AE=TRUE__;
+              skip_comment__ZBE=TRUE__;
             };
-            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__) {
+            old_pos__LUOB=position__CCC;
+            old_derive__MUOB=short_derive__PCC;
+            if (((void *)read_contract__5VF(PARSER__) != (void *)NULL)) {
+              if (((struct ___OBJ *)last_slot__VUOB)->__id==__ITM_SLOT__) {
               };
             };
-            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)) {
+            expr__4G3B=read_expr__DBJ(PARSER__);
+            if (((void *)expr__4G3B == (void *)NULL)) {
+              pos__3LWG=current_position__B0F();
+              put_error__text__1PG( 0,(&__string_239));
+              put_position__FRG(pos__3LWG);
+              put_string__33F(msg_err__AQG);
+              if ((type_error__5PG !=  2)) {
                 exit(( 1));
               };
             };
-            __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);
+            __tmp__LH3B=last_slot__VUOB;
+            __tmp__MH3B=object__ZBC;
+            if (((struct ___OBJ *)last_slot__VUOB)->__id==__ITM_SLOT__) {
+              set_value__type__DFHC(last_slot__VUOB,expr__4G3B,object__ZBC);
             } else {
-              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) {
+              Self__3FHC=((__ITM_SLOT_OPERATOR *)__tmp__LH3B);
+              if ((Self__3FHC->parent_itm_slot__0S5B.affect__P5FC != '<')) {
+                copy__VDS(string_tmp__VH,(&__string_240));
+                append__3OS(string_tmp__VH,Self__3FHC->parent_itm_slot__0S5B.parent_named__15.name__LI);
+                n__TFBD=get__YWB(string_tmp__VH);
+                sec__UFBD=get_name__TROB((&__string_27));
+                larg__VFBD=create_with_capacity__LJ5B( 1);
+                switch (((struct ___OBJ *)expr__4G3B)->__id) {
                 case __ITM_LIST__: {
-                  __tmp__GJBD=((__ITM_LIST *)expr__RK3B)->parent_itm_code__VAF.parent_itm_object__SEE.position__GFJ;
+                  __tmp__AGBD=((__ITM_LIST *)expr__4G3B)->parent_itm_code__SBF.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_LDOTS__: {
-                  __tmp__GJBD=((__ITM_LDOTS *)expr__RK3B)->parent_itm_constant__LWF.parent_itm_object__SEE.position__GFJ;
+                  __tmp__AGBD=((__ITM_LDOTS *)expr__4G3B)->parent_itm_constant__IXF.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_PROTOTYPE__: {
-                  __tmp__GJBD=((__ITM_PROTOTYPE *)expr__RK3B)->parent_itm_constant__XXF.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
+                  __tmp__AGBD=((__ITM_PROTOTYPE *)expr__4G3B)->parent_itm_constant__UYF.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_LIST_IDF__: {
-                  __tmp__GJBD=((__ITM_LIST_IDF *)expr__RK3B)->parent_itm_code__PEJ.parent_itm_object__SEE.position__GFJ;
+                  __tmp__AGBD=((__ITM_LIST_IDF *)expr__4G3B)->parent_itm_code__1EJ.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_WRITE_VALUE__: {
-                  __tmp__GJBD=((__ITM_WRITE_VALUE *)expr__RK3B)->parent_itm_write__FFJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
+                  __tmp__AGBD=((__ITM_WRITE_VALUE *)expr__4G3B)->parent_itm_write__RFJ.parent_itm_code__QFJ.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_WRITE_CAST__: {
-                  __tmp__GJBD=((__ITM_WRITE_CAST *)expr__RK3B)->parent_itm_write__2FJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
+                  __tmp__AGBD=((__ITM_WRITE_CAST *)expr__4G3B)->parent_itm_write__IGJ.parent_itm_code__QFJ.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_READ__: {
-                  __tmp__GJBD=((__ITM_READ *)expr__RK3B)->parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
+                  __tmp__AGBD=((__ITM_READ *)expr__4G3B)->parent_itm_code__VIJ.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_WRITE_CODE__: {
-                  __tmp__GJBD=((__ITM_WRITE_CODE *)expr__RK3B)->parent_itm_write__HJJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
+                  __tmp__AGBD=((__ITM_WRITE_CODE *)expr__4G3B)->parent_itm_write__TJJ.parent_itm_code__QFJ.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_OPERATOR__: {
-                  __tmp__GJBD=((__ITM_OPERATOR *)expr__RK3B)->parent_itm_code__JGL.parent_itm_object__SEE.position__GFJ;
+                  __tmp__AGBD=((__ITM_OPERATOR *)expr__4G3B)->parent_itm_code__VGL.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_READ_ARG1__: {
-                  __tmp__GJBD=((__ITM_READ_ARG1 *)expr__RK3B)->parent_itm_read__PJL.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
+                  __tmp__AGBD=((__ITM_READ_ARG1 *)expr__4G3B)->parent_itm_read__1JL.parent_itm_code__VIJ.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_READ_ARG2__: {
-                  __tmp__GJBD=((__ITM_READ_ARG2 *)expr__RK3B)->parent_itm_read__2LL.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
+                  __tmp__AGBD=((__ITM_READ_ARG2 *)expr__4G3B)->parent_itm_read__IML.parent_itm_code__VIJ.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_EXPRESSION__: {
-                  __tmp__GJBD=position__SE5B(expr__RK3B);
+                  __tmp__AGBD=position__5A5B(expr__4G3B);
                 } break;
                 case __ITM_OLD__: {
-                  __tmp__GJBD=((__ITM_OLD *)expr__RK3B)->parent_itm_code__K3L.parent_itm_object__SEE.position__GFJ;
+                  __tmp__AGBD=((__ITM_OLD *)expr__4G3B)->parent_itm_code__W3L.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_EXTERNAL_TYPE__: {
-                  __tmp__GJBD=((__ITM_EXTERNAL_TYPE *)expr__RK3B)->parent_itm_extern__54M.parent_itm_code__44M.parent_itm_object__SEE.position__GFJ;
+                  __tmp__AGBD=((__ITM_EXTERNAL_TYPE *)expr__4G3B)->parent_itm_extern__L5M.parent_itm_code__K5M.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_BLOCK__: {
-                  __tmp__GJBD=((__ITM_LIST *)((__ITM_BLOCK *)expr__RK3B)->list__ZPDC)->parent_itm_code__VAF.parent_itm_object__SEE.position__GFJ;
+                  __tmp__AGBD=((__ITM_LIST *)((__ITM_BLOCK *)expr__4G3B)->list__KMDC)->parent_itm_code__SBF.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_EXTERNAL__: {
-                  __tmp__GJBD=((__ITM_EXTERNAL *)expr__RK3B)->parent_itm_extern__EGN.parent_itm_code__44M.parent_itm_object__SEE.position__GFJ;
+                  __tmp__AGBD=((__ITM_EXTERNAL *)expr__4G3B)->parent_itm_extern__QGN.parent_itm_code__K5M.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_READ_ARGS__: {
-                  __tmp__GJBD=((__ITM_READ_ARGS *)expr__RK3B)->parent_itm_read__0DO.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
+                  __tmp__AGBD=((__ITM_READ_ARGS *)expr__4G3B)->parent_itm_read__GEO.parent_itm_code__VIJ.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_REAL__: {
-                  __tmp__GJBD=((__ITM_REAL *)expr__RK3B)->parent_itm_constant__VRO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
+                  __tmp__AGBD=((__ITM_REAL *)expr__4G3B)->parent_itm_constant__BSO.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_NUMBER__: {
-                  __tmp__GJBD=((__ITM_NUMBER *)expr__RK3B)->parent_itm_constant__HSO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
+                  __tmp__AGBD=((__ITM_NUMBER *)expr__4G3B)->parent_itm_constant__TSO.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_CHARACTER__: {
-                  __tmp__GJBD=((__ITM_CHARACTER *)expr__RK3B)->parent_itm_constant__ZSO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
+                  __tmp__AGBD=((__ITM_CHARACTER *)expr__4G3B)->parent_itm_constant__FTO.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_STRING__: {
-                  __tmp__GJBD=((__ITM_STRING *)expr__RK3B)->parent_itm_constant__KTO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
+                  __tmp__AGBD=((__ITM_STRING *)expr__4G3B)->parent_itm_constant__WTO.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_RESULT__: {
-                  __tmp__GJBD=position__4LHC(expr__RK3B);
+                  __tmp__AGBD=position__PIHC(expr__4G3B);
                 } break;
                 };
-                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__;
+                result__4IJH=NULL;
+                ptr__5IJH=((__POINTER )(NULL));
+                typ_id__AJJH= 0;
+                sz__BJJH=((__UINTEGER_32 )sizeof(__ITM_ARG));
+                if ((sz__BJJH ==  0)) {
+                  result__4IJH=ITM_ARG__;
                 } else {
-                  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;
+                  typ_id__AJJH=-1;
+                  clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__BJJH);
+                  if ((typ_id__AJJH == (__INTEGER)(-  1))) {
+                    a__CJJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__DJJH=(__UINTEGER_32)((__UINTEGER_32)(sz__BJJH + a__CJJH) & (__UINTEGER_32)(~ a__CJJH));
+                    ptr_table__LJJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__DJJH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                    next__KJJH=((__POINTER )(NULL));
+                    result__MJJH=((__POINTER *)ptr_table__LJJH)[ 0];
+                    if ((result__MJJH == (void *)NULL)) {
+                      result__MJJH=new_lab__RTJ(new_size__DJJH);
+                      next__KJJH=(void *)((unsigned long)result__MJJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DJJH)));
+                      ((__POINTER *)next__KJJH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__LJJH)[ 0]=next__KJJH;
                     } else {
-                      next__WBJH=((__POINTER *)result__YBJH)[ 0];
-                      if ((next__WBJH == (void *)NULL)) {
-                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YBJH - (unsigned long)begin_memory__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)));
+                      next__KJJH=((__POINTER *)result__MJJH)[ 0];
+                      if ((next__KJJH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MJJH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__DJJH <<  1)) <=  4096)) {
+                          next__KJJH=(void *)((unsigned long)result__MJJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DJJH)));
                         } else {
-                          next__WBJH=new_lab__FTJ(new_size__PBJH);
+                          next__KJJH=new_lab__RTJ(new_size__DJJH);
                         };
-                        ((__POINTER *)next__WBJH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__XBJH)[ 0]=next__WBJH;
+                        ((__POINTER *)next__KJJH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__LJJH)[ 0]=next__KJJH;
                       } else {
-                        ((__POINTER *)result__YBJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WBJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__YBJH=next__WBJH;
+                        ((__POINTER *)result__MJJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KJJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__MJJH=next__KJJH;
                       };
                     };
-                    ptr__LBJH=result__YBJH;
+                    ptr__5IJH=result__MJJH;
                   } else {
-                    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;
+                    t__EJJH=((__UINTEGER_32 )typ_id__AJJH);
+                    a__FJJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__TJJH=(__UINTEGER_32)((__UINTEGER_32)(sz__BJJH + a__FJJH) & (__UINTEGER_32)(~ a__FJJH));
+                    ptr_table__QJJH=((__POINTER )(&(table_type[(t__EJJH)])));
+                    lab_type__SJJH=(__UINTEGER_32)(t__EJJH |  1);
+                    next__PJJH=((__POINTER )(NULL));
+                    result__RJJH=((__POINTER *)ptr_table__QJJH)[ 0];
+                    if ((result__RJJH == (void *)NULL)) {
+                      result__RJJH=new_lab__RTJ(lab_type__SJJH);
+                      next__PJJH=(void *)((unsigned long)result__RJJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TJJH)));
+                      ((__POINTER *)next__PJJH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__QJJH)[ 0]=next__PJJH;
                     } else {
-                      next__1BJH=((__POINTER *)result__3BJH)[ 0];
-                      if ((next__1BJH == (void *)NULL)) {
-                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__3BJH - (unsigned long)begin_memory__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)));
+                      next__PJJH=((__POINTER *)result__RJJH)[ 0];
+                      if ((next__PJJH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__RJJH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__TJJH <<  1)) <=  4096)) {
+                          next__PJJH=(void *)((unsigned long)result__RJJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TJJH)));
                         } else {
-                          next__1BJH=new_lab__FTJ(lab_type__4BJH);
+                          next__PJJH=new_lab__RTJ(lab_type__SJJH);
                         };
-                        ((__POINTER *)next__1BJH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__2BJH)[ 0]=next__1BJH;
+                        ((__POINTER *)next__PJJH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__QJJH)[ 0]=next__PJJH;
                       } else {
-                        ((__POINTER *)result__3BJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1BJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__3BJH=next__1BJH;
+                        ((__POINTER *)result__RJJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PJJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__RJJH=next__PJJH;
                       };
                     };
-                    ptr__LBJH=result__3BJH;
+                    ptr__5IJH=result__RJJH;
                   };
-                  result__KBJH=((__ITM_ARG *)ptr__LBJH);
-                  *(result__KBJH) = *(ITM_ARG__);
+                  result__4IJH=((__ITM_ARG *)ptr__5IJH);
+                  *(result__4IJH) = *(ITM_ARG__);
                 };
-                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) {
+                Self__GJJH=((__ITM_ARG *)result__4IJH);
+                Self__GJJH->parent_itm_argument__SEHB.parent_itm_code__O5M.position__SFJ=__tmp__AGBD;
+                Self__GJJH->name__F0HC=(&__string_58);
+                Self__GJJH->type__G0HC=type_self__DVN;
+                add_last__E5GC(larg__VFBD,result__4IJH);
+                switch (((struct ___OBJ *)expr__4G3B)->__id) {
                 case __ITM_LIST__: {
-                  __tmp__OJBD=((__ITM_LIST *)expr__RK3B)->parent_itm_code__VAF.parent_itm_object__SEE.position__GFJ;
+                  __tmp__IGBD=((__ITM_LIST *)expr__4G3B)->parent_itm_code__SBF.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_LDOTS__: {
-                  __tmp__OJBD=((__ITM_LDOTS *)expr__RK3B)->parent_itm_constant__LWF.parent_itm_object__SEE.position__GFJ;
+                  __tmp__IGBD=((__ITM_LDOTS *)expr__4G3B)->parent_itm_constant__IXF.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_PROTOTYPE__: {
-                  __tmp__OJBD=((__ITM_PROTOTYPE *)expr__RK3B)->parent_itm_constant__XXF.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
+                  __tmp__IGBD=((__ITM_PROTOTYPE *)expr__4G3B)->parent_itm_constant__UYF.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_LIST_IDF__: {
-                  __tmp__OJBD=((__ITM_LIST_IDF *)expr__RK3B)->parent_itm_code__PEJ.parent_itm_object__SEE.position__GFJ;
+                  __tmp__IGBD=((__ITM_LIST_IDF *)expr__4G3B)->parent_itm_code__1EJ.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_WRITE_VALUE__: {
-                  __tmp__OJBD=((__ITM_WRITE_VALUE *)expr__RK3B)->parent_itm_write__FFJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
+                  __tmp__IGBD=((__ITM_WRITE_VALUE *)expr__4G3B)->parent_itm_write__RFJ.parent_itm_code__QFJ.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_WRITE_CAST__: {
-                  __tmp__OJBD=((__ITM_WRITE_CAST *)expr__RK3B)->parent_itm_write__2FJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
+                  __tmp__IGBD=((__ITM_WRITE_CAST *)expr__4G3B)->parent_itm_write__IGJ.parent_itm_code__QFJ.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_READ__: {
-                  __tmp__OJBD=((__ITM_READ *)expr__RK3B)->parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
+                  __tmp__IGBD=((__ITM_READ *)expr__4G3B)->parent_itm_code__VIJ.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_WRITE_CODE__: {
-                  __tmp__OJBD=((__ITM_WRITE_CODE *)expr__RK3B)->parent_itm_write__HJJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
+                  __tmp__IGBD=((__ITM_WRITE_CODE *)expr__4G3B)->parent_itm_write__TJJ.parent_itm_code__QFJ.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_OPERATOR__: {
-                  __tmp__OJBD=((__ITM_OPERATOR *)expr__RK3B)->parent_itm_code__JGL.parent_itm_object__SEE.position__GFJ;
+                  __tmp__IGBD=((__ITM_OPERATOR *)expr__4G3B)->parent_itm_code__VGL.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_READ_ARG1__: {
-                  __tmp__OJBD=((__ITM_READ_ARG1 *)expr__RK3B)->parent_itm_read__PJL.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
+                  __tmp__IGBD=((__ITM_READ_ARG1 *)expr__4G3B)->parent_itm_read__1JL.parent_itm_code__VIJ.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_READ_ARG2__: {
-                  __tmp__OJBD=((__ITM_READ_ARG2 *)expr__RK3B)->parent_itm_read__2LL.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
+                  __tmp__IGBD=((__ITM_READ_ARG2 *)expr__4G3B)->parent_itm_read__IML.parent_itm_code__VIJ.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_EXPRESSION__: {
-                  __tmp__OJBD=position__SE5B(expr__RK3B);
+                  __tmp__IGBD=position__5A5B(expr__4G3B);
                 } break;
                 case __ITM_OLD__: {
-                  __tmp__OJBD=((__ITM_OLD *)expr__RK3B)->parent_itm_code__K3L.parent_itm_object__SEE.position__GFJ;
+                  __tmp__IGBD=((__ITM_OLD *)expr__4G3B)->parent_itm_code__W3L.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_EXTERNAL_TYPE__: {
-                  __tmp__OJBD=((__ITM_EXTERNAL_TYPE *)expr__RK3B)->parent_itm_extern__54M.parent_itm_code__44M.parent_itm_object__SEE.position__GFJ;
+                  __tmp__IGBD=((__ITM_EXTERNAL_TYPE *)expr__4G3B)->parent_itm_extern__L5M.parent_itm_code__K5M.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_BLOCK__: {
-                  __tmp__OJBD=((__ITM_LIST *)((__ITM_BLOCK *)expr__RK3B)->list__ZPDC)->parent_itm_code__VAF.parent_itm_object__SEE.position__GFJ;
+                  __tmp__IGBD=((__ITM_LIST *)((__ITM_BLOCK *)expr__4G3B)->list__KMDC)->parent_itm_code__SBF.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_EXTERNAL__: {
-                  __tmp__OJBD=((__ITM_EXTERNAL *)expr__RK3B)->parent_itm_extern__EGN.parent_itm_code__44M.parent_itm_object__SEE.position__GFJ;
+                  __tmp__IGBD=((__ITM_EXTERNAL *)expr__4G3B)->parent_itm_extern__QGN.parent_itm_code__K5M.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_READ_ARGS__: {
-                  __tmp__OJBD=((__ITM_READ_ARGS *)expr__RK3B)->parent_itm_read__0DO.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
+                  __tmp__IGBD=((__ITM_READ_ARGS *)expr__4G3B)->parent_itm_read__GEO.parent_itm_code__VIJ.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_REAL__: {
-                  __tmp__OJBD=((__ITM_REAL *)expr__RK3B)->parent_itm_constant__VRO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
+                  __tmp__IGBD=((__ITM_REAL *)expr__4G3B)->parent_itm_constant__BSO.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_NUMBER__: {
-                  __tmp__OJBD=((__ITM_NUMBER *)expr__RK3B)->parent_itm_constant__HSO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
+                  __tmp__IGBD=((__ITM_NUMBER *)expr__4G3B)->parent_itm_constant__TSO.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_CHARACTER__: {
-                  __tmp__OJBD=((__ITM_CHARACTER *)expr__RK3B)->parent_itm_constant__ZSO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
+                  __tmp__IGBD=((__ITM_CHARACTER *)expr__4G3B)->parent_itm_constant__FTO.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_STRING__: {
-                  __tmp__OJBD=((__ITM_STRING *)expr__RK3B)->parent_itm_constant__KTO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
+                  __tmp__IGBD=((__ITM_STRING *)expr__4G3B)->parent_itm_constant__WTO.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_RESULT__: {
-                  __tmp__OJBD=position__4LHC(expr__RK3B);
+                  __tmp__IGBD=position__PIHC(expr__4G3B);
                 } break;
                 };
-                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__;
+                result__UJJH=NULL;
+                ptr__VJJH=((__POINTER )(NULL));
+                typ_id__WJJH= 0;
+                sz__XJJH=((__UINTEGER_32 )sizeof(__ITM_SLOT));
+                if ((sz__XJJH ==  0)) {
+                  result__UJJH=ITM_SLOT__;
                 } else {
-                  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;
+                  typ_id__WJJH=-1;
+                  clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__XJJH);
+                  if ((typ_id__WJJH == (__INTEGER)(-  1))) {
+                    a__YJJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__ZJJH=(__UINTEGER_32)((__UINTEGER_32)(sz__XJJH + a__YJJH) & (__UINTEGER_32)(~ a__YJJH));
+                    ptr_table__BKJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ZJJH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                    next__AKJH=((__POINTER )(NULL));
+                    result__CKJH=((__POINTER *)ptr_table__BKJH)[ 0];
+                    if ((result__CKJH == (void *)NULL)) {
+                      result__CKJH=new_lab__RTJ(new_size__ZJJH);
+                      next__AKJH=(void *)((unsigned long)result__CKJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZJJH)));
+                      ((__POINTER *)next__AKJH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__BKJH)[ 0]=next__AKJH;
                     } else {
-                      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)));
+                      next__AKJH=((__POINTER *)result__CKJH)[ 0];
+                      if ((next__AKJH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__CKJH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__ZJJH <<  1)) <=  4096)) {
+                          next__AKJH=(void *)((unsigned long)result__CKJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZJJH)));
                         } else {
-                          next__MCJH=new_lab__FTJ(new_size__FCJH);
+                          next__AKJH=new_lab__RTJ(new_size__ZJJH);
                         };
-                        ((__POINTER *)next__MCJH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__NCJH)[ 0]=next__MCJH;
+                        ((__POINTER *)next__AKJH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__BKJH)[ 0]=next__AKJH;
                       } else {
-                        ((__POINTER *)result__OCJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MCJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__OCJH=next__MCJH;
+                        ((__POINTER *)result__CKJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__AKJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__CKJH=next__AKJH;
                       };
                     };
-                    ptr__BCJH=result__OCJH;
+                    ptr__VJJH=result__CKJH;
                   } else {
-                    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;
+                    t__0JJH=((__UINTEGER_32 )typ_id__WJJH);
+                    a__1JJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__JKJH=(__UINTEGER_32)((__UINTEGER_32)(sz__XJJH + a__1JJH) & (__UINTEGER_32)(~ a__1JJH));
+                    ptr_table__GKJH=((__POINTER )(&(table_type[(t__0JJH)])));
+                    lab_type__IKJH=(__UINTEGER_32)(t__0JJH |  1);
+                    next__FKJH=((__POINTER )(NULL));
+                    result__HKJH=((__POINTER *)ptr_table__GKJH)[ 0];
+                    if ((result__HKJH == (void *)NULL)) {
+                      result__HKJH=new_lab__RTJ(lab_type__IKJH);
+                      next__FKJH=(void *)((unsigned long)result__HKJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JKJH)));
+                      ((__POINTER *)next__FKJH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__GKJH)[ 0]=next__FKJH;
                     } else {
-                      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)));
+                      next__FKJH=((__POINTER *)result__HKJH)[ 0];
+                      if ((next__FKJH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HKJH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__JKJH <<  1)) <=  4096)) {
+                          next__FKJH=(void *)((unsigned long)result__HKJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JKJH)));
                         } else {
-                          next__RCJH=new_lab__FTJ(lab_type__UCJH);
+                          next__FKJH=new_lab__RTJ(lab_type__IKJH);
                         };
-                        ((__POINTER *)next__RCJH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__SCJH)[ 0]=next__RCJH;
+                        ((__POINTER *)next__FKJH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__GKJH)[ 0]=next__FKJH;
                       } else {
-                        ((__POINTER *)result__TCJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RCJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__TCJH=next__RCJH;
+                        ((__POINTER *)result__HKJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FKJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__HKJH=next__FKJH;
                       };
                     };
-                    ptr__BCJH=result__TCJH;
+                    ptr__VJJH=result__HKJH;
                   };
-                  result__ACJH=((__ITM_SLOT *)ptr__BCJH);
-                  *(result__ACJH) = *(ITM_SLOT__);
+                  result__UJJH=((__ITM_SLOT *)ptr__VJJH);
+                  *(result__UJJH) = *(ITM_SLOT__);
                 };
-                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) {
+                Self__2JJH=((__ITM_SLOT *)result__UJJH);
+                Self__2JJH->parent_named__15.name__LI=n__TFBD;
+                Self__2JJH->parent_named__15.parent_itm_object__4.position__SFJ=__tmp__IGBD;
+                Self__2JJH->id_section__T3C=sec__UFBD;
+                ((__ITM_SLOT *)result__UJJH)->affect__P5FC='<';
+                set_value__type__DFHC(result__UJJH,expr__4G3B,__tmp__MH3B);
+                set_argument_list__5BHC(result__UJJH,larg__VFBD);
+                set_result_type__W2FC(result__UJJH,Self__3FHC->parent_itm_slot__0S5B.result_type__A4FC);
+                fast_put__to__LNGC(((__PROTOTYPE *)__tmp__MH3B)->slot_list__YVS,result__UJJH,result__UJJH->parent_named__15.name__LI);
+                switch (((struct ___OBJ *)expr__4G3B)->__id) {
                 case __ITM_LIST__: {
-                  __tmp__CKBD=((__ITM_LIST *)expr__RK3B)->parent_itm_code__VAF.parent_itm_object__SEE.position__GFJ;
+                  __tmp__2GBD=((__ITM_LIST *)expr__4G3B)->parent_itm_code__SBF.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_LDOTS__: {
-                  __tmp__CKBD=((__ITM_LDOTS *)expr__RK3B)->parent_itm_constant__LWF.parent_itm_object__SEE.position__GFJ;
+                  __tmp__2GBD=((__ITM_LDOTS *)expr__4G3B)->parent_itm_constant__IXF.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_PROTOTYPE__: {
-                  __tmp__CKBD=((__ITM_PROTOTYPE *)expr__RK3B)->parent_itm_constant__XXF.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
+                  __tmp__2GBD=((__ITM_PROTOTYPE *)expr__4G3B)->parent_itm_constant__UYF.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_LIST_IDF__: {
-                  __tmp__CKBD=((__ITM_LIST_IDF *)expr__RK3B)->parent_itm_code__PEJ.parent_itm_object__SEE.position__GFJ;
+                  __tmp__2GBD=((__ITM_LIST_IDF *)expr__4G3B)->parent_itm_code__1EJ.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_WRITE_VALUE__: {
-                  __tmp__CKBD=((__ITM_WRITE_VALUE *)expr__RK3B)->parent_itm_write__FFJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
+                  __tmp__2GBD=((__ITM_WRITE_VALUE *)expr__4G3B)->parent_itm_write__RFJ.parent_itm_code__QFJ.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_WRITE_CAST__: {
-                  __tmp__CKBD=((__ITM_WRITE_CAST *)expr__RK3B)->parent_itm_write__2FJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
+                  __tmp__2GBD=((__ITM_WRITE_CAST *)expr__4G3B)->parent_itm_write__IGJ.parent_itm_code__QFJ.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_READ__: {
-                  __tmp__CKBD=((__ITM_READ *)expr__RK3B)->parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
+                  __tmp__2GBD=((__ITM_READ *)expr__4G3B)->parent_itm_code__VIJ.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_WRITE_CODE__: {
-                  __tmp__CKBD=((__ITM_WRITE_CODE *)expr__RK3B)->parent_itm_write__HJJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
+                  __tmp__2GBD=((__ITM_WRITE_CODE *)expr__4G3B)->parent_itm_write__TJJ.parent_itm_code__QFJ.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_OPERATOR__: {
-                  __tmp__CKBD=((__ITM_OPERATOR *)expr__RK3B)->parent_itm_code__JGL.parent_itm_object__SEE.position__GFJ;
+                  __tmp__2GBD=((__ITM_OPERATOR *)expr__4G3B)->parent_itm_code__VGL.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_READ_ARG1__: {
-                  __tmp__CKBD=((__ITM_READ_ARG1 *)expr__RK3B)->parent_itm_read__PJL.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
+                  __tmp__2GBD=((__ITM_READ_ARG1 *)expr__4G3B)->parent_itm_read__1JL.parent_itm_code__VIJ.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_READ_ARG2__: {
-                  __tmp__CKBD=((__ITM_READ_ARG2 *)expr__RK3B)->parent_itm_read__2LL.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
+                  __tmp__2GBD=((__ITM_READ_ARG2 *)expr__4G3B)->parent_itm_read__IML.parent_itm_code__VIJ.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_EXPRESSION__: {
-                  __tmp__CKBD=position__SE5B(expr__RK3B);
+                  __tmp__2GBD=position__5A5B(expr__4G3B);
                 } break;
                 case __ITM_OLD__: {
-                  __tmp__CKBD=((__ITM_OLD *)expr__RK3B)->parent_itm_code__K3L.parent_itm_object__SEE.position__GFJ;
+                  __tmp__2GBD=((__ITM_OLD *)expr__4G3B)->parent_itm_code__W3L.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_EXTERNAL_TYPE__: {
-                  __tmp__CKBD=((__ITM_EXTERNAL_TYPE *)expr__RK3B)->parent_itm_extern__54M.parent_itm_code__44M.parent_itm_object__SEE.position__GFJ;
+                  __tmp__2GBD=((__ITM_EXTERNAL_TYPE *)expr__4G3B)->parent_itm_extern__L5M.parent_itm_code__K5M.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_BLOCK__: {
-                  __tmp__CKBD=((__ITM_LIST *)((__ITM_BLOCK *)expr__RK3B)->list__ZPDC)->parent_itm_code__VAF.parent_itm_object__SEE.position__GFJ;
+                  __tmp__2GBD=((__ITM_LIST *)((__ITM_BLOCK *)expr__4G3B)->list__KMDC)->parent_itm_code__SBF.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_EXTERNAL__: {
-                  __tmp__CKBD=((__ITM_EXTERNAL *)expr__RK3B)->parent_itm_extern__EGN.parent_itm_code__44M.parent_itm_object__SEE.position__GFJ;
+                  __tmp__2GBD=((__ITM_EXTERNAL *)expr__4G3B)->parent_itm_extern__QGN.parent_itm_code__K5M.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_READ_ARGS__: {
-                  __tmp__CKBD=((__ITM_READ_ARGS *)expr__RK3B)->parent_itm_read__0DO.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
+                  __tmp__2GBD=((__ITM_READ_ARGS *)expr__4G3B)->parent_itm_read__GEO.parent_itm_code__VIJ.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_REAL__: {
-                  __tmp__CKBD=((__ITM_REAL *)expr__RK3B)->parent_itm_constant__VRO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
+                  __tmp__2GBD=((__ITM_REAL *)expr__4G3B)->parent_itm_constant__BSO.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_NUMBER__: {
-                  __tmp__CKBD=((__ITM_NUMBER *)expr__RK3B)->parent_itm_constant__HSO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
+                  __tmp__2GBD=((__ITM_NUMBER *)expr__4G3B)->parent_itm_constant__TSO.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_CHARACTER__: {
-                  __tmp__CKBD=((__ITM_CHARACTER *)expr__RK3B)->parent_itm_constant__ZSO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
+                  __tmp__2GBD=((__ITM_CHARACTER *)expr__4G3B)->parent_itm_constant__FTO.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_STRING__: {
-                  __tmp__CKBD=((__ITM_STRING *)expr__RK3B)->parent_itm_constant__KTO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
+                  __tmp__2GBD=((__ITM_STRING *)expr__4G3B)->parent_itm_constant__WTO.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_RESULT__: {
-                  __tmp__CKBD=position__4LHC(expr__RK3B);
+                  __tmp__2GBD=position__PIHC(expr__4G3B);
                 } break;
                 };
-                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__;
+                get__IVI(((__PROTOTYPE *)__tmp__MH3B)->parent_named__5.name__LI);
+                result__KKJH=NULL;
+                ptr__LKJH=((__POINTER )(NULL));
+                typ_id__MKJH= 0;
+                sz__NKJH=((__UINTEGER_32 )sizeof(__ITM_PROTOTYPE));
+                if ((sz__NKJH ==  0)) {
+                  result__KKJH=ITM_PROTOTYPE__;
                 } else {
-                  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;
+                  typ_id__MKJH=-1;
+                  clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__NKJH);
+                  if ((typ_id__MKJH == (__INTEGER)(-  1))) {
+                    a__OKJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__PKJH=(__UINTEGER_32)((__UINTEGER_32)(sz__NKJH + a__OKJH) & (__UINTEGER_32)(~ a__OKJH));
+                    ptr_table__UKJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__PKJH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                    next__TKJH=((__POINTER )(NULL));
+                    result__VKJH=((__POINTER *)ptr_table__UKJH)[ 0];
+                    if ((result__VKJH == (void *)NULL)) {
+                      result__VKJH=new_lab__RTJ(new_size__PKJH);
+                      next__TKJH=(void *)((unsigned long)result__VKJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PKJH)));
+                      ((__POINTER *)next__TKJH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__UKJH)[ 0]=next__TKJH;
                     } else {
-                      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)));
+                      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__4XH)))) &  4095) + (__UINTEGER_32)(new_size__PKJH <<  1)) <=  4096)) {
+                          next__TKJH=(void *)((unsigned long)result__VKJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PKJH)));
                         } else {
-                          next__5CJH=new_lab__FTJ(new_size__1CJH);
+                          next__TKJH=new_lab__RTJ(new_size__PKJH);
                         };
-                        ((__POINTER *)next__5CJH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__ADJH)[ 0]=next__5CJH;
+                        ((__POINTER *)next__TKJH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__UKJH)[ 0]=next__TKJH;
                       } else {
-                        ((__POINTER *)result__BDJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5CJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__BDJH=next__5CJH;
+                        ((__POINTER *)result__VKJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TKJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__VKJH=next__TKJH;
                       };
                     };
-                    ptr__XCJH=result__BDJH;
+                    ptr__LKJH=result__VKJH;
                   } else {
-                    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;
+                    t__QKJH=((__UINTEGER_32 )typ_id__MKJH);
+                    a__RKJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__2KJH=(__UINTEGER_32)((__UINTEGER_32)(sz__NKJH + a__RKJH) & (__UINTEGER_32)(~ a__RKJH));
+                    ptr_table__ZKJH=((__POINTER )(&(table_type[(t__QKJH)])));
+                    lab_type__1KJH=(__UINTEGER_32)(t__QKJH |  1);
+                    next__YKJH=((__POINTER )(NULL));
+                    result__0KJH=((__POINTER *)ptr_table__ZKJH)[ 0];
+                    if ((result__0KJH == (void *)NULL)) {
+                      result__0KJH=new_lab__RTJ(lab_type__1KJH);
+                      next__YKJH=(void *)((unsigned long)result__0KJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2KJH)));
+                      ((__POINTER *)next__YKJH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__ZKJH)[ 0]=next__YKJH;
                     } else {
-                      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)));
+                      next__YKJH=((__POINTER *)result__0KJH)[ 0];
+                      if ((next__YKJH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__0KJH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__2KJH <<  1)) <=  4096)) {
+                          next__YKJH=(void *)((unsigned long)result__0KJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2KJH)));
                         } else {
-                          next__EDJH=new_lab__FTJ(lab_type__HDJH);
+                          next__YKJH=new_lab__RTJ(lab_type__1KJH);
                         };
-                        ((__POINTER *)next__EDJH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__FDJH)[ 0]=next__EDJH;
+                        ((__POINTER *)next__YKJH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__ZKJH)[ 0]=next__YKJH;
                       } else {
-                        ((__POINTER *)result__GDJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EDJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__GDJH=next__EDJH;
+                        ((__POINTER *)result__0KJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YKJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__0KJH=next__YKJH;
                       };
                     };
-                    ptr__XCJH=result__GDJH;
+                    ptr__LKJH=result__0KJH;
                   };
-                  result__WCJH=((__ITM_PROTOTYPE *)ptr__XCJH);
-                  *(result__WCJH) = *(ITM_PROTOTYPE__);
+                  result__KKJH=((__ITM_PROTOTYPE *)ptr__LKJH);
+                  *(result__KKJH) = *(ITM_PROTOTYPE__);
                 };
-                ((__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) {
+                ((__ITM_PROTOTYPE *)result__KKJH)->parent_itm_constant__UYF.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ=__tmp__2GBD;
+                switch (((struct ___OBJ *)expr__4G3B)->__id) {
                 case __ITM_LIST__: {
-                  __tmp__LKBD=((__ITM_LIST *)expr__RK3B)->parent_itm_code__VAF.parent_itm_object__SEE.position__GFJ;
+                  __tmp__FHBD=((__ITM_LIST *)expr__4G3B)->parent_itm_code__SBF.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_LDOTS__: {
-                  __tmp__LKBD=((__ITM_LDOTS *)expr__RK3B)->parent_itm_constant__LWF.parent_itm_object__SEE.position__GFJ;
+                  __tmp__FHBD=((__ITM_LDOTS *)expr__4G3B)->parent_itm_constant__IXF.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_PROTOTYPE__: {
-                  __tmp__LKBD=((__ITM_PROTOTYPE *)expr__RK3B)->parent_itm_constant__XXF.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
+                  __tmp__FHBD=((__ITM_PROTOTYPE *)expr__4G3B)->parent_itm_constant__UYF.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_LIST_IDF__: {
-                  __tmp__LKBD=((__ITM_LIST_IDF *)expr__RK3B)->parent_itm_code__PEJ.parent_itm_object__SEE.position__GFJ;
+                  __tmp__FHBD=((__ITM_LIST_IDF *)expr__4G3B)->parent_itm_code__1EJ.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_WRITE_VALUE__: {
-                  __tmp__LKBD=((__ITM_WRITE_VALUE *)expr__RK3B)->parent_itm_write__FFJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
+                  __tmp__FHBD=((__ITM_WRITE_VALUE *)expr__4G3B)->parent_itm_write__RFJ.parent_itm_code__QFJ.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_WRITE_CAST__: {
-                  __tmp__LKBD=((__ITM_WRITE_CAST *)expr__RK3B)->parent_itm_write__2FJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
+                  __tmp__FHBD=((__ITM_WRITE_CAST *)expr__4G3B)->parent_itm_write__IGJ.parent_itm_code__QFJ.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_READ__: {
-                  __tmp__LKBD=((__ITM_READ *)expr__RK3B)->parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
+                  __tmp__FHBD=((__ITM_READ *)expr__4G3B)->parent_itm_code__VIJ.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_WRITE_CODE__: {
-                  __tmp__LKBD=((__ITM_WRITE_CODE *)expr__RK3B)->parent_itm_write__HJJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
+                  __tmp__FHBD=((__ITM_WRITE_CODE *)expr__4G3B)->parent_itm_write__TJJ.parent_itm_code__QFJ.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_OPERATOR__: {
-                  __tmp__LKBD=((__ITM_OPERATOR *)expr__RK3B)->parent_itm_code__JGL.parent_itm_object__SEE.position__GFJ;
+                  __tmp__FHBD=((__ITM_OPERATOR *)expr__4G3B)->parent_itm_code__VGL.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_READ_ARG1__: {
-                  __tmp__LKBD=((__ITM_READ_ARG1 *)expr__RK3B)->parent_itm_read__PJL.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
+                  __tmp__FHBD=((__ITM_READ_ARG1 *)expr__4G3B)->parent_itm_read__1JL.parent_itm_code__VIJ.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_READ_ARG2__: {
-                  __tmp__LKBD=((__ITM_READ_ARG2 *)expr__RK3B)->parent_itm_read__2LL.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
+                  __tmp__FHBD=((__ITM_READ_ARG2 *)expr__4G3B)->parent_itm_read__IML.parent_itm_code__VIJ.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_EXPRESSION__: {
-                  __tmp__LKBD=position__SE5B(expr__RK3B);
+                  __tmp__FHBD=position__5A5B(expr__4G3B);
                 } break;
                 case __ITM_OLD__: {
-                  __tmp__LKBD=((__ITM_OLD *)expr__RK3B)->parent_itm_code__K3L.parent_itm_object__SEE.position__GFJ;
+                  __tmp__FHBD=((__ITM_OLD *)expr__4G3B)->parent_itm_code__W3L.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_EXTERNAL_TYPE__: {
-                  __tmp__LKBD=((__ITM_EXTERNAL_TYPE *)expr__RK3B)->parent_itm_extern__54M.parent_itm_code__44M.parent_itm_object__SEE.position__GFJ;
+                  __tmp__FHBD=((__ITM_EXTERNAL_TYPE *)expr__4G3B)->parent_itm_extern__L5M.parent_itm_code__K5M.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_BLOCK__: {
-                  __tmp__LKBD=((__ITM_LIST *)((__ITM_BLOCK *)expr__RK3B)->list__ZPDC)->parent_itm_code__VAF.parent_itm_object__SEE.position__GFJ;
+                  __tmp__FHBD=((__ITM_LIST *)((__ITM_BLOCK *)expr__4G3B)->list__KMDC)->parent_itm_code__SBF.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_EXTERNAL__: {
-                  __tmp__LKBD=((__ITM_EXTERNAL *)expr__RK3B)->parent_itm_extern__EGN.parent_itm_code__44M.parent_itm_object__SEE.position__GFJ;
+                  __tmp__FHBD=((__ITM_EXTERNAL *)expr__4G3B)->parent_itm_extern__QGN.parent_itm_code__K5M.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_READ_ARGS__: {
-                  __tmp__LKBD=((__ITM_READ_ARGS *)expr__RK3B)->parent_itm_read__0DO.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
+                  __tmp__FHBD=((__ITM_READ_ARGS *)expr__4G3B)->parent_itm_read__GEO.parent_itm_code__VIJ.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_REAL__: {
-                  __tmp__LKBD=((__ITM_REAL *)expr__RK3B)->parent_itm_constant__VRO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
+                  __tmp__FHBD=((__ITM_REAL *)expr__4G3B)->parent_itm_constant__BSO.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_NUMBER__: {
-                  __tmp__LKBD=((__ITM_NUMBER *)expr__RK3B)->parent_itm_constant__HSO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
+                  __tmp__FHBD=((__ITM_NUMBER *)expr__4G3B)->parent_itm_constant__TSO.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_CHARACTER__: {
-                  __tmp__LKBD=((__ITM_CHARACTER *)expr__RK3B)->parent_itm_constant__ZSO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
+                  __tmp__FHBD=((__ITM_CHARACTER *)expr__4G3B)->parent_itm_constant__FTO.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_STRING__: {
-                  __tmp__LKBD=((__ITM_STRING *)expr__RK3B)->parent_itm_constant__KTO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
+                  __tmp__FHBD=((__ITM_STRING *)expr__4G3B)->parent_itm_constant__WTO.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ;
                 } break;
                 case __ITM_RESULT__: {
-                  __tmp__LKBD=position__4LHC(expr__RK3B);
+                  __tmp__FHBD=position__PIHC(expr__4G3B);
                 } break;
                 };
-                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__;
+                result__3KJH=NULL;
+                ptr__4KJH=((__POINTER )(NULL));
+                typ_id__5KJH= 0;
+                sz__ALJH=((__UINTEGER_32 )sizeof(__ITM_READ_ARG1));
+                if ((sz__ALJH ==  0)) {
+                  result__3KJH=ITM_READ_ARG1__;
                 } else {
-                  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;
+                  typ_id__5KJH=-1;
+                  clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__ALJH);
+                  if ((typ_id__5KJH == (__INTEGER)(-  1))) {
+                    a__BLJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__CLJH=(__UINTEGER_32)((__UINTEGER_32)(sz__ALJH + a__BLJH) & (__UINTEGER_32)(~ a__BLJH));
+                    ptr_table__HLJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__CLJH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                    next__GLJH=((__POINTER )(NULL));
+                    result__ILJH=((__POINTER *)ptr_table__HLJH)[ 0];
+                    if ((result__ILJH == (void *)NULL)) {
+                      result__ILJH=new_lab__RTJ(new_size__CLJH);
+                      next__GLJH=(void *)((unsigned long)result__ILJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CLJH)));
+                      ((__POINTER *)next__GLJH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__HLJH)[ 0]=next__GLJH;
                     } else {
-                      next__SDJH=((__POINTER *)result__UDJH)[ 0];
-                      if ((next__SDJH == (void *)NULL)) {
-                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__UDJH - (unsigned long)begin_memory__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)));
+                      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__4XH)))) &  4095) + (__UINTEGER_32)(new_size__CLJH <<  1)) <=  4096)) {
+                          next__GLJH=(void *)((unsigned long)result__ILJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CLJH)));
                         } else {
-                          next__SDJH=new_lab__FTJ(new_size__ODJH);
+                          next__GLJH=new_lab__RTJ(new_size__CLJH);
                         };
-                        ((__POINTER *)next__SDJH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__TDJH)[ 0]=next__SDJH;
+                        ((__POINTER *)next__GLJH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__HLJH)[ 0]=next__GLJH;
                       } else {
-                        ((__POINTER *)result__UDJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__SDJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__UDJH=next__SDJH;
+                        ((__POINTER *)result__ILJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GLJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__ILJH=next__GLJH;
                       };
                     };
-                    ptr__KDJH=result__UDJH;
+                    ptr__4KJH=result__ILJH;
                   } else {
-                    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;
+                    t__DLJH=((__UINTEGER_32 )typ_id__5KJH);
+                    a__ELJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__PLJH=(__UINTEGER_32)((__UINTEGER_32)(sz__ALJH + a__ELJH) & (__UINTEGER_32)(~ a__ELJH));
+                    ptr_table__MLJH=((__POINTER )(&(table_type[(t__DLJH)])));
+                    lab_type__OLJH=(__UINTEGER_32)(t__DLJH |  1);
+                    next__LLJH=((__POINTER )(NULL));
+                    result__NLJH=((__POINTER *)ptr_table__MLJH)[ 0];
+                    if ((result__NLJH == (void *)NULL)) {
+                      result__NLJH=new_lab__RTJ(lab_type__OLJH);
+                      next__LLJH=(void *)((unsigned long)result__NLJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PLJH)));
+                      ((__POINTER *)next__LLJH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__MLJH)[ 0]=next__LLJH;
                     } else {
-                      next__XDJH=((__POINTER *)result__ZDJH)[ 0];
-                      if ((next__XDJH == (void *)NULL)) {
-                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ZDJH - (unsigned long)begin_memory__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)));
+                      next__LLJH=((__POINTER *)result__NLJH)[ 0];
+                      if ((next__LLJH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__NLJH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__PLJH <<  1)) <=  4096)) {
+                          next__LLJH=(void *)((unsigned long)result__NLJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PLJH)));
                         } else {
-                          next__XDJH=new_lab__FTJ(lab_type__0DJH);
+                          next__LLJH=new_lab__RTJ(lab_type__OLJH);
                         };
-                        ((__POINTER *)next__XDJH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__YDJH)[ 0]=next__XDJH;
+                        ((__POINTER *)next__LLJH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__MLJH)[ 0]=next__LLJH;
                       } else {
-                        ((__POINTER *)result__ZDJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XDJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__ZDJH=next__XDJH;
+                        ((__POINTER *)result__NLJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LLJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__NLJH=next__LLJH;
                       };
                     };
-                    ptr__KDJH=result__ZDJH;
+                    ptr__4KJH=result__NLJH;
                   };
-                  result__JDJH=((__ITM_READ_ARG1 *)ptr__KDJH);
-                  *(result__JDJH) = *(ITM_READ_ARG1__);
+                  result__3KJH=((__ITM_READ_ARG1 *)ptr__4KJH);
+                  *(result__3KJH) = *(ITM_READ_ARG1__);
                 };
-                ((__ITM_READ_ARG1 *)result__JDJH)->parent_itm_read__PJL.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ=__tmp__LKBD;
+                ((__ITM_READ_ARG1 *)result__3KJH)->parent_itm_read__1JL.parent_itm_code__VIJ.parent_itm_object__PFE.position__SFJ=__tmp__FHBD;
               };
             };
-            if (((void *)read_contract__CVF(PARSER__) != (void *)NULL)) {
-              if (((struct ___OBJ *)last_slot__GYOB)->__id==__ITM_SLOT__) {
+            if (((void *)read_contract__5VF(PARSER__) != (void *)NULL)) {
+              if (((struct ___OBJ *)last_slot__VUOB)->__id==__ITM_SLOT__) {
               };
             };
           };
-          result__2DJH=FALSE__;
-          if ((! read_space__MTD())) {
-            result__2DJH=FALSE__;
+          result__QLJH=FALSE__;
+          if ((! read_space__XTD())) {
+            result__QLJH=FALSE__;
           } else {
-            result__3DJH='\0';
-            if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-              result__3DJH=((__CHARACTER )(( 0)));
+            result__RLJH='\0';
+            if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+              result__RLJH=((__CHARACTER )(( 0)));
             } else {
-              result__3DJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+              result__RLJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
             };
-            if ((result__3DJH == ';')) {
+            if ((result__RLJH == ';')) {
               position__CCC=(__INTEGER)(position__CCC +  1);
-              result__2DJH=TRUE__;
+              result__QLJH=TRUE__;
             };
           };
-          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)) {
+          if ((! result__QLJH)) {
+            pos__HMWG=current_position__B0F();
+            put_error__text__1PG( 2,(&__string_241));
+            put_position__FRG(pos__HMWG);
+            put_string__33F(msg_err__AQG);
+            if ((type_error__5PG !=  2)) {
               exit(( 1));
             };
           };
           if (is_shorter2__VI) {
-            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;
+            skip_comment__ZBE=FALSE__;
+            read_space__XTD();
+            if (((struct ___OBJ *)last_slot__VUOB)->__id==__ITM_SLOT__) {
+              __tmp__XZOB=((__ITM_SLOT *)last_slot__VUOB)->comment__WZOB;
             } else {
-              __tmp__I3OB=((__ITM_SLOT_OPERATOR *)last_slot__GYOB)->parent_itm_slot__NW5B.comment__H3OB;
+              __tmp__XZOB=((__ITM_SLOT_OPERATOR *)last_slot__VUOB)->parent_itm_slot__0S5B.comment__WZOB;
             };
-            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;
+            if ((((void *)__tmp__XZOB == (void *)NULL) && ((void *)last_comment_slot__LCE != (void *)NULL))) {
+              __tmp__H0OB=last_comment_slot__LCE;
+              if (((struct ___OBJ *)last_slot__VUOB)->__id==__ITM_SLOT__) {
+                ((__ITM_SLOT *)last_slot__VUOB)->comment__WZOB=__tmp__H0OB;
               } else {
-                ((__ITM_SLOT_OPERATOR *)last_slot__GYOB)->parent_itm_slot__NW5B.comment__H3OB=__tmp__Y3OB;
+                ((__ITM_SLOT_OPERATOR *)last_slot__VUOB)->parent_itm_slot__0S5B.comment__WZOB=__tmp__H0OB;
               };
             };
           };
           if (is_shorter__LZ) {
-            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:
+            if ((((! is_short_code__11) && (old_pos__LUOB !=  0)) && ((void *)((__SECTION_ *)last_section__S2C)->name__MYDC != (void *)(&__string_22)))) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )current_position__B0F()) >>  9) &  255) <  5)) {
+                __tmp__1CEH=((__STRING *)source__5BC)->count__SGC;
+                __tmp__2CEH=((__STRING *)source__5BC)->count__SGC;
+                __tmp__3CEH=((__STRING *)source__5BC)->count__SGC;
+                __tmp__Q0GH=((__STRING *)source__5BC)->storage__3CS;
+                __tmp__R0GH=((__STRING *)source__5BC)->storage__3CS;
+                __tmp__S0GH=((__STRING *)source__5BC)->storage__3CS;
+                while_do__EQLE:
                 {
-                  result__4D4G='\0';
-                  if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                    result__4D4G=((__CHARACTER )(( 0)));
+                  result__4F4G='\0';
+                  if ((position__CCC > __tmp__1CEH)) {
+                    result__4F4G=((__CHARACTER )(( 0)));
                   } else {
-                    result__4D4G=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+                    result__4F4G=((__CHARACTER *)__tmp__Q0GH)[(__INTEGER)(position__CCC -  1)];
                   };
-                  if ((result__4D4G != ((__CHARACTER )(( 0))))) {
-                    result__HE4G='\0';
-                    if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                      result__HE4G=((__CHARACTER )(( 0)));
+                  if ((result__4F4G != ((__CHARACTER )(( 0))))) {
+                    result__HG4G='\0';
+                    if ((position__CCC > __tmp__2CEH)) {
+                      result__HG4G=((__CHARACTER )(( 0)));
                     } else {
-                      result__HE4G=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+                      result__HG4G=((__CHARACTER *)__tmp__R0GH)[(__INTEGER)(position__CCC -  1)];
                     };
-                    __tmp__25OB=(((((((result__HE4G == ' ') || (result__HE4G == '\t')) || (result__HE4G == '\n')) || (result__HE4G == '\r')) || (result__HE4G == '\0')) || (result__HE4G == '\f')) || (result__HE4G == '\v'));
+                    __tmp__L2OB=(((((((result__HG4G == ' ') || (result__HG4G == '\t')) || (result__HG4G == '\n')) || (result__HG4G == '\r')) || (result__HG4G == '\0')) || (result__HG4G == '\f')) || (result__HG4G == '\v'));
                   } else {
-                    __tmp__25OB=FALSE__;
+                    __tmp__L2OB=FALSE__;
                   };
-                  if (__tmp__25OB) {
-                    result__ME4G='\0';
-                    if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                      result__ME4G=((__CHARACTER )(( 0)));
+                  if (__tmp__L2OB) {
+                    result__MG4G='\0';
+                    if ((position__CCC > __tmp__3CEH)) {
+                      result__MG4G=((__CHARACTER )(( 0)));
                     } else {
-                      result__ME4G=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+                      result__MG4G=((__CHARACTER *)__tmp__S0GH)[(__INTEGER)(position__CCC -  1)];
                     };
-                    __tmp__35OB=(result__ME4G != '\n');
+                    __tmp__M2OB=(result__MG4G != '\n');
                   } else {
-                    __tmp__35OB=FALSE__;
+                    __tmp__M2OB=FALSE__;
                   };
-                  if (__tmp__35OB) {
+                  if (__tmp__M2OB) {
                     position__CCC=(__INTEGER)(position__CCC +  1);
-                    goto while_do__4PLE;
+                    goto while_do__EQLE;
                   };
                 };
-                result__RE4G='\0';
-                if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                  result__RE4G=((__CHARACTER )(( 0)));
+                result__RG4G='\0';
+                if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+                  result__RG4G=((__CHARACTER )(( 0)));
                 } else {
-                  result__RE4G=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+                  result__RG4G=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
                 };
-                if ((result__RE4G == '\n')) {
+                if ((result__RG4G == '\n')) {
                   position__CCC=(__INTEGER)(position__CCC +  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__A4HH->count__EGC=(__INTEGER)(Self__A4HH->count__EGC - len__43HH);
-              };
-              short_derive__PCC=(__INTEGER)(old_derive__3XOB - (__INTEGER)(position__CCC - old_pos__2XOB));
+              remove_between__to__MIT(output_code__SI,(__INTEGER)(old_pos__LUOB + old_derive__MUOB),(__INTEGER)((__INTEGER)(position__CCC + short_derive__PCC) -  1));
+              short_derive__PCC=(__INTEGER)(old_derive__MUOB - (__INTEGER)(position__CCC - old_pos__LUOB));
             };
           };
-          __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;
+          __tmp__T3OB=((__PROTOTYPE *)object__ZBC)->slot_list__YVS;
+          if (((struct ___OBJ *)last_slot__VUOB)->__id==__ITM_SLOT__) {
+            __tmp__V3OB=((__ITM_SLOT *)last_slot__VUOB)->parent_named__15.name__LI;
           } else {
-            __tmp__GBPB=((__ITM_SLOT_OPERATOR *)last_slot__GYOB)->parent_itm_slot__NW5B.parent_named__15.name__LI;
+            __tmp__V3OB=((__ITM_SLOT_OPERATOR *)last_slot__VUOB)->parent_itm_slot__0S5B.parent_named__15.name__LI;
           };
-          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;
+          s__NUOB=fast_reference_at__05FC(__tmp__T3OB,__tmp__V3OB);
+          if (((void *)s__NUOB != (void *)NULL)) {
+            put_error__text__1PG( 1,(&__string_242));
+            if (((struct ___OBJ *)s__NUOB)->__id==__ITM_SLOT__) {
+              __tmp__A4OB=((__ITM_SLOT *)s__NUOB)->parent_named__15.parent_itm_object__4.position__SFJ;
             } else {
-              __tmp__RBPB=((__ITM_SLOT_OPERATOR *)s__4XOB)->parent_itm_slot__NW5B.parent_named__15.parent_itm_object__4.position__GFJ;
+              __tmp__A4OB=((__ITM_SLOT_OPERATOR *)s__NUOB)->parent_itm_slot__0S5B.parent_named__15.parent_itm_object__4.position__SFJ;
             };
-            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;
+            put_position__FRG(__tmp__A4OB);
+            if (((struct ___OBJ *)last_slot__VUOB)->__id==__ITM_SLOT__) {
+              __tmp__C4OB=((__ITM_SLOT *)last_slot__VUOB)->parent_named__15.parent_itm_object__4.position__SFJ;
             } else {
-              __tmp__TBPB=((__ITM_SLOT_OPERATOR *)last_slot__GYOB)->parent_itm_slot__NW5B.parent_named__15.parent_itm_object__4.position__GFJ;
+              __tmp__C4OB=((__ITM_SLOT_OPERATOR *)last_slot__VUOB)->parent_itm_slot__0S5B.parent_named__15.parent_itm_object__4.position__SFJ;
             };
-            put_position__XQG(__tmp__TBPB);
-            put_string__P3F(msg_err__SPG);
-            if ((type_error__RPG !=  2)) {
+            put_position__FRG(__tmp__C4OB);
+            put_string__33F(msg_err__AQG);
+            if ((type_error__5PG !=  2)) {
               exit(( 1));
             };
           };
-          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;
+          Self__XDZB=((__PROTOTYPE *)object__ZBC);
+          s__YDZB=last_slot__VUOB;
+          __tmp__ZDZB=Self__XDZB->slot_list__YVS;
+          if (((struct ___OBJ *)last_slot__VUOB)->__id==__ITM_SLOT__) {
+            __tmp__0DZB=((__ITM_SLOT *)last_slot__VUOB)->parent_named__15.name__LI;
           } else {
-            __tmp__NHZB=((__ITM_SLOT_OPERATOR *)last_slot__GYOB)->parent_itm_slot__NW5B.parent_named__15.name__LI;
+            __tmp__0DZB=((__ITM_SLOT_OPERATOR *)last_slot__VUOB)->parent_itm_slot__0S5B.parent_named__15.name__LI;
           };
-          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;
+          fast_put__to__LNGC(__tmp__ZDZB,last_slot__VUOB,__tmp__0DZB);
+          if (((void *)Self__XDZB->first_slot__2DZB == (void *)NULL)) {
+            Self__XDZB->first_slot__2DZB=s__YDZB;
           } else {
-            __tmp__1HZB=Self__KHZB->last_slot__12C;
-            if (((struct ___OBJ *)__tmp__1HZB)->__id==__ITM_SLOT__) {
-              ((__ITM_SLOT *)__tmp__1HZB)->next__HKHC=s__LHZB;
+            __tmp__IEZB=Self__XDZB->last_slot__J3C;
+            if (((struct ___OBJ *)__tmp__IEZB)->__id==__ITM_SLOT__) {
+              ((__ITM_SLOT *)__tmp__IEZB)->next__YGHC=s__YDZB;
             } else {
-              ((__ITM_SLOT_OPERATOR *)__tmp__1HZB)->parent_itm_slot__NW5B.next__HKHC=s__LHZB;
+              ((__ITM_SLOT_OPERATOR *)__tmp__IEZB)->parent_itm_slot__0S5B.next__YGHC=s__YDZB;
             };
           };
-          Self__KHZB->last_slot__12C=s__LHZB;
+          Self__XDZB->last_slot__J3C=s__YDZB;
           if (is_shorter__LZ) {
-            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);
+            Self__3H3B=((__HASHED_SEToSTRING_CONSTANTo *)short_local__XCC);
+            Self__3H3B->count__1FY= 0;
+            __tmp__5H3B=Self__3H3B->buckets__DEV;
+            __tmp__CI3B=(__INTEGER)(Self__3H3B->capacity__HIT -  1);
+            Self__3GHC=((void **)__tmp__5H3B);
+            Self__OZPC=__tmp__CI3B;
+            while ((Self__OZPC >=  0)) {
+              Self__3GHC[Self__OZPC]=NULL;
+              Self__OZPC=(__INTEGER)(Self__OZPC -  1);
             };
           };
         };
-      } while (result__XXOB);
+      } while (result__GUOB);
       if (is_shorter__LZ) {
-        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__IAF;
-    };
-  };
-  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)) {
+        if (((! is_short_private__J2) && ((void *)((__SECTION_ *)last_section__S2C)->name__MYDC == (void *)(&__string_26)))) {
+          remove_between__to__MIT(output_code__SI,(__INTEGER)(pos_sec__KYC + old_derive__LYC),(__INTEGER)((__INTEGER)(position__CCC + short_derive__PCC) -  1));
+          short_derive__PCC=(__INTEGER)(old_derive__LYC - (__INTEGER)(position__CCC - pos_sec__KYC));
+        };
+        pos_sec__KYC=position__CCC;
+        old_derive__LYC=short_derive__PCC;
+      };
+      goto while_do__FBF;
+    };
+  };
+  if (((void *)read_contract__5VF(PARSER__) != (void *)NULL)) {
+    pos__CNWG=current_position__B0F();
+    put_error__text__1PG( 2,(&__string_243));
+    put_position__FRG(pos__CNWG);
+    put_string__33F(msg_err__AQG);
+    if ((type_error__5PG !=  2)) {
       exit(( 1));
     };
   };
-  read_space__MTD();
-  result__CF4G='\0';
-  if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-    result__CF4G=((__CHARACTER )(( 0)));
+  read_space__XTD();
+  result__IH4G='\0';
+  if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+    result__IH4G=((__CHARACTER )(( 0)));
   } else {
-    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)) {
+    result__IH4G=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
+  };
+  if ((result__IH4G != ((__CHARACTER )(( 0))))) {
+    pos__ENWG=current_position__B0F();
+    put_error__text__1PG( 0,(&__string_168));
+    put_position__FRG(pos__ENWG);
+    put_string__33F(msg_err__AQG);
+    if ((type_error__5PG !=  2)) {
       exit(( 1));
     };
   };
-  short__token__to__YCD((&__string_118),((__STRING *)source__5BC)->count__EGC,((__STRING *)source__5BC)->count__EGC);
+  short__token__to__GDD((&__string_118),((__STRING *)source__5BC)->count__SGC,((__STRING *)source__5BC)->count__SGC);
   object__ZBC=NULL;
 }
 
-static void put__to__like__Q3XD(void *tok__S3XD,void *buf__T3XD,void *key__U3XD)
+static void put__to__like__X4XD(void *tok__Z4XD,void *buf__04XD,void *key__14XD)
 // ({NULLxSTRING_CONSTANTxSTRING},{NULLxSTRING},{NULLxSTRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER __tmp__M5XD,Self__LIQE;
+  void *lst__24XD;
+  lst__24XD=NULL;
+  if (((void *)key__14XD != (void *)NULL)) {
+    lst__24XD=fast_reference_at__CMNE(short_dico__QD,key__14XD);
+    if (((void *)lst__24XD != (void *)NULL)) {
+      __tmp__M5XD=((__LINKED_LISToSTRING_CONSTANTo *)lst__24XD)->parent_linked_collection__LD.upper__0ED;
+      Self__LIQE= 1;
+      while ((Self__LIQE <= __tmp__M5XD)) {
+        if (((void *)item__X3ND(lst__24XD,Self__LIQE) == (void *)NULL)) {
+          append__3OS(buf__04XD,tok__Z4XD);
         } else {
-          append__ROS(buf__T3XD,item__Q2ND(lst__V3XD,Self__WHQE));
+          append__3OS(buf__04XD,item__X3ND(lst__24XD,Self__LIQE));
         };
-        Self__WHQE=(__INTEGER)(Self__WHQE +  1);
+        Self__LIQE=(__INTEGER)(Self__LIQE +  1);
       };
     };
   };
 }
 
-static void shorter_get_all_slot_in__S5XD(__PROTOTYPE *Self__T5XD,void *lst__U5XD)
+static void shorter_get_all_slot_in__ZAYD(__PROTOTYPE *Self__0AYD,void *lst__1AYD)
 // ({PROTOTYPE},{NULLxFAST_ARRAYoITM_SLOTo}) VoidRecursive, No inlinable.
 {
-  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)) {
+  void *ps__3AYD,*__tmp__ZDYD;
+  void *p__4AYD;
+  __INTEGER i__5AYD,__tmp__3KFH,new_capacity__3IXE,__tmp__BKXE;
+  __INTEGER __tmp__Y5PF,Self__QGAG,__tmp__GLFH;
+  void *s__2AYD,*__tmp__HCYD,*__tmp__ADYD,*__tmp__ZGYD;
+  void *__tmp__QBYD,*__tmp__MDYD;
+  void *__tmp__4KFH,*__tmp__5KFH,*__tmp__ICYD,*__tmp__JCYD,*__tmp__KEYD;
+  void *__tmp__UEYD,*__tmp__2EYD,*__tmp__HLFH,*__tmp__ILFH,*__tmp__JLFH;
+  void *__tmp__KLFH,*__tmp__DGYD,*__tmp__EGYD;
+  __SECTION_ *Self__LBFC;
+  void *__tmp__XDYD;
+  __BOOLEAN __tmp__VBYD,__tmp__MCYD,__tmp__LJXE,__tmp__QDYD,__tmp__GQLF;
+  __BOOLEAN __tmp__AFYD,__tmp__BFYD,__tmp__EFYD;
+  void **__tmp__W0GH,**__tmp__AKXE,**new__E5PF;
+  __FAST_ARRAYoITM_SLOTo *Self__1IXE;
+  __CHARACTER __tmp__DEYD;
+  void **__tmp__00GH,**__tmp__10GH;
+  ps__3AYD=NULL;
+  p__4AYD=NULL;
+  i__5AYD= 0;
+  s__2AYD=Self__0AYD->first_slot__2DZB;
+  while (((void *)s__2AYD != (void *)NULL)) {
     if (is_short_private__J2) {
-      __tmp__OAYD=TRUE__;
+      __tmp__VBYD=TRUE__;
     } else {
-      if (((struct ___OBJ *)s__V5XD)->__id==__ITM_SLOT__) {
-        __tmp__JAYD=((__ITM_SLOT *)s__V5XD)->id_section__F3C;
+      if (((struct ___OBJ *)s__2AYD)->__id==__ITM_SLOT__) {
+        __tmp__QBYD=((__ITM_SLOT *)s__2AYD)->id_section__T3C;
       } else {
-        __tmp__JAYD=((__ITM_SLOT_OPERATOR *)s__V5XD)->parent_itm_slot__NW5B.id_section__F3C;
+        __tmp__QBYD=((__ITM_SLOT_OPERATOR *)s__2AYD)->parent_itm_slot__0S5B.id_section__T3C;
       };
-      __tmp__OAYD=((void *)((__SECTION_ *)__tmp__JAYD)->name__11DC != (void *)(&__string_26));
+      __tmp__VBYD=((void *)((__SECTION_ *)__tmp__QBYD)->name__MYDC != (void *)(&__string_26));
     };
-    if (__tmp__OAYD) {
-      i__Y5XD= 0;
-      while_do__2ISE:
+    if (__tmp__VBYD) {
+      i__5AYD= 0;
+      __tmp__3KFH=((__FAST_ARRAYoITM_SLOTo *)lst__1AYD)->parent_arrayed_collection__XNTD.upper__UOTD;
+      __tmp__4KFH=((__ITM_SLOT *)s__2AYD)->parent_named__15.name__LI;
+      __tmp__5KFH=((__ITM_SLOT_OPERATOR *)s__2AYD)->parent_itm_slot__0S5B.parent_named__15.name__LI;
+      __tmp__W0GH=((__FAST_ARRAYoITM_SLOTo *)lst__1AYD)->parent_arrayed_collection__XNTD.storage__UPWE;
+      while_do__RJSE:
       {
-        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;
+        if ((i__5AYD <= __tmp__3KFH)) {
+          __tmp__HCYD=((void **)__tmp__W0GH)[i__5AYD];
+          if (((struct ___OBJ *)__tmp__HCYD)->__id==__ITM_SLOT__) {
+            __tmp__ICYD=((__ITM_SLOT *)__tmp__HCYD)->parent_named__15.name__LI;
           } else {
-            __tmp__BBYD=((__ITM_SLOT_OPERATOR *)__tmp__ABYD)->parent_itm_slot__NW5B.parent_named__15.name__LI;
+            __tmp__ICYD=((__ITM_SLOT_OPERATOR *)__tmp__HCYD)->parent_itm_slot__0S5B.parent_named__15.name__LI;
           };
-          if (((struct ___OBJ *)s__V5XD)->__id==__ITM_SLOT__) {
-            __tmp__CBYD=((__ITM_SLOT *)s__V5XD)->parent_named__15.name__LI;
+          if (((struct ___OBJ *)s__2AYD)->__id==__ITM_SLOT__) {
+            __tmp__JCYD=__tmp__4KFH;
           } else {
-            __tmp__CBYD=((__ITM_SLOT_OPERATOR *)s__V5XD)->parent_itm_slot__NW5B.parent_named__15.name__LI;
+            __tmp__JCYD=__tmp__5KFH;
           };
-          __tmp__FBYD=((void *)__tmp__BBYD != (void *)__tmp__CBYD);
+          __tmp__MCYD=((void *)__tmp__ICYD != (void *)__tmp__JCYD);
         } else {
-          __tmp__FBYD=FALSE__;
+          __tmp__MCYD=FALSE__;
         };
-        if (__tmp__FBYD) {
-          i__Y5XD=(__INTEGER)(i__Y5XD +  1);
-          goto while_do__2ISE;
+        if (__tmp__MCYD) {
+          i__5AYD=(__INTEGER)(i__5AYD +  1);
+          goto while_do__RJSE;
         };
       };
-      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__;
+      if ((i__5AYD > ((__FAST_ARRAYoITM_SLOTo *)lst__1AYD)->parent_arrayed_collection__XNTD.upper__UOTD)) {
+        Self__1IXE=((__FAST_ARRAYoITM_SLOTo *)lst__1AYD);
+        new_capacity__3IXE= 0;
+        if (((__INTEGER)(Self__1IXE->parent_arrayed_collection__XNTD.upper__UOTD +  1) <= (__INTEGER)(Self__1IXE->parent_arrayed_collection__XNTD.capacity__RCWE -  1))) {
+          Self__1IXE->parent_arrayed_collection__XNTD.upper__UOTD=(__INTEGER)(Self__1IXE->parent_arrayed_collection__XNTD.upper__UOTD +  1);
+          __tmp__LJXE=TRUE__;
         } else {
-          __tmp__SIXE=FALSE__;
+          __tmp__LJXE=FALSE__;
         };
-        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;
+        if ((! __tmp__LJXE)) {
+          if ((Self__1IXE->parent_arrayed_collection__XNTD.capacity__RCWE ==  0)) {
+            Self__1IXE->parent_arrayed_collection__XNTD.storage__UPWE=create__BJFF( 2);
+            Self__1IXE->parent_arrayed_collection__XNTD.capacity__RCWE= 2;
+            Self__1IXE->parent_arrayed_collection__XNTD.upper__UOTD= 0;
           } else {
-            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);
+            new_capacity__3IXE=(__INTEGER)(Self__1IXE->parent_arrayed_collection__XNTD.capacity__RCWE <<  1);
+            __tmp__AKXE=Self__1IXE->parent_arrayed_collection__XNTD.storage__UPWE;
+            __tmp__BKXE=Self__1IXE->parent_arrayed_collection__XNTD.capacity__RCWE;
+            new__E5PF=((void **)realloc_dynamic__old_size__new_size__KELC(((__POINTER )((void **)__tmp__AKXE)),((__UINTEGER_32 )(__INTEGER)(__tmp__BKXE * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__3IXE * ((__INTEGER )(sizeof(void *)))))));
+            __tmp__Y5PF=(__INTEGER)(new_capacity__3IXE -  1);
+            Self__QGAG=__tmp__BKXE;
+            while ((Self__QGAG <= __tmp__Y5PF)) {
+              new__E5PF[Self__QGAG]=NULL;
+              Self__QGAG=(__INTEGER)(Self__QGAG +  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);
+            Self__1IXE->parent_arrayed_collection__XNTD.storage__UPWE=new__E5PF;
+            Self__1IXE->parent_arrayed_collection__XNTD.capacity__RCWE=new_capacity__3IXE;
+            Self__1IXE->parent_arrayed_collection__XNTD.upper__UOTD=(__INTEGER)(Self__1IXE->parent_arrayed_collection__XNTD.upper__UOTD +  1);
           };
         };
-        ((void **)Self__CIXE->parent_arrayed_collection__QMTD.storage__1OWE)[Self__CIXE->parent_arrayed_collection__QMTD.upper__NNTD]=s__V5XD;
+        ((void **)Self__1IXE->parent_arrayed_collection__XNTD.storage__UPWE)[Self__1IXE->parent_arrayed_collection__XNTD.upper__UOTD]=s__2AYD;
       };
     };
-    if (((struct ___OBJ *)s__V5XD)->__id==__ITM_SLOT__) {
-      __tmp__ZBYD=((__ITM_SLOT *)s__V5XD)->next__HKHC;
+    if (((struct ___OBJ *)s__2AYD)->__id==__ITM_SLOT__) {
+      __tmp__ADYD=((__ITM_SLOT *)s__2AYD)->next__YGHC;
     } else {
-      __tmp__ZBYD=((__ITM_SLOT_OPERATOR *)s__V5XD)->parent_itm_slot__NW5B.next__HKHC;
+      __tmp__ADYD=((__ITM_SLOT_OPERATOR *)s__2AYD)->parent_itm_slot__0S5B.next__YGHC;
     };
-    s__V5XD=__tmp__ZBYD;
+    s__2AYD=__tmp__ADYD;
   };
-  s__V5XD=Self__T5XD->first_slot__PHZB;
-  while_do__PF5D:
+  s__2AYD=Self__0AYD->first_slot__2DZB;
+  while_do__QG5D:
   {
-    if (((void *)s__V5XD != (void *)NULL)) {
-      if (((struct ___OBJ *)s__V5XD)->__id==__ITM_SLOT__) {
-        __tmp__FCYD=((__ITM_SLOT *)s__V5XD)->id_section__F3C;
+    if (((void *)s__2AYD != (void *)NULL)) {
+      if (((struct ___OBJ *)s__2AYD)->__id==__ITM_SLOT__) {
+        __tmp__MDYD=((__ITM_SLOT *)s__2AYD)->id_section__T3C;
       } else {
-        __tmp__FCYD=((__ITM_SLOT_OPERATOR *)s__V5XD)->parent_itm_slot__NW5B.id_section__F3C;
+        __tmp__MDYD=((__ITM_SLOT_OPERATOR *)s__2AYD)->parent_itm_slot__0S5B.id_section__T3C;
       };
-      Self__0EFC=((__SECTION_ *)__tmp__FCYD);
-      __tmp__JCYD=(((void *)Self__0EFC->name__11DC == (void *)(&__string_23)) || ((void *)Self__0EFC->name__11DC == (void *)(&__string_24)));
+      Self__LBFC=((__SECTION_ *)__tmp__MDYD);
+      __tmp__QDYD=(((void *)Self__LBFC->name__MYDC == (void *)(&__string_23)) || ((void *)Self__LBFC->name__MYDC == (void *)(&__string_24)));
     } else {
-      __tmp__JCYD=FALSE__;
+      __tmp__QDYD=FALSE__;
     };
-    if (__tmp__JCYD) {
-      if (((struct ___OBJ *)s__V5XD)->__id==__ITM_SLOT__) {
-        __tmp__QCYD=((__ITM_SLOT *)s__V5XD)->result_type__PBGC;
+    if (__tmp__QDYD) {
+      if (((struct ___OBJ *)s__2AYD)->__id==__ITM_SLOT__) {
+        __tmp__XDYD=((__ITM_SLOT *)s__2AYD)->result_type__A4FC;
       } else {
-        __tmp__QCYD=((__ITM_SLOT_OPERATOR *)s__V5XD)->parent_itm_slot__NW5B.result_type__PBGC;
+        __tmp__XDYD=((__ITM_SLOT_OPERATOR *)s__2AYD)->parent_itm_slot__0S5B.result_type__A4FC;
       };
-      if (__tmp__QCYD==NULL) {
-        __tmp__SCYD=NULL;
+      if (__tmp__XDYD==NULL) {
+        __tmp__ZDYD=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__QCYD)->__id) {
+        switch (((struct ___OBJ *)__tmp__XDYD)->__id) {
         case __ITM_TYPE_PARAMETER__: {
-          __tmp__SCYD=((void *)__tmp__QCYD);
+          __tmp__ZDYD=((void *)__tmp__XDYD);
         } break;
         case __ITM_TYPE_SIMPLE__: {
-          __tmp__SCYD=((void *)__tmp__QCYD);
+          __tmp__ZDYD=((void *)__tmp__XDYD);
         } break;
         case __ITM_TYPE_MULTI__: {
-          __tmp__SCYD=NULL;
+          __tmp__ZDYD=NULL;
         } break;
         case __ITM_TYPE_BLOCK__: {
-          __tmp__SCYD=NULL;
+          __tmp__ZDYD=NULL;
         } break;
         case __ITM_TYPE_GENERIC__: {
-          __tmp__SCYD=((void *)__tmp__QCYD);
+          __tmp__ZDYD=((void *)__tmp__XDYD);
         } break;
         case __ITM_TYPE_STYLE__: {
-          __tmp__SCYD=((void *)__tmp__QCYD);
+          __tmp__ZDYD=((void *)__tmp__XDYD);
         } break;
         }
       };
-      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;
+      ps__3AYD=__tmp__ZDYD;
+      if (((void *)__tmp__ZDYD != (void *)NULL)) {
+        if (((struct ___OBJ *)s__2AYD)->__id==__ITM_SLOT__) {
+          __tmp__DEYD=((__ITM_SLOT *)s__2AYD)->parent_named__15.style__0FU;
         } else {
-          __tmp__2CYD=((__ITM_SLOT_OPERATOR *)s__V5XD)->parent_itm_slot__NW5B.parent_named__15.style__OGU;
+          __tmp__DEYD=((__ITM_SLOT_OPERATOR *)s__2AYD)->parent_itm_slot__0S5B.parent_named__15.style__0FU;
         };
-        if ((__tmp__2CYD == '+')) {
-          switch (((struct ___OBJ *)__tmp__SCYD)->__id) {
+        if ((__tmp__DEYD == '+')) {
+          switch (((struct ___OBJ *)__tmp__ZDYD)->__id) {
           case __ITM_TYPE_PARAMETER__: {
-            __tmp__DDYD=NULL;
+            __tmp__KEYD=NULL;
           } break;
           case __ITM_TYPE_SIMPLE__: {
-            __tmp__DDYD=NULL;
+            __tmp__KEYD=NULL;
           } break;
           case __ITM_TYPE_GENERIC__: {
-            __tmp__DDYD=((__ITM_TYPE_GENERIC *)__tmp__SCYD)->parent_itm_type_style__SSN.style__DZP;
+            __tmp__KEYD=((__ITM_TYPE_GENERIC *)__tmp__ZDYD)->parent_itm_type_style__4SN.style__PZP;
           } break;
           case __ITM_TYPE_STYLE__: {
-            __tmp__DDYD=((__ITM_TYPE_STYLE *)__tmp__SCYD)->style__DZP;
+            __tmp__KEYD=((__ITM_TYPE_STYLE *)__tmp__ZDYD)->style__PZP;
           } break;
           };
-          __tmp__MOLF=((void *)__tmp__DDYD == (void *)(&__string_9));
+          __tmp__GQLF=((void *)__tmp__KEYD == (void *)(&__string_9));
         } else {
-          __tmp__MOLF=FALSE__;
+          __tmp__GQLF=FALSE__;
         };
-        if (__tmp__MOLF) {
-          __tmp__ZDYD=TRUE__;
+        if (__tmp__GQLF) {
+          __tmp__AFYD=TRUE__;
         } else {
-          if (((struct ___OBJ *)s__V5XD)->__id==__ITM_SLOT__) {
-            __tmp__NDYD=((__ITM_SLOT *)s__V5XD)->parent_named__15.name__LI;
+          if (((struct ___OBJ *)s__2AYD)->__id==__ITM_SLOT__) {
+            __tmp__UEYD=((__ITM_SLOT *)s__2AYD)->parent_named__15.name__LI;
           } else {
-            __tmp__NDYD=((__ITM_SLOT_OPERATOR *)s__V5XD)->parent_itm_slot__NW5B.parent_named__15.name__LI;
-          };
-          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__ZCLH=(i__0CLH ==  0);
+            __tmp__UEYD=((__ITM_SLOT_OPERATOR *)s__2AYD)->parent_itm_slot__0S5B.parent_named__15.name__LI;
           };
-          __tmp__ZDYD=result__ZCLH;
+          __tmp__AFYD=has_prefix__OTTF(__tmp__UEYD,(&__string_177));
         };
-        if (__tmp__ZDYD) {
-          __tmp__0DYD=TRUE__;
+        if (__tmp__AFYD) {
+          __tmp__BFYD=TRUE__;
         } else {
-          if (((struct ___OBJ *)s__V5XD)->__id==__ITM_SLOT__) {
-            __tmp__VDYD=((__ITM_SLOT *)s__V5XD)->parent_named__15.name__LI;
+          if (((struct ___OBJ *)s__2AYD)->__id==__ITM_SLOT__) {
+            __tmp__2EYD=((__ITM_SLOT *)s__2AYD)->parent_named__15.name__LI;
           } else {
-            __tmp__VDYD=((__ITM_SLOT_OPERATOR *)s__V5XD)->parent_itm_slot__NW5B.parent_named__15.name__LI;
-          };
-          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__4CLH=(i__5CLH ==  0);
+            __tmp__2EYD=((__ITM_SLOT_OPERATOR *)s__2AYD)->parent_itm_slot__0S5B.parent_named__15.name__LI;
           };
-          __tmp__0DYD=result__4CLH;
+          __tmp__BFYD=has_prefix__OTTF(__tmp__2EYD,(&__string_178));
         };
-        __tmp__3DYD=__tmp__0DYD;
+        __tmp__EFYD=__tmp__BFYD;
       } else {
-        __tmp__3DYD=FALSE__;
+        __tmp__EFYD=FALSE__;
       };
-      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) {
+      if (__tmp__EFYD) {
+        p__4AYD=NULL;
+        i__5AYD= 0;
+        __tmp__GLFH=((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.upper__HJ;
+        __tmp__HLFH=((__ITM_TYPE_PARAMETER *)__tmp__ZDYD)->parent_itm_type__VFE.name__GZP;
+        __tmp__ILFH=((__ITM_TYPE_SIMPLE *)__tmp__ZDYD)->name__GZP;
+        __tmp__JLFH=((__ITM_TYPE_GENERIC *)__tmp__ZDYD)->parent_itm_type_style__4SN.parent_itm_type_simple__3SN.name__GZP;
+        __tmp__KLFH=((__ITM_TYPE_STYLE *)__tmp__ZDYD)->parent_itm_type_simple__3SN.name__GZP;
+        __tmp__00GH=((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__DVT;
+        __tmp__10GH=((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__DVT;
+        while (((i__5AYD <= __tmp__GLFH) && ((void *)p__4AYD == (void *)NULL))) {
+          __tmp__DGYD=((__PROTOTYPE *)((void **)__tmp__00GH)[i__5AYD])->parent_named__5.name__LI;
+          switch (((struct ___OBJ *)ps__3AYD)->__id) {
           case __ITM_TYPE_PARAMETER__: {
-            __tmp__3EYD=((__ITM_TYPE_PARAMETER *)ps__W5XD)->parent_itm_type__YEE.name__0YP;
+            __tmp__EGYD=__tmp__HLFH;
           } break;
           case __ITM_TYPE_SIMPLE__: {
-            __tmp__3EYD=((__ITM_TYPE_SIMPLE *)ps__W5XD)->name__0YP;
+            __tmp__EGYD=__tmp__ILFH;
           } break;
           case __ITM_TYPE_GENERIC__: {
-            __tmp__3EYD=((__ITM_TYPE_GENERIC *)ps__W5XD)->parent_itm_type_style__SSN.parent_itm_type_simple__RSN.name__0YP;
+            __tmp__EGYD=__tmp__JLFH;
           } break;
           case __ITM_TYPE_STYLE__: {
-            __tmp__3EYD=((__ITM_TYPE_STYLE *)ps__W5XD)->parent_itm_type_simple__RSN.name__0YP;
+            __tmp__EGYD=__tmp__KLFH;
           } break;
           };
-          if (((void *)__tmp__2EYD == (void *)__tmp__3EYD)) {
-            p__X5XD=((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__XVT)[i__Y5XD];
+          if (((void *)__tmp__DGYD == (void *)__tmp__EGYD)) {
+            p__4AYD=((void **)__tmp__10GH)[i__5AYD];
           };
-          i__Y5XD=(__INTEGER)(i__Y5XD +  1);
+          i__5AYD=(__INTEGER)(i__5AYD +  1);
         };
-        if (((void *)p__X5XD != (void *)NULL)) {
-          shorter_get_all_slot_in__S5XD(p__X5XD,lst__U5XD);
+        if (((void *)p__4AYD != (void *)NULL)) {
+          shorter_get_all_slot_in__ZAYD(p__4AYD,lst__1AYD);
         };
       };
-      if (((struct ___OBJ *)s__V5XD)->__id==__ITM_SLOT__) {
-        __tmp__SFYD=((__ITM_SLOT *)s__V5XD)->next__HKHC;
+      if (((struct ___OBJ *)s__2AYD)->__id==__ITM_SLOT__) {
+        __tmp__ZGYD=((__ITM_SLOT *)s__2AYD)->next__YGHC;
       } else {
-        __tmp__SFYD=((__ITM_SLOT_OPERATOR *)s__V5XD)->parent_itm_slot__NW5B.next__HKHC;
+        __tmp__ZGYD=((__ITM_SLOT_OPERATOR *)s__2AYD)->parent_itm_slot__0S5B.next__YGHC;
       };
-      s__V5XD=__tmp__SFYD;
-      goto while_do__PF5D;
+      s__2AYD=__tmp__ZGYD;
+      goto while_do__QG5D;
     };
   };
 }
 
-static void pretty_name_in__LW4F(__ITM_SLOT *Self__MW4F,void *buffer__NW4F)
+static void pretty_name_in__FY4F(__ITM_SLOT *Self__GY4F,void *buffer__HY4F)
 // ({ITM_SLOT},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __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__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__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)]);
+  __INTEGER j__IY4F,new_capacity__ZTHH,old_nb_elts__2THH,upper__WLJH;
+  __INTEGER Self__ULJH,new_capacity__5THH,old_nb_elts__CUHH,upper__1LJH;
+  __INTEGER Self__ZLJH,new_capacity__FUHH,old_nb_elts__IUHH,upper__AMJH;
+  __INTEGER Self__4LJH;
+  __STRING *Self__0THH,*Self__AUHH,*Self__GUHH;
+  __STRING_CONSTANT *Self__XLFH;
+  __CHARACTER *Self__1THH,*new__3THH,*Self__BUHH,*new__DUHH,*Self__HUHH;
+  __CHARACTER *new__JUHH;
+  __CHARACTER ch__EUHH,ch__KUHH;
+  j__IY4F= 1;
+  while ((j__IY4F < ((__STRING_CONSTANT *)Self__GY4F->parent_named__15.name__LI)->count__DD)) {
+    if (((((__CHARACTER *)((__STRING_CONSTANT *)Self__GY4F->parent_named__15.name__LI)->storage__RRO)[(__INTEGER)(j__IY4F -  1)] == '_') && (((__CHARACTER *)((__STRING_CONSTANT *)Self__GY4F->parent_named__15.name__LI)->storage__RRO)[(__INTEGER)((__INTEGER)(j__IY4F +  1) -  1)] == '_'))) {
+      Self__0THH=((__STRING *)buffer__HY4F);
+      new_capacity__ZTHH= 0;
+      if ((Self__0THH->capacity__UCS <= Self__0THH->count__SGC)) {
+        if ((Self__0THH->capacity__UCS ==  0)) {
+          Self__0THH->capacity__UCS= 32;
+          Self__0THH->storage__3CS=create__YIEB( 32);
+        } else {
+          new_capacity__ZTHH=(__INTEGER)(Self__0THH->capacity__UCS <<  1);
+          Self__1THH=((__CHARACTER *)Self__0THH->storage__3CS);
+          old_nb_elts__2THH=Self__0THH->capacity__UCS;
+          new__3THH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__1THH),((__UINTEGER_32 )old_nb_elts__2THH),((__UINTEGER_32 )new_capacity__ZTHH)));
+          upper__WLJH=(__INTEGER)(new_capacity__ZTHH -  1);
+          Self__ULJH=old_nb_elts__2THH;
+          while ((Self__ULJH <= upper__WLJH)) {
+            new__3THH[Self__ULJH]='\0';
+            Self__ULJH=(__INTEGER)(Self__ULJH +  1);
+          };
+          Self__0THH->storage__3CS=new__3THH;
+          Self__0THH->capacity__UCS=new_capacity__ZTHH;
+        };
+      };
+      ((__CHARACTER *)Self__0THH->storage__3CS)[Self__0THH->count__SGC]=' ';
+      Self__0THH->count__SGC=(__INTEGER)(Self__0THH->count__SGC +  1);
+      j__IY4F=(__INTEGER)(j__IY4F +  2);
+    } else {
+      Self__AUHH=((__STRING *)buffer__HY4F);
+      ch__EUHH=((__CHARACTER *)((__STRING_CONSTANT *)Self__GY4F->parent_named__15.name__LI)->storage__RRO)[(__INTEGER)(j__IY4F -  1)];
+      new_capacity__5THH= 0;
+      if ((Self__AUHH->capacity__UCS <= Self__AUHH->count__SGC)) {
+        if ((Self__AUHH->capacity__UCS ==  0)) {
+          Self__AUHH->capacity__UCS= 32;
+          Self__AUHH->storage__3CS=create__YIEB( 32);
+        } else {
+          new_capacity__5THH=(__INTEGER)(Self__AUHH->capacity__UCS <<  1);
+          Self__BUHH=((__CHARACTER *)Self__AUHH->storage__3CS);
+          old_nb_elts__CUHH=Self__AUHH->capacity__UCS;
+          new__DUHH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__BUHH),((__UINTEGER_32 )old_nb_elts__CUHH),((__UINTEGER_32 )new_capacity__5THH)));
+          upper__1LJH=(__INTEGER)(new_capacity__5THH -  1);
+          Self__ZLJH=old_nb_elts__CUHH;
+          while ((Self__ZLJH <= upper__1LJH)) {
+            new__DUHH[Self__ZLJH]='\0';
+            Self__ZLJH=(__INTEGER)(Self__ZLJH +  1);
+          };
+          Self__AUHH->storage__3CS=new__DUHH;
+          Self__AUHH->capacity__UCS=new_capacity__5THH;
+        };
+      };
+      ((__CHARACTER *)Self__AUHH->storage__3CS)[Self__AUHH->count__SGC]=ch__EUHH;
+      Self__AUHH->count__SGC=(__INTEGER)(Self__AUHH->count__SGC +  1);
+      j__IY4F=(__INTEGER)(j__IY4F +  1);
+    };
+  };
+  Self__XLFH=((__STRING_CONSTANT *)Self__GY4F->parent_named__15.name__LI);
+  Self__GUHH=((__STRING *)buffer__HY4F);
+  ch__KUHH=((__CHARACTER *)Self__XLFH->storage__RRO)[(__INTEGER)(Self__XLFH->count__DD -  1)];
+  new_capacity__FUHH= 0;
+  if ((Self__GUHH->capacity__UCS <= Self__GUHH->count__SGC)) {
+    if ((Self__GUHH->capacity__UCS ==  0)) {
+      Self__GUHH->capacity__UCS= 32;
+      Self__GUHH->storage__3CS=create__YIEB( 32);
+    } else {
+      new_capacity__FUHH=(__INTEGER)(Self__GUHH->capacity__UCS <<  1);
+      Self__HUHH=((__CHARACTER *)Self__GUHH->storage__3CS);
+      old_nb_elts__IUHH=Self__GUHH->capacity__UCS;
+      new__JUHH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__HUHH),((__UINTEGER_32 )old_nb_elts__IUHH),((__UINTEGER_32 )new_capacity__FUHH)));
+      upper__AMJH=(__INTEGER)(new_capacity__FUHH -  1);
+      Self__4LJH=old_nb_elts__IUHH;
+      while ((Self__4LJH <= upper__AMJH)) {
+        new__JUHH[Self__4LJH]='\0';
+        Self__4LJH=(__INTEGER)(Self__4LJH +  1);
+      };
+      Self__GUHH->storage__3CS=new__JUHH;
+      Self__GUHH->capacity__UCS=new_capacity__FUHH;
+    };
+  };
+  ((__CHARACTER *)Self__GUHH->storage__3CS)[Self__GUHH->count__SGC]=ch__KUHH;
+  Self__GUHH->count__SGC=(__INTEGER)(Self__GUHH->count__SGC +  1);
 }
 
-static void pretty_name_in__AY4F(__ITM_SLOT_OPERATOR *Self__BY4F,void *buffer__CY4F)
+static void pretty_name_in__0Z4F(__ITM_SLOT_OPERATOR *Self__1Z4F,void *buffer__2Z4F)
 // ({ITM_SLOT_OPERATOR},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __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__;
+  __STRING *Self__MUHH;
+  __INTEGER new_capacity__LUHH,old_nb_elts__OUHH,upper__FMJH,Self__DMJH;
+  __BOOLEAN __tmp__H04F;
+  __CHARACTER *Self__NUHH,*new__PUHH;
+  if (has_prefix__OTTF(Self__1Z4F->parent_itm_slot__0S5B.parent_named__15.name__LI,(&__string_82))) {
+    append__3OS(buffer__2Z4F,(&__string_244));
+    __tmp__H04F=TRUE__;
   } else {
-    __tmp__NY4F=FALSE__;
+    __tmp__H04F=FALSE__;
   };
-  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__YRTF=(i__ZRTF ==  0);
+  if ((! __tmp__H04F)) {
+    if (has_prefix__OTTF(Self__1Z4F->parent_itm_slot__0S5B.parent_named__15.name__LI,(&__string_81))) {
+      append__3OS(buffer__2Z4F,(&__string_245));
+    } else {
+      append__3OS(buffer__2Z4F,(&__string_246));
     };
-    if (result__YRTF) {
-      append__ROS(buffer__CY4F,(&__string_246));
+  };
+  append__3OS(buffer__2Z4F,Self__1Z4F->pretty_name__5ZHC);
+  Self__MUHH=((__STRING *)buffer__2Z4F);
+  new_capacity__LUHH= 0;
+  if ((Self__MUHH->capacity__UCS <= Self__MUHH->count__SGC)) {
+    if ((Self__MUHH->capacity__UCS ==  0)) {
+      Self__MUHH->capacity__UCS= 32;
+      Self__MUHH->storage__3CS=create__YIEB( 32);
     } else {
-      append__ROS(buffer__CY4F,(&__string_247));
+      new_capacity__LUHH=(__INTEGER)(Self__MUHH->capacity__UCS <<  1);
+      Self__NUHH=((__CHARACTER *)Self__MUHH->storage__3CS);
+      old_nb_elts__OUHH=Self__MUHH->capacity__UCS;
+      new__PUHH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__NUHH),((__UINTEGER_32 )old_nb_elts__OUHH),((__UINTEGER_32 )new_capacity__LUHH)));
+      upper__FMJH=(__INTEGER)(new_capacity__LUHH -  1);
+      Self__DMJH=old_nb_elts__OUHH;
+      while ((Self__DMJH <= upper__FMJH)) {
+        new__PUHH[Self__DMJH]='\0';
+        Self__DMJH=(__INTEGER)(Self__DMJH +  1);
+      };
+      Self__MUHH->storage__3CS=new__PUHH;
+      Self__MUHH->capacity__UCS=new_capacity__LUHH;
     };
   };
-  append__ROS(buffer__CY4F,Self__BY4F->pretty_name__O3HC);
-  add_last__GOT(buffer__CY4F,'\'');
+  ((__CHARACTER *)Self__MUHH->storage__3CS)[Self__MUHH->count__SGC]='\'';
+  Self__MUHH->count__SGC=(__INTEGER)(Self__MUHH->count__SGC +  1);
 }
 
-static void get_all_comment_slot__in__QK4E(__PROTOTYPE *Self__RK4E,void *n__SK4E,void *buf__TK4E)
+static __BOOLEAN has_prefix__OTTF(__STRING_CONSTANT *Self__PTTF,void *p__QTTF)
+// ({STRING_CONSTANT},{STRING_CONSTANT}) With resultNo recursive, No inlinable.
+{
+  __INTEGER i__TTTF;
+  __BOOLEAN result__STTF;
+  __CHARACTER *__tmp__AMFH,*__tmp__BMFH;
+  result__STTF=FALSE__;
+  i__TTTF= 0;
+  if ((((__STRING_CONSTANT *)p__QTTF)->count__DD <= Self__PTTF->count__DD)) {
+    i__TTTF=((__STRING_CONSTANT *)p__QTTF)->count__DD;
+    __tmp__AMFH=Self__PTTF->storage__RRO;
+    __tmp__BMFH=((__STRING_CONSTANT *)p__QTTF)->storage__RRO;
+    while ((! ((i__TTTF ==  0) || (((__CHARACTER *)__tmp__AMFH)[(__INTEGER)(i__TTTF -  1)] != ((__CHARACTER *)__tmp__BMFH)[(__INTEGER)(i__TTTF -  1)])))) {
+      i__TTTF=(__INTEGER)(i__TTTF -  1);
+    };
+    result__STTF=(i__TTTF ==  0);
+  };
+  return(result__STTF);
+}
+
+static void get_all_comment_slot__in__PL4E(__PROTOTYPE *Self__QL4E,void *n__RL4E,void *buf__SL4E)
 // ({PROTOTYPE},{NULLxSTRING_CONSTANT},{NULLxSTRING}) VoidRecursive, No inlinable.
 {
-  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);
+  void *ps__UL4E,*__tmp__CN4E;
+  void *p__VL4E;
+  __INTEGER i__WL4E,__tmp__FMFH;
+  void *s__TL4E,*__tmp__XO4E;
+  void *__tmp__4L4E,*__tmp__HM4E,*__tmp__GMFH,*__tmp__HMFH,*__tmp__IMFH;
+  void *__tmp__JMFH,*__tmp__BO4E,*__tmp__CO4E;
+  void *__tmp__VM4E;
+  __SECTION_ *Self__U41G;
+  void *__tmp__AN4E;
+  __BOOLEAN __tmp__BM4E,__tmp__ZM4E;
+  void **__tmp__20GH,**__tmp__30GH;
+  ps__UL4E=NULL;
+  p__VL4E=NULL;
+  i__WL4E= 0;
+  s__TL4E=fast_reference_at__05FC(Self__QL4E->slot_list__YVS,n__RL4E);
+  if (((void *)s__TL4E != (void *)NULL)) {
+    if (((struct ___OBJ *)s__TL4E)->__id==__ITM_SLOT__) {
+      __tmp__4L4E=((__ITM_SLOT *)s__TL4E)->comment__WZOB;
+    } else {
+      __tmp__4L4E=((__ITM_SLOT_OPERATOR *)s__TL4E)->parent_itm_slot__0S5B.comment__WZOB;
+    };
+    __tmp__BM4E=((void *)__tmp__4L4E != (void *)NULL);
   } else {
-    __tmp__CL4E=FALSE__;
+    __tmp__BM4E=FALSE__;
   };
-  if (__tmp__CL4E) {
-    if (((struct ___OBJ *)s__UK4E)->__id==__ITM_SLOT__) {
-      __tmp__IL4E=((__ITM_SLOT *)s__UK4E)->comment__H3OB;
+  if (__tmp__BM4E) {
+    if (((struct ___OBJ *)s__TL4E)->__id==__ITM_SLOT__) {
+      __tmp__HM4E=((__ITM_SLOT *)s__TL4E)->comment__WZOB;
     } else {
-      __tmp__IL4E=((__ITM_SLOT_OPERATOR *)s__UK4E)->parent_itm_slot__NW5B.comment__H3OB;
+      __tmp__HM4E=((__ITM_SLOT_OPERATOR *)s__TL4E)->parent_itm_slot__0S5B.comment__WZOB;
     };
-    append__ROS(buf__TK4E,__tmp__IL4E);
+    append__3OS(buf__SL4E,__tmp__HM4E);
   };
-  s__UK4E=Self__RK4E->first_slot__PHZB;
-  while_do__5OGF:
+  s__TL4E=Self__QL4E->first_slot__2DZB;
+  while_do__QQGF:
   {
-    if (((void *)s__UK4E != (void *)NULL)) {
-      if (((struct ___OBJ *)s__UK4E)->__id==__ITM_SLOT__) {
-        __tmp__WL4E=((__ITM_SLOT *)s__UK4E)->id_section__F3C;
+    if (((void *)s__TL4E != (void *)NULL)) {
+      if (((struct ___OBJ *)s__TL4E)->__id==__ITM_SLOT__) {
+        __tmp__VM4E=((__ITM_SLOT *)s__TL4E)->id_section__T3C;
       } else {
-        __tmp__WL4E=((__ITM_SLOT_OPERATOR *)s__UK4E)->parent_itm_slot__NW5B.id_section__F3C;
+        __tmp__VM4E=((__ITM_SLOT_OPERATOR *)s__TL4E)->parent_itm_slot__0S5B.id_section__T3C;
       };
-      Self__U21G=((__SECTION_ *)__tmp__WL4E);
-      __tmp__0L4E=(((void *)Self__U21G->name__11DC == (void *)(&__string_23)) || ((void *)Self__U21G->name__11DC == (void *)(&__string_24)));
+      Self__U41G=((__SECTION_ *)__tmp__VM4E);
+      __tmp__ZM4E=(((void *)Self__U41G->name__MYDC == (void *)(&__string_23)) || ((void *)Self__U41G->name__MYDC == (void *)(&__string_24)));
     } else {
-      __tmp__0L4E=FALSE__;
+      __tmp__ZM4E=FALSE__;
     };
-    if (__tmp__0L4E) {
-      if (((struct ___OBJ *)s__UK4E)->__id==__ITM_SLOT__) {
-        __tmp__BM4E=((__ITM_SLOT *)s__UK4E)->result_type__PBGC;
+    if (__tmp__ZM4E) {
+      if (((struct ___OBJ *)s__TL4E)->__id==__ITM_SLOT__) {
+        __tmp__AN4E=((__ITM_SLOT *)s__TL4E)->result_type__A4FC;
       } else {
-        __tmp__BM4E=((__ITM_SLOT_OPERATOR *)s__UK4E)->parent_itm_slot__NW5B.result_type__PBGC;
+        __tmp__AN4E=((__ITM_SLOT_OPERATOR *)s__TL4E)->parent_itm_slot__0S5B.result_type__A4FC;
       };
-      if (__tmp__BM4E==NULL) {
-        __tmp__DM4E=NULL;
+      if (__tmp__AN4E==NULL) {
+        __tmp__CN4E=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__BM4E)->__id) {
+        switch (((struct ___OBJ *)__tmp__AN4E)->__id) {
         case __ITM_TYPE_PARAMETER__: {
-          __tmp__DM4E=((void *)__tmp__BM4E);
+          __tmp__CN4E=((void *)__tmp__AN4E);
         } break;
         case __ITM_TYPE_SIMPLE__: {
-          __tmp__DM4E=((void *)__tmp__BM4E);
+          __tmp__CN4E=((void *)__tmp__AN4E);
         } break;
         case __ITM_TYPE_MULTI__: {
-          __tmp__DM4E=NULL;
+          __tmp__CN4E=NULL;
         } break;
         case __ITM_TYPE_BLOCK__: {
-          __tmp__DM4E=NULL;
+          __tmp__CN4E=NULL;
         } break;
         case __ITM_TYPE_GENERIC__: {
-          __tmp__DM4E=((void *)__tmp__BM4E);
+          __tmp__CN4E=((void *)__tmp__AN4E);
         } break;
         case __ITM_TYPE_STYLE__: {
-          __tmp__DM4E=((void *)__tmp__BM4E);
+          __tmp__CN4E=((void *)__tmp__AN4E);
         } break;
         }
       };
-      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) {
+      ps__UL4E=__tmp__CN4E;
+      if (((void *)__tmp__CN4E != (void *)NULL)) {
+        p__VL4E=NULL;
+        i__WL4E= 0;
+        __tmp__FMFH=((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.upper__HJ;
+        __tmp__GMFH=((__ITM_TYPE_PARAMETER *)__tmp__CN4E)->parent_itm_type__VFE.name__GZP;
+        __tmp__HMFH=((__ITM_TYPE_SIMPLE *)__tmp__CN4E)->name__GZP;
+        __tmp__IMFH=((__ITM_TYPE_GENERIC *)__tmp__CN4E)->parent_itm_type_style__4SN.parent_itm_type_simple__3SN.name__GZP;
+        __tmp__JMFH=((__ITM_TYPE_STYLE *)__tmp__CN4E)->parent_itm_type_simple__3SN.name__GZP;
+        __tmp__20GH=((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__DVT;
+        __tmp__30GH=((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__DVT;
+        while (((i__WL4E <= __tmp__FMFH) && ((void *)p__VL4E == (void *)NULL))) {
+          __tmp__BO4E=((__PROTOTYPE *)((void **)__tmp__20GH)[i__WL4E])->parent_named__5.name__LI;
+          switch (((struct ___OBJ *)ps__UL4E)->__id) {
           case __ITM_TYPE_PARAMETER__: {
-            __tmp__DN4E=((__ITM_TYPE_PARAMETER *)ps__VK4E)->parent_itm_type__YEE.name__0YP;
+            __tmp__CO4E=__tmp__GMFH;
           } break;
           case __ITM_TYPE_SIMPLE__: {
-            __tmp__DN4E=((__ITM_TYPE_SIMPLE *)ps__VK4E)->name__0YP;
+            __tmp__CO4E=__tmp__HMFH;
           } break;
           case __ITM_TYPE_GENERIC__: {
-            __tmp__DN4E=((__ITM_TYPE_GENERIC *)ps__VK4E)->parent_itm_type_style__SSN.parent_itm_type_simple__RSN.name__0YP;
+            __tmp__CO4E=__tmp__IMFH;
           } break;
           case __ITM_TYPE_STYLE__: {
-            __tmp__DN4E=((__ITM_TYPE_STYLE *)ps__VK4E)->parent_itm_type_simple__RSN.name__0YP;
+            __tmp__CO4E=__tmp__JMFH;
           } break;
           };
-          if (((void *)__tmp__CN4E == (void *)__tmp__DN4E)) {
-            p__WK4E=((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__XVT)[i__XK4E];
+          if (((void *)__tmp__BO4E == (void *)__tmp__CO4E)) {
+            p__VL4E=((void **)__tmp__30GH)[i__WL4E];
           };
-          i__XK4E=(__INTEGER)(i__XK4E +  1);
+          i__WL4E=(__INTEGER)(i__WL4E +  1);
         };
-        if (((void *)p__WK4E != (void *)NULL)) {
-          get_all_comment_slot__in__QK4E(p__WK4E,n__SK4E,buf__TK4E);
+        if (((void *)p__VL4E != (void *)NULL)) {
+          get_all_comment_slot__in__PL4E(p__VL4E,n__RL4E,buf__SL4E);
         };
       };
-      if (((struct ___OBJ *)s__UK4E)->__id==__ITM_SLOT__) {
-        __tmp__YN4E=((__ITM_SLOT *)s__UK4E)->next__HKHC;
+      if (((struct ___OBJ *)s__TL4E)->__id==__ITM_SLOT__) {
+        __tmp__XO4E=((__ITM_SLOT *)s__TL4E)->next__YGHC;
       } else {
-        __tmp__YN4E=((__ITM_SLOT_OPERATOR *)s__UK4E)->parent_itm_slot__NW5B.next__HKHC;
+        __tmp__XO4E=((__ITM_SLOT_OPERATOR *)s__TL4E)->parent_itm_slot__0S5B.next__YGHC;
       };
-      s__UK4E=__tmp__YN4E;
-      goto while_do__5OGF;
+      s__TL4E=__tmp__XO4E;
+      goto while_do__QQGF;
     };
   };
 }
 
-static void shorter_comment__in__light__DO4E(void *str__FO4E,void *buf__GO4E,__BOOLEAN is_light__HO4E)
+static void shorter_comment__in__light__CP4E(void *str__EP4E,void *buf__FP4E,__BOOLEAN is_light__GP4E)
 // ({NULLxSTRING},{NULLxSTRING},{TRUExFALSE}) VoidNo recursive, No inlinable.
 {
-  __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__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]=' ';
+  __INTEGER stat__IP4E,old_stat__JP4E,i__LP4E,cur__HP4E,__tmp__5P4E;
+  __INTEGER new_capacity__RUHH,old_nb_elts__UUHH,upper__KMJH,Self__IMJH;
+  __INTEGER new_capacity__XUHH,old_nb_elts__0UHH,upper__PMJH,Self__NMJH;
+  __INTEGER new_capacity__3UHH,old_nb_elts__AVHH,upper__UMJH,Self__SMJH;
+  __INTEGER new_capacity__DVHH,old_nb_elts__GVHH,upper__ZMJH,Self__XMJH;
+  __INTEGER new_capacity__JVHH,old_nb_elts__MVHH,upper__4MJH,Self__2MJH;
+  __INTEGER new_capacity__PVHH,old_nb_elts__SVHH,upper__DNJH,Self__BNJH;
+  void *code_balise__NP4E;
+  __STRING *Self__SUHH,*Self__YUHH,*Self__4UHH,*Self__EVHH,*Self__A1GH;
+  __STRING *Self__NCSE,*Self__KVHH,*Self__QVHH;
+  void *__tmp__UV4E;
+  __CHARACTER car__KP4E,result__40GH,result__3W2F,Self__PGOB;
+  __CHARACTER result__RGOB;
+  __BOOLEAN __tmp__GR4E,__tmp__LS4E,__tmp__DT4E,__tmp__0S4E;
+  __BOOLEAN result__QCSE,__tmp__3V4E,__tmp__3X4E;
+  __CHARACTER *Self__TUHH,*new__VUHH,*Self__ZUHH,*new__1UHH,*Self__5UHH;
+  __CHARACTER *new__BVHH,*Self__FVHH,*new__HVHH,*Self__LVHH,*new__NVHH;
+  __CHARACTER *Self__RVHH,*new__TVHH;
+  stat__IP4E= 0;
+  old_stat__JP4E= 0;
+  car__KP4E='\0';
+  i__LP4E= 0;
+  cur__HP4E= 1;
+  ((__STRING *)str_tmp__PP4E)->count__SGC= 0;
+  code_balise__NP4E=(&__string_128);
+  while ((cur__HP4E <= ((__STRING *)str__EP4E)->count__SGC)) {
+    car__KP4E=((__CHARACTER *)((__STRING *)str__EP4E)->storage__3CS)[(__INTEGER)(cur__HP4E -  1)];
+    __tmp__5P4E=stat__IP4E;
+    if ((stat__IP4E ==  0)) {
+      if ((car__KP4E == '*')) {
+        if ((((__STRING *)str_tmp__PP4E)->count__SGC >  1)) {
+          if (is_light__GP4E) {
+            append__3OS(buf__FP4E,str_tmp__PP4E);
+            cur__HP4E=(__INTEGER)(((__STRING *)str__EP4E)->count__SGC +  1);
+          } else {
+            put__to__like__X4XD((&__string_247),buf__FP4E,(&__string_148));
+            put__to__like__X4XD(str_tmp__PP4E,buf__FP4E,code_balise__NP4E);
+          };
+        };
+        ((__STRING *)str_tmp__PP4E)->count__SGC= 0;
+        stat__IP4E= 1;
+        __tmp__GR4E=TRUE__;
+      } else {
+        __tmp__GR4E=FALSE__;
+      };
+      if ((! __tmp__GR4E)) {
+        if ((car__KP4E == '`')) {
+          old_stat__JP4E=stat__IP4E;
+          stat__IP4E= 2;
+          ((__STRING *)str_tmp2__RR4E)->count__SGC= 0;
+        } else {
+          Self__SUHH=((__STRING *)str_tmp__PP4E);
+          new_capacity__RUHH= 0;
+          if ((Self__SUHH->capacity__UCS <= Self__SUHH->count__SGC)) {
+            if ((Self__SUHH->capacity__UCS ==  0)) {
+              Self__SUHH->capacity__UCS= 32;
+              Self__SUHH->storage__3CS=create__YIEB( 32);
+            } else {
+              new_capacity__RUHH=(__INTEGER)(Self__SUHH->capacity__UCS <<  1);
+              Self__TUHH=((__CHARACTER *)Self__SUHH->storage__3CS);
+              old_nb_elts__UUHH=Self__SUHH->capacity__UCS;
+              new__VUHH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__TUHH),((__UINTEGER_32 )old_nb_elts__UUHH),((__UINTEGER_32 )new_capacity__RUHH)));
+              upper__KMJH=(__INTEGER)(new_capacity__RUHH -  1);
+              Self__IMJH=old_nb_elts__UUHH;
+              while ((Self__IMJH <= upper__KMJH)) {
+                new__VUHH[Self__IMJH]='\0';
+                Self__IMJH=(__INTEGER)(Self__IMJH +  1);
+              };
+              Self__SUHH->storage__3CS=new__VUHH;
+              Self__SUHH->capacity__UCS=new_capacity__RUHH;
+            };
+          };
+          ((__CHARACTER *)Self__SUHH->storage__3CS)[Self__SUHH->count__SGC]=car__KP4E;
+          Self__SUHH->count__SGC=(__INTEGER)(Self__SUHH->count__SGC +  1);
+        };
+      };
+    };
+    if ((__tmp__5P4E ==  1)) {
+      result__40GH='\0';
+      if (((((__INTEGER_8 )car__KP4E) <  65) || (((__INTEGER_8 )car__KP4E) >  90))) {
+        result__40GH=car__KP4E;
+      } else {
+        result__40GH=((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )car__KP4E) +  32))));
+      };
+      if (((((__INTEGER_8 )result__40GH) >= ((__INTEGER_8 )'a')) && (((__INTEGER_8 )result__40GH) <= ((__INTEGER_8 )'z')))) {
+        result__3W2F='\0';
+        if (((((__INTEGER_8 )car__KP4E) <  65) || (((__INTEGER_8 )car__KP4E) >  90))) {
+          result__3W2F=car__KP4E;
+        } else {
+          result__3W2F=((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )car__KP4E) +  32))));
+        };
+        Self__YUHH=((__STRING *)str_tmp__PP4E);
+        new_capacity__XUHH= 0;
+        if ((Self__YUHH->capacity__UCS <= Self__YUHH->count__SGC)) {
+          if ((Self__YUHH->capacity__UCS ==  0)) {
+            Self__YUHH->capacity__UCS= 32;
+            Self__YUHH->storage__3CS=create__YIEB( 32);
+          } else {
+            new_capacity__XUHH=(__INTEGER)(Self__YUHH->capacity__UCS <<  1);
+            Self__ZUHH=((__CHARACTER *)Self__YUHH->storage__3CS);
+            old_nb_elts__0UHH=Self__YUHH->capacity__UCS;
+            new__1UHH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__ZUHH),((__UINTEGER_32 )old_nb_elts__0UHH),((__UINTEGER_32 )new_capacity__XUHH)));
+            upper__PMJH=(__INTEGER)(new_capacity__XUHH -  1);
+            Self__NMJH=old_nb_elts__0UHH;
+            while ((Self__NMJH <= upper__PMJH)) {
+              new__1UHH[Self__NMJH]='\0';
+              Self__NMJH=(__INTEGER)(Self__NMJH +  1);
+            };
+            Self__YUHH->storage__3CS=new__1UHH;
+            Self__YUHH->capacity__UCS=new_capacity__XUHH;
+          };
+        };
+        ((__CHARACTER *)Self__YUHH->storage__3CS)[Self__YUHH->count__SGC]=result__3W2F;
+        Self__YUHH->count__SGC=(__INTEGER)(Self__YUHH->count__SGC +  1);
+        __tmp__LS4E=TRUE__;
+      } else {
+        __tmp__LS4E=FALSE__;
+      };
+      if (__tmp__LS4E) {
+        __tmp__DT4E=TRUE__;
+      } else {
+        __tmp__0S4E=((car__KP4E == ' ') && (((__STRING *)str_tmp__PP4E)->count__SGC !=  0));
+        if (__tmp__0S4E) {
+          Self__4UHH=((__STRING *)str_tmp__PP4E);
+          new_capacity__3UHH= 0;
+          if ((Self__4UHH->capacity__UCS <= Self__4UHH->count__SGC)) {
+            if ((Self__4UHH->capacity__UCS ==  0)) {
+              Self__4UHH->capacity__UCS= 32;
+              Self__4UHH->storage__3CS=create__YIEB( 32);
+            } else {
+              new_capacity__3UHH=(__INTEGER)(Self__4UHH->capacity__UCS <<  1);
+              Self__5UHH=((__CHARACTER *)Self__4UHH->storage__3CS);
+              old_nb_elts__AVHH=Self__4UHH->capacity__UCS;
+              new__BVHH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__5UHH),((__UINTEGER_32 )old_nb_elts__AVHH),((__UINTEGER_32 )new_capacity__3UHH)));
+              upper__UMJH=(__INTEGER)(new_capacity__3UHH -  1);
+              Self__SMJH=old_nb_elts__AVHH;
+              while ((Self__SMJH <= upper__UMJH)) {
+                new__BVHH[Self__SMJH]='\0';
+                Self__SMJH=(__INTEGER)(Self__SMJH +  1);
+              };
+              Self__4UHH->storage__3CS=new__BVHH;
+              Self__4UHH->capacity__UCS=new_capacity__3UHH;
+            };
+          };
+          ((__CHARACTER *)Self__4UHH->storage__3CS)[Self__4UHH->count__SGC]='_';
+          Self__4UHH->count__SGC=(__INTEGER)(Self__4UHH->count__SGC +  1);
+        };
+        __tmp__DT4E=__tmp__0S4E;
+      };
+      if ((! __tmp__DT4E)) {
+        if ((car__KP4E == ':')) {
+          if ((((__STRING *)str_tmp__PP4E)->count__SGC !=  0)) {
+            code_balise__NP4E=get__YWB(str_tmp__PP4E);
+            if (((void *)fast_reference_at__CMNE(short_dico__QD,code_balise__NP4E) == (void *)NULL)) {
+              code_balise__NP4E=NULL;
+            } else {
+              replace_all__with__CRS(str_tmp__PP4E,'_',' ');
+              Self__EVHH=((__STRING *)str_tmp__PP4E);
+              new_capacity__DVHH= 0;
+              if ((Self__EVHH->capacity__UCS <= Self__EVHH->count__SGC)) {
+                if ((Self__EVHH->capacity__UCS ==  0)) {
+                  Self__EVHH->capacity__UCS= 32;
+                  Self__EVHH->storage__3CS=create__YIEB( 32);
+                } else {
+                  new_capacity__DVHH=(__INTEGER)(Self__EVHH->capacity__UCS <<  1);
+                  Self__FVHH=((__CHARACTER *)Self__EVHH->storage__3CS);
+                  old_nb_elts__GVHH=Self__EVHH->capacity__UCS;
+                  new__HVHH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__FVHH),((__UINTEGER_32 )old_nb_elts__GVHH),((__UINTEGER_32 )new_capacity__DVHH)));
+                  upper__ZMJH=(__INTEGER)(new_capacity__DVHH -  1);
+                  Self__XMJH=old_nb_elts__GVHH;
+                  while ((Self__XMJH <= upper__ZMJH)) {
+                    new__HVHH[Self__XMJH]='\0';
+                    Self__XMJH=(__INTEGER)(Self__XMJH +  1);
+                  };
+                  Self__EVHH->storage__3CS=new__HVHH;
+                  Self__EVHH->capacity__UCS=new_capacity__DVHH;
                 };
-                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;
+              };
+              ((__CHARACTER *)Self__EVHH->storage__3CS)[Self__EVHH->count__SGC]=':';
+              Self__EVHH->count__SGC=(__INTEGER)(Self__EVHH->count__SGC +  1);
+              Self__A1GH=((__STRING *)str_tmp__PP4E);
+              Self__PGOB=((__CHARACTER *)((__STRING *)str_tmp__PP4E)->storage__3CS)[ 0];
+              result__RGOB='\0';
+              if (((((__INTEGER_8 )Self__PGOB) <  97) || (((__INTEGER_8 )Self__PGOB) >  122))) {
+                result__RGOB=Self__PGOB;
               } else {
-                result__CKOB=((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )Self__AKOB) -  32))));
+                result__RGOB=((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )Self__PGOB) -  32))));
               };
-              ((__CHARACTER *)Self__I2FH->storage__RCS)[ 0]=result__CKOB;
-              put__to__like__Q3XD(str_tmp__QO4E,buf__GO4E,(&__string_148));
+              ((__CHARACTER *)Self__A1GH->storage__3CS)[ 0]=result__RGOB;
+              put__to__like__X4XD(str_tmp__PP4E,buf__FP4E,(&__string_148));
             };
           };
-          ((__STRING *)str_tmp__QO4E)->count__EGC= 0;
-          stat__JO4E= 3;
+          ((__STRING *)str_tmp__PP4E)->count__SGC= 0;
+          stat__IP4E= 3;
         };
       };
     };
-    if ((__tmp__AP4E ==  2)) {
-      if ((car__LO4E == '\'')) {
-        if (((void *)code_balise__OO4E != (void *)NULL)) {
-          i__MO4E= 0;
-          while_do__N03F:
+    if ((__tmp__5P4E ==  2)) {
+      if ((car__KP4E == '\'')) {
+        if (((void *)code_balise__NP4E != (void *)NULL)) {
+          i__LP4E= 0;
+          while_do__H23F:
           {
-            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);
+            if ((i__LP4E <= ((__FAST_ARRAYoITM_SLOTo *)list_tmp__YNTD)->parent_arrayed_collection__XNTD.upper__UOTD)) {
+              ((__STRING *)str_tmp3__RV4E)->count__SGC= 0;
+              __tmp__UV4E=((void **)((__FAST_ARRAYoITM_SLOTo *)list_tmp__YNTD)->parent_arrayed_collection__XNTD.storage__UPWE)[i__LP4E];
+              if (((struct ___OBJ *)__tmp__UV4E)->__id==__ITM_SLOT__) {
+                pretty_name_in__FY4F(__tmp__UV4E,str_tmp3__RV4E);
               } else {
-                pretty_name_in__AY4F(__tmp__VU4E,str_tmp3__SU4E);
+                pretty_name_in__0Z4F(__tmp__UV4E,str_tmp3__RV4E);
               };
-              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__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__1BSE=(i__N2YB <  0);
-                };
+              Self__NCSE=((__STRING *)str_tmp3__RV4E);
+              result__QCSE=FALSE__;
+              if ((Self__NCSE->count__SGC == ((__STRING *)str_tmp2__RR4E)->count__SGC)) {
+                result__QCSE=((Self__NCSE->count__SGC ==  0) || fast_memcmp__until__FYYB(Self__NCSE->storage__3CS,((__STRING *)str_tmp2__RR4E)->storage__3CS,Self__NCSE->count__SGC));
               };
-              __tmp__4U4E=(! result__1BSE);
+              __tmp__3V4E=(! result__QCSE);
             } else {
-              __tmp__4U4E=FALSE__;
+              __tmp__3V4E=FALSE__;
             };
-            if (__tmp__4U4E) {
-              i__MO4E=(__INTEGER)(i__MO4E +  1);
-              goto while_do__N03F;
+            if (__tmp__3V4E) {
+              i__LP4E=(__INTEGER)(i__LP4E +  1);
+              goto while_do__H23F;
             };
           };
-          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));
+          if ((i__LP4E <= ((__FAST_ARRAYoITM_SLOTo *)list_tmp__YNTD)->parent_arrayed_collection__XNTD.upper__UOTD)) {
+            put__to__like__X4XD(str_tmp2__RR4E,str_tmp__PP4E,(&__string_137));
           } else {
-            put__to__like__Q3XD(str_tmp2__SQ4E,str_tmp__QO4E,(&__string_136));
+            put__to__like__X4XD(str_tmp2__RR4E,str_tmp__PP4E,(&__string_136));
           };
         };
-        stat__JO4E=old_stat__KO4E;
+        stat__IP4E=old_stat__JP4E;
       } else {
-        add_last__GOT(str_tmp2__SQ4E,car__LO4E);
+        Self__KVHH=((__STRING *)str_tmp2__RR4E);
+        new_capacity__JVHH= 0;
+        if ((Self__KVHH->capacity__UCS <= Self__KVHH->count__SGC)) {
+          if ((Self__KVHH->capacity__UCS ==  0)) {
+            Self__KVHH->capacity__UCS= 32;
+            Self__KVHH->storage__3CS=create__YIEB( 32);
+          } else {
+            new_capacity__JVHH=(__INTEGER)(Self__KVHH->capacity__UCS <<  1);
+            Self__LVHH=((__CHARACTER *)Self__KVHH->storage__3CS);
+            old_nb_elts__MVHH=Self__KVHH->capacity__UCS;
+            new__NVHH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__LVHH),((__UINTEGER_32 )old_nb_elts__MVHH),((__UINTEGER_32 )new_capacity__JVHH)));
+            upper__4MJH=(__INTEGER)(new_capacity__JVHH -  1);
+            Self__2MJH=old_nb_elts__MVHH;
+            while ((Self__2MJH <= upper__4MJH)) {
+              new__NVHH[Self__2MJH]='\0';
+              Self__2MJH=(__INTEGER)(Self__2MJH +  1);
+            };
+            Self__KVHH->storage__3CS=new__NVHH;
+            Self__KVHH->capacity__UCS=new_capacity__JVHH;
+          };
+        };
+        ((__CHARACTER *)Self__KVHH->storage__3CS)[Self__KVHH->count__SGC]=car__KP4E;
+        Self__KVHH->count__SGC=(__INTEGER)(Self__KVHH->count__SGC +  1);
       };
     };
-    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);
+    if ((__tmp__5P4E ==  3)) {
+      if ((car__KP4E == '*')) {
+        if ((((__STRING *)str_tmp__PP4E)->count__SGC >  1)) {
+          put__to__like__X4XD(str_tmp__PP4E,buf__FP4E,code_balise__NP4E);
         };
-        ((__STRING *)str_tmp__QO4E)->count__EGC= 0;
-        stat__JO4E= 1;
-        __tmp__4W4E=TRUE__;
+        ((__STRING *)str_tmp__PP4E)->count__SGC= 0;
+        stat__IP4E= 1;
+        __tmp__3X4E=TRUE__;
       } else {
-        __tmp__4W4E=FALSE__;
+        __tmp__3X4E=FALSE__;
       };
-      if ((! __tmp__4W4E)) {
-        if ((car__LO4E == '`')) {
-          old_stat__KO4E=stat__JO4E;
-          stat__JO4E= 2;
-          ((__STRING *)str_tmp2__SQ4E)->count__EGC= 0;
+      if ((! __tmp__3X4E)) {
+        if ((car__KP4E == '`')) {
+          old_stat__JP4E=stat__IP4E;
+          stat__IP4E= 2;
+          ((__STRING *)str_tmp2__RR4E)->count__SGC= 0;
         } else {
-          add_last__GOT(str_tmp__QO4E,car__LO4E);
+          Self__QVHH=((__STRING *)str_tmp__PP4E);
+          new_capacity__PVHH= 0;
+          if ((Self__QVHH->capacity__UCS <= Self__QVHH->count__SGC)) {
+            if ((Self__QVHH->capacity__UCS ==  0)) {
+              Self__QVHH->capacity__UCS= 32;
+              Self__QVHH->storage__3CS=create__YIEB( 32);
+            } else {
+              new_capacity__PVHH=(__INTEGER)(Self__QVHH->capacity__UCS <<  1);
+              Self__RVHH=((__CHARACTER *)Self__QVHH->storage__3CS);
+              old_nb_elts__SVHH=Self__QVHH->capacity__UCS;
+              new__TVHH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__RVHH),((__UINTEGER_32 )old_nb_elts__SVHH),((__UINTEGER_32 )new_capacity__PVHH)));
+              upper__DNJH=(__INTEGER)(new_capacity__PVHH -  1);
+              Self__BNJH=old_nb_elts__SVHH;
+              while ((Self__BNJH <= upper__DNJH)) {
+                new__TVHH[Self__BNJH]='\0';
+                Self__BNJH=(__INTEGER)(Self__BNJH +  1);
+              };
+              Self__QVHH->storage__3CS=new__TVHH;
+              Self__QVHH->capacity__UCS=new_capacity__PVHH;
+            };
+          };
+          ((__CHARACTER *)Self__QVHH->storage__3CS)[Self__QVHH->count__SGC]=car__KP4E;
+          Self__QVHH->count__SGC=(__INTEGER)(Self__QVHH->count__SGC +  1);
         };
       };
     };
-    cur__IO4E=(__INTEGER)(cur__IO4E +  1);
+    cur__HP4E=(__INTEGER)(cur__HP4E +  1);
   };
-  if ((((__STRING *)str_tmp__QO4E)->count__EGC >  1)) {
-    if (is_light__HO4E) {
-      append__ROS(buf__GO4E,str_tmp__QO4E);
+  if ((((__STRING *)str_tmp__PP4E)->count__SGC >  1)) {
+    if (is_light__GP4E) {
+      append__3OS(buf__FP4E,str_tmp__PP4E);
     } else {
-      if ((stat__JO4E ==  0)) {
-        put__to__like__Q3XD((&__string_248),buf__GO4E,(&__string_148));
+      if ((stat__IP4E ==  0)) {
+        put__to__like__X4XD((&__string_247),buf__FP4E,(&__string_148));
       };
-      put__to__like__Q3XD(str_tmp__QO4E,buf__GO4E,code_balise__OO4E);
+      put__to__like__X4XD(str_tmp__PP4E,buf__FP4E,code_balise__NP4E);
     };
   };
 }
 
-static void append_in__RKH(__UINTEGER_32 Self__SKH,void *buffer__TKH)
+static void append_in__5KH(__UINTEGER_32 Self__ALH,void *buffer__BLH)
 // ({UINTEGER_32},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __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');
+  __UINTEGER_32 val__CLH;
+  __INTEGER i__FLH,j__GLH,new_capacity__VVHH,old_nb_elts__YVHH;
+  __INTEGER upper__INJH,Self__GNJH,new_capacity__1VHH,old_nb_elts__4VHH;
+  __INTEGER upper__NNJH,Self__LNJH;
+  __STRING *Self__WVHH,*Self__2VHH,*Self__F1GH;
+  __CHARACTER *Self__XVHH,*new__ZVHH,*Self__3VHH,*new__5VHH;
+  __CHARACTER ch__AWHH,tmp__H1GH;
+  val__CLH= 0;
+  i__FLH= 0;
+  j__GLH= 0;
+  if ((Self__ALH ==  0)) {
+    Self__WVHH=((__STRING *)buffer__BLH);
+    new_capacity__VVHH= 0;
+    if ((Self__WVHH->capacity__UCS <= Self__WVHH->count__SGC)) {
+      if ((Self__WVHH->capacity__UCS ==  0)) {
+        Self__WVHH->capacity__UCS= 32;
+        Self__WVHH->storage__3CS=create__YIEB( 32);
+      } else {
+        new_capacity__VVHH=(__INTEGER)(Self__WVHH->capacity__UCS <<  1);
+        Self__XVHH=((__CHARACTER *)Self__WVHH->storage__3CS);
+        old_nb_elts__YVHH=Self__WVHH->capacity__UCS;
+        new__ZVHH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__XVHH),((__UINTEGER_32 )old_nb_elts__YVHH),((__UINTEGER_32 )new_capacity__VVHH)));
+        upper__INJH=(__INTEGER)(new_capacity__VVHH -  1);
+        Self__GNJH=old_nb_elts__YVHH;
+        while ((Self__GNJH <= upper__INJH)) {
+          new__ZVHH[Self__GNJH]='\0';
+          Self__GNJH=(__INTEGER)(Self__GNJH +  1);
+        };
+        Self__WVHH->storage__3CS=new__ZVHH;
+        Self__WVHH->capacity__UCS=new_capacity__VVHH;
+      };
+    };
+    ((__CHARACTER *)Self__WVHH->storage__3CS)[Self__WVHH->count__SGC]='0';
+    Self__WVHH->count__SGC=(__INTEGER)(Self__WVHH->count__SGC +  1);
   } else {
-    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);
+    i__FLH=(__INTEGER)(((__STRING *)buffer__BLH)->count__SGC +  1);
+    val__CLH=Self__ALH;
+    while ((val__CLH !=  0)) {
+      Self__2VHH=((__STRING *)buffer__BLH);
+      ch__AWHH=((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )(__UINTEGER_32)(val__CLH %  10)) + ((__INTEGER_8 )'0')))));
+      new_capacity__1VHH= 0;
+      if ((Self__2VHH->capacity__UCS <= Self__2VHH->count__SGC)) {
+        if ((Self__2VHH->capacity__UCS ==  0)) {
+          Self__2VHH->capacity__UCS= 32;
+          Self__2VHH->storage__3CS=create__YIEB( 32);
+        } else {
+          new_capacity__1VHH=(__INTEGER)(Self__2VHH->capacity__UCS <<  1);
+          Self__3VHH=((__CHARACTER *)Self__2VHH->storage__3CS);
+          old_nb_elts__4VHH=Self__2VHH->capacity__UCS;
+          new__5VHH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__3VHH),((__UINTEGER_32 )old_nb_elts__4VHH),((__UINTEGER_32 )new_capacity__1VHH)));
+          upper__NNJH=(__INTEGER)(new_capacity__1VHH -  1);
+          Self__LNJH=old_nb_elts__4VHH;
+          while ((Self__LNJH <= upper__NNJH)) {
+            new__5VHH[Self__LNJH]='\0';
+            Self__LNJH=(__INTEGER)(Self__LNJH +  1);
+          };
+          Self__2VHH->storage__3CS=new__5VHH;
+          Self__2VHH->capacity__UCS=new_capacity__1VHH;
+        };
+      };
+      ((__CHARACTER *)Self__2VHH->storage__3CS)[Self__2VHH->count__SGC]=ch__AWHH;
+      Self__2VHH->count__SGC=(__INTEGER)(Self__2VHH->count__SGC +  1);
+      val__CLH=(__UINTEGER_32)(val__CLH /  10);
+    };
+    j__GLH=((__STRING *)buffer__BLH)->count__SGC;
+    while ((i__FLH < j__GLH)) {
+      Self__F1GH=((__STRING *)buffer__BLH);
+      tmp__H1GH=((__CHARACTER *)Self__F1GH->storage__3CS)[(__INTEGER)(i__FLH -  1)];
+      ((__CHARACTER *)Self__F1GH->storage__3CS)[(__INTEGER)(i__FLH -  1)]=((__CHARACTER *)Self__F1GH->storage__3CS)[(__INTEGER)(j__GLH -  1)];
+      ((__CHARACTER *)Self__F1GH->storage__3CS)[(__INTEGER)(j__GLH -  1)]=tmp__H1GH;
+      j__GLH=(__INTEGER)(j__GLH -  1);
+      i__FLH=(__INTEGER)(i__FLH +  1);
     };
   };
 }
 
-static void append_in__YZ4F(__SECTION_ *Self__ZZ4F,void *buf__0Z4F)
+static void append_in__S14F(__SECTION_ *Self__T14F,void *buf__U14F)
 // ({SECTION_},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER __tmp__H24F,Self__XSDG,new_capacity__DWHH,old_nb_elts__GWHH;
+  __INTEGER upper__SNJH,Self__QNJH,new_capacity__JWHH,old_nb_elts__MWHH;
+  __INTEGER upper__XNJH,Self__VNJH,new_capacity__PWHH,old_nb_elts__SWHH;
+  __INTEGER upper__2NJH,Self__0NJH,new_capacity__XWHH,old_nb_elts__0WHH;
+  __INTEGER upper__BOJH,Self__5NJH;
+  void *__tmp__O24F,*__tmp__R24F;
+  __ITM_TYPE_STYLE *Self__CWHH,*Self__WWHH;
+  __STRING *Self__EWHH,*Self__KWHH,*Self__QWHH,*Self__YWHH;
+  __CHARACTER *Self__FWHH,*new__HWHH,*Self__LWHH,*new__NWHH,*Self__RWHH;
+  __CHARACTER *new__TWHH,*Self__ZWHH,*new__1WHH;
+  __FAST_ARRAYoITM_TYPE_MONOo *Self__P1GH;
+  if (((void *)Self__T14F->name__MYDC != (void *)NULL)) {
+    append__3OS(buf__U14F,Self__T14F->name__MYDC);
   } else {
-    __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) {
+    __tmp__H24F=(__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)Self__T14F->type_list__1WFC)->parent_arrayed_collection__SYC.upper__4HV -  1);
+    Self__XSDG= 0;
+    while ((Self__XSDG <= __tmp__H24F)) {
+      __tmp__O24F=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)Self__T14F->type_list__1WFC)->parent_arrayed_collection__SYC.storage__FMV)[Self__XSDG];
+      switch (((struct ___OBJ *)__tmp__O24F)->__id) {
       case __ITM_TYPE_PARAMETER__: {
-        append__ROS(buf__0Z4F,((__ITM_TYPE_PARAMETER *)__tmp__U04F)->parent_itm_type__YEE.name__0YP);
+        append__3OS(buf__U14F,((__ITM_TYPE_PARAMETER *)__tmp__O24F)->parent_itm_type__VFE.name__GZP);
       } break;
       case __ITM_TYPE_SIMPLE__: {
-        append__ROS(buf__0Z4F,((__ITM_TYPE_SIMPLE *)__tmp__U04F)->name__0YP);
+        append__3OS(buf__U14F,((__ITM_TYPE_SIMPLE *)__tmp__O24F)->name__GZP);
       } break;
       case __ITM_TYPE_BLOCK__: {
-        append_in__IIPD(__tmp__U04F,buf__0Z4F);
+        append_in__PJPD(__tmp__O24F,buf__U14F);
       } break;
       case __ITM_TYPE_GENERIC__: {
-        append_in__MJPD(__tmp__U04F,buf__0Z4F);
+        append_in__TKPD(__tmp__O24F,buf__U14F);
       } break;
       case __ITM_TYPE_STYLE__: {
-        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,' ');
+        Self__CWHH=((__ITM_TYPE_STYLE *)__tmp__O24F);
+        if (((void *)Self__CWHH->style__PZP != (void *)NULL)) {
+          append__3OS(buf__U14F,Self__CWHH->style__PZP);
+          Self__EWHH=((__STRING *)buf__U14F);
+          new_capacity__DWHH= 0;
+          if ((Self__EWHH->capacity__UCS <= Self__EWHH->count__SGC)) {
+            if ((Self__EWHH->capacity__UCS ==  0)) {
+              Self__EWHH->capacity__UCS= 32;
+              Self__EWHH->storage__3CS=create__YIEB( 32);
+            } else {
+              new_capacity__DWHH=(__INTEGER)(Self__EWHH->capacity__UCS <<  1);
+              Self__FWHH=((__CHARACTER *)Self__EWHH->storage__3CS);
+              old_nb_elts__GWHH=Self__EWHH->capacity__UCS;
+              new__HWHH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__FWHH),((__UINTEGER_32 )old_nb_elts__GWHH),((__UINTEGER_32 )new_capacity__DWHH)));
+              upper__SNJH=(__INTEGER)(new_capacity__DWHH -  1);
+              Self__QNJH=old_nb_elts__GWHH;
+              while ((Self__QNJH <= upper__SNJH)) {
+                new__HWHH[Self__QNJH]='\0';
+                Self__QNJH=(__INTEGER)(Self__QNJH +  1);
+              };
+              Self__EWHH->storage__3CS=new__HWHH;
+              Self__EWHH->capacity__UCS=new_capacity__DWHH;
+            };
+          };
+          ((__CHARACTER *)Self__EWHH->storage__3CS)[Self__EWHH->count__SGC]=' ';
+          Self__EWHH->count__SGC=(__INTEGER)(Self__EWHH->count__SGC +  1);
         };
-        append__ROS(buf__0Z4F,Self__Q2FH->parent_itm_type_simple__RSN.name__0YP);
+        append__3OS(buf__U14F,Self__CWHH->parent_itm_type_simple__3SN.name__GZP);
       } break;
       };
-      add_last__GOT(buf__0Z4F,',');
-      add_last__GOT(buf__0Z4F,' ');
-      Self__3QDG=(__INTEGER)(Self__3QDG +  1);
-    };
-    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) {
+      Self__KWHH=((__STRING *)buf__U14F);
+      new_capacity__JWHH= 0;
+      if ((Self__KWHH->capacity__UCS <= Self__KWHH->count__SGC)) {
+        if ((Self__KWHH->capacity__UCS ==  0)) {
+          Self__KWHH->capacity__UCS= 32;
+          Self__KWHH->storage__3CS=create__YIEB( 32);
+        } else {
+          new_capacity__JWHH=(__INTEGER)(Self__KWHH->capacity__UCS <<  1);
+          Self__LWHH=((__CHARACTER *)Self__KWHH->storage__3CS);
+          old_nb_elts__MWHH=Self__KWHH->capacity__UCS;
+          new__NWHH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__LWHH),((__UINTEGER_32 )old_nb_elts__MWHH),((__UINTEGER_32 )new_capacity__JWHH)));
+          upper__XNJH=(__INTEGER)(new_capacity__JWHH -  1);
+          Self__VNJH=old_nb_elts__MWHH;
+          while ((Self__VNJH <= upper__XNJH)) {
+            new__NWHH[Self__VNJH]='\0';
+            Self__VNJH=(__INTEGER)(Self__VNJH +  1);
+          };
+          Self__KWHH->storage__3CS=new__NWHH;
+          Self__KWHH->capacity__UCS=new_capacity__JWHH;
+        };
+      };
+      ((__CHARACTER *)Self__KWHH->storage__3CS)[Self__KWHH->count__SGC]=',';
+      Self__KWHH->count__SGC=(__INTEGER)(Self__KWHH->count__SGC +  1);
+      Self__QWHH=((__STRING *)buf__U14F);
+      new_capacity__PWHH= 0;
+      if ((Self__QWHH->capacity__UCS <= Self__QWHH->count__SGC)) {
+        if ((Self__QWHH->capacity__UCS ==  0)) {
+          Self__QWHH->capacity__UCS= 32;
+          Self__QWHH->storage__3CS=create__YIEB( 32);
+        } else {
+          new_capacity__PWHH=(__INTEGER)(Self__QWHH->capacity__UCS <<  1);
+          Self__RWHH=((__CHARACTER *)Self__QWHH->storage__3CS);
+          old_nb_elts__SWHH=Self__QWHH->capacity__UCS;
+          new__TWHH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__RWHH),((__UINTEGER_32 )old_nb_elts__SWHH),((__UINTEGER_32 )new_capacity__PWHH)));
+          upper__2NJH=(__INTEGER)(new_capacity__PWHH -  1);
+          Self__0NJH=old_nb_elts__SWHH;
+          while ((Self__0NJH <= upper__2NJH)) {
+            new__TWHH[Self__0NJH]='\0';
+            Self__0NJH=(__INTEGER)(Self__0NJH +  1);
+          };
+          Self__QWHH->storage__3CS=new__TWHH;
+          Self__QWHH->capacity__UCS=new_capacity__PWHH;
+        };
+      };
+      ((__CHARACTER *)Self__QWHH->storage__3CS)[Self__QWHH->count__SGC]=' ';
+      Self__QWHH->count__SGC=(__INTEGER)(Self__QWHH->count__SGC +  1);
+      Self__XSDG=(__INTEGER)(Self__XSDG +  1);
+    };
+    Self__P1GH=((__FAST_ARRAYoITM_TYPE_MONOo *)Self__T14F->type_list__1WFC);
+    __tmp__R24F=((void **)Self__P1GH->parent_arrayed_collection__SYC.storage__FMV)[Self__P1GH->parent_arrayed_collection__SYC.upper__4HV];
+    switch (((struct ___OBJ *)__tmp__R24F)->__id) {
     case __ITM_TYPE_PARAMETER__: {
-      append__ROS(buf__0Z4F,((__ITM_TYPE_PARAMETER *)__tmp__X04F)->parent_itm_type__YEE.name__0YP);
+      append__3OS(buf__U14F,((__ITM_TYPE_PARAMETER *)__tmp__R24F)->parent_itm_type__VFE.name__GZP);
     } break;
     case __ITM_TYPE_SIMPLE__: {
-      append__ROS(buf__0Z4F,((__ITM_TYPE_SIMPLE *)__tmp__X04F)->name__0YP);
+      append__3OS(buf__U14F,((__ITM_TYPE_SIMPLE *)__tmp__R24F)->name__GZP);
     } break;
     case __ITM_TYPE_BLOCK__: {
-      append_in__IIPD(__tmp__X04F,buf__0Z4F);
+      append_in__PJPD(__tmp__R24F,buf__U14F);
     } break;
     case __ITM_TYPE_GENERIC__: {
-      append_in__MJPD(__tmp__X04F,buf__0Z4F);
+      append_in__TKPD(__tmp__R24F,buf__U14F);
     } break;
     case __ITM_TYPE_STYLE__: {
-      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__ROS(buf__0Z4F,Self__S2FH->parent_itm_type_simple__RSN.name__0YP);
+      Self__WWHH=((__ITM_TYPE_STYLE *)__tmp__R24F);
+      if (((void *)Self__WWHH->style__PZP != (void *)NULL)) {
+        append__3OS(buf__U14F,Self__WWHH->style__PZP);
+        Self__YWHH=((__STRING *)buf__U14F);
+        new_capacity__XWHH= 0;
+        if ((Self__YWHH->capacity__UCS <= Self__YWHH->count__SGC)) {
+          if ((Self__YWHH->capacity__UCS ==  0)) {
+            Self__YWHH->capacity__UCS= 32;
+            Self__YWHH->storage__3CS=create__YIEB( 32);
+          } else {
+            new_capacity__XWHH=(__INTEGER)(Self__YWHH->capacity__UCS <<  1);
+            Self__ZWHH=((__CHARACTER *)Self__YWHH->storage__3CS);
+            old_nb_elts__0WHH=Self__YWHH->capacity__UCS;
+            new__1WHH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__ZWHH),((__UINTEGER_32 )old_nb_elts__0WHH),((__UINTEGER_32 )new_capacity__XWHH)));
+            upper__BOJH=(__INTEGER)(new_capacity__XWHH -  1);
+            Self__5NJH=old_nb_elts__0WHH;
+            while ((Self__5NJH <= upper__BOJH)) {
+              new__1WHH[Self__5NJH]='\0';
+              Self__5NJH=(__INTEGER)(Self__5NJH +  1);
+            };
+            Self__YWHH->storage__3CS=new__1WHH;
+            Self__YWHH->capacity__UCS=new_capacity__XWHH;
+          };
+        };
+        ((__CHARACTER *)Self__YWHH->storage__3CS)[Self__YWHH->count__SGC]=' ';
+        Self__YWHH->count__SGC=(__INTEGER)(Self__YWHH->count__SGC +  1);
+      };
+      append__3OS(buf__U14F,Self__WWHH->parent_itm_type_simple__3SN.name__GZP);
     } break;
     };
   };
 }
 
-static void shorter_profile_in__004F(__ITM_SLOT *Self__104F,void *buf__204F)
+static void shorter_profile_in__U24F(__ITM_SLOT *Self__V24F,void *buf__W24F)
 // ({ITM_SLOT},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __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));
+  __INTEGER j__O55F,new_capacity__3WHH,old_nb_elts__AXHH,upper__GOJH;
+  __INTEGER Self__EOJH,i__P55F,new_capacity__DXHH,old_nb_elts__GXHH;
+  __INTEGER upper__LOJH,Self__JOJH,new_capacity__JXHH,old_nb_elts__MXHH;
+  __INTEGER upper__QOJH,Self__OOJH,new_capacity__PXHH,old_nb_elts__SXHH;
+  __INTEGER upper__VOJH,Self__TOJH,new_capacity__VXHH,old_nb_elts__YXHH;
+  __INTEGER upper__0OJH,Self__YOJH,new_capacity__1XHH,old_nb_elts__4XHH;
+  __INTEGER upper__5OJH,Self__3OJH,new_capacity__BYHH,old_nb_elts__EYHH;
+  __INTEGER upper__EPJH,Self__CPJH,new_capacity__HYHH,old_nb_elts__KYHH;
+  __INTEGER upper__JPJH,Self__HPJH,new_capacity__NYHH,old_nb_elts__QYHH;
+  __INTEGER upper__OPJH,Self__MPJH,new_capacity__TYHH,old_nb_elts__WYHH;
+  __INTEGER upper__TPJH,Self__RPJH,new_capacity__1YHH,old_nb_elts__4YHH;
+  __INTEGER upper__YPJH,Self__WPJH;
+  void *__tmp__U55F,*__tmp__2AAG,*__tmp__2BAG;
+  __STRING *Self__4WHH,*Self__EXHH,*Self__KXHH,*Self__QXHH,*Self__WXHH;
+  __STRING *Self__2XHH,*Self__CYHH,*Self__IYHH,*Self__OYHH,*Self__UYHH;
+  __STRING *Self__2YHH;
+  __STRING_CONSTANT *Self__4MFH;
+  void *__tmp__O34F;
+  __ITM_TYPE_MULTI *Self__K51G;
+  __ITM_TYPE_STYLE *Self__ZYHH;
+  __CHARACTER *Self__5WHH,*new__BXHH,*Self__FXHH,*new__HXHH,*Self__LXHH;
+  __CHARACTER *new__NXHH,*Self__RXHH,*new__TXHH,*Self__XXHH,*new__ZXHH;
+  __CHARACTER *Self__3XHH,*new__5XHH,*Self__DYHH,*new__FYHH,*Self__JYHH;
+  __CHARACTER *new__LYHH,*Self__PYHH,*new__RYHH,*Self__VYHH,*new__XYHH;
+  __CHARACTER *Self__3YHH,*new__5YHH;
+  __CHARACTER ch__UXHH,ch__0XHH;
+  __FAST_ARRAYoITM_ARGUMENTo *Self__S1GH;
+  if ((Self__V24F->parent_named__15.style__0FU == '+')) {
+    put__to__like__JNBG((&__string_248),buf__W24F,(&__string_132));
   } else {
-    put__to__like__PLBG((&__string_250),buf__204F,(&__string_132));
+    put__to__like__JNBG((&__string_249),buf__W24F,(&__string_132));
   };
-  ((__STRING *)string_tmp__VH)->count__EGC= 0;
-  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);
+  ((__STRING *)string_tmp__VH)->count__SGC= 0;
+  j__O55F= 1;
+  __tmp__U55F=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)Self__V24F->argument_list__QDHC)->parent_arrayed_collection__Z5YB.storage__GAHC)[ 0];
+  if (((struct ___OBJ *)__tmp__U55F)->__id==__ITM_ARG__) {
+    shorter_in__KKBG(__tmp__U55F,buf__W24F);
   } else {
-    shorter_in__HJBG(__tmp__035F,buf__204F);
-  };
-  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__HJBG(__tmp__C55F,buf__204F);
-      };
-      add_last__GOT(buf__204F,' ');
-      ((__STRING *)string_tmp__VH)->count__EGC= 0;
-      j__U35F=(__INTEGER)(j__U35F +  2);
-      i__V35F=(__INTEGER)(i__V35F +  1);
-    } else {
-      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__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__HJBG(__tmp__CAAG,buf__204F);
-    };
-    add_last__GOT(buf__204F,' ');
-  };
-  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) {
+    shorter_in__BLBG(__tmp__U55F,buf__W24F);
+  };
+  Self__4WHH=((__STRING *)buf__W24F);
+  new_capacity__3WHH= 0;
+  if ((Self__4WHH->capacity__UCS <= Self__4WHH->count__SGC)) {
+    if ((Self__4WHH->capacity__UCS ==  0)) {
+      Self__4WHH->capacity__UCS= 32;
+      Self__4WHH->storage__3CS=create__YIEB( 32);
+    } else {
+      new_capacity__3WHH=(__INTEGER)(Self__4WHH->capacity__UCS <<  1);
+      Self__5WHH=((__CHARACTER *)Self__4WHH->storage__3CS);
+      old_nb_elts__AXHH=Self__4WHH->capacity__UCS;
+      new__BXHH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__5WHH),((__UINTEGER_32 )old_nb_elts__AXHH),((__UINTEGER_32 )new_capacity__3WHH)));
+      upper__GOJH=(__INTEGER)(new_capacity__3WHH -  1);
+      Self__EOJH=old_nb_elts__AXHH;
+      while ((Self__EOJH <= upper__GOJH)) {
+        new__BXHH[Self__EOJH]='\0';
+        Self__EOJH=(__INTEGER)(Self__EOJH +  1);
+      };
+      Self__4WHH->storage__3CS=new__BXHH;
+      Self__4WHH->capacity__UCS=new_capacity__3WHH;
+    };
+  };
+  ((__CHARACTER *)Self__4WHH->storage__3CS)[Self__4WHH->count__SGC]='.';
+  Self__4WHH->count__SGC=(__INTEGER)(Self__4WHH->count__SGC +  1);
+  i__P55F= 1;
+  while ((j__O55F < ((__STRING_CONSTANT *)Self__V24F->parent_named__15.name__LI)->count__DD)) {
+    if (((((__CHARACTER *)((__STRING_CONSTANT *)Self__V24F->parent_named__15.name__LI)->storage__RRO)[(__INTEGER)(j__O55F -  1)] == '_') && (((__CHARACTER *)((__STRING_CONSTANT *)Self__V24F->parent_named__15.name__LI)->storage__RRO)[(__INTEGER)((__INTEGER)(j__O55F +  1) -  1)] == '_'))) {
+      put__to__like__JNBG(string_tmp__VH,buf__W24F,(&__string_130));
+      Self__EXHH=((__STRING *)buf__W24F);
+      new_capacity__DXHH= 0;
+      if ((Self__EXHH->capacity__UCS <= Self__EXHH->count__SGC)) {
+        if ((Self__EXHH->capacity__UCS ==  0)) {
+          Self__EXHH->capacity__UCS= 32;
+          Self__EXHH->storage__3CS=create__YIEB( 32);
+        } else {
+          new_capacity__DXHH=(__INTEGER)(Self__EXHH->capacity__UCS <<  1);
+          Self__FXHH=((__CHARACTER *)Self__EXHH->storage__3CS);
+          old_nb_elts__GXHH=Self__EXHH->capacity__UCS;
+          new__HXHH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__FXHH),((__UINTEGER_32 )old_nb_elts__GXHH),((__UINTEGER_32 )new_capacity__DXHH)));
+          upper__LOJH=(__INTEGER)(new_capacity__DXHH -  1);
+          Self__JOJH=old_nb_elts__GXHH;
+          while ((Self__JOJH <= upper__LOJH)) {
+            new__HXHH[Self__JOJH]='\0';
+            Self__JOJH=(__INTEGER)(Self__JOJH +  1);
+          };
+          Self__EXHH->storage__3CS=new__HXHH;
+          Self__EXHH->capacity__UCS=new_capacity__DXHH;
+        };
+      };
+      ((__CHARACTER *)Self__EXHH->storage__3CS)[Self__EXHH->count__SGC]=' ';
+      Self__EXHH->count__SGC=(__INTEGER)(Self__EXHH->count__SGC +  1);
+      __tmp__2AAG=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)Self__V24F->argument_list__QDHC)->parent_arrayed_collection__Z5YB.storage__GAHC)[i__P55F];
+      if (((struct ___OBJ *)__tmp__2AAG)->__id==__ITM_ARG__) {
+        shorter_in__KKBG(__tmp__2AAG,buf__W24F);
+      } else {
+        shorter_in__BLBG(__tmp__2AAG,buf__W24F);
+      };
+      Self__KXHH=((__STRING *)buf__W24F);
+      new_capacity__JXHH= 0;
+      if ((Self__KXHH->capacity__UCS <= Self__KXHH->count__SGC)) {
+        if ((Self__KXHH->capacity__UCS ==  0)) {
+          Self__KXHH->capacity__UCS= 32;
+          Self__KXHH->storage__3CS=create__YIEB( 32);
+        } else {
+          new_capacity__JXHH=(__INTEGER)(Self__KXHH->capacity__UCS <<  1);
+          Self__LXHH=((__CHARACTER *)Self__KXHH->storage__3CS);
+          old_nb_elts__MXHH=Self__KXHH->capacity__UCS;
+          new__NXHH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__LXHH),((__UINTEGER_32 )old_nb_elts__MXHH),((__UINTEGER_32 )new_capacity__JXHH)));
+          upper__QOJH=(__INTEGER)(new_capacity__JXHH -  1);
+          Self__OOJH=old_nb_elts__MXHH;
+          while ((Self__OOJH <= upper__QOJH)) {
+            new__NXHH[Self__OOJH]='\0';
+            Self__OOJH=(__INTEGER)(Self__OOJH +  1);
+          };
+          Self__KXHH->storage__3CS=new__NXHH;
+          Self__KXHH->capacity__UCS=new_capacity__JXHH;
+        };
+      };
+      ((__CHARACTER *)Self__KXHH->storage__3CS)[Self__KXHH->count__SGC]=' ';
+      Self__KXHH->count__SGC=(__INTEGER)(Self__KXHH->count__SGC +  1);
+      ((__STRING *)string_tmp__VH)->count__SGC= 0;
+      j__O55F=(__INTEGER)(j__O55F +  2);
+      i__P55F=(__INTEGER)(i__P55F +  1);
+    } else {
+      Self__QXHH=((__STRING *)string_tmp__VH);
+      ch__UXHH=((__CHARACTER *)((__STRING_CONSTANT *)Self__V24F->parent_named__15.name__LI)->storage__RRO)[(__INTEGER)(j__O55F -  1)];
+      new_capacity__PXHH= 0;
+      if ((Self__QXHH->capacity__UCS <= Self__QXHH->count__SGC)) {
+        if ((Self__QXHH->capacity__UCS ==  0)) {
+          Self__QXHH->capacity__UCS= 32;
+          Self__QXHH->storage__3CS=create__YIEB( 32);
+        } else {
+          new_capacity__PXHH=(__INTEGER)(Self__QXHH->capacity__UCS <<  1);
+          Self__RXHH=((__CHARACTER *)Self__QXHH->storage__3CS);
+          old_nb_elts__SXHH=Self__QXHH->capacity__UCS;
+          new__TXHH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__RXHH),((__UINTEGER_32 )old_nb_elts__SXHH),((__UINTEGER_32 )new_capacity__PXHH)));
+          upper__VOJH=(__INTEGER)(new_capacity__PXHH -  1);
+          Self__TOJH=old_nb_elts__SXHH;
+          while ((Self__TOJH <= upper__VOJH)) {
+            new__TXHH[Self__TOJH]='\0';
+            Self__TOJH=(__INTEGER)(Self__TOJH +  1);
+          };
+          Self__QXHH->storage__3CS=new__TXHH;
+          Self__QXHH->capacity__UCS=new_capacity__PXHH;
+        };
+      };
+      ((__CHARACTER *)Self__QXHH->storage__3CS)[Self__QXHH->count__SGC]=ch__UXHH;
+      Self__QXHH->count__SGC=(__INTEGER)(Self__QXHH->count__SGC +  1);
+      j__O55F=(__INTEGER)(j__O55F +  1);
+    };
+  };
+  Self__4MFH=((__STRING_CONSTANT *)Self__V24F->parent_named__15.name__LI);
+  Self__WXHH=((__STRING *)string_tmp__VH);
+  ch__0XHH=((__CHARACTER *)Self__4MFH->storage__RRO)[(__INTEGER)(Self__4MFH->count__DD -  1)];
+  new_capacity__VXHH= 0;
+  if ((Self__WXHH->capacity__UCS <= Self__WXHH->count__SGC)) {
+    if ((Self__WXHH->capacity__UCS ==  0)) {
+      Self__WXHH->capacity__UCS= 32;
+      Self__WXHH->storage__3CS=create__YIEB( 32);
+    } else {
+      new_capacity__VXHH=(__INTEGER)(Self__WXHH->capacity__UCS <<  1);
+      Self__XXHH=((__CHARACTER *)Self__WXHH->storage__3CS);
+      old_nb_elts__YXHH=Self__WXHH->capacity__UCS;
+      new__ZXHH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__XXHH),((__UINTEGER_32 )old_nb_elts__YXHH),((__UINTEGER_32 )new_capacity__VXHH)));
+      upper__0OJH=(__INTEGER)(new_capacity__VXHH -  1);
+      Self__YOJH=old_nb_elts__YXHH;
+      while ((Self__YOJH <= upper__0OJH)) {
+        new__ZXHH[Self__YOJH]='\0';
+        Self__YOJH=(__INTEGER)(Self__YOJH +  1);
+      };
+      Self__WXHH->storage__3CS=new__ZXHH;
+      Self__WXHH->capacity__UCS=new_capacity__VXHH;
+    };
+  };
+  ((__CHARACTER *)Self__WXHH->storage__3CS)[Self__WXHH->count__SGC]=ch__0XHH;
+  Self__WXHH->count__SGC=(__INTEGER)(Self__WXHH->count__SGC +  1);
+  put__to__like__JNBG(string_tmp__VH,buf__W24F,(&__string_130));
+  if ((i__P55F <= ((__FAST_ARRAYoITM_ARGUMENTo *)Self__V24F->argument_list__QDHC)->parent_arrayed_collection__Z5YB.upper__I5GC)) {
+    Self__2XHH=((__STRING *)buf__W24F);
+    new_capacity__1XHH= 0;
+    if ((Self__2XHH->capacity__UCS <= Self__2XHH->count__SGC)) {
+      if ((Self__2XHH->capacity__UCS ==  0)) {
+        Self__2XHH->capacity__UCS= 32;
+        Self__2XHH->storage__3CS=create__YIEB( 32);
+      } else {
+        new_capacity__1XHH=(__INTEGER)(Self__2XHH->capacity__UCS <<  1);
+        Self__3XHH=((__CHARACTER *)Self__2XHH->storage__3CS);
+        old_nb_elts__4XHH=Self__2XHH->capacity__UCS;
+        new__5XHH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__3XHH),((__UINTEGER_32 )old_nb_elts__4XHH),((__UINTEGER_32 )new_capacity__1XHH)));
+        upper__5OJH=(__INTEGER)(new_capacity__1XHH -  1);
+        Self__3OJH=old_nb_elts__4XHH;
+        while ((Self__3OJH <= upper__5OJH)) {
+          new__5XHH[Self__3OJH]='\0';
+          Self__3OJH=(__INTEGER)(Self__3OJH +  1);
+        };
+        Self__2XHH->storage__3CS=new__5XHH;
+        Self__2XHH->capacity__UCS=new_capacity__1XHH;
+      };
+    };
+    ((__CHARACTER *)Self__2XHH->storage__3CS)[Self__2XHH->count__SGC]=' ';
+    Self__2XHH->count__SGC=(__INTEGER)(Self__2XHH->count__SGC +  1);
+    Self__S1GH=((__FAST_ARRAYoITM_ARGUMENTo *)Self__V24F->argument_list__QDHC);
+    __tmp__2BAG=((void **)Self__S1GH->parent_arrayed_collection__Z5YB.storage__GAHC)[Self__S1GH->parent_arrayed_collection__Z5YB.upper__I5GC];
+    if (((struct ___OBJ *)__tmp__2BAG)->__id==__ITM_ARG__) {
+      shorter_in__KKBG(__tmp__2BAG,buf__W24F);
+    } else {
+      shorter_in__BLBG(__tmp__2BAG,buf__W24F);
+    };
+    Self__CYHH=((__STRING *)buf__W24F);
+    new_capacity__BYHH= 0;
+    if ((Self__CYHH->capacity__UCS <= Self__CYHH->count__SGC)) {
+      if ((Self__CYHH->capacity__UCS ==  0)) {
+        Self__CYHH->capacity__UCS= 32;
+        Self__CYHH->storage__3CS=create__YIEB( 32);
+      } else {
+        new_capacity__BYHH=(__INTEGER)(Self__CYHH->capacity__UCS <<  1);
+        Self__DYHH=((__CHARACTER *)Self__CYHH->storage__3CS);
+        old_nb_elts__EYHH=Self__CYHH->capacity__UCS;
+        new__FYHH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__DYHH),((__UINTEGER_32 )old_nb_elts__EYHH),((__UINTEGER_32 )new_capacity__BYHH)));
+        upper__EPJH=(__INTEGER)(new_capacity__BYHH -  1);
+        Self__CPJH=old_nb_elts__EYHH;
+        while ((Self__CPJH <= upper__EPJH)) {
+          new__FYHH[Self__CPJH]='\0';
+          Self__CPJH=(__INTEGER)(Self__CPJH +  1);
+        };
+        Self__CYHH->storage__3CS=new__FYHH;
+        Self__CYHH->capacity__UCS=new_capacity__BYHH;
+      };
+    };
+    ((__CHARACTER *)Self__CYHH->storage__3CS)[Self__CYHH->count__SGC]=' ';
+    Self__CYHH->count__SGC=(__INTEGER)(Self__CYHH->count__SGC +  1);
+  };
+  if (((void *)Self__V24F->result_type__A4FC != (void *)type_void__WYF)) {
+    Self__IYHH=((__STRING *)buf__W24F);
+    new_capacity__HYHH= 0;
+    if ((Self__IYHH->capacity__UCS <= Self__IYHH->count__SGC)) {
+      if ((Self__IYHH->capacity__UCS ==  0)) {
+        Self__IYHH->capacity__UCS= 32;
+        Self__IYHH->storage__3CS=create__YIEB( 32);
+      } else {
+        new_capacity__HYHH=(__INTEGER)(Self__IYHH->capacity__UCS <<  1);
+        Self__JYHH=((__CHARACTER *)Self__IYHH->storage__3CS);
+        old_nb_elts__KYHH=Self__IYHH->capacity__UCS;
+        new__LYHH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__JYHH),((__UINTEGER_32 )old_nb_elts__KYHH),((__UINTEGER_32 )new_capacity__HYHH)));
+        upper__JPJH=(__INTEGER)(new_capacity__HYHH -  1);
+        Self__HPJH=old_nb_elts__KYHH;
+        while ((Self__HPJH <= upper__JPJH)) {
+          new__LYHH[Self__HPJH]='\0';
+          Self__HPJH=(__INTEGER)(Self__HPJH +  1);
+        };
+        Self__IYHH->storage__3CS=new__LYHH;
+        Self__IYHH->capacity__UCS=new_capacity__HYHH;
+      };
+    };
+    ((__CHARACTER *)Self__IYHH->storage__3CS)[Self__IYHH->count__SGC]=':';
+    Self__IYHH->count__SGC=(__INTEGER)(Self__IYHH->count__SGC +  1);
+    __tmp__O34F=Self__V24F->result_type__A4FC;
+    switch (((struct ___OBJ *)__tmp__O34F)->__id) {
     case __ITM_TYPE_PARAMETER__: {
-      shorter_in__ASDG(__tmp__U14F,buf__204F);
+      shorter_in__0TDG(__tmp__O34F,buf__W24F);
     } break;
     case __ITM_TYPE_SIMPLE__: {
-      shorter_in__RSDG(__tmp__U14F,buf__204F);
+      shorter_in__LUDG(__tmp__O34F,buf__W24F);
     } break;
     case __ITM_TYPE_MULTI__: {
-      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,')');
+      Self__K51G=((__ITM_TYPE_MULTI *)__tmp__O34F);
+      Self__OYHH=((__STRING *)buf__W24F);
+      new_capacity__NYHH= 0;
+      if ((Self__OYHH->capacity__UCS <= Self__OYHH->count__SGC)) {
+        if ((Self__OYHH->capacity__UCS ==  0)) {
+          Self__OYHH->capacity__UCS= 32;
+          Self__OYHH->storage__3CS=create__YIEB( 32);
+        } else {
+          new_capacity__NYHH=(__INTEGER)(Self__OYHH->capacity__UCS <<  1);
+          Self__PYHH=((__CHARACTER *)Self__OYHH->storage__3CS);
+          old_nb_elts__QYHH=Self__OYHH->capacity__UCS;
+          new__RYHH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__PYHH),((__UINTEGER_32 )old_nb_elts__QYHH),((__UINTEGER_32 )new_capacity__NYHH)));
+          upper__OPJH=(__INTEGER)(new_capacity__NYHH -  1);
+          Self__MPJH=old_nb_elts__QYHH;
+          while ((Self__MPJH <= upper__OPJH)) {
+            new__RYHH[Self__MPJH]='\0';
+            Self__MPJH=(__INTEGER)(Self__MPJH +  1);
+          };
+          Self__OYHH->storage__3CS=new__RYHH;
+          Self__OYHH->capacity__UCS=new_capacity__NYHH;
+        };
+      };
+      ((__CHARACTER *)Self__OYHH->storage__3CS)[Self__OYHH->count__SGC]='(';
+      Self__OYHH->count__SGC=(__INTEGER)(Self__OYHH->count__SGC +  1);
+      shorter_raw_in__M2FG(Self__K51G,buf__W24F);
+      Self__UYHH=((__STRING *)buf__W24F);
+      new_capacity__TYHH= 0;
+      if ((Self__UYHH->capacity__UCS <= Self__UYHH->count__SGC)) {
+        if ((Self__UYHH->capacity__UCS ==  0)) {
+          Self__UYHH->capacity__UCS= 32;
+          Self__UYHH->storage__3CS=create__YIEB( 32);
+        } else {
+          new_capacity__TYHH=(__INTEGER)(Self__UYHH->capacity__UCS <<  1);
+          Self__VYHH=((__CHARACTER *)Self__UYHH->storage__3CS);
+          old_nb_elts__WYHH=Self__UYHH->capacity__UCS;
+          new__XYHH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__VYHH),((__UINTEGER_32 )old_nb_elts__WYHH),((__UINTEGER_32 )new_capacity__TYHH)));
+          upper__TPJH=(__INTEGER)(new_capacity__TYHH -  1);
+          Self__RPJH=old_nb_elts__WYHH;
+          while ((Self__RPJH <= upper__TPJH)) {
+            new__XYHH[Self__RPJH]='\0';
+            Self__RPJH=(__INTEGER)(Self__RPJH +  1);
+          };
+          Self__UYHH->storage__3CS=new__XYHH;
+          Self__UYHH->capacity__UCS=new_capacity__TYHH;
+        };
+      };
+      ((__CHARACTER *)Self__UYHH->storage__3CS)[Self__UYHH->count__SGC]=')';
+      Self__UYHH->count__SGC=(__INTEGER)(Self__UYHH->count__SGC +  1);
     } break;
     case __ITM_TYPE_BLOCK__: {
-      shorter_in__CTDG(__tmp__U14F,buf__204F);
+      shorter_in__2UDG(__tmp__O34F,buf__W24F);
     } break;
     case __ITM_TYPE_GENERIC__: {
-      shorter_in__KUDG(__tmp__U14F,buf__204F);
+      shorter_in__EWDG(__tmp__O34F,buf__W24F);
     } break;
     case __ITM_TYPE_STYLE__: {
-      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__OYFG(Self__O3FH->parent_itm_type_simple__RSN.name__0YP,buf__204F,(&__string_125));
+      Self__ZYHH=((__ITM_TYPE_STYLE *)__tmp__O34F);
+      if (((void *)Self__ZYHH->style__PZP != (void *)NULL)) {
+        put__to__like__I0FG(Self__ZYHH->style__PZP,buf__W24F,(&__string_119));
+        Self__2YHH=((__STRING *)buf__W24F);
+        new_capacity__1YHH= 0;
+        if ((Self__2YHH->capacity__UCS <= Self__2YHH->count__SGC)) {
+          if ((Self__2YHH->capacity__UCS ==  0)) {
+            Self__2YHH->capacity__UCS= 32;
+            Self__2YHH->storage__3CS=create__YIEB( 32);
+          } else {
+            new_capacity__1YHH=(__INTEGER)(Self__2YHH->capacity__UCS <<  1);
+            Self__3YHH=((__CHARACTER *)Self__2YHH->storage__3CS);
+            old_nb_elts__4YHH=Self__2YHH->capacity__UCS;
+            new__5YHH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__3YHH),((__UINTEGER_32 )old_nb_elts__4YHH),((__UINTEGER_32 )new_capacity__1YHH)));
+            upper__YPJH=(__INTEGER)(new_capacity__1YHH -  1);
+            Self__WPJH=old_nb_elts__4YHH;
+            while ((Self__WPJH <= upper__YPJH)) {
+              new__5YHH[Self__WPJH]='\0';
+              Self__WPJH=(__INTEGER)(Self__WPJH +  1);
+            };
+            Self__2YHH->storage__3CS=new__5YHH;
+            Self__2YHH->capacity__UCS=new_capacity__1YHH;
+          };
+        };
+        ((__CHARACTER *)Self__2YHH->storage__3CS)[Self__2YHH->count__SGC]=' ';
+        Self__2YHH->count__SGC=(__INTEGER)(Self__2YHH->count__SGC +  1);
+      };
+      put__to__like__I0FG(Self__ZYHH->parent_itm_type_simple__3SN.name__GZP,buf__W24F,(&__string_125));
     } break;
     };
   };
 }
 
-static void shorter_profile_in__X14F(__ITM_SLOT_OPERATOR *Self__Y14F,void *buf__Z14F)
+static void shorter_profile_in__R34F(__ITM_SLOT_OPERATOR *Self__S34F,void *buf__T34F)
 // ({ITM_SLOT_OPERATOR},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __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));
+  void *__tmp__4CAG,*__tmp__TDAG,*__tmp__JEAG,*__tmp__TEAG;
+  __STRING *Self__CZHH,*Self__IZHH,*Self__OZHH,*Self__UZHH,*Self__0ZHH;
+  __STRING *Self__A0HH,*Self__G0HH,*Self__M0HH,*Self__S0HH,*Self__Y0HH;
+  __STRING *Self__40HH,*Self__E1HH,*Self__LVFB,*Self__K1HH,*Self__Q1HH;
+  __STRING *Self__W1HH,*Self__21HH,*Self__C2HH,*Self__I2HH,*Self__O2HH;
+  __STRING *Self__U2HH,*Self__02HH,*Self__C3HH;
+  __INTEGER new_capacity__BZHH,old_nb_elts__EZHH,upper__3PJH,Self__1PJH;
+  __INTEGER new_capacity__HZHH,old_nb_elts__KZHH,upper__CQJH,Self__AQJH;
+  __INTEGER new_capacity__NZHH,old_nb_elts__QZHH,upper__HQJH,Self__FQJH;
+  __INTEGER new_capacity__TZHH,old_nb_elts__WZHH,upper__MQJH,Self__KQJH;
+  __INTEGER new_capacity__ZZHH,old_nb_elts__2ZHH,upper__RQJH,Self__PQJH;
+  __INTEGER new_capacity__5ZHH,old_nb_elts__C0HH,upper__WQJH,Self__UQJH;
+  __INTEGER new_capacity__F0HH,old_nb_elts__I0HH,upper__1QJH,Self__ZQJH;
+  __INTEGER new_capacity__L0HH,old_nb_elts__O0HH,upper__ARJH,Self__4QJH;
+  __INTEGER new_capacity__R0HH,old_nb_elts__U0HH,upper__FRJH,Self__DRJH;
+  __INTEGER Self__ZMMG,result__1MMG,i__LOMG,j__MOMG,new_capacity__X0HH;
+  __INTEGER old_nb_elts__00HH,upper__KRJH,Self__IRJH,new_capacity__30HH;
+  __INTEGER old_nb_elts__A1HH,upper__PRJH,Self__NRJH,new_capacity__D1HH;
+  __INTEGER old_nb_elts__G1HH,upper__URJH,Self__SRJH,new_capacity__J1HH;
+  __INTEGER old_nb_elts__M1HH,upper__ZRJH,Self__XRJH,new_capacity__P1HH;
+  __INTEGER old_nb_elts__S1HH,upper__4RJH,Self__2RJH,new_capacity__V1HH;
+  __INTEGER old_nb_elts__Y1HH,upper__DSJH,Self__BSJH,new_capacity__11HH;
+  __INTEGER old_nb_elts__41HH,upper__ISJH,Self__GSJH,new_capacity__B2HH;
+  __INTEGER old_nb_elts__E2HH,upper__NSJH,Self__LSJH,new_capacity__H2HH;
+  __INTEGER old_nb_elts__K2HH,upper__SSJH,Self__QSJH,new_capacity__N2HH;
+  __INTEGER old_nb_elts__Q2HH,upper__XSJH,Self__VSJH,new_capacity__T2HH;
+  __INTEGER old_nb_elts__W2HH,upper__2SJH,Self__0SJH,new_capacity__Z2HH;
+  __INTEGER old_nb_elts__22HH,upper__BTJH,Self__5SJH,new_capacity__B3HH;
+  __INTEGER old_nb_elts__E3HH,upper__GTJH,Self__ETJH;
+  void *result__XGMG;
+  __INTEGER_32 Self__AOMG,val__IOMG;
+  void *__tmp__L44F;
+  __ITM_TYPE_MULTI *Self__L0DG;
+  __ITM_TYPE_STYLE *Self__52HH;
+  __CHARACTER *Self__DZHH,*new__FZHH,*Self__JZHH,*new__LZHH,*Self__PZHH;
+  __CHARACTER *new__RZHH,*Self__VZHH,*new__XZHH,*Self__1ZHH,*new__3ZHH;
+  __CHARACTER *Self__B0HH,*new__D0HH,*Self__H0HH,*new__J0HH,*Self__N0HH;
+  __CHARACTER *new__P0HH,*Self__T0HH,*new__V0HH,*Self__Z0HH,*new__10HH;
+  __CHARACTER *Self__50HH,*new__B1HH,*Self__F1HH,*new__H1HH,*Self__L1HH;
+  __CHARACTER *new__N1HH,*Self__R1HH,*new__T1HH,*Self__X1HH,*new__Z1HH;
+  __CHARACTER *Self__31HH,*new__51HH,*Self__D2HH,*new__F2HH,*Self__J2HH;
+  __CHARACTER *new__L2HH,*Self__P2HH,*new__R2HH,*Self__V2HH,*new__X2HH;
+  __CHARACTER *Self__12HH,*new__32HH,*Self__D3HH,*new__F3HH;
+  __BOOLEAN __tmp__DDAG;
+  __CHARACTER ch__I1HH,tmp__OVFB;
+  if ((Self__S34F->parent_itm_slot__0S5B.parent_named__15.style__0FU == '+')) {
+    put__to__like__S0DG((&__string_248),buf__T34F,(&__string_132));
   } else {
-    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__;
+    put__to__like__S0DG((&__string_249),buf__T34F,(&__string_132));
+  };
+  if (has_prefix__OTTF(Self__S34F->parent_itm_slot__0S5B.parent_named__15.name__LI,(&__string_82))) {
+    __tmp__4CAG=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)Self__S34F->parent_itm_slot__0S5B.argument_list__QDHC)->parent_arrayed_collection__Z5YB.storage__GAHC)[ 0];
+    if (((struct ___OBJ *)__tmp__4CAG)->__id==__ITM_ARG__) {
+      shorter_in__KKBG(__tmp__4CAG,buf__T34F);
+    } else {
+      shorter_in__BLBG(__tmp__4CAG,buf__T34F);
+    };
+    Self__CZHH=((__STRING *)buf__T34F);
+    new_capacity__BZHH= 0;
+    if ((Self__CZHH->capacity__UCS <= Self__CZHH->count__SGC)) {
+      if ((Self__CZHH->capacity__UCS ==  0)) {
+        Self__CZHH->capacity__UCS= 32;
+        Self__CZHH->storage__3CS=create__YIEB( 32);
+      } else {
+        new_capacity__BZHH=(__INTEGER)(Self__CZHH->capacity__UCS <<  1);
+        Self__DZHH=((__CHARACTER *)Self__CZHH->storage__3CS);
+        old_nb_elts__EZHH=Self__CZHH->capacity__UCS;
+        new__FZHH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__DZHH),((__UINTEGER_32 )old_nb_elts__EZHH),((__UINTEGER_32 )new_capacity__BZHH)));
+        upper__3PJH=(__INTEGER)(new_capacity__BZHH -  1);
+        Self__1PJH=old_nb_elts__EZHH;
+        while ((Self__1PJH <= upper__3PJH)) {
+          new__FZHH[Self__1PJH]='\0';
+          Self__1PJH=(__INTEGER)(Self__1PJH +  1);
+        };
+        Self__CZHH->storage__3CS=new__FZHH;
+        Self__CZHH->capacity__UCS=new_capacity__BZHH;
+      };
+    };
+    ((__CHARACTER *)Self__CZHH->storage__3CS)[Self__CZHH->count__SGC]=' ';
+    Self__CZHH->count__SGC=(__INTEGER)(Self__CZHH->count__SGC +  1);
+    Self__IZHH=((__STRING *)buf__T34F);
+    new_capacity__HZHH= 0;
+    if ((Self__IZHH->capacity__UCS <= Self__IZHH->count__SGC)) {
+      if ((Self__IZHH->capacity__UCS ==  0)) {
+        Self__IZHH->capacity__UCS= 32;
+        Self__IZHH->storage__3CS=create__YIEB( 32);
+      } else {
+        new_capacity__HZHH=(__INTEGER)(Self__IZHH->capacity__UCS <<  1);
+        Self__JZHH=((__CHARACTER *)Self__IZHH->storage__3CS);
+        old_nb_elts__KZHH=Self__IZHH->capacity__UCS;
+        new__LZHH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__JZHH),((__UINTEGER_32 )old_nb_elts__KZHH),((__UINTEGER_32 )new_capacity__HZHH)));
+        upper__CQJH=(__INTEGER)(new_capacity__HZHH -  1);
+        Self__AQJH=old_nb_elts__KZHH;
+        while ((Self__AQJH <= upper__CQJH)) {
+          new__LZHH[Self__AQJH]='\0';
+          Self__AQJH=(__INTEGER)(Self__AQJH +  1);
+        };
+        Self__IZHH->storage__3CS=new__LZHH;
+        Self__IZHH->capacity__UCS=new_capacity__HZHH;
+      };
+    };
+    ((__CHARACTER *)Self__IZHH->storage__3CS)[Self__IZHH->count__SGC]='\'';
+    Self__IZHH->count__SGC=(__INTEGER)(Self__IZHH->count__SGC +  1);
+    put__to__like__S0DG(Self__S34F->pretty_name__5ZHC,buf__T34F,(&__string_130));
+    Self__OZHH=((__STRING *)buf__T34F);
+    new_capacity__NZHH= 0;
+    if ((Self__OZHH->capacity__UCS <= Self__OZHH->count__SGC)) {
+      if ((Self__OZHH->capacity__UCS ==  0)) {
+        Self__OZHH->capacity__UCS= 32;
+        Self__OZHH->storage__3CS=create__YIEB( 32);
+      } else {
+        new_capacity__NZHH=(__INTEGER)(Self__OZHH->capacity__UCS <<  1);
+        Self__PZHH=((__CHARACTER *)Self__OZHH->storage__3CS);
+        old_nb_elts__QZHH=Self__OZHH->capacity__UCS;
+        new__RZHH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__PZHH),((__UINTEGER_32 )old_nb_elts__QZHH),((__UINTEGER_32 )new_capacity__NZHH)));
+        upper__HQJH=(__INTEGER)(new_capacity__NZHH -  1);
+        Self__FQJH=old_nb_elts__QZHH;
+        while ((Self__FQJH <= upper__HQJH)) {
+          new__RZHH[Self__FQJH]='\0';
+          Self__FQJH=(__INTEGER)(Self__FQJH +  1);
+        };
+        Self__OZHH->storage__3CS=new__RZHH;
+        Self__OZHH->capacity__UCS=new_capacity__NZHH;
+      };
+    };
+    ((__CHARACTER *)Self__OZHH->storage__3CS)[Self__OZHH->count__SGC]='\'';
+    Self__OZHH->count__SGC=(__INTEGER)(Self__OZHH->count__SGC +  1);
+    Self__UZHH=((__STRING *)buf__T34F);
+    new_capacity__TZHH= 0;
+    if ((Self__UZHH->capacity__UCS <= Self__UZHH->count__SGC)) {
+      if ((Self__UZHH->capacity__UCS ==  0)) {
+        Self__UZHH->capacity__UCS= 32;
+        Self__UZHH->storage__3CS=create__YIEB( 32);
+      } else {
+        new_capacity__TZHH=(__INTEGER)(Self__UZHH->capacity__UCS <<  1);
+        Self__VZHH=((__CHARACTER *)Self__UZHH->storage__3CS);
+        old_nb_elts__WZHH=Self__UZHH->capacity__UCS;
+        new__XZHH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__VZHH),((__UINTEGER_32 )old_nb_elts__WZHH),((__UINTEGER_32 )new_capacity__TZHH)));
+        upper__MQJH=(__INTEGER)(new_capacity__TZHH -  1);
+        Self__KQJH=old_nb_elts__WZHH;
+        while ((Self__KQJH <= upper__MQJH)) {
+          new__XZHH[Self__KQJH]='\0';
+          Self__KQJH=(__INTEGER)(Self__KQJH +  1);
+        };
+        Self__UZHH->storage__3CS=new__XZHH;
+        Self__UZHH->capacity__UCS=new_capacity__TZHH;
+      };
+    };
+    ((__CHARACTER *)Self__UZHH->storage__3CS)[Self__UZHH->count__SGC]=' ';
+    Self__UZHH->count__SGC=(__INTEGER)(Self__UZHH->count__SGC +  1);
+    __tmp__DDAG=TRUE__;
   } else {
-    __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__5KMG=Self__Y14F->priority_and_level__D3HC;
-        result__BLMG= 0;
-        if ((Self__5KMG <  0)) {
-          result__BLMG=(__INTEGER)(- Self__5KMG);
-        } else {
-          result__BLMG=Self__5KMG;
-        };
-        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__GMMG >  0)) {
-            val__OMMG=Self__GMMG;
-          } else {
-            val__OMMG=(__INTEGER_32)(- Self__GMMG);
-            add_last__GOT(((__STRING *)string_tmp__VH),'-');
-          };
-          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__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__YYDG(string_tmp__VH,buf__Z14F,(&__string_119));
-      };
-      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__HJBG(__tmp__PCAG,buf__Z14F);
-      };
-      add_last__GOT(buf__Z14F,' ');
-    } else {
-      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__HJBG(__tmp__ZCAG,buf__Z14F);
-      };
-      add_last__GOT(buf__Z14F,' ');
-    };
-  };
-  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) {
+    __tmp__DDAG=FALSE__;
+  };
+  if ((! __tmp__DDAG)) {
+    if (has_prefix__OTTF(Self__S34F->parent_itm_slot__0S5B.parent_named__15.name__LI,(&__string_81))) {
+      __tmp__TDAG=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)Self__S34F->parent_itm_slot__0S5B.argument_list__QDHC)->parent_arrayed_collection__Z5YB.storage__GAHC)[ 0];
+      if (((struct ___OBJ *)__tmp__TDAG)->__id==__ITM_ARG__) {
+        shorter_in__KKBG(__tmp__TDAG,buf__T34F);
+      } else {
+        shorter_in__BLBG(__tmp__TDAG,buf__T34F);
+      };
+      Self__0ZHH=((__STRING *)buf__T34F);
+      new_capacity__ZZHH= 0;
+      if ((Self__0ZHH->capacity__UCS <= Self__0ZHH->count__SGC)) {
+        if ((Self__0ZHH->capacity__UCS ==  0)) {
+          Self__0ZHH->capacity__UCS= 32;
+          Self__0ZHH->storage__3CS=create__YIEB( 32);
+        } else {
+          new_capacity__ZZHH=(__INTEGER)(Self__0ZHH->capacity__UCS <<  1);
+          Self__1ZHH=((__CHARACTER *)Self__0ZHH->storage__3CS);
+          old_nb_elts__2ZHH=Self__0ZHH->capacity__UCS;
+          new__3ZHH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__1ZHH),((__UINTEGER_32 )old_nb_elts__2ZHH),((__UINTEGER_32 )new_capacity__ZZHH)));
+          upper__RQJH=(__INTEGER)(new_capacity__ZZHH -  1);
+          Self__PQJH=old_nb_elts__2ZHH;
+          while ((Self__PQJH <= upper__RQJH)) {
+            new__3ZHH[Self__PQJH]='\0';
+            Self__PQJH=(__INTEGER)(Self__PQJH +  1);
+          };
+          Self__0ZHH->storage__3CS=new__3ZHH;
+          Self__0ZHH->capacity__UCS=new_capacity__ZZHH;
+        };
+      };
+      ((__CHARACTER *)Self__0ZHH->storage__3CS)[Self__0ZHH->count__SGC]=' ';
+      Self__0ZHH->count__SGC=(__INTEGER)(Self__0ZHH->count__SGC +  1);
+      Self__A0HH=((__STRING *)buf__T34F);
+      new_capacity__5ZHH= 0;
+      if ((Self__A0HH->capacity__UCS <= Self__A0HH->count__SGC)) {
+        if ((Self__A0HH->capacity__UCS ==  0)) {
+          Self__A0HH->capacity__UCS= 32;
+          Self__A0HH->storage__3CS=create__YIEB( 32);
+        } else {
+          new_capacity__5ZHH=(__INTEGER)(Self__A0HH->capacity__UCS <<  1);
+          Self__B0HH=((__CHARACTER *)Self__A0HH->storage__3CS);
+          old_nb_elts__C0HH=Self__A0HH->capacity__UCS;
+          new__D0HH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__B0HH),((__UINTEGER_32 )old_nb_elts__C0HH),((__UINTEGER_32 )new_capacity__5ZHH)));
+          upper__WQJH=(__INTEGER)(new_capacity__5ZHH -  1);
+          Self__UQJH=old_nb_elts__C0HH;
+          while ((Self__UQJH <= upper__WQJH)) {
+            new__D0HH[Self__UQJH]='\0';
+            Self__UQJH=(__INTEGER)(Self__UQJH +  1);
+          };
+          Self__A0HH->storage__3CS=new__D0HH;
+          Self__A0HH->capacity__UCS=new_capacity__5ZHH;
+        };
+      };
+      ((__CHARACTER *)Self__A0HH->storage__3CS)[Self__A0HH->count__SGC]='\'';
+      Self__A0HH->count__SGC=(__INTEGER)(Self__A0HH->count__SGC +  1);
+      put__to__like__S0DG(Self__S34F->pretty_name__5ZHC,buf__T34F,(&__string_130));
+      Self__G0HH=((__STRING *)buf__T34F);
+      new_capacity__F0HH= 0;
+      if ((Self__G0HH->capacity__UCS <= Self__G0HH->count__SGC)) {
+        if ((Self__G0HH->capacity__UCS ==  0)) {
+          Self__G0HH->capacity__UCS= 32;
+          Self__G0HH->storage__3CS=create__YIEB( 32);
+        } else {
+          new_capacity__F0HH=(__INTEGER)(Self__G0HH->capacity__UCS <<  1);
+          Self__H0HH=((__CHARACTER *)Self__G0HH->storage__3CS);
+          old_nb_elts__I0HH=Self__G0HH->capacity__UCS;
+          new__J0HH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__H0HH),((__UINTEGER_32 )old_nb_elts__I0HH),((__UINTEGER_32 )new_capacity__F0HH)));
+          upper__1QJH=(__INTEGER)(new_capacity__F0HH -  1);
+          Self__ZQJH=old_nb_elts__I0HH;
+          while ((Self__ZQJH <= upper__1QJH)) {
+            new__J0HH[Self__ZQJH]='\0';
+            Self__ZQJH=(__INTEGER)(Self__ZQJH +  1);
+          };
+          Self__G0HH->storage__3CS=new__J0HH;
+          Self__G0HH->capacity__UCS=new_capacity__F0HH;
+        };
+      };
+      ((__CHARACTER *)Self__G0HH->storage__3CS)[Self__G0HH->count__SGC]='\'';
+      Self__G0HH->count__SGC=(__INTEGER)(Self__G0HH->count__SGC +  1);
+      if ((Self__S34F->priority_and_level__UZHC !=  0)) {
+        Self__M0HH=((__STRING *)buf__T34F);
+        new_capacity__L0HH= 0;
+        if ((Self__M0HH->capacity__UCS <= Self__M0HH->count__SGC)) {
+          if ((Self__M0HH->capacity__UCS ==  0)) {
+            Self__M0HH->capacity__UCS= 32;
+            Self__M0HH->storage__3CS=create__YIEB( 32);
+          } else {
+            new_capacity__L0HH=(__INTEGER)(Self__M0HH->capacity__UCS <<  1);
+            Self__N0HH=((__CHARACTER *)Self__M0HH->storage__3CS);
+            old_nb_elts__O0HH=Self__M0HH->capacity__UCS;
+            new__P0HH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__N0HH),((__UINTEGER_32 )old_nb_elts__O0HH),((__UINTEGER_32 )new_capacity__L0HH)));
+            upper__ARJH=(__INTEGER)(new_capacity__L0HH -  1);
+            Self__4QJH=old_nb_elts__O0HH;
+            while ((Self__4QJH <= upper__ARJH)) {
+              new__P0HH[Self__4QJH]='\0';
+              Self__4QJH=(__INTEGER)(Self__4QJH +  1);
+            };
+            Self__M0HH->storage__3CS=new__P0HH;
+            Self__M0HH->capacity__UCS=new_capacity__L0HH;
+          };
+        };
+        ((__CHARACTER *)Self__M0HH->storage__3CS)[Self__M0HH->count__SGC]=' ';
+        Self__M0HH->count__SGC=(__INTEGER)(Self__M0HH->count__SGC +  1);
+        result__XGMG=NULL;
+        if ((Self__S34F->priority_and_level__UZHC >=  0)) {
+          result__XGMG=(&__string_6);
+        } else {
+          result__XGMG=(&__string_5);
+        };
+        put__to__like__S0DG(result__XGMG,buf__T34F,(&__string_119));
+        Self__S0HH=((__STRING *)buf__T34F);
+        new_capacity__R0HH= 0;
+        if ((Self__S0HH->capacity__UCS <= Self__S0HH->count__SGC)) {
+          if ((Self__S0HH->capacity__UCS ==  0)) {
+            Self__S0HH->capacity__UCS= 32;
+            Self__S0HH->storage__3CS=create__YIEB( 32);
+          } else {
+            new_capacity__R0HH=(__INTEGER)(Self__S0HH->capacity__UCS <<  1);
+            Self__T0HH=((__CHARACTER *)Self__S0HH->storage__3CS);
+            old_nb_elts__U0HH=Self__S0HH->capacity__UCS;
+            new__V0HH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__T0HH),((__UINTEGER_32 )old_nb_elts__U0HH),((__UINTEGER_32 )new_capacity__R0HH)));
+            upper__FRJH=(__INTEGER)(new_capacity__R0HH -  1);
+            Self__DRJH=old_nb_elts__U0HH;
+            while ((Self__DRJH <= upper__FRJH)) {
+              new__V0HH[Self__DRJH]='\0';
+              Self__DRJH=(__INTEGER)(Self__DRJH +  1);
+            };
+            Self__S0HH->storage__3CS=new__V0HH;
+            Self__S0HH->capacity__UCS=new_capacity__R0HH;
+          };
+        };
+        ((__CHARACTER *)Self__S0HH->storage__3CS)[Self__S0HH->count__SGC]=' ';
+        Self__S0HH->count__SGC=(__INTEGER)(Self__S0HH->count__SGC +  1);
+        ((__STRING *)string_tmp__VH)->count__SGC= 0;
+        Self__ZMMG=Self__S34F->priority_and_level__UZHC;
+        result__1MMG= 0;
+        if ((Self__ZMMG <  0)) {
+          result__1MMG=(__INTEGER)(- Self__ZMMG);
+        } else {
+          result__1MMG=Self__ZMMG;
+        };
+        Self__AOMG=((__INTEGER_32 )result__1MMG);
+        val__IOMG= 0;
+        i__LOMG= 0;
+        j__MOMG= 0;
+        if ((Self__AOMG ==  0)) {
+          Self__Y0HH=((__STRING *)string_tmp__VH);
+          new_capacity__X0HH= 0;
+          if ((Self__Y0HH->capacity__UCS <= Self__Y0HH->count__SGC)) {
+            if ((Self__Y0HH->capacity__UCS ==  0)) {
+              Self__Y0HH->capacity__UCS= 32;
+              Self__Y0HH->storage__3CS=create__YIEB( 32);
+            } else {
+              new_capacity__X0HH=(__INTEGER)(Self__Y0HH->capacity__UCS <<  1);
+              Self__Z0HH=((__CHARACTER *)Self__Y0HH->storage__3CS);
+              old_nb_elts__00HH=Self__Y0HH->capacity__UCS;
+              new__10HH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__Z0HH),((__UINTEGER_32 )old_nb_elts__00HH),((__UINTEGER_32 )new_capacity__X0HH)));
+              upper__KRJH=(__INTEGER)(new_capacity__X0HH -  1);
+              Self__IRJH=old_nb_elts__00HH;
+              while ((Self__IRJH <= upper__KRJH)) {
+                new__10HH[Self__IRJH]='\0';
+                Self__IRJH=(__INTEGER)(Self__IRJH +  1);
+              };
+              Self__Y0HH->storage__3CS=new__10HH;
+              Self__Y0HH->capacity__UCS=new_capacity__X0HH;
+            };
+          };
+          ((__CHARACTER *)Self__Y0HH->storage__3CS)[Self__Y0HH->count__SGC]='0';
+          Self__Y0HH->count__SGC=(__INTEGER)(Self__Y0HH->count__SGC +  1);
+        } else {
+          if ((Self__AOMG >  0)) {
+            val__IOMG=Self__AOMG;
+          } else {
+            val__IOMG=(__INTEGER_32)(- Self__AOMG);
+            Self__40HH=((__STRING *)string_tmp__VH);
+            new_capacity__30HH= 0;
+            if ((Self__40HH->capacity__UCS <= Self__40HH->count__SGC)) {
+              if ((Self__40HH->capacity__UCS ==  0)) {
+                Self__40HH->capacity__UCS= 32;
+                Self__40HH->storage__3CS=create__YIEB( 32);
+              } else {
+                new_capacity__30HH=(__INTEGER)(Self__40HH->capacity__UCS <<  1);
+                Self__50HH=((__CHARACTER *)Self__40HH->storage__3CS);
+                old_nb_elts__A1HH=Self__40HH->capacity__UCS;
+                new__B1HH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__50HH),((__UINTEGER_32 )old_nb_elts__A1HH),((__UINTEGER_32 )new_capacity__30HH)));
+                upper__PRJH=(__INTEGER)(new_capacity__30HH -  1);
+                Self__NRJH=old_nb_elts__A1HH;
+                while ((Self__NRJH <= upper__PRJH)) {
+                  new__B1HH[Self__NRJH]='\0';
+                  Self__NRJH=(__INTEGER)(Self__NRJH +  1);
+                };
+                Self__40HH->storage__3CS=new__B1HH;
+                Self__40HH->capacity__UCS=new_capacity__30HH;
+              };
+            };
+            ((__CHARACTER *)Self__40HH->storage__3CS)[Self__40HH->count__SGC]='-';
+            Self__40HH->count__SGC=(__INTEGER)(Self__40HH->count__SGC +  1);
+          };
+          i__LOMG=(__INTEGER)(((__STRING *)string_tmp__VH)->count__SGC +  1);
+          while ((val__IOMG !=  0)) {
+            Self__E1HH=((__STRING *)string_tmp__VH);
+            ch__I1HH=((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )(__INTEGER_32)(val__IOMG %  10)) + ((__INTEGER_8 )'0')))));
+            new_capacity__D1HH= 0;
+            if ((Self__E1HH->capacity__UCS <= Self__E1HH->count__SGC)) {
+              if ((Self__E1HH->capacity__UCS ==  0)) {
+                Self__E1HH->capacity__UCS= 32;
+                Self__E1HH->storage__3CS=create__YIEB( 32);
+              } else {
+                new_capacity__D1HH=(__INTEGER)(Self__E1HH->capacity__UCS <<  1);
+                Self__F1HH=((__CHARACTER *)Self__E1HH->storage__3CS);
+                old_nb_elts__G1HH=Self__E1HH->capacity__UCS;
+                new__H1HH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__F1HH),((__UINTEGER_32 )old_nb_elts__G1HH),((__UINTEGER_32 )new_capacity__D1HH)));
+                upper__URJH=(__INTEGER)(new_capacity__D1HH -  1);
+                Self__SRJH=old_nb_elts__G1HH;
+                while ((Self__SRJH <= upper__URJH)) {
+                  new__H1HH[Self__SRJH]='\0';
+                  Self__SRJH=(__INTEGER)(Self__SRJH +  1);
+                };
+                Self__E1HH->storage__3CS=new__H1HH;
+                Self__E1HH->capacity__UCS=new_capacity__D1HH;
+              };
+            };
+            ((__CHARACTER *)Self__E1HH->storage__3CS)[Self__E1HH->count__SGC]=ch__I1HH;
+            Self__E1HH->count__SGC=(__INTEGER)(Self__E1HH->count__SGC +  1);
+            val__IOMG=(__INTEGER_32)(val__IOMG /  10);
+          };
+          j__MOMG=((__STRING *)string_tmp__VH)->count__SGC;
+          while ((i__LOMG < j__MOMG)) {
+            Self__LVFB=((__STRING *)string_tmp__VH);
+            tmp__OVFB=((__CHARACTER *)Self__LVFB->storage__3CS)[(__INTEGER)(i__LOMG -  1)];
+            ((__CHARACTER *)Self__LVFB->storage__3CS)[(__INTEGER)(i__LOMG -  1)]=((__CHARACTER *)Self__LVFB->storage__3CS)[(__INTEGER)(j__MOMG -  1)];
+            ((__CHARACTER *)Self__LVFB->storage__3CS)[(__INTEGER)(j__MOMG -  1)]=tmp__OVFB;
+            j__MOMG=(__INTEGER)(j__MOMG -  1);
+            i__LOMG=(__INTEGER)(i__LOMG +  1);
+          };
+        };
+        put__to__like__S0DG(string_tmp__VH,buf__T34F,(&__string_119));
+      };
+      Self__K1HH=((__STRING *)buf__T34F);
+      new_capacity__J1HH= 0;
+      if ((Self__K1HH->capacity__UCS <= Self__K1HH->count__SGC)) {
+        if ((Self__K1HH->capacity__UCS ==  0)) {
+          Self__K1HH->capacity__UCS= 32;
+          Self__K1HH->storage__3CS=create__YIEB( 32);
+        } else {
+          new_capacity__J1HH=(__INTEGER)(Self__K1HH->capacity__UCS <<  1);
+          Self__L1HH=((__CHARACTER *)Self__K1HH->storage__3CS);
+          old_nb_elts__M1HH=Self__K1HH->capacity__UCS;
+          new__N1HH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__L1HH),((__UINTEGER_32 )old_nb_elts__M1HH),((__UINTEGER_32 )new_capacity__J1HH)));
+          upper__ZRJH=(__INTEGER)(new_capacity__J1HH -  1);
+          Self__XRJH=old_nb_elts__M1HH;
+          while ((Self__XRJH <= upper__ZRJH)) {
+            new__N1HH[Self__XRJH]='\0';
+            Self__XRJH=(__INTEGER)(Self__XRJH +  1);
+          };
+          Self__K1HH->storage__3CS=new__N1HH;
+          Self__K1HH->capacity__UCS=new_capacity__J1HH;
+        };
+      };
+      ((__CHARACTER *)Self__K1HH->storage__3CS)[Self__K1HH->count__SGC]=' ';
+      Self__K1HH->count__SGC=(__INTEGER)(Self__K1HH->count__SGC +  1);
+      __tmp__JEAG=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)Self__S34F->parent_itm_slot__0S5B.argument_list__QDHC)->parent_arrayed_collection__Z5YB.storage__GAHC)[ 1];
+      if (((struct ___OBJ *)__tmp__JEAG)->__id==__ITM_ARG__) {
+        shorter_in__KKBG(__tmp__JEAG,buf__T34F);
+      } else {
+        shorter_in__BLBG(__tmp__JEAG,buf__T34F);
+      };
+      Self__Q1HH=((__STRING *)buf__T34F);
+      new_capacity__P1HH= 0;
+      if ((Self__Q1HH->capacity__UCS <= Self__Q1HH->count__SGC)) {
+        if ((Self__Q1HH->capacity__UCS ==  0)) {
+          Self__Q1HH->capacity__UCS= 32;
+          Self__Q1HH->storage__3CS=create__YIEB( 32);
+        } else {
+          new_capacity__P1HH=(__INTEGER)(Self__Q1HH->capacity__UCS <<  1);
+          Self__R1HH=((__CHARACTER *)Self__Q1HH->storage__3CS);
+          old_nb_elts__S1HH=Self__Q1HH->capacity__UCS;
+          new__T1HH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__R1HH),((__UINTEGER_32 )old_nb_elts__S1HH),((__UINTEGER_32 )new_capacity__P1HH)));
+          upper__4RJH=(__INTEGER)(new_capacity__P1HH -  1);
+          Self__2RJH=old_nb_elts__S1HH;
+          while ((Self__2RJH <= upper__4RJH)) {
+            new__T1HH[Self__2RJH]='\0';
+            Self__2RJH=(__INTEGER)(Self__2RJH +  1);
+          };
+          Self__Q1HH->storage__3CS=new__T1HH;
+          Self__Q1HH->capacity__UCS=new_capacity__P1HH;
+        };
+      };
+      ((__CHARACTER *)Self__Q1HH->storage__3CS)[Self__Q1HH->count__SGC]=' ';
+      Self__Q1HH->count__SGC=(__INTEGER)(Self__Q1HH->count__SGC +  1);
+    } else {
+      Self__W1HH=((__STRING *)buf__T34F);
+      new_capacity__V1HH= 0;
+      if ((Self__W1HH->capacity__UCS <= Self__W1HH->count__SGC)) {
+        if ((Self__W1HH->capacity__UCS ==  0)) {
+          Self__W1HH->capacity__UCS= 32;
+          Self__W1HH->storage__3CS=create__YIEB( 32);
+        } else {
+          new_capacity__V1HH=(__INTEGER)(Self__W1HH->capacity__UCS <<  1);
+          Self__X1HH=((__CHARACTER *)Self__W1HH->storage__3CS);
+          old_nb_elts__Y1HH=Self__W1HH->capacity__UCS;
+          new__Z1HH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__X1HH),((__UINTEGER_32 )old_nb_elts__Y1HH),((__UINTEGER_32 )new_capacity__V1HH)));
+          upper__DSJH=(__INTEGER)(new_capacity__V1HH -  1);
+          Self__BSJH=old_nb_elts__Y1HH;
+          while ((Self__BSJH <= upper__DSJH)) {
+            new__Z1HH[Self__BSJH]='\0';
+            Self__BSJH=(__INTEGER)(Self__BSJH +  1);
+          };
+          Self__W1HH->storage__3CS=new__Z1HH;
+          Self__W1HH->capacity__UCS=new_capacity__V1HH;
+        };
+      };
+      ((__CHARACTER *)Self__W1HH->storage__3CS)[Self__W1HH->count__SGC]='\'';
+      Self__W1HH->count__SGC=(__INTEGER)(Self__W1HH->count__SGC +  1);
+      put__to__like__S0DG(Self__S34F->pretty_name__5ZHC,buf__T34F,(&__string_130));
+      Self__21HH=((__STRING *)buf__T34F);
+      new_capacity__11HH= 0;
+      if ((Self__21HH->capacity__UCS <= Self__21HH->count__SGC)) {
+        if ((Self__21HH->capacity__UCS ==  0)) {
+          Self__21HH->capacity__UCS= 32;
+          Self__21HH->storage__3CS=create__YIEB( 32);
+        } else {
+          new_capacity__11HH=(__INTEGER)(Self__21HH->capacity__UCS <<  1);
+          Self__31HH=((__CHARACTER *)Self__21HH->storage__3CS);
+          old_nb_elts__41HH=Self__21HH->capacity__UCS;
+          new__51HH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__31HH),((__UINTEGER_32 )old_nb_elts__41HH),((__UINTEGER_32 )new_capacity__11HH)));
+          upper__ISJH=(__INTEGER)(new_capacity__11HH -  1);
+          Self__GSJH=old_nb_elts__41HH;
+          while ((Self__GSJH <= upper__ISJH)) {
+            new__51HH[Self__GSJH]='\0';
+            Self__GSJH=(__INTEGER)(Self__GSJH +  1);
+          };
+          Self__21HH->storage__3CS=new__51HH;
+          Self__21HH->capacity__UCS=new_capacity__11HH;
+        };
+      };
+      ((__CHARACTER *)Self__21HH->storage__3CS)[Self__21HH->count__SGC]='\'';
+      Self__21HH->count__SGC=(__INTEGER)(Self__21HH->count__SGC +  1);
+      Self__C2HH=((__STRING *)buf__T34F);
+      new_capacity__B2HH= 0;
+      if ((Self__C2HH->capacity__UCS <= Self__C2HH->count__SGC)) {
+        if ((Self__C2HH->capacity__UCS ==  0)) {
+          Self__C2HH->capacity__UCS= 32;
+          Self__C2HH->storage__3CS=create__YIEB( 32);
+        } else {
+          new_capacity__B2HH=(__INTEGER)(Self__C2HH->capacity__UCS <<  1);
+          Self__D2HH=((__CHARACTER *)Self__C2HH->storage__3CS);
+          old_nb_elts__E2HH=Self__C2HH->capacity__UCS;
+          new__F2HH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__D2HH),((__UINTEGER_32 )old_nb_elts__E2HH),((__UINTEGER_32 )new_capacity__B2HH)));
+          upper__NSJH=(__INTEGER)(new_capacity__B2HH -  1);
+          Self__LSJH=old_nb_elts__E2HH;
+          while ((Self__LSJH <= upper__NSJH)) {
+            new__F2HH[Self__LSJH]='\0';
+            Self__LSJH=(__INTEGER)(Self__LSJH +  1);
+          };
+          Self__C2HH->storage__3CS=new__F2HH;
+          Self__C2HH->capacity__UCS=new_capacity__B2HH;
+        };
+      };
+      ((__CHARACTER *)Self__C2HH->storage__3CS)[Self__C2HH->count__SGC]=' ';
+      Self__C2HH->count__SGC=(__INTEGER)(Self__C2HH->count__SGC +  1);
+      __tmp__TEAG=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)Self__S34F->parent_itm_slot__0S5B.argument_list__QDHC)->parent_arrayed_collection__Z5YB.storage__GAHC)[ 0];
+      if (((struct ___OBJ *)__tmp__TEAG)->__id==__ITM_ARG__) {
+        shorter_in__KKBG(__tmp__TEAG,buf__T34F);
+      } else {
+        shorter_in__BLBG(__tmp__TEAG,buf__T34F);
+      };
+      Self__I2HH=((__STRING *)buf__T34F);
+      new_capacity__H2HH= 0;
+      if ((Self__I2HH->capacity__UCS <= Self__I2HH->count__SGC)) {
+        if ((Self__I2HH->capacity__UCS ==  0)) {
+          Self__I2HH->capacity__UCS= 32;
+          Self__I2HH->storage__3CS=create__YIEB( 32);
+        } else {
+          new_capacity__H2HH=(__INTEGER)(Self__I2HH->capacity__UCS <<  1);
+          Self__J2HH=((__CHARACTER *)Self__I2HH->storage__3CS);
+          old_nb_elts__K2HH=Self__I2HH->capacity__UCS;
+          new__L2HH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__J2HH),((__UINTEGER_32 )old_nb_elts__K2HH),((__UINTEGER_32 )new_capacity__H2HH)));
+          upper__SSJH=(__INTEGER)(new_capacity__H2HH -  1);
+          Self__QSJH=old_nb_elts__K2HH;
+          while ((Self__QSJH <= upper__SSJH)) {
+            new__L2HH[Self__QSJH]='\0';
+            Self__QSJH=(__INTEGER)(Self__QSJH +  1);
+          };
+          Self__I2HH->storage__3CS=new__L2HH;
+          Self__I2HH->capacity__UCS=new_capacity__H2HH;
+        };
+      };
+      ((__CHARACTER *)Self__I2HH->storage__3CS)[Self__I2HH->count__SGC]=' ';
+      Self__I2HH->count__SGC=(__INTEGER)(Self__I2HH->count__SGC +  1);
+    };
+  };
+  if (((void *)Self__S34F->parent_itm_slot__0S5B.result_type__A4FC != (void *)type_void__WYF)) {
+    Self__O2HH=((__STRING *)buf__T34F);
+    new_capacity__N2HH= 0;
+    if ((Self__O2HH->capacity__UCS <= Self__O2HH->count__SGC)) {
+      if ((Self__O2HH->capacity__UCS ==  0)) {
+        Self__O2HH->capacity__UCS= 32;
+        Self__O2HH->storage__3CS=create__YIEB( 32);
+      } else {
+        new_capacity__N2HH=(__INTEGER)(Self__O2HH->capacity__UCS <<  1);
+        Self__P2HH=((__CHARACTER *)Self__O2HH->storage__3CS);
+        old_nb_elts__Q2HH=Self__O2HH->capacity__UCS;
+        new__R2HH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__P2HH),((__UINTEGER_32 )old_nb_elts__Q2HH),((__UINTEGER_32 )new_capacity__N2HH)));
+        upper__XSJH=(__INTEGER)(new_capacity__N2HH -  1);
+        Self__VSJH=old_nb_elts__Q2HH;
+        while ((Self__VSJH <= upper__XSJH)) {
+          new__R2HH[Self__VSJH]='\0';
+          Self__VSJH=(__INTEGER)(Self__VSJH +  1);
+        };
+        Self__O2HH->storage__3CS=new__R2HH;
+        Self__O2HH->capacity__UCS=new_capacity__N2HH;
+      };
+    };
+    ((__CHARACTER *)Self__O2HH->storage__3CS)[Self__O2HH->count__SGC]=':';
+    Self__O2HH->count__SGC=(__INTEGER)(Self__O2HH->count__SGC +  1);
+    __tmp__L44F=Self__S34F->parent_itm_slot__0S5B.result_type__A4FC;
+    switch (((struct ___OBJ *)__tmp__L44F)->__id) {
     case __ITM_TYPE_PARAMETER__: {
-      shorter_in__ASDG(__tmp__R24F,buf__Z14F);
+      shorter_in__0TDG(__tmp__L44F,buf__T34F);
     } break;
     case __ITM_TYPE_SIMPLE__: {
-      shorter_in__RSDG(__tmp__R24F,buf__Z14F);
+      shorter_in__LUDG(__tmp__L44F,buf__T34F);
     } break;
     case __ITM_TYPE_MULTI__: {
-      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,')');
+      Self__L0DG=((__ITM_TYPE_MULTI *)__tmp__L44F);
+      Self__U2HH=((__STRING *)buf__T34F);
+      new_capacity__T2HH= 0;
+      if ((Self__U2HH->capacity__UCS <= Self__U2HH->count__SGC)) {
+        if ((Self__U2HH->capacity__UCS ==  0)) {
+          Self__U2HH->capacity__UCS= 32;
+          Self__U2HH->storage__3CS=create__YIEB( 32);
+        } else {
+          new_capacity__T2HH=(__INTEGER)(Self__U2HH->capacity__UCS <<  1);
+          Self__V2HH=((__CHARACTER *)Self__U2HH->storage__3CS);
+          old_nb_elts__W2HH=Self__U2HH->capacity__UCS;
+          new__X2HH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__V2HH),((__UINTEGER_32 )old_nb_elts__W2HH),((__UINTEGER_32 )new_capacity__T2HH)));
+          upper__2SJH=(__INTEGER)(new_capacity__T2HH -  1);
+          Self__0SJH=old_nb_elts__W2HH;
+          while ((Self__0SJH <= upper__2SJH)) {
+            new__X2HH[Self__0SJH]='\0';
+            Self__0SJH=(__INTEGER)(Self__0SJH +  1);
+          };
+          Self__U2HH->storage__3CS=new__X2HH;
+          Self__U2HH->capacity__UCS=new_capacity__T2HH;
+        };
+      };
+      ((__CHARACTER *)Self__U2HH->storage__3CS)[Self__U2HH->count__SGC]='(';
+      Self__U2HH->count__SGC=(__INTEGER)(Self__U2HH->count__SGC +  1);
+      shorter_raw_in__M2FG(Self__L0DG,buf__T34F);
+      Self__02HH=((__STRING *)buf__T34F);
+      new_capacity__Z2HH= 0;
+      if ((Self__02HH->capacity__UCS <= Self__02HH->count__SGC)) {
+        if ((Self__02HH->capacity__UCS ==  0)) {
+          Self__02HH->capacity__UCS= 32;
+          Self__02HH->storage__3CS=create__YIEB( 32);
+        } else {
+          new_capacity__Z2HH=(__INTEGER)(Self__02HH->capacity__UCS <<  1);
+          Self__12HH=((__CHARACTER *)Self__02HH->storage__3CS);
+          old_nb_elts__22HH=Self__02HH->capacity__UCS;
+          new__32HH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__12HH),((__UINTEGER_32 )old_nb_elts__22HH),((__UINTEGER_32 )new_capacity__Z2HH)));
+          upper__BTJH=(__INTEGER)(new_capacity__Z2HH -  1);
+          Self__5SJH=old_nb_elts__22HH;
+          while ((Self__5SJH <= upper__BTJH)) {
+            new__32HH[Self__5SJH]='\0';
+            Self__5SJH=(__INTEGER)(Self__5SJH +  1);
+          };
+          Self__02HH->storage__3CS=new__32HH;
+          Self__02HH->capacity__UCS=new_capacity__Z2HH;
+        };
+      };
+      ((__CHARACTER *)Self__02HH->storage__3CS)[Self__02HH->count__SGC]=')';
+      Self__02HH->count__SGC=(__INTEGER)(Self__02HH->count__SGC +  1);
     } break;
     case __ITM_TYPE_BLOCK__: {
-      shorter_in__CTDG(__tmp__R24F,buf__Z14F);
+      shorter_in__2UDG(__tmp__L44F,buf__T34F);
     } break;
     case __ITM_TYPE_GENERIC__: {
-      shorter_in__KUDG(__tmp__R24F,buf__Z14F);
+      shorter_in__EWDG(__tmp__L44F,buf__T34F);
     } break;
     case __ITM_TYPE_STYLE__: {
-      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__OYFG(Self__Q3FH->parent_itm_type_simple__RSN.name__0YP,buf__Z14F,(&__string_125));
+      Self__52HH=((__ITM_TYPE_STYLE *)__tmp__L44F);
+      if (((void *)Self__52HH->style__PZP != (void *)NULL)) {
+        put__to__like__I0FG(Self__52HH->style__PZP,buf__T34F,(&__string_119));
+        Self__C3HH=((__STRING *)buf__T34F);
+        new_capacity__B3HH= 0;
+        if ((Self__C3HH->capacity__UCS <= Self__C3HH->count__SGC)) {
+          if ((Self__C3HH->capacity__UCS ==  0)) {
+            Self__C3HH->capacity__UCS= 32;
+            Self__C3HH->storage__3CS=create__YIEB( 32);
+          } else {
+            new_capacity__B3HH=(__INTEGER)(Self__C3HH->capacity__UCS <<  1);
+            Self__D3HH=((__CHARACTER *)Self__C3HH->storage__3CS);
+            old_nb_elts__E3HH=Self__C3HH->capacity__UCS;
+            new__F3HH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__D3HH),((__UINTEGER_32 )old_nb_elts__E3HH),((__UINTEGER_32 )new_capacity__B3HH)));
+            upper__GTJH=(__INTEGER)(new_capacity__B3HH -  1);
+            Self__ETJH=old_nb_elts__E3HH;
+            while ((Self__ETJH <= upper__GTJH)) {
+              new__F3HH[Self__ETJH]='\0';
+              Self__ETJH=(__INTEGER)(Self__ETJH +  1);
+            };
+            Self__C3HH->storage__3CS=new__F3HH;
+            Self__C3HH->capacity__UCS=new_capacity__B3HH;
+          };
+        };
+        ((__CHARACTER *)Self__C3HH->storage__3CS)[Self__C3HH->count__SGC]=' ';
+        Self__C3HH->count__SGC=(__INTEGER)(Self__C3HH->count__SGC +  1);
+      };
+      put__to__like__I0FG(Self__52HH->parent_itm_type_simple__3SN.name__GZP,buf__T34F,(&__string_125));
     } break;
     };
   };
 }
 
-static __CHARACTER* create__JMEB(__INTEGER nb_elements__LMEB)
-// ({INTEGER}) With resultNo recursive, No inlinable.
+static void* new_page__H54()
+// () With resultNo recursive, No inlinable.
 {
-  __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__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__OEJH == (void *)NULL)) {
-      result__OEJH=new_page__YC5();
-    };
-    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__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);
+  __UINTEGER_64 cap__WZSB,old_size__K54;
+  __POINTER mem__ZZSB;
+  void *block__Q54;
+  if ((capacity_max__R54 ==  0)) {
+    mem__ZZSB=((__POINTER )(NULL));
+    cap__WZSB= 33554432;
+    do {
+      cap__WZSB=(__UINTEGER_64)(cap__WZSB <<  1);
+      mem__ZZSB=((__POINTER )(malloc((cap__WZSB))));
+      if ((mem__ZZSB != (void *)NULL)) {
+        free((mem__ZZSB));
+      };
+    } while ((! ((mem__ZZSB == (void *)NULL) || (cap__WZSB == ((__UINTEGER_64 )(2048LU << 20))))));
+    if ((mem__ZZSB == (void *)NULL)) {
+      cap__WZSB=(__UINTEGER_64)(cap__WZSB >>  1);
+    };
+    get_begin_memory__RAQB=((__POINTER )(malloc((cap__WZSB))));
+    capacity_max__R54=cap__WZSB;
+    begin_memory__4XH=get_begin_memory__RAQB;
+  };
+  old_size__K54=((__UINTEGER_64 )(__UINTEGER_32)(nb_page__DUJ <<  26));
+  nb_page__DUJ=(__UINTEGER_32)(nb_page__DUJ +  1);
+  if (((__UINTEGER_64)(old_size__K54 +  67108864) > capacity_max__R54)) {
+    print__OJD((&__string_250));
+    exit(( 1));
   };
-  return(Result__MBKB);
+  block__Q54=((void *)(void *)((unsigned long)begin_memory__4XH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )old_size__K54)))));
+  ((__MEMORY *)block__Q54)->map_previous_linear__XTB= 4294967295LU;
+  ((__MEMORY *)block__Q54)->map_size_and_id__YTB= 67108858;
+  ((__MEMORY *)block__Q54)->map_next_free__ZTB=first_free__0BVB;
+  ((__MEMORY *)block__Q54)->map_previous_free__0TB=NULL;
+  if (((void *)first_free__0BVB != (void *)NULL)) {
+    ((__MEMORY *)first_free__0BVB)->map_previous_free__0TB=block__Q54;
+  };
+  first_free__0BVB=block__Q54;
+  last_block[((__UINTEGER_32)(nb_page__DUJ -  1))] = (block__Q54);
+  return(block__Q54);
 }
 
-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.
+static void to_busy__index__3SFC(__MEMORY *Self__4SFC,__UINTEGER_32 sz__5SFC,__UINTEGER_32 idx__ATFC)
+// ({MEMORY},{UINTEGER_32},{UINTEGER_32}) VoidNo recursive, No inlinable.
 {
-  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;
+  void *new__HTFC,*prev__CDOC,*next__DDOC;
+  __UINTEGER_32 siz__BTFC,new_size__ETFC;
+  __MEMORY *Self__NRCC,*Self__TNAH;
+  new__HTFC=NULL;
+  prev__CDOC=Self__4SFC->map_previous_free__0TB;
+  next__DDOC=Self__4SFC->map_next_free__ZTB;
+  if (((void *)prev__CDOC == (void *)NULL)) {
+    first_free__0BVB=next__DDOC;
   } else {
-    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);
+    ((__MEMORY *)prev__CDOC)->map_next_free__ZTB=next__DDOC;
+  };
+  if (((void *)next__DDOC != (void *)NULL)) {
+    ((__MEMORY *)next__DDOC)->map_previous_free__0TB=prev__CDOC;
+  };
+  siz__BTFC=Self__4SFC->map_size_and_id__YTB;
+  new_size__ETFC=(__UINTEGER_32)(siz__BTFC - sz__5SFC);
+  if ((new_size__ETFC > (__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )(MINIMUM_SIZE)) +  2) +  8))) {
+    siz__BTFC=sz__5SFC;
+    new__HTFC=((void *)(void *)((unsigned long)(void *)((unsigned long)((__POINTER )Self__4SFC) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )sz__5SFC))));
+    ((__MEMORY *)new__HTFC)->map_previous_linear__XTB=((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )Self__4SFC) - (unsigned long)begin_memory__4XH))));
+    ((__MEMORY *)new__HTFC)->map_size_and_id__YTB=(__UINTEGER_32)(new_size__ETFC -  8);
+    Self__NRCC=((__MEMORY *)new__HTFC);
+    Self__NRCC->map_next_free__ZTB=first_free__0BVB;
+    Self__NRCC->map_previous_free__0TB=NULL;
+    if (((void *)first_free__0BVB != (void *)NULL)) {
+      ((__MEMORY *)first_free__0BVB)->map_previous_free__0TB=Self__NRCC;
+    };
+    first_free__0BVB=Self__NRCC;
+    if (((__UINTEGER_32)(((__MEMORY *)new__HTFC)->map_size_and_id__YTB &  2) !=  0)) {
+      last_block[(idx__ATFC)] = (new__HTFC);
+    } else {
+      Self__TNAH=((__MEMORY *)new__HTFC);
+      ((__MEMORY *)((void *)(void *)((unsigned long)(void *)((unsigned long)((__POINTER )Self__TNAH) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )(__UINTEGER_32)(Self__TNAH->map_size_and_id__YTB &  4294967292LU))))))->map_previous_linear__XTB=((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)new__HTFC)) - (unsigned long)begin_memory__4XH))));
+    };
+  };
+  Self__4SFC->map_size_and_id__YTB=(__UINTEGER_32)(siz__BTFC |  1);
 }
 
-static void** create__JDRB(__INTEGER nb_elements__LDRB)
+static void** create__W5QB(__INTEGER nb_elements__Y5QB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__XCHH,a__WCHH,new_size__YCHH,new_size2__ZCHH,a__0CHH;
+  __UINTEGER_32 new_size__1CHH;
+  __POINTER result__VCHH,ptr_table__OTJH,next__NTJH,result__PTJH;
+  __INTEGER Self__34MC;
+  void **Result__42TB;
+  sz__XCHH=((__UINTEGER_32 )(__INTEGER)(nb_elements__Y5QB * ((__INTEGER )(sizeof(void *)))));
+  result__VCHH=((__POINTER )(NULL));
+  a__WCHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__YCHH=(__UINTEGER_32)((__UINTEGER_32)(sz__XCHH + a__WCHH) & (__UINTEGER_32)(~ a__WCHH));
+  new_size2__ZCHH=(__UINTEGER_32)(new_size__YCHH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__ZCHH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__0CHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__1CHH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__ZCHH + a__0CHH) & (__UINTEGER_32)(~ a__0CHH));
+    ptr_table__OTJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__1CHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__NTJH=((__POINTER )(NULL));
+    result__PTJH=((__POINTER *)ptr_table__OTJH)[ 0];
+    if ((result__PTJH == (void *)NULL)) {
+      result__PTJH=new_lab__RTJ(new_size__1CHH);
+      next__NTJH=(void *)((unsigned long)result__PTJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1CHH)));
+      ((__POINTER *)next__NTJH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__OTJH)[ 0]=next__NTJH;
+    } else {
+      next__NTJH=((__POINTER *)result__PTJH)[ 0];
+      if ((next__NTJH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__PTJH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__1CHH <<  1)) <=  4096)) {
+          next__NTJH=(void *)((unsigned long)result__PTJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1CHH)));
+        } else {
+          next__NTJH=new_lab__RTJ(new_size__1CHH);
+        };
+        ((__POINTER *)next__NTJH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__OTJH)[ 0]=next__NTJH;
+      } else {
+        ((__POINTER *)result__PTJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NTJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__PTJH=next__NTJH;
+      };
+    };
+    ((__POINTER *)result__PTJH)[ 0]=((__POINTER ) 3);
+    result__VCHH=(void *)((unsigned long)result__PTJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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__JFJH == (void *)NULL)) {
-      result__JFJH=new_page__YC5();
-    };
-    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__VCHH=(void *)((unsigned long)((__POINTER )((__MEMORY *)search__XAVB(new_size__YCHH))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__42TB=((void **)result__VCHH);
+  Self__34MC=(__INTEGER)(nb_elements__Y5QB -  1);
+  while ((Self__34MC >=  0)) {
+    Result__42TB[Self__34MC]=NULL;
+    Self__34MC=(__INTEGER)(Self__34MC -  1);
   };
-  return(Result__RAUB);
+  return(Result__42TB);
 }
 
-static void* fast_reference_at__F4T(__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *Self__G4T,void *k__H4T)
+static void* fast_reference_at__R3T(__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *Self__S3T,void *k__T3T)
 // ({HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  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);
+  void *result__43T;
+  void *node__33T;
+  result__43T=NULL;
+  node__33T=((void **)Self__S3T->buckets__F4T)[(__INTEGER)(hash_code__RNW(k__T3T) % Self__S3T->capacity__A4T)];
+  while ((! (((void *)node__33T == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node__33T)->key__R4T == (void *)k__T3T)))) {
+    node__33T=((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node__33T)->next__24T;
+  };
+  if (((void *)node__33T != (void *)NULL)) {
+    result__43T=((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node__33T)->item__E5T;
+  };
+  return(result__43T);
 }
 
-static void** create__BMHE(__INTEGER nb_elements__DMHE)
+static void** create__QMHE(__INTEGER nb_elements__SMHE)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__5CHH,a__4CHH,new_size__ADHH,new_size2__BDHH,a__CDHH;
+  __UINTEGER_32 new_size__DDHH;
+  __POINTER result__3CHH,ptr_table__TTJH,next__STJH,result__UTJH;
+  __INTEGER Self__AVYE;
+  void **Result__J4ME;
+  sz__5CHH=((__UINTEGER_32 )(__INTEGER)(nb_elements__SMHE * ((__INTEGER )(sizeof(void *)))));
+  result__3CHH=((__POINTER )(NULL));
+  a__4CHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__ADHH=(__UINTEGER_32)((__UINTEGER_32)(sz__5CHH + a__4CHH) & (__UINTEGER_32)(~ a__4CHH));
+  new_size2__BDHH=(__UINTEGER_32)(new_size__ADHH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__BDHH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__CDHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__DDHH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__BDHH + a__CDHH) & (__UINTEGER_32)(~ a__CDHH));
+    ptr_table__TTJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__DDHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__STJH=((__POINTER )(NULL));
+    result__UTJH=((__POINTER *)ptr_table__TTJH)[ 0];
+    if ((result__UTJH == (void *)NULL)) {
+      result__UTJH=new_lab__RTJ(new_size__DDHH);
+      next__STJH=(void *)((unsigned long)result__UTJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DDHH)));
+      ((__POINTER *)next__STJH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__TTJH)[ 0]=next__STJH;
+    } else {
+      next__STJH=((__POINTER *)result__UTJH)[ 0];
+      if ((next__STJH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__UTJH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__DDHH <<  1)) <=  4096)) {
+          next__STJH=(void *)((unsigned long)result__UTJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DDHH)));
+        } else {
+          next__STJH=new_lab__RTJ(new_size__DDHH);
+        };
+        ((__POINTER *)next__STJH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__TTJH)[ 0]=next__STJH;
+      } else {
+        ((__POINTER *)result__UTJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__STJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__UTJH=next__STJH;
+      };
+    };
+    ((__POINTER *)result__UTJH)[ 0]=((__POINTER ) 3);
+    result__3CHH=(void *)((unsigned long)result__UTJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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__RFJH == (void *)NULL)) {
-      result__RFJH=new_page__YC5();
-    };
-    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__3CHH=(void *)((unsigned long)((__POINTER )((__MEMORY *)search__XAVB(new_size__ADHH))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__J4ME=((void **)result__3CHH);
+  Self__AVYE=(__INTEGER)(nb_elements__SMHE -  1);
+  while ((Self__AVYE >=  0)) {
+    Result__J4ME[Self__AVYE]=NULL;
+    Self__AVYE=(__INTEGER)(Self__AVYE -  1);
   };
-  return(Result__03ME);
+  return(Result__J4ME);
 }
 
-static __BOOLEAN has__DQW(__HASHED_SEToABSTRACT_STRINGo *Self__EQW,void *e__FQW)
+static __BOOLEAN has__PPW(__HASHED_SEToABSTRACT_STRINGo *Self__QPW,void *e__RPW)
 // ({HASHED_SEToABSTRACT_STRINGo},{STRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __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));
+  void *node__0PW;
+  node__0PW=((void **)Self__QPW->buckets__0ZR)[(__INTEGER)(hash_code__RNW(e__RPW) % Self__QPW->capacity__VZR)];
+  while ((! (((void *)node__0PW == (void *)NULL) || __infix_equal_equal__V2DB(((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__0PW)->item__G0R,e__RPW)))) {
+    node__0PW=((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__0PW)->next__S0R;
+  };
+  return(((void *)node__0PW != (void *)NULL));
 }
 
-static void increase_capacity__ISNB(__HASHED_SEToABSTRACT_STRINGo *Self__JSNB)
+static void increase_capacity__XONB(__HASHED_SEToABSTRACT_STRINGo *Self__YONB)
 // ({HASHED_SEToABSTRACT_STRINGo}) VoidNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER idx__0ONB,new_capacity__1ONB,i__ZONB;
+  void *node1__3ONB,*node2__4ONB;
+  void **old_buckets__2ONB;
+  idx__0ONB= 0;
+  node1__3ONB=NULL;
+  node2__4ONB=NULL;
+  new_capacity__1ONB=prime_number_ceiling__021((__INTEGER)(Self__YONB->capacity__VZR +  1));
+  old_buckets__2ONB=Self__YONB->buckets__0ZR;
+  Self__YONB->buckets__0ZR=create__EI2(new_capacity__1ONB);
+  i__ZONB=(__INTEGER)(Self__YONB->capacity__VZR -  1);
+  Self__YONB->capacity__VZR=new_capacity__1ONB;
+  while ((i__ZONB >=  0)) {
+    node1__3ONB=((void **)old_buckets__2ONB)[i__ZONB];
+    while (((void *)node1__3ONB != (void *)NULL)) {
+      node2__4ONB=((__HASHED_SET_NODEoABSTRACT_STRINGo *)node1__3ONB)->next__S0R;
+      idx__0ONB=(__INTEGER)(hash_code__RNW(((__HASHED_SET_NODEoABSTRACT_STRINGo *)node1__3ONB)->item__G0R) % Self__YONB->capacity__VZR);
+      ((__HASHED_SET_NODEoABSTRACT_STRINGo *)node1__3ONB)->next__S0R=((void **)Self__YONB->buckets__0ZR)[idx__0ONB];
+      ((void **)Self__YONB->buckets__0ZR)[idx__0ONB]=node1__3ONB;
+      node1__3ONB=node2__4ONB;
+    };
+    i__ZONB=(__INTEGER)(i__ZONB -  1);
   };
 }
 
-static void put_string__DJF(void *s__FJF)
+static void put_string__AKF(void *s__CKF)
 // ({STRING_CONSTANTxSTRING}) VoidNo recursive, No inlinable.
 {
-  __INTEGER __tmp__WJF,Self__0CG,limit_up__1CG;
-  __CHARACTER __tmp__3JF;
-  if (((struct ___OBJ *)s__FJF)->__id==__STRING_CONSTANT__) {
+  __INTEGER __tmp__TKF,Self__IDG,limit_up__JDG;
+  __CHARACTER *__tmp__BPFH,*__tmp__41GH;
+  __CHARACTER __tmp__0KF;
+  if (((struct ___OBJ *)s__CKF)->__id==__STRING_CONSTANT__) {
   };
-  if (((struct ___OBJ *)s__FJF)->__id==__STRING_CONSTANT__) {
-    __tmp__WJF=((__STRING_CONSTANT *)s__FJF)->count__DD;
+  if (((struct ___OBJ *)s__CKF)->__id==__STRING_CONSTANT__) {
+    __tmp__TKF=((__STRING_CONSTANT *)s__CKF)->count__DD;
   } else {
-    __tmp__WJF=((__STRING *)s__FJF)->count__EGC;
+    __tmp__TKF=((__STRING *)s__CKF)->count__SGC;
   };
-  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)];
+  Self__IDG= 1;
+  limit_up__JDG=__tmp__TKF;
+  __tmp__BPFH=((__STRING *)s__CKF)->storage__3CS;
+  __tmp__41GH=((__STRING_CONSTANT *)s__CKF)->storage__RRO;
+  while ((Self__IDG <= limit_up__JDG)) {
+    if (((struct ___OBJ *)s__CKF)->__id==__STRING_CONSTANT__) {
+      __tmp__0KF=((__CHARACTER *)__tmp__41GH)[(__INTEGER)(Self__IDG -  1)];
     } else {
-      __tmp__3JF=((__CHARACTER *)((__STRING *)s__FJF)->storage__RCS)[(__INTEGER)(Self__0CG -  1)];
+      __tmp__0KF=((__CHARACTER *)__tmp__BPFH)[(__INTEGER)(Self__IDG -  1)];
     };
-    fputc((int)(__tmp__3JF),stdout);
-    Self__0CG=(__INTEGER)(Self__0CG +  1);
+    fputc((int)(__tmp__0KF),stdout);
+    Self__IDG=(__INTEGER)(Self__IDG +  1);
   };
 }
 
-static __BOOLEAN fast_has__WAY(__HASHED_SEToABSTRACT_STRINGo *Self__XAY,void *e__YAY)
+static __INTEGER hash_code__UFX(__STRING *Self__VFX)
+// ({STRING}) With resultNo recursive, No inlinable.
+{
+  __INTEGER result__XFX,__tmp__YFX,Self__QT2;
+  __CHARACTER *__tmp__HFEH;
+  result__XFX= 0;
+  __tmp__YFX=Self__VFX->count__SGC;
+  Self__QT2= 1;
+  __tmp__HFEH=Self__VFX->storage__3CS;
+  while ((Self__QT2 <= __tmp__YFX)) {
+    result__XFX=(__INTEGER)((__INTEGER)( 5 * result__XFX) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)__tmp__HFEH)[(__INTEGER)(Self__QT2 -  1)])));
+    Self__QT2=(__INTEGER)(Self__QT2 +  1);
+  };
+  if ((result__XFX <  0)) {
+    result__XFX=(__INTEGER)(~ result__XFX);
+  };
+  return(result__XFX);
+}
+
+static __BOOLEAN fast_has__CAY(__HASHED_SEToABSTRACT_STRINGo *Self__DAY,void *e__EAY)
 // ({HASHED_SEToABSTRACT_STRINGo},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __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));
+  void *node__NAY;
+  node__NAY=((void **)Self__DAY->buckets__0ZR)[(__INTEGER)(hash_code__RNW(e__EAY) % Self__DAY->capacity__VZR)];
+  while ((! (((void *)node__NAY == (void *)NULL) || ((void *)((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__NAY)->item__G0R == (void *)e__EAY)))) {
+    node__NAY=((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__NAY)->next__S0R;
+  };
+  return(((void *)node__NAY != (void *)NULL));
+}
+
+static void from_external__YZS(__STRING *Self__ZZS,__CHARACTER *p__0ZS)
+// ({STRING},{NULLxNATIVE_ARRAYoExpanded_CHARACTERo}) VoidNo recursive, No inlinable.
+{
+  Self__ZZS->count__SGC= 0;
+  while ((((__CHARACTER *)p__0ZS)[Self__ZZS->count__SGC] != '\0')) {
+    Self__ZZS->count__SGC=(__INTEGER)(Self__ZZS->count__SGC +  1);
+  };
+  if (((void *)Self__ZZS->storage__3CS != (void *)p__0ZS)) {
+    Self__ZZS->storage__3CS=p__0ZS;
+    Self__ZZS->capacity__UCS=(__INTEGER)(Self__ZZS->count__SGC +  1);
+  };
 }
 
-static void* physical_get_entry__UDF(void *new_path__WDF)
+static void* physical_get_entry__REF(void *new_path__TEF)
 // ({NULLxSTRING}) With resultNo recursive, No inlinable.
 {
-  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';
+  void *result__WEF;
+  __STRING *Self__51GH;
+  __INTEGER new_capacity__N3HH,old_nb_elts__Q3HH,upper__0TJH,Self__YTJH;
+  __INTEGER typ_id__4TJH,typ_id__QUJH;
+  __FILE_UNIX *result__2TJH;
+  __POINTER ptr__3TJH,ptr_table__FUJH,next__EUJH,result__GUJH;
+  __POINTER ptr_table__KUJH,next__JUJH,result__LUJH,ptr__PUJH;
+  __POINTER ptr_table__XUJH,next__WUJH,result__YUJH,ptr_table__2UJH;
+  __POINTER next__1UJH,result__3UJH;
+  __UINTEGER_32 sz__5TJH,a__AUJH,new_size__BUJH,t__CUJH,a__DUJH;
+  __UINTEGER_32 new_size__NUJH,lab_type__MUJH,sz__RUJH,a__SUJH;
+  __UINTEGER_32 new_size__TUJH,t__UUJH,a__VUJH,new_size__5UJH;
+  __UINTEGER_32 lab_type__4UJH;
+  __DIRECTORY_UNIX *result__OUJH;
+  void *__tmp__PFF;
+  __CHARACTER *Self__P3HH,*new__R3HH,*pe__VEF;
+  result__WEF=NULL;
+  Self__51GH=((__STRING *)new_path__TEF);
+  if ((Self__51GH->capacity__UCS > Self__51GH->count__SGC)) {
+    ((__CHARACTER *)Self__51GH->storage__3CS)[Self__51GH->count__SGC]='\0';
   } else {
-    add_last__GOT(Self__BCGH,'\0');
-    Self__BCGH->count__EGC=(__INTEGER)(Self__BCGH->count__EGC -  1);
-  };
-  pe__YDF=Self__BCGH->storage__RCS;
+    new_capacity__N3HH= 0;
+    if ((Self__51GH->capacity__UCS <= Self__51GH->count__SGC)) {
+      if ((Self__51GH->capacity__UCS ==  0)) {
+        Self__51GH->capacity__UCS= 32;
+        Self__51GH->storage__3CS=create__YIEB( 32);
+      } else {
+        new_capacity__N3HH=(__INTEGER)(Self__51GH->capacity__UCS <<  1);
+        Self__P3HH=((__CHARACTER *)Self__51GH->storage__3CS);
+        old_nb_elts__Q3HH=Self__51GH->capacity__UCS;
+        new__R3HH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__P3HH),((__UINTEGER_32 )old_nb_elts__Q3HH),((__UINTEGER_32 )new_capacity__N3HH)));
+        upper__0TJH=(__INTEGER)(new_capacity__N3HH -  1);
+        Self__YTJH=old_nb_elts__Q3HH;
+        while ((Self__YTJH <= upper__0TJH)) {
+          new__R3HH[Self__YTJH]='\0';
+          Self__YTJH=(__INTEGER)(Self__YTJH +  1);
+        };
+        Self__51GH->storage__3CS=new__R3HH;
+        Self__51GH->capacity__UCS=new_capacity__N3HH;
+      };
+    };
+    ((__CHARACTER *)Self__51GH->storage__3CS)[Self__51GH->count__SGC]='\0';
+    Self__51GH->count__SGC=(__INTEGER)(Self__51GH->count__SGC +  1);
+    Self__51GH->count__SGC=(__INTEGER)(Self__51GH->count__SGC -  1);
+  };
+  pe__VEF=Self__51GH->storage__3CS;
   { struct stat t;
-  if ((((__INTEGER )(stat((pe__YDF),&t))) ==  0)) {
+  if ((((__INTEGER )(stat((pe__VEF),&t))) ==  0)) {
     if ((((__INTEGER )(S_ISDIR(t.st_mode))) ==  0)) {
-      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)));
+      result__2TJH=NULL;
+      ptr__3TJH=((__POINTER )(NULL));
+      typ_id__4TJH= 0;
+      sz__5TJH=((__UINTEGER_32 )sizeof(__FILE_UNIX));
+      if ((sz__5TJH ==  0)) {
+        result__2TJH=FILE_UNIX__;
+      } else {
+        typ_id__4TJH=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__5TJH);
+        if ((typ_id__4TJH == (__INTEGER)(-  1))) {
+          a__AUJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__BUJH=(__UINTEGER_32)((__UINTEGER_32)(sz__5TJH + a__AUJH) & (__UINTEGER_32)(~ a__AUJH));
+          ptr_table__FUJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__BUJH / ((__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__RTJ(new_size__BUJH);
+            next__EUJH=(void *)((unsigned long)result__GUJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BUJH)));
+            ((__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__4XH)))) &  4095) + (__UINTEGER_32)(new_size__BUJH <<  1)) <=  4096)) {
+                next__EUJH=(void *)((unsigned long)result__GUJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BUJH)));
               } else {
-                next__2FJH=new_lab__FTJ(new_size__ZFJH);
-              };
-              ((__POINTER *)next__2FJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__3FJH)[ 0]=next__2FJH;
-            } else {
-              ((__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)));
+                next__EUJH=new_lab__RTJ(new_size__BUJH);
+              };
+              ((__POINTER *)next__EUJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__FUJH)[ 0]=next__EUJH;
+            } else {
+              ((__POINTER *)result__GUJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EUJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__GUJH=next__EUJH;
+            };
+          };
+          ptr__3TJH=result__GUJH;
+        } else {
+          t__CUJH=((__UINTEGER_32 )typ_id__4TJH);
+          a__DUJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__NUJH=(__UINTEGER_32)((__UINTEGER_32)(sz__5TJH + a__DUJH) & (__UINTEGER_32)(~ a__DUJH));
+          ptr_table__KUJH=((__POINTER )(&(table_type[(t__CUJH)])));
+          lab_type__MUJH=(__UINTEGER_32)(t__CUJH |  1);
+          next__JUJH=((__POINTER )(NULL));
+          result__LUJH=((__POINTER *)ptr_table__KUJH)[ 0];
+          if ((result__LUJH == (void *)NULL)) {
+            result__LUJH=new_lab__RTJ(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__4XH)))) &  4095) + (__UINTEGER_32)(new_size__NUJH <<  1)) <=  4096)) {
+                next__JUJH=(void *)((unsigned long)result__LUJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NUJH)));
               } else {
-                next__BGJH=new_lab__FTJ(lab_type__EGJH);
-              };
-              ((__POINTER *)next__BGJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__CGJH)[ 0]=next__BGJH;
-            } else {
-              ((__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)));
+                next__JUJH=new_lab__RTJ(lab_type__MUJH);
+              };
+              ((__POINTER *)next__JUJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__KUJH)[ 0]=next__JUJH;
+            } else {
+              ((__POINTER *)result__LUJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JUJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__LUJH=next__JUJH;
+            };
+          };
+          ptr__3TJH=result__LUJH;
+        };
+        result__2TJH=((__FILE_UNIX *)ptr__3TJH);
+        *(result__2TJH) = *(FILE_UNIX__);
+      };
+      result__WEF=result__2TJH;
+    } else {
+      result__OUJH=NULL;
+      ptr__PUJH=((__POINTER )(NULL));
+      typ_id__QUJH= 0;
+      sz__RUJH=((__UINTEGER_32 )sizeof(__DIRECTORY_UNIX));
+      if ((sz__RUJH ==  0)) {
+        result__OUJH=DIRECTORY_UNIX__;
+      } else {
+        typ_id__QUJH=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__RUJH);
+        if ((typ_id__QUJH == (__INTEGER)(-  1))) {
+          a__SUJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__TUJH=(__UINTEGER_32)((__UINTEGER_32)(sz__RUJH + a__SUJH) & (__UINTEGER_32)(~ a__SUJH));
+          ptr_table__XUJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__TUJH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__WUJH=((__POINTER )(NULL));
+          result__YUJH=((__POINTER *)ptr_table__XUJH)[ 0];
+          if ((result__YUJH == (void *)NULL)) {
+            result__YUJH=new_lab__RTJ(new_size__TUJH);
+            next__WUJH=(void *)((unsigned long)result__YUJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TUJH)));
+            ((__POINTER *)next__WUJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__XUJH)[ 0]=next__WUJH;
+          } else {
+            next__WUJH=((__POINTER *)result__YUJH)[ 0];
+            if ((next__WUJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YUJH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__TUJH <<  1)) <=  4096)) {
+                next__WUJH=(void *)((unsigned long)result__YUJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TUJH)));
               } else {
-                next__OGJH=new_lab__FTJ(new_size__LGJH);
-              };
-              ((__POINTER *)next__OGJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__PGJH)[ 0]=next__OGJH;
-            } else {
-              ((__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)));
+                next__WUJH=new_lab__RTJ(new_size__TUJH);
+              };
+              ((__POINTER *)next__WUJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__XUJH)[ 0]=next__WUJH;
+            } else {
+              ((__POINTER *)result__YUJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WUJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__YUJH=next__WUJH;
+            };
+          };
+          ptr__PUJH=result__YUJH;
+        } else {
+          t__UUJH=((__UINTEGER_32 )typ_id__QUJH);
+          a__VUJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__5UJH=(__UINTEGER_32)((__UINTEGER_32)(sz__RUJH + a__VUJH) & (__UINTEGER_32)(~ a__VUJH));
+          ptr_table__2UJH=((__POINTER )(&(table_type[(t__UUJH)])));
+          lab_type__4UJH=(__UINTEGER_32)(t__UUJH |  1);
+          next__1UJH=((__POINTER )(NULL));
+          result__3UJH=((__POINTER *)ptr_table__2UJH)[ 0];
+          if ((result__3UJH == (void *)NULL)) {
+            result__3UJH=new_lab__RTJ(lab_type__4UJH);
+            next__1UJH=(void *)((unsigned long)result__3UJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5UJH)));
+            ((__POINTER *)next__1UJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__2UJH)[ 0]=next__1UJH;
+          } else {
+            next__1UJH=((__POINTER *)result__3UJH)[ 0];
+            if ((next__1UJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__3UJH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__5UJH <<  1)) <=  4096)) {
+                next__1UJH=(void *)((unsigned long)result__3UJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5UJH)));
               } else {
-                next__TGJH=new_lab__FTJ(lab_type__WGJH);
+                next__1UJH=new_lab__RTJ(lab_type__4UJH);
               };
-              ((__POINTER *)next__TGJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__UGJH)[ 0]=next__TGJH;
+              ((__POINTER *)next__1UJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__2UJH)[ 0]=next__1UJH;
             } else {
-              ((__POINTER *)result__VGJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TGJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__VGJH=next__TGJH;
+              ((__POINTER *)result__3UJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1UJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__3UJH=next__1UJH;
             };
           };
-          ptr__HGJH=result__VGJH;
+          ptr__PUJH=result__3UJH;
         };
-        result__GGJH=((__DIRECTORY_UNIX *)ptr__HGJH);
-        *(result__GGJH) = *(DIRECTORY_UNIX__);
+        result__OUJH=((__DIRECTORY_UNIX *)ptr__PUJH);
+        *(result__OUJH) = *(DIRECTORY_UNIX__);
       };
-      result__ZDF=result__GGJH;
+      result__WEF=result__OUJH;
     };
-    if (((struct ___OBJ *)result__ZDF)->__id==__DIRECTORY_UNIX__) {
-      set_path__1PT(result__ZDF,new_path__WDF);
+    if (((struct ___OBJ *)result__WEF)->__id==__DIRECTORY_UNIX__) {
+      set_path__HPT(result__WEF,new_path__TEF);
     } else {
-      set_path__WQT(result__ZDF,new_path__WDF);
+      set_path__CQT(result__WEF,new_path__TEF);
     };
-    if (((struct ___OBJ *)result__ZDF)->__id==__DIRECTORY_UNIX__) {
-      __tmp__SEF=((__DIRECTORY_UNIX *)result__ZDF)->parent_entry_unix__GGD.parent_entry__FGD.path__BD;
+    if (((struct ___OBJ *)result__WEF)->__id==__DIRECTORY_UNIX__) {
+      __tmp__PFF=((__DIRECTORY_UNIX *)result__WEF)->parent_entry_unix__RGD.parent_entry__QGD.path__BD;
     } else {
-      __tmp__SEF=((__FILE_UNIX *)result__ZDF)->parent_entry_unix__HEF.parent_entry__FGD.path__BD;
+      __tmp__PFF=((__FILE_UNIX *)result__WEF)->parent_entry_unix__EFF.parent_entry__QGD.path__BD;
     };
-    put__to__B1S(alias__RGD,result__ZDF,__tmp__SEF);
+    put__to__N1S(alias__2GD,result__WEF,__tmp__PFF);
   };
   };
-  return(result__ZDF);
+  return(result__WEF);
 }
 
-static void put__to__B1S(__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *Self__C1S,void *v__D1S,void *k__E1S)
+static void put__to__N1S(__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *Self__O1S,void *v__P1S,void *k__Q1S)
 // ({HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo},{NULLxDIRECTORY_UNIXxFILE_UNIX},{NULLxSTRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __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__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__3GJH=new_lab__FTJ(lab_type__AHJH);
-            };
-            ((__POINTER *)next__3GJH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__4GJH)[ 0]=next__3GJH;
-          } else {
-            ((__POINTER *)result__5GJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3GJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__5GJH=next__3GJH;
-          };
-        };
-        ptr__1QOB=result__5GJH;
-      };
-      result__0QOB=((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)ptr__1QOB);
-      *(result__0QOB) = *(HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo__);
-    };
-    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);
+  __INTEGER h__X1S,idx__Y1S,idx__5KOB,new_capacity__ALOB,i__BLOB;
+  __INTEGER typ_id__PNOB;
+  __POINTER ptr__KNOB,ptr_table__BVJH,next__AVJH,result__CVJH;
+  __POINTER ptr_table__GVJH,next__FVJH,result__HVJH;
+  __UINTEGER_32 sz__MNOB,a__5PFH,new_size__AQFH,t__EQFH,a__DQFH;
+  __UINTEGER_32 new_size__JVJH,lab_type__IVJH;
+  void *node__01S,*node1__DLOB,*node2__ELOB,*__tmp__P3S;
+  void **old_buckets__CLOB;
+  __HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *result__JNOB;
+  __HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *Self__QXDC;
+  h__X1S=hash_code__RNW(k__Q1S);
+  idx__Y1S=(__INTEGER)(h__X1S % Self__O1S->capacity__21S);
+  node__01S=((void **)Self__O1S->buckets__B2S)[idx__Y1S];
+  while ((! (((void *)node__01S == (void *)NULL) || __infix_equal_equal__V2DB(((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node__01S)->key__N2S,k__Q1S)))) {
+    node__01S=((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node__01S)->next__Z2S;
+  };
+  if (((void *)node__01S == (void *)NULL)) {
+    if ((Self__O1S->capacity__21S == Self__O1S->count__C3S)) {
+      idx__5KOB= 0;
+      node1__DLOB=NULL;
+      node2__ELOB=NULL;
+      old_buckets__CLOB=Self__O1S->buckets__B2S;
+      new_capacity__ALOB=prime_number_ceiling__021((__INTEGER)(Self__O1S->capacity__21S +  1));
+      Self__O1S->buckets__B2S=create__QA4(new_capacity__ALOB);
+      i__BLOB=(__INTEGER)(Self__O1S->capacity__21S -  1);
+      Self__O1S->capacity__21S=new_capacity__ALOB;
+      while ((i__BLOB >=  0)) {
+        node1__DLOB=((void **)old_buckets__CLOB)[i__BLOB];
+        while (((void *)node1__DLOB != (void *)NULL)) {
+          node2__ELOB=((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node1__DLOB)->next__Z2S;
+          idx__5KOB=(__INTEGER)(hash_code__RNW(((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node1__DLOB)->key__N2S) % Self__O1S->capacity__21S);
+          ((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node1__DLOB)->next__Z2S=((void **)Self__O1S->buckets__B2S)[idx__5KOB];
+          ((void **)Self__O1S->buckets__B2S)[idx__5KOB]=node1__DLOB;
+          node1__DLOB=node2__ELOB;
+        };
+        i__BLOB=(__INTEGER)(i__BLOB -  1);
+      };
+      idx__Y1S=(__INTEGER)(h__X1S % Self__O1S->capacity__21S);
+    };
+    __tmp__P3S=((void **)Self__O1S->buckets__B2S)[idx__Y1S];
+    result__JNOB=NULL;
+    ptr__KNOB=((__POINTER )(NULL));
+    typ_id__PNOB= 0;
+    sz__MNOB=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo));
+    if ((sz__MNOB ==  0)) {
+      result__JNOB=HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo__;
+    } else {
+      typ_id__PNOB=__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo__;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__MNOB);
+      if ((typ_id__PNOB == (__INTEGER)(-  1))) {
+        a__5PFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__AQFH=(__UINTEGER_32)((__UINTEGER_32)(sz__MNOB + a__5PFH) & (__UINTEGER_32)(~ a__5PFH));
+        ptr_table__BVJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__AQFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__AVJH=((__POINTER )(NULL));
+        result__CVJH=((__POINTER *)ptr_table__BVJH)[ 0];
+        if ((result__CVJH == (void *)NULL)) {
+          result__CVJH=new_lab__RTJ(new_size__AQFH);
+          next__AVJH=(void *)((unsigned long)result__CVJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AQFH)));
+          ((__POINTER *)next__AVJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__BVJH)[ 0]=next__AVJH;
+        } else {
+          next__AVJH=((__POINTER *)result__CVJH)[ 0];
+          if ((next__AVJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__CVJH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__AQFH <<  1)) <=  4096)) {
+              next__AVJH=(void *)((unsigned long)result__CVJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AQFH)));
+            } else {
+              next__AVJH=new_lab__RTJ(new_size__AQFH);
+            };
+            ((__POINTER *)next__AVJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__BVJH)[ 0]=next__AVJH;
+          } else {
+            ((__POINTER *)result__CVJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__AVJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__CVJH=next__AVJH;
+          };
+        };
+        ptr__KNOB=result__CVJH;
+      } else {
+        t__EQFH=((__UINTEGER_32 )typ_id__PNOB);
+        a__DQFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__JVJH=(__UINTEGER_32)((__UINTEGER_32)(sz__MNOB + a__DQFH) & (__UINTEGER_32)(~ a__DQFH));
+        ptr_table__GVJH=((__POINTER )(&(table_type[(t__EQFH)])));
+        lab_type__IVJH=(__UINTEGER_32)(t__EQFH |  1);
+        next__FVJH=((__POINTER )(NULL));
+        result__HVJH=((__POINTER *)ptr_table__GVJH)[ 0];
+        if ((result__HVJH == (void *)NULL)) {
+          result__HVJH=new_lab__RTJ(lab_type__IVJH);
+          next__FVJH=(void *)((unsigned long)result__HVJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JVJH)));
+          ((__POINTER *)next__FVJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__GVJH)[ 0]=next__FVJH;
+        } else {
+          next__FVJH=((__POINTER *)result__HVJH)[ 0];
+          if ((next__FVJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HVJH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__JVJH <<  1)) <=  4096)) {
+              next__FVJH=(void *)((unsigned long)result__HVJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JVJH)));
+            } else {
+              next__FVJH=new_lab__RTJ(lab_type__IVJH);
+            };
+            ((__POINTER *)next__FVJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__GVJH)[ 0]=next__FVJH;
+          } else {
+            ((__POINTER *)result__HVJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FVJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__HVJH=next__FVJH;
+          };
+        };
+        ptr__KNOB=result__HVJH;
+      };
+      result__JNOB=((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)ptr__KNOB);
+      *(result__JNOB) = *(HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo__);
+    };
+    Self__QXDC=((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)result__JNOB);
+    Self__QXDC->item__TPOB=v__P1S;
+    Self__QXDC->key__N2S=k__Q1S;
+    Self__QXDC->next__Z2S=__tmp__P3S;
+    node__01S=result__JNOB;
+    ((void **)Self__O1S->buckets__B2S)[idx__Y1S]=result__JNOB;
+    Self__O1S->count__C3S=(__INTEGER)(Self__O1S->count__C3S +  1);
   } else {
-    ((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node__O1S)->item__ETOB=v__D1S;
+    ((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node__01S)->item__TPOB=v__P1S;
   };
 }
 
-static void reduce_path__YAIC(void *st__0AIC)
+static void reduce_path__J3HC(void *st__L3HC)
 // ({NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __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__ADGH->count__EGC=(__INTEGER)(Self__ADGH->count__EGC - len__GBIH);
-              };
-            };
-          };
-          i__1AIC= 1;
+  __INTEGER stat__N3HC,i__M3HC,Self__ATOE,n__GDHH,idx__44HC,n__IDHH;
+  __INTEGER Self__2MFF,n__KDHH,idx__EDIC,new_capacity__T3HH;
+  __INTEGER old_nb_elts__W3HH,upper__QVJH,Self__OVJH;
+  __STRING *Self__FDHH,*Self__HDHH,*Self__JDHH,*Self__IQFH,*Self__KQFH;
+  __STRING *Self__U3HH;
+  __CHARACTER car__O3HC,Self__LVJH;
+  __BOOLEAN __tmp__V5HC,__tmp__0AIC,result__KLHE,result__KVJH;
+  __BOOLEAN __tmp__MVJH,__tmp__1BIC;
+  __CHARACTER *Self__V3HH,*new__X3HH;
+  stat__N3HC= 0;
+  car__O3HC='\0';
+  replace_all__with__CRS(st__L3HC,'\\','/');
+  i__M3HC= 1;
+  while ((i__M3HC <= ((__STRING *)st__L3HC)->count__SGC)) {
+    car__O3HC=((__CHARACTER *)((__STRING *)st__L3HC)->storage__3CS)[(__INTEGER)(i__M3HC -  1)];
+    if ((car__O3HC == '/')) {
+      Self__ATOE=stat__N3HC;
+      if ((stat__N3HC ==  0)) {
+        stat__N3HC= 1;
+      };
+      if ((Self__ATOE ==  1)) {
+        Self__FDHH=((__STRING *)st__L3HC);
+        n__GDHH=(__INTEGER)(i__M3HC -  1);
+        if ((n__GDHH > Self__FDHH->count__SGC)) {
+          Self__FDHH->count__SGC= 0;
         } else {
-          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);
+          if ((n__GDHH >  0)) {
+            remove_between__to__MIT(Self__FDHH, 1,n__GDHH);
+          };
+        };
+        i__M3HC= 1;
+      };
+      if ((Self__ATOE ==  2)) {
+        remove_between__to__MIT(st__L3HC,(__INTEGER)(i__M3HC -  1),i__M3HC);
+        i__M3HC=(__INTEGER)(i__M3HC -  2);
+        stat__N3HC= 1;
+      };
+      if ((Self__ATOE ==  3)) {
+        idx__44HC=last_index_of__since__KPGD(st__L3HC,(__INTEGER)(i__M3HC -  4));
+        if ((idx__44HC ==  0)) {
+          Self__HDHH=((__STRING *)st__L3HC);
+          n__IDHH=(__INTEGER)(i__M3HC -  1);
+          if ((n__IDHH > Self__HDHH->count__SGC)) {
+            Self__HDHH->count__SGC= 0;
+          } else {
+            if ((n__IDHH >  0)) {
+              remove_between__to__MIT(Self__HDHH, 1,n__IDHH);
             };
-            Self__RBIH->count__EGC=(__INTEGER)(Self__RBIH->count__EGC - len__PBIH);
           };
-          i__1AIC=result__BBIH;
+          i__M3HC= 1;
+        } else {
+          remove_between__to__MIT(st__L3HC,idx__44HC,(__INTEGER)(i__M3HC -  1));
+          i__M3HC=idx__44HC;
         };
-        stat__2AIC= 1;
+        stat__N3HC= 1;
       };
-      __tmp__EDIC=TRUE__;
+      __tmp__V5HC=TRUE__;
     } else {
-      __tmp__EDIC=FALSE__;
+      __tmp__V5HC=FALSE__;
     };
-    if (__tmp__EDIC) {
-      __tmp__JEIC=TRUE__;
+    if (__tmp__V5HC) {
+      __tmp__0AIC=TRUE__;
     } else {
-      result__1KHE=(car__3AIC == '.');
-      if (result__1KHE) {
-        Self__LLFF=stat__2AIC;
-        if ((stat__2AIC ==  1)) {
-          stat__2AIC= 2;
+      result__KLHE=(car__O3HC == '.');
+      if (result__KLHE) {
+        Self__2MFF=stat__N3HC;
+        if ((stat__N3HC ==  1)) {
+          stat__N3HC= 2;
         };
-        if ((Self__LLFF ==  2)) {
-          stat__2AIC= 3;
+        if ((Self__2MFF ==  2)) {
+          stat__N3HC= 3;
         };
-        if ((Self__LLFF ==  3)) {
-          stat__2AIC= 0;
+        if ((Self__2MFF ==  3)) {
+          stat__N3HC= 0;
         };
       };
-      __tmp__JEIC=result__1KHE;
+      __tmp__0AIC=result__KLHE;
     };
-    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__;
+    if ((! __tmp__0AIC)) {
+      if (((car__O3HC == ':') && (i__M3HC >  2))) {
+        Self__LVJH=((__CHARACTER *)((__STRING *)st__L3HC)->storage__3CS)[(__INTEGER)((__INTEGER)(i__M3HC -  1) -  1)];
+        result__KVJH=FALSE__;
+        if ((((__INTEGER_8 )Self__LVJH) >= ((__INTEGER_8 )'a'))) {
+          result__KVJH=(((__INTEGER_8 )Self__LVJH) <= ((__INTEGER_8 )'z'));
+          __tmp__MVJH=TRUE__;
         } else {
-          __tmp__EHJH=FALSE__;
+          __tmp__MVJH=FALSE__;
         };
-        if ((! __tmp__EHJH)) {
-          if ((((__INTEGER_8 )Self__DHJH) >= ((__INTEGER_8 )'A'))) {
-            result__CHJH=(((__INTEGER_8 )Self__DHJH) <= ((__INTEGER_8 )'Z'));
+        if ((! __tmp__MVJH)) {
+          if ((((__INTEGER_8 )Self__LVJH) >= ((__INTEGER_8 )'A'))) {
+            result__KVJH=(((__INTEGER_8 )Self__LVJH) <= ((__INTEGER_8 )'Z'));
           };
         };
-        __tmp__KFIC=result__CHJH;
+        __tmp__1BIC=result__KVJH;
       } else {
-        __tmp__KFIC=FALSE__;
+        __tmp__1BIC=FALSE__;
       };
-      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;
+      if ((__tmp__1BIC && (((__CHARACTER *)((__STRING *)st__L3HC)->storage__3CS)[(__INTEGER)((__INTEGER)(i__M3HC -  2) -  1)] == '/'))) {
+        Self__JDHH=((__STRING *)st__L3HC);
+        n__KDHH=(__INTEGER)(i__M3HC -  2);
+        if ((n__KDHH > Self__JDHH->count__SGC)) {
+          Self__JDHH->count__SGC= 0;
         } else {
-          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__CDGH->count__EGC=(__INTEGER)(Self__CDGH->count__EGC - len__YBIH);
-            };
+          if ((n__KDHH >  0)) {
+            remove_between__to__MIT(Self__JDHH, 1,n__KDHH);
           };
         };
-        i__1AIC= 1;
+        i__M3HC= 1;
       } else {
-        stat__2AIC= 0;
+        stat__N3HC= 0;
       };
     };
-    i__1AIC=(__INTEGER)(i__1AIC +  1);
+    i__M3HC=(__INTEGER)(i__M3HC +  1);
   };
-  if ((stat__2AIC ==  1)) {
-    Self__EDGH=((__STRING *)st__0AIC);
-    if (( 1 > Self__EDGH->count__EGC)) {
-      Self__EDGH->count__EGC= 0;
+  if ((stat__N3HC ==  1)) {
+    Self__IQFH=((__STRING *)st__L3HC);
+    if (( 1 > Self__IQFH->count__SGC)) {
+      Self__IQFH->count__SGC= 0;
     } else {
-      Self__EDGH->count__EGC=(__INTEGER)(Self__EDGH->count__EGC -  1);
+      Self__IQFH->count__SGC=(__INTEGER)(Self__IQFH->count__SGC -  1);
     };
   };
-  if ((stat__2AIC ==  2)) {
-    Self__GDGH=((__STRING *)st__0AIC);
-    if (( 2 > Self__GDGH->count__EGC)) {
-      Self__GDGH->count__EGC= 0;
+  if ((stat__N3HC ==  2)) {
+    Self__KQFH=((__STRING *)st__L3HC);
+    if (( 2 > Self__KQFH->count__SGC)) {
+      Self__KQFH->count__SGC= 0;
     } else {
-      Self__GDGH->count__EGC=(__INTEGER)(Self__GDGH->count__EGC -  2);
+      Self__KQFH->count__SGC=(__INTEGER)(Self__KQFH->count__SGC -  2);
     };
   };
-  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__ACIH ==  0)) {
-      ((__STRING *)st__0AIC)->count__EGC= 0;
+  if ((stat__N3HC ==  3)) {
+    idx__EDIC=last_index_of__since__KPGD(st__L3HC,(__INTEGER)(i__M3HC -  4));
+    if ((idx__EDIC ==  0)) {
+      ((__STRING *)st__L3HC)->count__SGC= 0;
     } else {
-      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);
+      remove_between__to__MIT(st__L3HC,idx__EDIC,(__INTEGER)(i__M3HC -  1));
+    };
+  };
+  if ((((__STRING *)st__L3HC)->count__SGC ==  0)) {
+    Self__U3HH=((__STRING *)st__L3HC);
+    new_capacity__T3HH= 0;
+    if ((Self__U3HH->capacity__UCS <= Self__U3HH->count__SGC)) {
+      if ((Self__U3HH->capacity__UCS ==  0)) {
+        Self__U3HH->capacity__UCS= 32;
+        Self__U3HH->storage__3CS=create__YIEB( 32);
+      } else {
+        new_capacity__T3HH=(__INTEGER)(Self__U3HH->capacity__UCS <<  1);
+        Self__V3HH=((__CHARACTER *)Self__U3HH->storage__3CS);
+        old_nb_elts__W3HH=Self__U3HH->capacity__UCS;
+        new__X3HH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__V3HH),((__UINTEGER_32 )old_nb_elts__W3HH),((__UINTEGER_32 )new_capacity__T3HH)));
+        upper__QVJH=(__INTEGER)(new_capacity__T3HH -  1);
+        Self__OVJH=old_nb_elts__W3HH;
+        while ((Self__OVJH <= upper__QVJH)) {
+          new__X3HH[Self__OVJH]='\0';
+          Self__OVJH=(__INTEGER)(Self__OVJH +  1);
         };
-        Self__HCIH->count__EGC=(__INTEGER)(Self__HCIH->count__EGC - len__FCIH);
+        Self__U3HH->storage__3CS=new__X3HH;
+        Self__U3HH->capacity__UCS=new_capacity__T3HH;
       };
     };
-  };
-  if ((((__STRING *)st__0AIC)->count__EGC ==  0)) {
-    add_last__GOT(st__0AIC,'/');
+    ((__CHARACTER *)Self__U3HH->storage__3CS)[Self__U3HH->count__SGC]='/';
+    Self__U3HH->count__SGC=(__INTEGER)(Self__U3HH->count__SGC +  1);
   };
 }
 
-static void* reference_at__1Y0C(__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *Self__2Y0C,void *k__3Y0C)
+static void* reference_at__VV0C(__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *Self__WV0C,void *k__XV0C)
 // ({HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo},{NULLxSTRING}) With resultNo recursive, No inlinable.
 {
-  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);
+  void *result__BW0C;
+  void *node__AW0C;
+  result__BW0C=NULL;
+  node__AW0C=((void **)Self__WV0C->buckets__B2S)[(__INTEGER)(hash_code__UFX(k__XV0C) % Self__WV0C->capacity__21S)];
+  while ((! (((void *)node__AW0C == (void *)NULL) || __infix_equal_equal__V2DB(((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node__AW0C)->key__N2S,k__XV0C)))) {
+    node__AW0C=((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node__AW0C)->next__Z2S;
+  };
+  if (((void *)node__AW0C != (void *)NULL)) {
+    result__BW0C=((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node__AW0C)->item__TPOB;
+  };
+  return(result__BW0C);
+}
+
+static __INTEGER fast_reverse_index_of__from__KA3(__CHARACTER *Self__LA3,__CHARACTER element__MA3,__INTEGER upper__NA3)
+// ({NATIVE_ARRAYoExpanded_CHARACTERo},{CHARACTER},{INTEGER}) With resultNo recursive, No inlinable.
+{
+  __INTEGER idx__XA3;
+  idx__XA3=upper__NA3;
+  while ((! ((idx__XA3 <  0) || (element__MA3 == Self__LA3[idx__XA3])))) {
+    idx__XA3=(__INTEGER)(idx__XA3 -  1);
+  };
+  return(idx__XA3);
 }
 
-static void* physical_get_entry__P10C(void *new_path__R10C)
+static void* physical_get_entry__JY0C(void *new_path__LY0C)
 // ({NULLxSTRING}) With resultNo recursive, No inlinable.
 {
-  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';
+  void *result__OY0C;
+  __STRING *Self__A2GH;
+  __INTEGER new_capacity__Z3HH,old_nb_elts__23HH,upper__VVJH,Self__TVJH;
+  __INTEGER typ_id__J0I,typ_id__01I;
+  __FILE_UNIX *result__D0I;
+  __POINTER ptr__E0I,ptr_table__YVJH,next__XVJH,result__ZVJH;
+  __POINTER ptr_table__3VJH,next__2VJH,result__4VJH,ptr__V1I;
+  __POINTER ptr_table__CWJH,next__BWJH,result__DWJH,ptr_table__HWJH;
+  __POINTER next__GWJH,result__IWJH;
+  __UINTEGER_32 sz__G0I,a__Y1FH,new_size__Z1FH,t__31FH,a__21FH;
+  __UINTEGER_32 new_size__AWJH,lab_type__5VJH,sz__X1I,a__A2FH;
+  __UINTEGER_32 new_size__B2FH,t__F2FH,a__E2FH,new_size__KWJH;
+  __UINTEGER_32 lab_type__JWJH;
+  __DIRECTORY_UNIX *result__U1I;
+  void *__tmp__FZ0C;
+  __CHARACTER *Self__13HH,*new__33HH,*pe__NY0C;
+  result__OY0C=NULL;
+  Self__A2GH=((__STRING *)new_path__LY0C);
+  if ((Self__A2GH->capacity__UCS > Self__A2GH->count__SGC)) {
+    ((__CHARACTER *)Self__A2GH->storage__3CS)[Self__A2GH->count__SGC]='\0';
   } else {
-    add_last__GOT(Self__KDGH,'\0');
-    Self__KDGH->count__EGC=(__INTEGER)(Self__KDGH->count__EGC -  1);
-  };
-  pe__T10C=Self__KDGH->storage__RCS;
+    new_capacity__Z3HH= 0;
+    if ((Self__A2GH->capacity__UCS <= Self__A2GH->count__SGC)) {
+      if ((Self__A2GH->capacity__UCS ==  0)) {
+        Self__A2GH->capacity__UCS= 32;
+        Self__A2GH->storage__3CS=create__YIEB( 32);
+      } else {
+        new_capacity__Z3HH=(__INTEGER)(Self__A2GH->capacity__UCS <<  1);
+        Self__13HH=((__CHARACTER *)Self__A2GH->storage__3CS);
+        old_nb_elts__23HH=Self__A2GH->capacity__UCS;
+        new__33HH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__13HH),((__UINTEGER_32 )old_nb_elts__23HH),((__UINTEGER_32 )new_capacity__Z3HH)));
+        upper__VVJH=(__INTEGER)(new_capacity__Z3HH -  1);
+        Self__TVJH=old_nb_elts__23HH;
+        while ((Self__TVJH <= upper__VVJH)) {
+          new__33HH[Self__TVJH]='\0';
+          Self__TVJH=(__INTEGER)(Self__TVJH +  1);
+        };
+        Self__A2GH->storage__3CS=new__33HH;
+        Self__A2GH->capacity__UCS=new_capacity__Z3HH;
+      };
+    };
+    ((__CHARACTER *)Self__A2GH->storage__3CS)[Self__A2GH->count__SGC]='\0';
+    Self__A2GH->count__SGC=(__INTEGER)(Self__A2GH->count__SGC +  1);
+    Self__A2GH->count__SGC=(__INTEGER)(Self__A2GH->count__SGC -  1);
+  };
+  pe__NY0C=Self__A2GH->storage__3CS;
   { struct stat t;
-  if ((((__INTEGER )(stat((pe__T10C),&t))) ==  0)) {
+  if ((((__INTEGER )(stat((pe__NY0C),&t))) ==  0)) {
     if ((((__INTEGER )(S_ISDIR(t.st_mode))) ==  0)) {
-      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)));
+      result__D0I=NULL;
+      ptr__E0I=((__POINTER )(NULL));
+      typ_id__J0I= 0;
+      sz__G0I=((__UINTEGER_32 )sizeof(__FILE_UNIX));
+      if ((sz__G0I ==  0)) {
+        result__D0I=FILE_UNIX__;
+      } else {
+        typ_id__J0I=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__G0I);
+        if ((typ_id__J0I == (__INTEGER)(-  1))) {
+          a__Y1FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__Z1FH=(__UINTEGER_32)((__UINTEGER_32)(sz__G0I + a__Y1FH) & (__UINTEGER_32)(~ a__Y1FH));
+          ptr_table__YVJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__Z1FH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__XVJH=((__POINTER )(NULL));
+          result__ZVJH=((__POINTER *)ptr_table__YVJH)[ 0];
+          if ((result__ZVJH == (void *)NULL)) {
+            result__ZVJH=new_lab__RTJ(new_size__Z1FH);
+            next__XVJH=(void *)((unsigned long)result__ZVJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Z1FH)));
+            ((__POINTER *)next__XVJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__YVJH)[ 0]=next__XVJH;
+          } else {
+            next__XVJH=((__POINTER *)result__ZVJH)[ 0];
+            if ((next__XVJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ZVJH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__Z1FH <<  1)) <=  4096)) {
+                next__XVJH=(void *)((unsigned long)result__ZVJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Z1FH)));
               } else {
-                next__FHJH=new_lab__FTJ(new_size__ZSGH);
-              };
-              ((__POINTER *)next__FHJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__GHJH)[ 0]=next__FHJH;
-            } else {
-              ((__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)));
+                next__XVJH=new_lab__RTJ(new_size__Z1FH);
+              };
+              ((__POINTER *)next__XVJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__YVJH)[ 0]=next__XVJH;
+            } else {
+              ((__POINTER *)result__ZVJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XVJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__ZVJH=next__XVJH;
+            };
+          };
+          ptr__E0I=result__ZVJH;
+        } else {
+          t__31FH=((__UINTEGER_32 )typ_id__J0I);
+          a__21FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__AWJH=(__UINTEGER_32)((__UINTEGER_32)(sz__G0I + a__21FH) & (__UINTEGER_32)(~ a__21FH));
+          ptr_table__3VJH=((__POINTER )(&(table_type[(t__31FH)])));
+          lab_type__5VJH=(__UINTEGER_32)(t__31FH |  1);
+          next__2VJH=((__POINTER )(NULL));
+          result__4VJH=((__POINTER *)ptr_table__3VJH)[ 0];
+          if ((result__4VJH == (void *)NULL)) {
+            result__4VJH=new_lab__RTJ(lab_type__5VJH);
+            next__2VJH=(void *)((unsigned long)result__4VJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AWJH)));
+            ((__POINTER *)next__2VJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__3VJH)[ 0]=next__2VJH;
+          } else {
+            next__2VJH=((__POINTER *)result__4VJH)[ 0];
+            if ((next__2VJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4VJH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__AWJH <<  1)) <=  4096)) {
+                next__2VJH=(void *)((unsigned long)result__4VJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AWJH)));
               } else {
-                next__KHJH=new_lab__FTJ(lab_type__NHJH);
-              };
-              ((__POINTER *)next__KHJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__LHJH)[ 0]=next__KHJH;
-            } else {
-              ((__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)));
+                next__2VJH=new_lab__RTJ(lab_type__5VJH);
+              };
+              ((__POINTER *)next__2VJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__3VJH)[ 0]=next__2VJH;
+            } else {
+              ((__POINTER *)result__4VJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2VJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__4VJH=next__2VJH;
+            };
+          };
+          ptr__E0I=result__4VJH;
+        };
+        result__D0I=((__FILE_UNIX *)ptr__E0I);
+        *(result__D0I) = *(FILE_UNIX__);
+      };
+      result__OY0C=result__D0I;
+    } else {
+      result__U1I=NULL;
+      ptr__V1I=((__POINTER )(NULL));
+      typ_id__01I= 0;
+      sz__X1I=((__UINTEGER_32 )sizeof(__DIRECTORY_UNIX));
+      if ((sz__X1I ==  0)) {
+        result__U1I=DIRECTORY_UNIX__;
+      } else {
+        typ_id__01I=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__X1I);
+        if ((typ_id__01I == (__INTEGER)(-  1))) {
+          a__A2FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__B2FH=(__UINTEGER_32)((__UINTEGER_32)(sz__X1I + a__A2FH) & (__UINTEGER_32)(~ a__A2FH));
+          ptr_table__CWJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__B2FH / ((__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__RTJ(new_size__B2FH);
+            next__BWJH=(void *)((unsigned long)result__DWJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__B2FH)));
+            ((__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__4XH)))) &  4095) + (__UINTEGER_32)(new_size__B2FH <<  1)) <=  4096)) {
+                next__BWJH=(void *)((unsigned long)result__DWJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__B2FH)));
               } else {
-                next__PHJH=new_lab__FTJ(new_size__BTGH);
-              };
-              ((__POINTER *)next__PHJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__QHJH)[ 0]=next__PHJH;
-            } else {
-              ((__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)));
+                next__BWJH=new_lab__RTJ(new_size__B2FH);
+              };
+              ((__POINTER *)next__BWJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__CWJH)[ 0]=next__BWJH;
+            } else {
+              ((__POINTER *)result__DWJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BWJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__DWJH=next__BWJH;
+            };
+          };
+          ptr__V1I=result__DWJH;
+        } else {
+          t__F2FH=((__UINTEGER_32 )typ_id__01I);
+          a__E2FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__KWJH=(__UINTEGER_32)((__UINTEGER_32)(sz__X1I + a__E2FH) & (__UINTEGER_32)(~ a__E2FH));
+          ptr_table__HWJH=((__POINTER )(&(table_type[(t__F2FH)])));
+          lab_type__JWJH=(__UINTEGER_32)(t__F2FH |  1);
+          next__GWJH=((__POINTER )(NULL));
+          result__IWJH=((__POINTER *)ptr_table__HWJH)[ 0];
+          if ((result__IWJH == (void *)NULL)) {
+            result__IWJH=new_lab__RTJ(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__4XH)))) &  4095) + (__UINTEGER_32)(new_size__KWJH <<  1)) <=  4096)) {
+                next__GWJH=(void *)((unsigned long)result__IWJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KWJH)));
               } else {
-                next__UHJH=new_lab__FTJ(lab_type__XHJH);
+                next__GWJH=new_lab__RTJ(lab_type__JWJH);
               };
-              ((__POINTER *)next__UHJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__VHJH)[ 0]=next__UHJH;
+              ((__POINTER *)next__GWJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__HWJH)[ 0]=next__GWJH;
             } else {
-              ((__POINTER *)result__WHJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UHJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__WHJH=next__UHJH;
+              ((__POINTER *)result__IWJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GWJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__IWJH=next__GWJH;
             };
           };
-          ptr__J1I=result__WHJH;
+          ptr__V1I=result__IWJH;
         };
-        result__I1I=((__DIRECTORY_UNIX *)ptr__J1I);
-        *(result__I1I) = *(DIRECTORY_UNIX__);
+        result__U1I=((__DIRECTORY_UNIX *)ptr__V1I);
+        *(result__U1I) = *(DIRECTORY_UNIX__);
       };
-      result__U10C=result__I1I;
+      result__OY0C=result__U1I;
     };
-    if (((struct ___OBJ *)result__U10C)->__id==__DIRECTORY_UNIX__) {
-      set_path__1PT(result__U10C,new_path__R10C);
+    if (((struct ___OBJ *)result__OY0C)->__id==__DIRECTORY_UNIX__) {
+      set_path__HPT(result__OY0C,new_path__LY0C);
     } else {
-      set_path__WQT(result__U10C,new_path__R10C);
+      set_path__CQT(result__OY0C,new_path__LY0C);
     };
-    if (FILE_SYSTEM__->parent_directory__2GD==0) {
+    if (FILE_SYSTEM__->parent_directory__HHD==0) {
     } else {
-      parent_directory__1FD();
+      parent_directory__GGD();
     };
-    if (((struct ___OBJ *)result__U10C)->__id==__DIRECTORY_UNIX__) {
-      __tmp__L20C=((__DIRECTORY_UNIX *)result__U10C)->parent_entry_unix__GGD.parent_entry__FGD.path__BD;
+    if (((struct ___OBJ *)result__OY0C)->__id==__DIRECTORY_UNIX__) {
+      __tmp__FZ0C=((__DIRECTORY_UNIX *)result__OY0C)->parent_entry_unix__RGD.parent_entry__QGD.path__BD;
     } else {
-      __tmp__L20C=((__FILE_UNIX *)result__U10C)->parent_entry_unix__HEF.parent_entry__FGD.path__BD;
+      __tmp__FZ0C=((__FILE_UNIX *)result__OY0C)->parent_entry_unix__EFF.parent_entry__QGD.path__BD;
     };
-    put__to__B1S(alias__RGD,result__U10C,__tmp__L20C);
+    put__to__N1S(alias__2GD,result__OY0C,__tmp__FZ0C);
   };
   };
-  return(result__U10C);
+  return(result__OY0C);
 }
 
-static void** create__M31C(__INTEGER nb_elements__O31C)
+static void** create__G01C(__INTEGER nb_elements__I01C)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__NDHH,a__MDHH,new_size__ODHH,new_size2__PDHH,a__QDHH;
+  __UINTEGER_32 new_size__RDHH;
+  __POINTER result__LDHH,ptr_table__MWJH,next__LWJH,result__NWJH;
+  __INTEGER Self__VCXD;
+  void **Result__5WCD;
+  sz__NDHH=((__UINTEGER_32 )(__INTEGER)(nb_elements__I01C * ((__INTEGER )(sizeof(void *)))));
+  result__LDHH=((__POINTER )(NULL));
+  a__MDHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__ODHH=(__UINTEGER_32)((__UINTEGER_32)(sz__NDHH + a__MDHH) & (__UINTEGER_32)(~ a__MDHH));
+  new_size2__PDHH=(__UINTEGER_32)(new_size__ODHH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__PDHH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__QDHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__RDHH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__PDHH + a__QDHH) & (__UINTEGER_32)(~ a__QDHH));
+    ptr_table__MWJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__RDHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__LWJH=((__POINTER )(NULL));
+    result__NWJH=((__POINTER *)ptr_table__MWJH)[ 0];
+    if ((result__NWJH == (void *)NULL)) {
+      result__NWJH=new_lab__RTJ(new_size__RDHH);
+      next__LWJH=(void *)((unsigned long)result__NWJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RDHH)));
+      ((__POINTER *)next__LWJH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__MWJH)[ 0]=next__LWJH;
+    } else {
+      next__LWJH=((__POINTER *)result__NWJH)[ 0];
+      if ((next__LWJH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__NWJH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__RDHH <<  1)) <=  4096)) {
+          next__LWJH=(void *)((unsigned long)result__NWJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RDHH)));
+        } else {
+          next__LWJH=new_lab__RTJ(new_size__RDHH);
+        };
+        ((__POINTER *)next__LWJH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__MWJH)[ 0]=next__LWJH;
+      } else {
+        ((__POINTER *)result__NWJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LWJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__NWJH=next__LWJH;
+      };
+    };
+    ((__POINTER *)result__NWJH)[ 0]=((__POINTER ) 3);
+    result__LDHH=(void *)((unsigned long)result__NWJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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__4HJH == (void *)NULL)) {
-      result__4HJH=new_page__YC5();
-    };
-    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__LDHH=(void *)((unsigned long)((__POINTER )((__MEMORY *)search__XAVB(new_size__ODHH))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__5WCD=((void **)result__LDHH);
+  Self__VCXD=(__INTEGER)(nb_elements__I01C -  1);
+  while ((Self__VCXD >=  0)) {
+    Result__5WCD[Self__VCXD]=NULL;
+    Self__VCXD=(__INTEGER)(Self__VCXD -  1);
   };
-  return(Result__0YCD);
+  return(Result__5WCD);
 }
 
-static void** create__VUSC(__INTEGER nb_elements__XUSC)
+static void** create__PRSC(__INTEGER nb_elements__RRSC)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__VDHH,a__UDHH,new_size__WDHH,new_size2__XDHH,a__YDHH;
+  __UINTEGER_32 new_size__ZDHH;
+  __POINTER result__TDHH,ptr_table__RWJH,next__QWJH,result__SWJH;
+  __INTEGER Self__1TWD;
+  void **Result__H31C;
+  sz__VDHH=((__UINTEGER_32 )(__INTEGER)(nb_elements__RRSC * ((__INTEGER )(sizeof(void *)))));
+  result__TDHH=((__POINTER )(NULL));
+  a__UDHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__WDHH=(__UINTEGER_32)((__UINTEGER_32)(sz__VDHH + a__UDHH) & (__UINTEGER_32)(~ a__UDHH));
+  new_size2__XDHH=(__UINTEGER_32)(new_size__WDHH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__XDHH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__YDHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__ZDHH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__XDHH + a__YDHH) & (__UINTEGER_32)(~ a__YDHH));
+    ptr_table__RWJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ZDHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__QWJH=((__POINTER )(NULL));
+    result__SWJH=((__POINTER *)ptr_table__RWJH)[ 0];
+    if ((result__SWJH == (void *)NULL)) {
+      result__SWJH=new_lab__RTJ(new_size__ZDHH);
+      next__QWJH=(void *)((unsigned long)result__SWJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZDHH)));
+      ((__POINTER *)next__QWJH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__RWJH)[ 0]=next__QWJH;
+    } else {
+      next__QWJH=((__POINTER *)result__SWJH)[ 0];
+      if ((next__QWJH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__SWJH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__ZDHH <<  1)) <=  4096)) {
+          next__QWJH=(void *)((unsigned long)result__SWJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZDHH)));
+        } else {
+          next__QWJH=new_lab__RTJ(new_size__ZDHH);
+        };
+        ((__POINTER *)next__QWJH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__RWJH)[ 0]=next__QWJH;
+      } else {
+        ((__POINTER *)result__SWJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QWJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__SWJH=next__QWJH;
+      };
+    };
+    ((__POINTER *)result__SWJH)[ 0]=((__POINTER ) 3);
+    result__TDHH=(void *)((unsigned long)result__SWJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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__GIJH == (void *)NULL)) {
-      result__GIJH=new_page__YC5();
-    };
-    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__TDHH=(void *)((unsigned long)((__POINTER )((__MEMORY *)search__XAVB(new_size__WDHH))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__H31C=((void **)result__TDHH);
+  Self__1TWD=(__INTEGER)(nb_elements__RRSC -  1);
+  while ((Self__1TWD >=  0)) {
+    Result__H31C[Self__1TWD]=NULL;
+    Self__1TWD=(__INTEGER)(Self__1TWD -  1);
   };
-  return(Result__NA2C);
+  return(Result__H31C);
 }
 
-static void short__token__to__YCD(void *key__0CD,__INTEGER beg__1CD,__INTEGER end__2CD)
+static void short__token__to__GDD(void *key__IDD,__INTEGER beg__JDD,__INTEGER end__KDD)
 // ({STRING_CONSTANT},{INTEGER},{INTEGER}) VoidNo recursive, No inlinable.
 {
-  __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;
+  __INTEGER pos__LDD,__tmp__GED,Self__1J4,new_capacity__F4HH;
+  __INTEGER old_nb_elts__I4HH,upper__3WJH,Self__1WJH,__tmp__2ED;
+  __INTEGER Self__ML4,__tmp__SFD,__tmp__VFD;
+  void *add_text__MDD;
+  __STRING *Self__G4HH;
+  void *fmt__NDD;
+  __CHARACTER ch__K4HH;
+  __CHARACTER *Self__H4HH,*new__J4HH;
+  pos__LDD= 0;
+  add_text__MDD=NULL;
+  fmt__NDD=NULL;
   if (is_shorter__LZ) {
     if (is_active_short__OCC) {
-      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__VCIH <  0)) {
-        result__VCIH=(__INTEGER)(~ result__VCIH);
-      };
-      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__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);
+      if (fast_has__IDT(short_dico__QD,key__IDD)) {
+        ((__STRING *)token__BED)->count__SGC= 0;
+        pos__LDD=(__INTEGER)(beg__JDD + short_derive__PCC);
+        __tmp__GED=(__INTEGER)(end__KDD -  1);
+        Self__1J4=beg__JDD;
+        while ((Self__1J4 <= __tmp__GED)) {
+          Self__G4HH=((__STRING *)token__BED);
+          ch__K4HH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(Self__1J4 -  1)];
+          new_capacity__F4HH= 0;
+          if ((Self__G4HH->capacity__UCS <= Self__G4HH->count__SGC)) {
+            if ((Self__G4HH->capacity__UCS ==  0)) {
+              Self__G4HH->capacity__UCS= 32;
+              Self__G4HH->storage__3CS=create__YIEB( 32);
+            } else {
+              new_capacity__F4HH=(__INTEGER)(Self__G4HH->capacity__UCS <<  1);
+              Self__H4HH=((__CHARACTER *)Self__G4HH->storage__3CS);
+              old_nb_elts__I4HH=Self__G4HH->capacity__UCS;
+              new__J4HH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__H4HH),((__UINTEGER_32 )old_nb_elts__I4HH),((__UINTEGER_32 )new_capacity__F4HH)));
+              upper__3WJH=(__INTEGER)(new_capacity__F4HH -  1);
+              Self__1WJH=old_nb_elts__I4HH;
+              while ((Self__1WJH <= upper__3WJH)) {
+                new__J4HH[Self__1WJH]='\0';
+                Self__1WJH=(__INTEGER)(Self__1WJH +  1);
+              };
+              Self__G4HH->storage__3CS=new__J4HH;
+              Self__G4HH->capacity__UCS=new_capacity__F4HH;
+            };
           };
-          Self__4CIH->count__EGC=(__INTEGER)(Self__4CIH->count__EGC -  1);
-          Self__MN4=(__INTEGER)(Self__MN4 +  1);
+          ((__CHARACTER *)Self__G4HH->storage__3CS)[Self__G4HH->count__SGC]=ch__K4HH;
+          Self__G4HH->count__SGC=(__INTEGER)(Self__G4HH->count__SGC +  1);
+          remove_between__to__MIT(((__STRING *)output_code__SI),pos__LDD,pos__LDD);
+          Self__1J4=(__INTEGER)(Self__1J4 +  1);
         };
-        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;
+        short_derive__PCC=(__INTEGER)(short_derive__PCC - ((__STRING *)token__BED)->count__SGC);
+        fmt__NDD=at__JK4(short_dico__QD,key__IDD);
+        __tmp__2ED=((__LINKED_LISToSTRING_CONSTANTo *)fmt__NDD)->parent_linked_collection__LD.upper__0ED;
+        Self__ML4= 1;
+        while ((Self__ML4 <= __tmp__2ED)) {
+          if (((void *)item__X3ND(fmt__NDD,Self__ML4) == (void *)NULL)) {
+            add_text__MDD=token__BED;
           } else {
-            add_text__4CD=item__Q2ND(fmt__5CD,Self__3O4);
+            add_text__MDD=item__X3ND(fmt__NDD,Self__ML4);
           };
-          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;
+          insert_string__to__OXU(output_code__SI,add_text__MDD,pos__LDD);
+          if (((struct ___OBJ *)add_text__MDD)->__id==__STRING_CONSTANT__) {
+            __tmp__SFD=((__STRING_CONSTANT *)add_text__MDD)->count__DD;
           } else {
-            __tmp__EFD=((__STRING *)add_text__4CD)->count__EGC;
+            __tmp__SFD=((__STRING *)add_text__MDD)->count__SGC;
           };
-          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;
+          pos__LDD=(__INTEGER)(pos__LDD + __tmp__SFD);
+          if (((struct ___OBJ *)add_text__MDD)->__id==__STRING_CONSTANT__) {
+            __tmp__VFD=((__STRING_CONSTANT *)add_text__MDD)->count__DD;
           } else {
-            __tmp__HFD=((__STRING *)add_text__4CD)->count__EGC;
+            __tmp__VFD=((__STRING *)add_text__MDD)->count__SGC;
           };
-          short_derive__PCC=(__INTEGER)(short_derive__PCC + __tmp__HFD);
-          Self__3O4=(__INTEGER)(Self__3O4 +  1);
+          short_derive__PCC=(__INTEGER)(short_derive__PCC + __tmp__VFD);
+          Self__ML4=(__INTEGER)(Self__ML4 +  1);
         };
       };
     };
   };
 }
 
-static __INTEGER first_substring_index__3ZZE(__STRING *Self__4ZZE)
+static __INTEGER first_substring_index__W0ZE(__STRING *Self__X0ZE)
 // ({STRING}) With resultNo recursive, No inlinable.
 {
-  __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__P54E > ((__STRING_CONSTANT *)(&__string_112))->count__DD)) {
-      result__R54E=s__Q54E;
-    } else {
-      s__Q54E=(__INTEGER)(s__Q54E +  1);
-    };
-  };
-  return(result__R54E);
+  __INTEGER i__OA5E,result__QA5E,s__PA5E,__tmp__LGEH,__tmp__MGEH;
+  __INTEGER __tmp__NGEH,__tmp__QGEH;
+  __CHARACTER *__tmp__OGEH,*__tmp__PGEH;
+  i__OA5E= 0;
+  result__QA5E= 0;
+  s__PA5E= 1;
+  __tmp__LGEH=((__STRING_CONSTANT *)(&__string_112))->count__DD;
+  __tmp__MGEH=Self__X0ZE->count__SGC;
+  __tmp__NGEH=((__STRING_CONSTANT *)(&__string_112))->count__DD;
+  __tmp__OGEH=Self__X0ZE->storage__3CS;
+  __tmp__PGEH=((__STRING_CONSTANT *)(&__string_112))->storage__RRO;
+  __tmp__QGEH=((__STRING_CONSTANT *)(&__string_112))->count__DD;
+  while ((! ((result__QA5E !=  0) || ((__INTEGER)((__INTEGER)(s__PA5E + __tmp__LGEH) -  1) > __tmp__MGEH)))) {
+    i__OA5E= 1;
+    while ((! ((i__OA5E > __tmp__NGEH) || (((__CHARACTER *)__tmp__OGEH)[(__INTEGER)((__INTEGER)((__INTEGER)(s__PA5E + i__OA5E) -  1) -  1)] != ((__CHARACTER *)__tmp__PGEH)[(__INTEGER)(i__OA5E -  1)])))) {
+      i__OA5E=(__INTEGER)(i__OA5E +  1);
+    };
+    if ((i__OA5E > __tmp__QGEH)) {
+      result__QA5E=s__PA5E;
+    } else {
+      s__PA5E=(__INTEGER)(s__PA5E +  1);
+    };
+  };
+  return(result__QA5E);
 }
 
-static __BOOLEAN read_string__1FQ()
+static __BOOLEAN read_string__HGQ()
 // () With resultNo recursive, No inlinable.
 {
-  __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__YO5G=((__CHARACTER )(( 0)));
-    } else {
-      result__YO5G=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
-    };
-    __tmp__JGQ=(result__YO5G == '\"');
+  __INTEGER old_pos__LGQ,new_capacity__53HH,old_nb_elts__C4HH;
+  __INTEGER upper__YWJH,Self__WWJH;
+  __STRING *Self__A4HH;
+  __POSITION pos__CSXG;
+  __BOOLEAN result__KGQ,__tmp__VGQ,__tmp__UHQ,__tmp__VHQ;
+  __CHARACTER result__4Q5G,result__IR5G,result__RR5G,result__WR5G;
+  __CHARACTER result__1R5G,result__AS5G,result__FS5G;
+  __CHARACTER *Self__B4HH,*new__D4HH;
+  result__KGQ=FALSE__;
+  old_pos__LGQ= 0;
+  if (read_space__XTD()) {
+    result__4Q5G='\0';
+    if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+      result__4Q5G=((__CHARACTER )(( 0)));
+    } else {
+      result__4Q5G=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
+    };
+    __tmp__VGQ=(result__4Q5G == '\"');
   } else {
-    __tmp__JGQ=FALSE__;
+    __tmp__VGQ=FALSE__;
   };
-  if (__tmp__JGQ) {
-    old_pos__5FQ=position__CCC;
+  if (__tmp__VGQ) {
+    old_pos__LGQ=position__CCC;
     position__CCC=(__INTEGER)(position__CCC +  1);
-    ((__STRING *)string_tmp__VH)->count__EGC= 0;
-    until_do__WNRC:
+    ((__STRING *)string_tmp__VH)->count__SGC= 0;
+    until_do__QKRC:
     {
-      result__CP5G='\0';
-      if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__CP5G=((__CHARACTER )(( 0)));
+      result__IR5G='\0';
+      if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+        result__IR5G=((__CHARACTER )(( 0)));
       } else {
-        result__CP5G=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+        result__IR5G=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__CP5G == ((__CHARACTER )(( 0))))) {
-        __tmp__IHQ=TRUE__;
+      if ((result__IR5G == ((__CHARACTER )(( 0))))) {
+        __tmp__UHQ=TRUE__;
       } else {
-        result__LP5G='\0';
-        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__LP5G=((__CHARACTER )(( 0)));
+        result__RR5G='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+          result__RR5G=((__CHARACTER )(( 0)));
         } else {
-          result__LP5G=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+          result__RR5G=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
         };
-        __tmp__IHQ=(result__LP5G == '\n');
+        __tmp__UHQ=(result__RR5G == '\n');
       };
-      if (__tmp__IHQ) {
-        __tmp__JHQ=TRUE__;
+      if (__tmp__UHQ) {
+        __tmp__VHQ=TRUE__;
       } else {
-        result__QP5G='\0';
-        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__QP5G=((__CHARACTER )(( 0)));
+        result__WR5G='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+          result__WR5G=((__CHARACTER )(( 0)));
         } else {
-          result__QP5G=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+          result__WR5G=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
         };
-        __tmp__JHQ=(result__QP5G == '\"');
+        __tmp__VHQ=(result__WR5G == '\"');
       };
-      if ((! __tmp__JHQ)) {
-        result__VP5G='\0';
-        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__VP5G=((__CHARACTER )(( 0)));
+      if ((! __tmp__VHQ)) {
+        result__1R5G='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+          result__1R5G=((__CHARACTER )(( 0)));
         } else {
-          result__VP5G=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+          result__1R5G=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
         };
-        add_last__GOT(string_tmp__VH,result__VP5G);
-        result__0P5G='\0';
-        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__0P5G=((__CHARACTER )(( 0)));
+        Self__A4HH=((__STRING *)string_tmp__VH);
+        new_capacity__53HH= 0;
+        if ((Self__A4HH->capacity__UCS <= Self__A4HH->count__SGC)) {
+          if ((Self__A4HH->capacity__UCS ==  0)) {
+            Self__A4HH->capacity__UCS= 32;
+            Self__A4HH->storage__3CS=create__YIEB( 32);
+          } else {
+            new_capacity__53HH=(__INTEGER)(Self__A4HH->capacity__UCS <<  1);
+            Self__B4HH=((__CHARACTER *)Self__A4HH->storage__3CS);
+            old_nb_elts__C4HH=Self__A4HH->capacity__UCS;
+            new__D4HH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__B4HH),((__UINTEGER_32 )old_nb_elts__C4HH),((__UINTEGER_32 )new_capacity__53HH)));
+            upper__YWJH=(__INTEGER)(new_capacity__53HH -  1);
+            Self__WWJH=old_nb_elts__C4HH;
+            while ((Self__WWJH <= upper__YWJH)) {
+              new__D4HH[Self__WWJH]='\0';
+              Self__WWJH=(__INTEGER)(Self__WWJH +  1);
+            };
+            Self__A4HH->storage__3CS=new__D4HH;
+            Self__A4HH->capacity__UCS=new_capacity__53HH;
+          };
+        };
+        ((__CHARACTER *)Self__A4HH->storage__3CS)[Self__A4HH->count__SGC]=result__1R5G;
+        Self__A4HH->count__SGC=(__INTEGER)(Self__A4HH->count__SGC +  1);
+        result__AS5G='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+          result__AS5G=((__CHARACTER )(( 0)));
         } else {
-          result__0P5G=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+          result__AS5G=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__0P5G == '\\')) {
+        if ((result__AS5G == '\\')) {
           position__CCC=(__INTEGER)(position__CCC +  1);
-          read_escape_character__G4KF();
+          read_escape_character__AALF();
         } else {
           position__CCC=(__INTEGER)(position__CCC +  1);
         };
-        goto until_do__WNRC;
+        goto until_do__QKRC;
       };
     };
-    result__5P5G='\0';
-    if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-      result__5P5G=((__CHARACTER )(( 0)));
+    result__FS5G='\0';
+    if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+      result__FS5G=((__CHARACTER )(( 0)));
     } else {
-      result__5P5G=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+      result__FS5G=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
     };
-    if ((result__5P5G == '\"')) {
+    if ((result__FS5G == '\"')) {
       position__CCC=(__INTEGER)(position__CCC +  1);
-      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)) {
+      last_string__D2C=get__YWB(string_tmp__VH);
+      result__KGQ=TRUE__;
+      short__token__to__GDD((&__string_123),old_pos__LGQ,position__CCC);
+    } else {
+      position__CCC=begin_position__BDE;
+      pos__CSXG=current_position__B0F();
+      put_error__text__1PG( 0,(&__string_251));
+      put_position__FRG(pos__CSXG);
+      put_string__33F(msg_err__AQG);
+      if ((type_error__5PG !=  2)) {
         exit(( 1));
       };
     };
   };
-  return(result__4FQ);
+  return(result__KGQ);
 }
 
-static void reduce_path__VN3E(void *st__XN3E)
+static __BOOLEAN fast_memcmp__until__FYYB(__CHARACTER *Self__GYYB,__CHARACTER *other__HYYB,__INTEGER capacity__IYYB)
+// ({NATIVE_ARRAYoExpanded_CHARACTERo},{NULLxNATIVE_ARRAYoExpanded_CHARACTERo},{INTEGER}) With resultNo recursive, No inlinable.
+{
+  __INTEGER i__0YYB;
+  i__0YYB=(__INTEGER)(capacity__IYYB -  1);
+  while (((i__0YYB >=  0) && (Self__GYYB[i__0YYB] == ((__CHARACTER *)other__HYYB)[i__0YYB]))) {
+    i__0YYB=(__INTEGER)(i__0YYB -  1);
+  };
+  return((i__0YYB <  0));
+}
+
+static void reduce_path__UO3E(void *st__WO3E)
 // ({NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __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__IEGH->count__EGC=(__INTEGER)(Self__IEGH->count__EGC - len__DEIH);
-              };
-            };
-          };
-          i__YN3E= 1;
+  __INTEGER stat__YO3E,i__XO3E,Self__JW1F,n__2DHH,idx__JQ3E,n__4DHH;
+  __INTEGER Self__ETEG,n__AEHH,idx__PU3E,new_capacity__L4HH;
+  __INTEGER old_nb_elts__O4HH,upper__CXJH,Self__AXJH;
+  __STRING *Self__1DHH,*Self__3DHH,*Self__5DHH,*Self__ZQFH,*Self__1QFH;
+  __STRING *Self__M4HH;
+  __CHARACTER car__ZO3E,Self__3D3E;
+  __BOOLEAN __tmp__AR3E,__tmp__FS3E,result__ZAYF,result__5D3E;
+  __BOOLEAN __tmp__JE3E,__tmp__GT3E;
+  __CHARACTER *Self__N4HH,*new__P4HH;
+  stat__YO3E= 0;
+  car__ZO3E='\0';
+  replace_all__with__CRS(st__WO3E,'\\','/');
+  i__XO3E= 1;
+  while ((i__XO3E <= ((__STRING *)st__WO3E)->count__SGC)) {
+    car__ZO3E=((__CHARACTER *)((__STRING *)st__WO3E)->storage__3CS)[(__INTEGER)(i__XO3E -  1)];
+    if ((car__ZO3E == '/')) {
+      Self__JW1F=stat__YO3E;
+      if ((stat__YO3E ==  0)) {
+        stat__YO3E= 1;
+      };
+      if ((Self__JW1F ==  1)) {
+        Self__1DHH=((__STRING *)st__WO3E);
+        n__2DHH=(__INTEGER)(i__XO3E -  1);
+        if ((n__2DHH > Self__1DHH->count__SGC)) {
+          Self__1DHH->count__SGC= 0;
         } else {
-          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);
+          if ((n__2DHH >  0)) {
+            remove_between__to__MIT(Self__1DHH, 1,n__2DHH);
+          };
+        };
+        i__XO3E= 1;
+      };
+      if ((Self__JW1F ==  2)) {
+        remove_between__to__MIT(st__WO3E,(__INTEGER)(i__XO3E -  1),i__XO3E);
+        i__XO3E=(__INTEGER)(i__XO3E -  2);
+        stat__YO3E= 1;
+      };
+      if ((Self__JW1F ==  3)) {
+        idx__JQ3E=last_index_of__since__KPGD(st__WO3E,(__INTEGER)(i__XO3E -  4));
+        if ((idx__JQ3E ==  0)) {
+          Self__3DHH=((__STRING *)st__WO3E);
+          n__4DHH=(__INTEGER)(i__XO3E -  1);
+          if ((n__4DHH > Self__3DHH->count__SGC)) {
+            Self__3DHH->count__SGC= 0;
+          } else {
+            if ((n__4DHH >  0)) {
+              remove_between__to__MIT(Self__3DHH, 1,n__4DHH);
             };
-            Self__OEIH->count__EGC=(__INTEGER)(Self__OEIH->count__EGC - len__MEIH);
           };
-          i__YN3E=result__4DIH;
+          i__XO3E= 1;
+        } else {
+          remove_between__to__MIT(st__WO3E,idx__JQ3E,(__INTEGER)(i__XO3E -  1));
+          i__XO3E=idx__JQ3E;
         };
-        stat__ZN3E= 1;
+        stat__YO3E= 1;
       };
-      __tmp__BQ3E=TRUE__;
+      __tmp__AR3E=TRUE__;
     } else {
-      __tmp__BQ3E=FALSE__;
+      __tmp__AR3E=FALSE__;
     };
-    if (__tmp__BQ3E) {
-      __tmp__GR3E=TRUE__;
+    if (__tmp__AR3E) {
+      __tmp__FS3E=TRUE__;
     } else {
-      result__54XF=(car__0N3E == '.');
-      if (result__54XF) {
-        Self__KREG=stat__ZN3E;
-        if ((stat__ZN3E ==  1)) {
-          stat__ZN3E= 2;
+      result__ZAYF=(car__ZO3E == '.');
+      if (result__ZAYF) {
+        Self__ETEG=stat__YO3E;
+        if ((stat__YO3E ==  1)) {
+          stat__YO3E= 2;
         };
-        if ((Self__KREG ==  2)) {
-          stat__ZN3E= 3;
+        if ((Self__ETEG ==  2)) {
+          stat__YO3E= 3;
         };
-        if ((Self__KREG ==  3)) {
-          stat__ZN3E= 0;
+        if ((Self__ETEG ==  3)) {
+          stat__YO3E= 0;
         };
       };
-      __tmp__GR3E=result__54XF;
+      __tmp__FS3E=result__ZAYF;
     };
-    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__;
+    if ((! __tmp__FS3E)) {
+      if (((car__ZO3E == ':') && (i__XO3E >  2))) {
+        Self__3D3E=((__CHARACTER *)((__STRING *)st__WO3E)->storage__3CS)[(__INTEGER)((__INTEGER)(i__XO3E -  1) -  1)];
+        result__5D3E=FALSE__;
+        if ((((__INTEGER_8 )Self__3D3E) >= ((__INTEGER_8 )'a'))) {
+          result__5D3E=(((__INTEGER_8 )Self__3D3E) <= ((__INTEGER_8 )'z'));
+          __tmp__JE3E=TRUE__;
         } else {
-          __tmp__KD3E=FALSE__;
+          __tmp__JE3E=FALSE__;
         };
-        if ((! __tmp__KD3E)) {
-          if ((((__INTEGER_8 )Self__4C3E) >= ((__INTEGER_8 )'A'))) {
-            result__AD3E=(((__INTEGER_8 )Self__4C3E) <= ((__INTEGER_8 )'Z'));
+        if ((! __tmp__JE3E)) {
+          if ((((__INTEGER_8 )Self__3D3E) >= ((__INTEGER_8 )'A'))) {
+            result__5D3E=(((__INTEGER_8 )Self__3D3E) <= ((__INTEGER_8 )'Z'));
           };
         };
-        __tmp__HS3E=result__AD3E;
+        __tmp__GT3E=result__5D3E;
       } else {
-        __tmp__HS3E=FALSE__;
+        __tmp__GT3E=FALSE__;
       };
-      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;
+      if ((__tmp__GT3E && (((__CHARACTER *)((__STRING *)st__WO3E)->storage__3CS)[(__INTEGER)((__INTEGER)(i__XO3E -  2) -  1)] == '/'))) {
+        Self__5DHH=((__STRING *)st__WO3E);
+        n__AEHH=(__INTEGER)(i__XO3E -  2);
+        if ((n__AEHH > Self__5DHH->count__SGC)) {
+          Self__5DHH->count__SGC= 0;
         } else {
-          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__KEGH->count__EGC=(__INTEGER)(Self__KEGH->count__EGC - len__VEIH);
-            };
+          if ((n__AEHH >  0)) {
+            remove_between__to__MIT(Self__5DHH, 1,n__AEHH);
           };
         };
-        i__YN3E= 1;
+        i__XO3E= 1;
       } else {
-        stat__ZN3E= 0;
+        stat__YO3E= 0;
       };
     };
-    i__YN3E=(__INTEGER)(i__YN3E +  1);
+    i__XO3E=(__INTEGER)(i__XO3E +  1);
   };
-  if ((stat__ZN3E ==  1)) {
-    Self__MEGH=((__STRING *)st__XN3E);
-    if (( 1 > Self__MEGH->count__EGC)) {
-      Self__MEGH->count__EGC= 0;
+  if ((stat__YO3E ==  1)) {
+    Self__ZQFH=((__STRING *)st__WO3E);
+    if (( 1 > Self__ZQFH->count__SGC)) {
+      Self__ZQFH->count__SGC= 0;
     } else {
-      Self__MEGH->count__EGC=(__INTEGER)(Self__MEGH->count__EGC -  1);
+      Self__ZQFH->count__SGC=(__INTEGER)(Self__ZQFH->count__SGC -  1);
     };
   };
-  if ((stat__ZN3E ==  2)) {
-    Self__OEGH=((__STRING *)st__XN3E);
-    if (( 2 > Self__OEGH->count__EGC)) {
-      Self__OEGH->count__EGC= 0;
+  if ((stat__YO3E ==  2)) {
+    Self__1QFH=((__STRING *)st__WO3E);
+    if (( 2 > Self__1QFH->count__SGC)) {
+      Self__1QFH->count__SGC= 0;
     } else {
-      Self__OEGH->count__EGC=(__INTEGER)(Self__OEGH->count__EGC -  2);
+      Self__1QFH->count__SGC=(__INTEGER)(Self__1QFH->count__SGC -  2);
     };
   };
-  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__ZPGD ==  0)) {
-      ((__STRING *)st__XN3E)->count__EGC= 0;
+  if ((stat__YO3E ==  3)) {
+    idx__PU3E=last_index_of__since__KPGD(st__WO3E,(__INTEGER)(i__XO3E -  4));
+    if ((idx__PU3E ==  0)) {
+      ((__STRING *)st__WO3E)->count__SGC= 0;
     } else {
-      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);
+      remove_between__to__MIT(st__WO3E,idx__PU3E,(__INTEGER)(i__XO3E -  1));
+    };
+  };
+  if ((((__STRING *)st__WO3E)->count__SGC ==  0)) {
+    Self__M4HH=((__STRING *)st__WO3E);
+    new_capacity__L4HH= 0;
+    if ((Self__M4HH->capacity__UCS <= Self__M4HH->count__SGC)) {
+      if ((Self__M4HH->capacity__UCS ==  0)) {
+        Self__M4HH->capacity__UCS= 32;
+        Self__M4HH->storage__3CS=create__YIEB( 32);
+      } else {
+        new_capacity__L4HH=(__INTEGER)(Self__M4HH->capacity__UCS <<  1);
+        Self__N4HH=((__CHARACTER *)Self__M4HH->storage__3CS);
+        old_nb_elts__O4HH=Self__M4HH->capacity__UCS;
+        new__P4HH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__N4HH),((__UINTEGER_32 )old_nb_elts__O4HH),((__UINTEGER_32 )new_capacity__L4HH)));
+        upper__CXJH=(__INTEGER)(new_capacity__L4HH -  1);
+        Self__AXJH=old_nb_elts__O4HH;
+        while ((Self__AXJH <= upper__CXJH)) {
+          new__P4HH[Self__AXJH]='\0';
+          Self__AXJH=(__INTEGER)(Self__AXJH +  1);
         };
-        Self__AFIH->count__EGC=(__INTEGER)(Self__AFIH->count__EGC - len__4EIH);
+        Self__M4HH->storage__3CS=new__P4HH;
+        Self__M4HH->capacity__UCS=new_capacity__L4HH;
       };
     };
-  };
-  if ((((__STRING *)st__XN3E)->count__EGC ==  0)) {
-    add_last__GOT(st__XN3E,'/');
+    ((__CHARACTER *)Self__M4HH->storage__3CS)[Self__M4HH->count__SGC]='/';
+    Self__M4HH->count__SGC=(__INTEGER)(Self__M4HH->count__SGC +  1);
   };
 }
 
-static void* item__A3PE(__DIRECTORY_UNIX *Self__B3PE,__INTEGER i__C3PE)
+static void* item__V3PE(__DIRECTORY_UNIX *Self__W3PE,__INTEGER i__X3PE)
 // ({DIRECTORY_UNIX},{INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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;
+  __LINKED_LISToENTRYo *Self__V5WE;
+  Self__V5WE=((__LINKED_LISToENTRYo *)Self__W3PE->parent_directory__SGD.list__FIRD);
+  if ((i__X3PE != Self__V5WE->mem_idx__VMWE)) {
+    if ((Self__V5WE->mem_idx__VMWE > i__X3PE)) {
+      Self__V5WE->mem_idx__VMWE= 1;
+      Self__V5WE->mem_lnk__WMWE=Self__V5WE->first_link__OMWE;
     };
-    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);
+    while ((i__X3PE != Self__V5WE->mem_idx__VMWE)) {
+      Self__V5WE->mem_lnk__WMWE=((__LINKED_LIST_NODEoENTRYo *)Self__V5WE->mem_lnk__WMWE)->next__G3FF;
+      Self__V5WE->mem_idx__VMWE=(__INTEGER)(Self__V5WE->mem_idx__VMWE +  1);
     };
   };
-  return(((__LINKED_LIST_NODEoENTRYo *)Self__24WE->mem_lnk__3LWE)->item__P5WE);
+  return(((__LINKED_LIST_NODEoENTRYo *)Self__V5WE->mem_lnk__WMWE)->item__IAXE);
 }
 
-static void* item__Q2ND(__LINKED_LISToSTRING_CONSTANTo *Self__R2ND,__INTEGER i__S2ND)
+static void* item__X3ND(__LINKED_LISToSTRING_CONSTANTo *Self__Y3ND,__INTEGER i__Z3ND)
 // ({LINKED_LISToSTRING_CONSTANTo},{INTEGER}) With resultNo recursive, No inlinable.
 {
-  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;
+  if ((i__Z3ND != Self__Y3ND->mem_idx__YTEC)) {
+    if ((Self__Y3ND->mem_idx__YTEC > i__Z3ND)) {
+      Self__Y3ND->mem_idx__YTEC= 1;
+      Self__Y3ND->mem_lnk__0TEC=Self__Y3ND->first_link__OTEC;
     };
-    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);
+    while ((i__Z3ND != Self__Y3ND->mem_idx__YTEC)) {
+      Self__Y3ND->mem_lnk__0TEC=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)Self__Y3ND->mem_lnk__0TEC)->next__JROD;
+      Self__Y3ND->mem_idx__YTEC=(__INTEGER)(Self__Y3ND->mem_idx__YTEC +  1);
     };
   };
-  return(((__LINKED_LIST_NODEoSTRING_CONSTANTo *)Self__R2ND->mem_lnk__JXEC)->item__V0HD);
+  return(((__LINKED_LIST_NODEoSTRING_CONSTANTo *)Self__Y3ND->mem_lnk__0TEC)->item__L0HD);
 }
 
-static void** create__123(__INTEGER nb_elements__323)
+static void** create__KZ3(__INTEGER nb_elements__MZ3)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__DEHH,a__CEHH,new_size__EEHH,new_size2__FEHH,a__GEHH;
+  __UINTEGER_32 new_size__HEHH;
+  __POINTER result__BEHH,ptr_table__FXJH,next__EXJH,result__GXJH;
+  __INTEGER Self__1ZJC;
+  void **Result__WREB;
+  sz__DEHH=((__UINTEGER_32 )(__INTEGER)(nb_elements__MZ3 * ((__INTEGER )(sizeof(void *)))));
+  result__BEHH=((__POINTER )(NULL));
+  a__CEHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__EEHH=(__UINTEGER_32)((__UINTEGER_32)(sz__DEHH + a__CEHH) & (__UINTEGER_32)(~ a__CEHH));
+  new_size2__FEHH=(__UINTEGER_32)(new_size__EEHH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__FEHH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__GEHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__HEHH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__FEHH + a__GEHH) & (__UINTEGER_32)(~ a__GEHH));
+    ptr_table__FXJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__HEHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__EXJH=((__POINTER )(NULL));
+    result__GXJH=((__POINTER *)ptr_table__FXJH)[ 0];
+    if ((result__GXJH == (void *)NULL)) {
+      result__GXJH=new_lab__RTJ(new_size__HEHH);
+      next__EXJH=(void *)((unsigned long)result__GXJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HEHH)));
+      ((__POINTER *)next__EXJH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__FXJH)[ 0]=next__EXJH;
+    } else {
+      next__EXJH=((__POINTER *)result__GXJH)[ 0];
+      if ((next__EXJH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GXJH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__HEHH <<  1)) <=  4096)) {
+          next__EXJH=(void *)((unsigned long)result__GXJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HEHH)));
+        } else {
+          next__EXJH=new_lab__RTJ(new_size__HEHH);
+        };
+        ((__POINTER *)next__EXJH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__FXJH)[ 0]=next__EXJH;
+      } else {
+        ((__POINTER *)result__GXJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EXJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__GXJH=next__EXJH;
+      };
+    };
+    ((__POINTER *)result__GXJH)[ 0]=((__POINTER ) 3);
+    result__BEHH=(void *)((unsigned long)result__GXJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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__OIJH == (void *)NULL)) {
-      result__OIJH=new_page__YC5();
-    };
-    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__BEHH=(void *)((unsigned long)((__POINTER )((__MEMORY *)search__XAVB(new_size__EEHH))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__WREB=((void **)result__BEHH);
+  Self__1ZJC=(__INTEGER)(nb_elements__MZ3 -  1);
+  while ((Self__1ZJC >=  0)) {
+    Result__WREB[Self__1ZJC]=NULL;
+    Self__1ZJC=(__INTEGER)(Self__1ZJC -  1);
   };
-  return(Result__HVEB);
+  return(Result__WREB);
 }
 
-static __BOOLEAN read_word__LRF(void *st__NRF)
+static __BOOLEAN read_word__ISF(void *st__KSF)
 // ({STRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER posold__MSF,idx__NSF,__tmp__LOEH,__tmp__MOEH;
+  __BOOLEAN result__OSF,__tmp__MTF;
+  __CHARACTER *__tmp__NOEH,*__tmp__G4GH;
+  __CHARACTER result__XXAH;
+  posold__MSF= 0;
+  idx__NSF= 0;
+  result__OSF=FALSE__;
+  if ((! read_space__XTD())) {
+    result__OSF=FALSE__;
   } else {
-    posold__PRF=position__CCC;
-    idx__QRF= 1;
-    until_do__TC4:
+    posold__MSF=position__CCC;
+    idx__NSF= 1;
+    __tmp__LOEH=((__STRING_CONSTANT *)st__KSF)->count__DD;
+    __tmp__MOEH=((__STRING *)source__5BC)->count__SGC;
+    __tmp__NOEH=((__STRING_CONSTANT *)st__KSF)->storage__RRO;
+    __tmp__G4GH=((__STRING *)source__5BC)->storage__3CS;
+    until_do__C53:
     {
-      if ((idx__QRF > ((__STRING_CONSTANT *)st__NRF)->count__DD)) {
-        __tmp__PSF=TRUE__;
+      if ((idx__NSF > __tmp__LOEH)) {
+        __tmp__MTF=TRUE__;
       } else {
-        result__XVAH='\0';
-        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__XVAH=((__CHARACTER )(( 0)));
+        result__XXAH='\0';
+        if ((position__CCC > __tmp__MOEH)) {
+          result__XXAH=((__CHARACTER )(( 0)));
         } else {
-          result__XVAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+          result__XXAH=((__CHARACTER *)__tmp__G4GH)[(__INTEGER)(position__CCC -  1)];
         };
-        __tmp__PSF=(result__XVAH != ((__CHARACTER *)((__STRING_CONSTANT *)st__NRF)->storage__FRO)[(__INTEGER)(idx__QRF -  1)]);
+        __tmp__MTF=(result__XXAH != ((__CHARACTER *)__tmp__NOEH)[(__INTEGER)(idx__NSF -  1)]);
       };
-      if ((! __tmp__PSF)) {
+      if ((! __tmp__MTF)) {
         position__CCC=(__INTEGER)(position__CCC +  1);
-        idx__QRF=(__INTEGER)(idx__QRF +  1);
-        goto until_do__TC4;
+        idx__NSF=(__INTEGER)(idx__NSF +  1);
+        goto until_do__C53;
       };
     };
-    if ((idx__QRF > ((__STRING_CONSTANT *)st__NRF)->count__DD)) {
-      last_string__V1C=st__NRF;
-      result__RRF=TRUE__;
+    if ((idx__NSF > ((__STRING_CONSTANT *)st__KSF)->count__DD)) {
+      last_string__D2C=st__KSF;
+      result__OSF=TRUE__;
     } else {
-      position__CCC=posold__PRF;
+      position__CCC=posold__MSF;
     };
   };
-  return(result__RRF);
+  return(result__OSF);
 }
 
-static __BOOLEAN read_slot_header__NEE(__BOOLEAN first__PEE)
+static __BOOLEAN read_slot_header__KFE(__BOOLEAN first__MFE)
 // ({TRUExFALSE}) With resultNo recursive, No inlinable.
 {
-  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)) {
+  void *v__QFE;
+  void *instr__YFE;
+  __POSITION pos__TZXG,pos__VZXG,pos__XZXG,pos__ZZXG,pos__1ZXG;
+  __POSITION pos__3ZXG,pos__5ZXG,pos__MD2G,pos__B0XG,pos__D0XG;
+  __POSITION pos__F0XG,pos__H0XG,pos__OD2G,pos__J0XG,pos__L0XG;
+  __POSITION pos__N0XG,pos__P0XG,pos__R0XG,pos__T0XG,pos__V0XG;
+  __POSITION pos__X0XG,pos__Z0XG,pos__10XG,pos__30XG,pos__QD2G;
+  __POSITION pos__50XG,pos__B1XG,pos__BKM,pos__D1XG,pos__F1XG,pos__H1XG;
+  __POSITION pos__J1XG,__tmp__SFQD,__tmp__XFQD,__tmp__SD2G,pos__L1XG;
+  __POSITION pos__N1XG,pos__P1XG,pos__R1XG,pos__T1XG,pos__V1XG;
+  void *res__UKE,*__tmp__WME;
+  __INTEGER __tmp__NME,__tmp__PME,__tmp__RME,typ_id__T4HH,typ_id__34HH;
+  __INTEGER new_capacity__F5HH,old_nb_elts__I5HH,upper__TYJH,Self__RYJH;
+  __INTEGER new_capacity__L5HH,old_nb_elts__O5HH,upper__YYJH,Self__WYJH;
+  void *n__LRFH,*n__KNGB;
+  void *result__MRFH,*result__SNGB;
+  __ITM_TYPE_PARAMETER *result__R4HH,*Self__Z4HH,*result__14HH;
+  __ITM_TYPE_PARAMETER *Self__D5HH;
+  __POINTER ptr__S4HH,ptr_table__UXJH,next__TXJH,result__VXJH;
+  __POINTER ptr_table__ZXJH,next__YXJH,result__0XJH,ptr__24HH;
+  __POINTER ptr_table__EYJH,next__DYJH,result__FYJH,ptr_table__JYJH;
+  __POINTER next__IYJH,result__KYJH;
+  __UINTEGER_32 sz__U4HH,a__V4HH,new_size__W4HH,t__X4HH,a__Y4HH;
+  __UINTEGER_32 new_size__2XJH,lab_type__1XJH,sz__44HH,a__54HH;
+  __UINTEGER_32 new_size__A5HH,t__B5HH,a__C5HH,new_size__MYJH;
+  __UINTEGER_32 lab_type__LYJH;
+  __STRING *Self__G5HH,*Self__M5HH;
+  __BOOLEAN result__OFE,result__KXJH,__tmp__4IE,result__MXJH;
+  __BOOLEAN result__NXJH,__tmp__WKE,result__QXJH,__tmp__GLE,__tmp__ULE;
+  __BOOLEAN result__GUL,__tmp__CME,result__3XJH,result__AYJH;
+  __BOOLEAN result__NYJH,__tmp__BRE,__tmp__HTE,__tmp__TRE,__tmp__3UE;
+  __BOOLEAN result__RBH,__tmp__ZWE,result__DCH,__tmp__VYE,result__VCH;
+  __BOOLEAN __tmp__C0E,result__HDH,__tmp__I2E,result__ZDH,result__0YJH;
+  __BOOLEAN result__3YJH,result__AZJH,result__DZJH;
+  __CHARACTER style__SFE,result__OXJH,result__RXJH,result__4XJH;
+  __CHARACTER result__BYJH,result__OYJH,result__1YJH,result__4YJH;
+  __CHARACTER result__BZJH,result__EZJH;
+  __CHARACTER *Self__H5HH,*new__J5HH,*Self__N5HH,*new__P5HH;
+  result__OFE=FALSE__;
+  v__QFE=NULL;
+  instr__YFE=NULL;
+  style__SFE=read_style__PUF();
+  if ((style__SFE != ' ')) {
+    result__OFE=TRUE__;
+    if (((! first__MFE) && (style__SFE == '+'))) {
+      pos__TZXG=current_position__B0F();
+      put_error__text__1PG( 2,(&__string_252));
+      put_position__FRG(pos__TZXG);
+      put_string__33F(msg_err__AQG);
+      if ((type_error__5PG !=  2)) {
         exit(( 1));
       };
     };
-    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)) {
+    if (first__MFE) {
+      if (read_word__ISF((&__string_62))) {
+        if ((style__SFE == '-')) {
+          append__3OS(output_decl__VHE,(&__string_253));
+        };
+        short__token__to__GDD((&__string_130),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__D2C)->count__DD),position__CCC);
+        ((__PROTOTYPE *)object__ZBC)->parent_named__5.parent_itm_object__4.position__SFJ=current_position__B0F();
+        ((__PROTOTYPE *)object__ZBC)->parent_named__5.style__0FU=style__SFE;
+        if ((! read_symbol__4YJ((&__string_12)))) {
+          pos__VZXG=current_position__B0F();
+          put_error__text__1PG( 2,(&__string_254));
+          put_position__FRG(pos__VZXG);
+          put_string__33F(msg_err__AQG);
+          if ((type_error__5PG !=  2)) {
             exit(( 1));
           };
         };
-        result__SIJH=read_word__LRF((&__string_9));
+        result__KXJH=read_word__ISF((&__string_9));
         if (is_shorter__LZ) {
-          if (result__SIJH) {
+          if (result__KXJH) {
             if (((void *)(&__string_9) == (void *)(&__string_4))) {
-              short__token__to__YCD((&__string_120),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V1C)->count__DD),position__CCC);
+              short__token__to__GDD((&__string_120),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__D2C)->count__DD),position__CCC);
             } else {
-              short__token__to__YCD((&__string_119),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V1C)->count__DD),position__CCC);
+              short__token__to__GDD((&__string_119),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__D2C)->count__DD),position__CCC);
             };
           };
         };
-        if (result__SIJH) {
-          __tmp__BIE=TRUE__;
+        if (result__KXJH) {
+          __tmp__4IE=TRUE__;
         } else {
-          result__UIJH=read_word__LRF((&__string_10));
+          result__MXJH=read_word__ISF((&__string_10));
           if (is_shorter__LZ) {
-            if (result__UIJH) {
+            if (result__MXJH) {
               if (((void *)(&__string_10) == (void *)(&__string_4))) {
-                short__token__to__YCD((&__string_120),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V1C)->count__DD),position__CCC);
+                short__token__to__GDD((&__string_120),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__D2C)->count__DD),position__CCC);
               } else {
-                short__token__to__YCD((&__string_119),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V1C)->count__DD),position__CCC);
+                short__token__to__GDD((&__string_119),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__D2C)->count__DD),position__CCC);
               };
             };
           };
-          __tmp__BIE=result__UIJH;
+          __tmp__4IE=result__MXJH;
         };
-        if (__tmp__BIE) {
-          ((__PROTOTYPE *)object__ZBC)->type_style__E4C=last_string__V1C;
+        if (__tmp__4IE) {
+          ((__PROTOTYPE *)object__ZBC)->type_style__S4C=last_string__D2C;
         };
-        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)) {
+        if ((! read_cap_identifier__N1J())) {
+          pos__XZXG=current_position__B0F();
+          put_error__text__1PG( 0,(&__string_255));
+          put_position__FRG(pos__XZXG);
+          put_string__33F(msg_err__AQG);
+          if ((type_error__5PG !=  2)) {
             exit(( 1));
           };
         };
-        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)) {
+        short__token__to__GDD((&__string_125),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__D2C)->count__DD),position__CCC);
+        if (((void *)((__PROTOTYPE *)object__ZBC)->shortname__3JE != (void *)last_string__D2C)) {
+          pos__ZZXG=current_position__B0F();
+          put_error__text__1PG( 0,(&__string_256));
+          put_position__FRG(pos__ZZXG);
+          put_string__33F(msg_err__AQG);
+          if ((type_error__5PG !=  2)) {
             exit(( 1));
           };
         };
-        result__VIJH=FALSE__;
-        if ((! read_space__MTD())) {
-          result__VIJH=FALSE__;
+        result__NXJH=FALSE__;
+        if ((! read_space__XTD())) {
+          result__NXJH=FALSE__;
         } else {
-          result__WIJH='\0';
-          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__WIJH=((__CHARACTER )(( 0)));
+          result__OXJH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+            result__OXJH=((__CHARACTER )(( 0)));
           } else {
-            result__WIJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+            result__OXJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__WIJH == '(')) {
+          if ((result__OXJH == '(')) {
             position__CCC=(__INTEGER)(position__CCC +  1);
-            result__VIJH=TRUE__;
+            result__NXJH=TRUE__;
           };
         };
-        if (result__VIJH) {
+        if (result__NXJH) {
           if (((! is_shorter__LZ) && (! is_shorter2__VI))) {
-            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)) {
+            pos__1ZXG=current_position__B0F();
+            put_error__text__1PG( 0,(&__string_257));
+            put_position__FRG(pos__1ZXG);
+            put_string__33F(msg_err__AQG);
+            if ((type_error__5PG !=  2)) {
               exit(( 1));
             };
           };
-          res__XJE=NULL;
-          __tmp__ZJE=read_identifier__QBL();
-          if (__tmp__ZJE) {
-            result__YIJH=FALSE__;
-            if ((! read_space__MTD())) {
-              result__YIJH=FALSE__;
+          res__UKE=NULL;
+          __tmp__WKE=read_identifier__2BL();
+          if (__tmp__WKE) {
+            result__QXJH=FALSE__;
+            if ((! read_space__XTD())) {
+              result__QXJH=FALSE__;
             } else {
-              result__ZIJH='\0';
-              if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                result__ZIJH=((__CHARACTER )(( 0)));
+              result__RXJH='\0';
+              if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+                result__RXJH=((__CHARACTER )(( 0)));
               } else {
-                result__ZIJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+                result__RXJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
               };
-              if ((result__ZIJH == ':')) {
+              if ((result__RXJH == ':')) {
                 position__CCC=(__INTEGER)(position__CCC +  1);
-                result__YIJH=TRUE__;
+                result__QXJH=TRUE__;
               };
             };
-            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)) {
+            if ((! result__QXJH)) {
+              pos__3ZXG=current_position__B0F();
+              put_error__text__1PG( 2,(&__string_258));
+              put_position__FRG(pos__3ZXG);
+              put_string__33F(msg_err__AQG);
+              if ((type_error__5PG !=  2)) {
                 exit(( 1));
               };
             };
-            __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)) {
+            __tmp__GLE=((void *)read_type__CDM(PARSER__,TRUE__) == (void *)NULL);
+            if (__tmp__GLE) {
+              pos__5ZXG=current_position__B0F();
+              put_error__text__1PG( 0,(&__string_259));
+              put_position__FRG(pos__5ZXG);
+              put_string__33F(msg_err__AQG);
+              if ((type_error__5PG !=  2)) {
                 exit(( 1));
               };
             };
-            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)) {
+            pos__MD2G=current_position__B0F();
+            put_error__text__1PG( 1,(&__string_260));
+            put_position__FRG(pos__MD2G);
+            put_string__33F(msg_err__AQG);
+            if ((type_error__5PG !=  2)) {
               exit(( 1));
             };
-            __tmp__XKE=TRUE__;
+            __tmp__ULE=TRUE__;
           } else {
-            __tmp__XKE=FALSE__;
+            __tmp__ULE=FALSE__;
           };
-          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)) {
+          if ((! __tmp__ULE)) {
+            result__GUL=read_cap_identifier__N1J();
+            if (result__GUL) {
+              __tmp__CME=is_parameter_type__AME;
+              if ((! __tmp__CME)) {
+                pos__B0XG=current_position__B0F();
+                put_error__text__1PG( 0,(&__string_261));
+                put_position__FRG(pos__B0XG);
+                put_string__33F(msg_err__AQG);
+                if ((type_error__5PG !=  2)) {
                   exit(( 1));
                 };
               };
-              __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__;
+              __tmp__NME=position__CCC;
+              __tmp__PME=((__STRING_CONSTANT *)last_string__D2C)->count__DD;
+              __tmp__RME=(__INTEGER)(__tmp__NME - __tmp__PME);
+              short__token__to__GDD((&__string_126),__tmp__RME,position__CCC);
+              n__LRFH=last_string__D2C;
+              result__MRFH=fast_reference_at__R3T(dico__XVI,n__LRFH);
+              if (((void *)result__MRFH == (void *)NULL)) {
+                result__R4HH=NULL;
+                ptr__S4HH=((__POINTER )(NULL));
+                typ_id__T4HH= 0;
+                sz__U4HH=((__UINTEGER_32 )sizeof(__ITM_TYPE_PARAMETER));
+                if ((sz__U4HH ==  0)) {
+                  result__R4HH=ITM_TYPE_PARAMETER__;
                 } else {
-                  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;
+                  typ_id__T4HH=-1;
+                  clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__U4HH);
+                  if ((typ_id__T4HH == (__INTEGER)(-  1))) {
+                    a__V4HH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__W4HH=(__UINTEGER_32)((__UINTEGER_32)(sz__U4HH + a__V4HH) & (__UINTEGER_32)(~ a__V4HH));
+                    ptr_table__UXJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__W4HH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                    next__TXJH=((__POINTER )(NULL));
+                    result__VXJH=((__POINTER *)ptr_table__UXJH)[ 0];
+                    if ((result__VXJH == (void *)NULL)) {
+                      result__VXJH=new_lab__RTJ(new_size__W4HH);
+                      next__TXJH=(void *)((unsigned long)result__VXJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__W4HH)));
+                      ((__POINTER *)next__TXJH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__UXJH)[ 0]=next__TXJH;
                     } else {
-                      next__1IJH=((__POINTER *)result__3IJH)[ 0];
-                      if ((next__1IJH == (void *)NULL)) {
-                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__3IJH - (unsigned long)begin_memory__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)));
+                      next__TXJH=((__POINTER *)result__VXJH)[ 0];
+                      if ((next__TXJH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__VXJH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__W4HH <<  1)) <=  4096)) {
+                          next__TXJH=(void *)((unsigned long)result__VXJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__W4HH)));
                         } else {
-                          next__1IJH=new_lab__FTJ(new_size__KFIH);
+                          next__TXJH=new_lab__RTJ(new_size__W4HH);
                         };
-                        ((__POINTER *)next__1IJH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__2IJH)[ 0]=next__1IJH;
+                        ((__POINTER *)next__TXJH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__UXJH)[ 0]=next__TXJH;
                       } else {
-                        ((__POINTER *)result__3IJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1IJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__3IJH=next__1IJH;
+                        ((__POINTER *)result__VXJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TXJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__VXJH=next__TXJH;
                       };
                     };
-                    ptr__GFIH=result__3IJH;
+                    ptr__S4HH=result__VXJH;
                   } else {
-                    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;
+                    t__X4HH=((__UINTEGER_32 )typ_id__T4HH);
+                    a__Y4HH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__2XJH=(__UINTEGER_32)((__UINTEGER_32)(sz__U4HH + a__Y4HH) & (__UINTEGER_32)(~ a__Y4HH));
+                    ptr_table__ZXJH=((__POINTER )(&(table_type[(t__X4HH)])));
+                    lab_type__1XJH=(__UINTEGER_32)(t__X4HH |  1);
+                    next__YXJH=((__POINTER )(NULL));
+                    result__0XJH=((__POINTER *)ptr_table__ZXJH)[ 0];
+                    if ((result__0XJH == (void *)NULL)) {
+                      result__0XJH=new_lab__RTJ(lab_type__1XJH);
+                      next__YXJH=(void *)((unsigned long)result__0XJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2XJH)));
+                      ((__POINTER *)next__YXJH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__ZXJH)[ 0]=next__YXJH;
                     } else {
-                      next__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)));
+                      next__YXJH=((__POINTER *)result__0XJH)[ 0];
+                      if ((next__YXJH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__0XJH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__2XJH <<  1)) <=  4096)) {
+                          next__YXJH=(void *)((unsigned long)result__0XJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2XJH)));
                         } else {
-                          next__AJJH=new_lab__FTJ(lab_type__DJJH);
+                          next__YXJH=new_lab__RTJ(lab_type__1XJH);
                         };
-                        ((__POINTER *)next__AJJH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__BJJH)[ 0]=next__AJJH;
+                        ((__POINTER *)next__YXJH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__ZXJH)[ 0]=next__YXJH;
                       } else {
-                        ((__POINTER *)result__CJJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__AJJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__CJJH=next__AJJH;
+                        ((__POINTER *)result__0XJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YXJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__0XJH=next__YXJH;
                       };
                     };
-                    ptr__GFIH=result__CJJH;
+                    ptr__S4HH=result__0XJH;
                   };
-                  result__FFIH=((__ITM_TYPE_PARAMETER *)ptr__GFIH);
-                  *(result__FFIH) = *(ITM_TYPE_PARAMETER__);
+                  result__R4HH=((__ITM_TYPE_PARAMETER *)ptr__S4HH);
+                  *(result__R4HH) = *(ITM_TYPE_PARAMETER__);
                 };
-                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;
+                Self__Z4HH=((__ITM_TYPE_PARAMETER *)result__R4HH);
+                Self__Z4HH->parent_itm_type__VFE.name__GZP=n__LRFH;
+                fast_put__to__JPZ(dico__XVI,Self__Z4HH,n__LRFH);
+                result__MRFH=result__R4HH;
               };
-              if (result__AFGH==NULL) {
-                __tmp__ZLE=NULL;
+              if (result__MRFH==NULL) {
+                __tmp__WME=NULL;
               } else {
-                switch (((struct ___OBJ *)result__AFGH)->__id) {
+                switch (((struct ___OBJ *)result__MRFH)->__id) {
                 case __ITM_TYPE_PARAMETER__: {
-                  __tmp__ZLE=((void *)result__AFGH);
+                  __tmp__WME=((void *)result__MRFH);
                 } break;
                 case __ITM_TYPE_SIMPLE__: {
-                  __tmp__ZLE=NULL;
+                  __tmp__WME=NULL;
                 } break;
                 }
               };
-              res__XJE=__tmp__ZLE;
+              res__UKE=__tmp__WME;
             };
           };
-          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)) {
+          if (((void *)res__UKE == (void *)NULL)) {
+            pos__D0XG=current_position__B0F();
+            put_error__text__1PG( 0,(&__string_261));
+            put_position__FRG(pos__D0XG);
+            put_string__33F(msg_err__AQG);
+            if ((type_error__5PG !=  2)) {
               exit(( 1));
             };
           };
-          add_last__2DBC(((__PROTOTYPE *)object__ZBC)->idf_generic_list__PNE,res__XJE);
-          while_do__5XK:
+          add_last__NABC(((__PROTOTYPE *)object__ZBC)->idf_generic_list__MOE,res__UKE);
+          while_do__LYK:
           {
-            result__FJJH=FALSE__;
-            if ((! read_space__MTD())) {
-              result__FJJH=FALSE__;
+            result__3XJH=FALSE__;
+            if ((! read_space__XTD())) {
+              result__3XJH=FALSE__;
             } else {
-              result__GJJH='\0';
-              if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                result__GJJH=((__CHARACTER )(( 0)));
+              result__4XJH='\0';
+              if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+                result__4XJH=((__CHARACTER )(( 0)));
               } else {
-                result__GJJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+                result__4XJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
               };
-              if ((result__GJJH == ',')) {
+              if ((result__4XJH == ',')) {
                 position__CCC=(__INTEGER)(position__CCC +  1);
-                result__FJJH=TRUE__;
+                result__3XJH=TRUE__;
               };
             };
-            if (result__FJJH) {
-              res__XJE=NULL;
-              __tmp__ZJE=read_identifier__QBL();
-              if (__tmp__ZJE) {
-                result__IJJH=FALSE__;
-                if ((! read_space__MTD())) {
-                  result__IJJH=FALSE__;
+            if (result__3XJH) {
+              res__UKE=NULL;
+              __tmp__WKE=read_identifier__2BL();
+              if (__tmp__WKE) {
+                result__AYJH=FALSE__;
+                if ((! read_space__XTD())) {
+                  result__AYJH=FALSE__;
                 } else {
-                  result__JJJH='\0';
-                  if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                    result__JJJH=((__CHARACTER )(( 0)));
+                  result__BYJH='\0';
+                  if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+                    result__BYJH=((__CHARACTER )(( 0)));
                   } else {
-                    result__JJJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+                    result__BYJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
                   };
-                  if ((result__JJJH == ':')) {
+                  if ((result__BYJH == ':')) {
                     position__CCC=(__INTEGER)(position__CCC +  1);
-                    result__IJJH=TRUE__;
+                    result__AYJH=TRUE__;
                   };
                 };
-                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)) {
+                if ((! result__AYJH)) {
+                  pos__F0XG=current_position__B0F();
+                  put_error__text__1PG( 2,(&__string_258));
+                  put_position__FRG(pos__F0XG);
+                  put_string__33F(msg_err__AQG);
+                  if ((type_error__5PG !=  2)) {
                     exit(( 1));
                   };
                 };
-                __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)) {
+                __tmp__GLE=((void *)read_type__CDM(PARSER__,TRUE__) == (void *)NULL);
+                if (__tmp__GLE) {
+                  pos__H0XG=current_position__B0F();
+                  put_error__text__1PG( 0,(&__string_259));
+                  put_position__FRG(pos__H0XG);
+                  put_string__33F(msg_err__AQG);
+                  if ((type_error__5PG !=  2)) {
                     exit(( 1));
                   };
                 };
-                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)) {
+                pos__OD2G=current_position__B0F();
+                put_error__text__1PG( 1,(&__string_260));
+                put_position__FRG(pos__OD2G);
+                put_string__33F(msg_err__AQG);
+                if ((type_error__5PG !=  2)) {
                   exit(( 1));
                 };
-                __tmp__XKE=TRUE__;
+                __tmp__ULE=TRUE__;
               } else {
-                __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)) {
+                __tmp__ULE=FALSE__;
+              };
+              if ((! __tmp__ULE)) {
+                result__GUL=read_cap_identifier__N1J();
+                if (result__GUL) {
+                  __tmp__CME=is_parameter_type__AME;
+                  if ((! __tmp__CME)) {
+                    pos__J0XG=current_position__B0F();
+                    put_error__text__1PG( 0,(&__string_261));
+                    put_position__FRG(pos__J0XG);
+                    put_string__33F(msg_err__AQG);
+                    if ((type_error__5PG !=  2)) {
                       exit(( 1));
                     };
                   };
-                  __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__;
+                  __tmp__NME=position__CCC;
+                  __tmp__PME=((__STRING_CONSTANT *)last_string__D2C)->count__DD;
+                  __tmp__RME=(__INTEGER)(__tmp__NME - __tmp__PME);
+                  short__token__to__GDD((&__string_126),__tmp__RME,position__CCC);
+                  n__KNGB=last_string__D2C;
+                  result__SNGB=fast_reference_at__R3T(dico__XVI,n__KNGB);
+                  if (((void *)result__SNGB == (void *)NULL)) {
+                    result__14HH=NULL;
+                    ptr__24HH=((__POINTER )(NULL));
+                    typ_id__34HH= 0;
+                    sz__44HH=((__UINTEGER_32 )sizeof(__ITM_TYPE_PARAMETER));
+                    if ((sz__44HH ==  0)) {
+                      result__14HH=ITM_TYPE_PARAMETER__;
                     } else {
-                      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;
+                      typ_id__34HH=-1;
+                      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__44HH);
+                      if ((typ_id__34HH == (__INTEGER)(-  1))) {
+                        a__54HH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                        new_size__A5HH=(__UINTEGER_32)((__UINTEGER_32)(sz__44HH + a__54HH) & (__UINTEGER_32)(~ a__54HH));
+                        ptr_table__EYJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__A5HH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                        next__DYJH=((__POINTER )(NULL));
+                        result__FYJH=((__POINTER *)ptr_table__EYJH)[ 0];
+                        if ((result__FYJH == (void *)NULL)) {
+                          result__FYJH=new_lab__RTJ(new_size__A5HH);
+                          next__DYJH=(void *)((unsigned long)result__FYJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__A5HH)));
+                          ((__POINTER *)next__DYJH)[ 0]=NULL;
+                          ((__POINTER *)ptr_table__EYJH)[ 0]=next__DYJH;
                         } 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__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)));
+                          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__4XH)))) &  4095) + (__UINTEGER_32)(new_size__A5HH <<  1)) <=  4096)) {
+                              next__DYJH=(void *)((unsigned long)result__FYJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__A5HH)));
                             } else {
-                              next__LJJH=new_lab__FTJ(new_size__UFIH);
+                              next__DYJH=new_lab__RTJ(new_size__A5HH);
                             };
-                            ((__POINTER *)next__LJJH)[ 0]=NULL;
-                            ((__POINTER *)ptr_table__MJJH)[ 0]=next__LJJH;
+                            ((__POINTER *)next__DYJH)[ 0]=NULL;
+                            ((__POINTER *)ptr_table__EYJH)[ 0]=next__DYJH;
                           } else {
-                            ((__POINTER *)result__NJJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LJJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                            result__NJJH=next__LJJH;
+                            ((__POINTER *)result__FYJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DYJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                            result__FYJH=next__DYJH;
                           };
                         };
-                        ptr__QFIH=result__NJJH;
+                        ptr__24HH=result__FYJH;
                       } else {
-                        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;
+                        t__B5HH=((__UINTEGER_32 )typ_id__34HH);
+                        a__C5HH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                        new_size__MYJH=(__UINTEGER_32)((__UINTEGER_32)(sz__44HH + a__C5HH) & (__UINTEGER_32)(~ a__C5HH));
+                        ptr_table__JYJH=((__POINTER )(&(table_type[(t__B5HH)])));
+                        lab_type__LYJH=(__UINTEGER_32)(t__B5HH |  1);
+                        next__IYJH=((__POINTER )(NULL));
+                        result__KYJH=((__POINTER *)ptr_table__JYJH)[ 0];
+                        if ((result__KYJH == (void *)NULL)) {
+                          result__KYJH=new_lab__RTJ(lab_type__LYJH);
+                          next__IYJH=(void *)((unsigned long)result__KYJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MYJH)));
+                          ((__POINTER *)next__IYJH)[ 0]=NULL;
+                          ((__POINTER *)ptr_table__JYJH)[ 0]=next__IYJH;
                         } else {
-                          next__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)));
+                          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__4XH)))) &  4095) + (__UINTEGER_32)(new_size__MYJH <<  1)) <=  4096)) {
+                              next__IYJH=(void *)((unsigned long)result__KYJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MYJH)));
                             } else {
-                              next__QJJH=new_lab__FTJ(lab_type__TJJH);
+                              next__IYJH=new_lab__RTJ(lab_type__LYJH);
                             };
-                            ((__POINTER *)next__QJJH)[ 0]=NULL;
-                            ((__POINTER *)ptr_table__RJJH)[ 0]=next__QJJH;
+                            ((__POINTER *)next__IYJH)[ 0]=NULL;
+                            ((__POINTER *)ptr_table__JYJH)[ 0]=next__IYJH;
                           } else {
-                            ((__POINTER *)result__SJJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QJJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                            result__SJJH=next__QJJH;
+                            ((__POINTER *)result__KYJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__IYJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                            result__KYJH=next__IYJH;
                           };
                         };
-                        ptr__QFIH=result__SJJH;
+                        ptr__24HH=result__KYJH;
                       };
-                      result__PFIH=((__ITM_TYPE_PARAMETER *)ptr__QFIH);
-                      *(result__PFIH) = *(ITM_TYPE_PARAMETER__);
+                      result__14HH=((__ITM_TYPE_PARAMETER *)ptr__24HH);
+                      *(result__14HH) = *(ITM_TYPE_PARAMETER__);
                     };
-                    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;
+                    Self__D5HH=((__ITM_TYPE_PARAMETER *)result__14HH);
+                    Self__D5HH->parent_itm_type__VFE.name__GZP=n__KNGB;
+                    fast_put__to__JPZ(dico__XVI,Self__D5HH,n__KNGB);
+                    result__SNGB=result__14HH;
                   };
-                  if (result__DRGB==NULL) {
-                    __tmp__ZLE=NULL;
+                  if (result__SNGB==NULL) {
+                    __tmp__WME=NULL;
                   } else {
-                    switch (((struct ___OBJ *)result__DRGB)->__id) {
+                    switch (((struct ___OBJ *)result__SNGB)->__id) {
                     case __ITM_TYPE_PARAMETER__: {
-                      __tmp__ZLE=((void *)result__DRGB);
+                      __tmp__WME=((void *)result__SNGB);
                     } break;
                     case __ITM_TYPE_SIMPLE__: {
-                      __tmp__ZLE=NULL;
+                      __tmp__WME=NULL;
                     } break;
                     }
                   };
-                  res__XJE=__tmp__ZLE;
+                  res__UKE=__tmp__WME;
                 };
               };
-              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)) {
+              if (((void *)res__UKE == (void *)NULL)) {
+                pos__L0XG=current_position__B0F();
+                put_error__text__1PG( 0,(&__string_261));
+                put_position__FRG(pos__L0XG);
+                put_string__33F(msg_err__AQG);
+                if ((type_error__5PG !=  2)) {
                   exit(( 1));
                 };
               };
-              add_last__2DBC(((__PROTOTYPE *)object__ZBC)->idf_generic_list__PNE,res__XJE);
-              goto while_do__5XK;
+              add_last__NABC(((__PROTOTYPE *)object__ZBC)->idf_generic_list__MOE,res__UKE);
+              goto while_do__LYK;
             };
           };
-          result__VJJH=FALSE__;
-          if ((! read_space__MTD())) {
-            result__VJJH=FALSE__;
+          result__NYJH=FALSE__;
+          if ((! read_space__XTD())) {
+            result__NYJH=FALSE__;
           } else {
-            result__WJJH='\0';
-            if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-              result__WJJH=((__CHARACTER )(( 0)));
+            result__OYJH='\0';
+            if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+              result__OYJH=((__CHARACTER )(( 0)));
             } else {
-              result__WJJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+              result__OYJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
             };
-            if ((result__WJJH == ')')) {
+            if ((result__OYJH == ')')) {
               position__CCC=(__INTEGER)(position__CCC +  1);
-              result__VJJH=TRUE__;
+              result__NYJH=TRUE__;
             };
           };
-          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)) {
+          if ((! result__NYJH)) {
+            pos__N0XG=current_position__B0F();
+            put_error__text__1PG( 2,(&__string_262));
+            put_position__FRG(pos__N0XG);
+            put_string__33F(msg_err__AQG);
+            if ((type_error__5PG !=  2)) {
               exit(( 1));
             };
           };
           if (((! is_shorter__LZ) && (! is_shorter2__VI))) {
-            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)) {
+            if (((__INTEGER)(((__FAST_ARRAYoITM_TYPE_PARAMETERo *)((__PROTOTYPE *)object__ZBC)->idf_generic_list__MOE)->parent_arrayed_collection__LOE.upper__RABC +  1) !=  0)) {
+              pos__P0XG=current_position__B0F();
+              put_error__text__1PG( 0,(&__string_263));
+              put_position__FRG(pos__P0XG);
+              put_string__33F(msg_err__AQG);
+              if ((type_error__5PG !=  2)) {
                 exit(( 1));
               };
             };
           };
         };
       } else {
-        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)) {
+        pos__R0XG=current_position__B0F();
+        put_error__text__1PG( 0,(&__string_264));
+        put_position__FRG(pos__R0XG);
+        put_string__33F(msg_err__AQG);
+        if ((type_error__5PG !=  2)) {
           exit(( 1));
         };
       };
-      __tmp__EQE=TRUE__;
+      __tmp__BRE=TRUE__;
     } else {
-      __tmp__EQE=FALSE__;
+      __tmp__BRE=FALSE__;
     };
-    if (__tmp__EQE) {
-      __tmp__KSE=TRUE__;
+    if (__tmp__BRE) {
+      __tmp__HTE=TRUE__;
     } else {
-      __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)) {
+      __tmp__TRE=(read_word__ISF((&__string_63)) || read_word__ISF((&__string_64)));
+      if (__tmp__TRE) {
+        short__token__to__GDD((&__string_130),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__D2C)->count__DD),position__CCC);
+        if ((! read_symbol__4YJ((&__string_12)))) {
+          pos__T0XG=current_position__B0F();
+          put_error__text__1PG( 2,(&__string_254));
+          put_position__FRG(pos__T0XG);
+          put_string__33F(msg_err__AQG);
+          if ((type_error__5PG !=  2)) {
             exit(( 1));
           };
         };
-        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)) {
+        if (((void *)read_type_list__ENO(PARSER__,FALSE__) == (void *)NULL)) {
+          pos__V0XG=current_position__B0F();
+          put_error__text__1PG( 0,(&__string_265));
+          put_position__FRG(pos__V0XG);
+          put_string__33F(msg_err__AQG);
+          if ((type_error__5PG !=  2)) {
             exit(( 1));
           };
         };
       };
-      __tmp__KSE=__tmp__WQE;
+      __tmp__HTE=__tmp__TRE;
     };
-    if (__tmp__KSE) {
-      __tmp__AUE=TRUE__;
+    if (__tmp__HTE) {
+      __tmp__3UE=TRUE__;
     } else {
-      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)) {
+      result__RBH=read_word__ISF((&__string_65));
+      if (result__RBH) {
+        short__token__to__GDD((&__string_130),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__D2C)->count__DD),position__CCC);
+        if ((! read_symbol__4YJ((&__string_12)))) {
+          pos__X0XG=current_position__B0F();
+          put_error__text__1PG( 2,(&__string_254));
+          put_position__FRG(pos__X0XG);
+          put_string__33F(msg_err__AQG);
+          if ((type_error__5PG !=  2)) {
             exit(( 1));
           };
         };
-        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)) {
+        if ((! read_external__2TO())) {
+          pos__Z0XG=current_position__B0F();
+          put_error__text__1PG( 0,(&__string_266));
+          put_position__FRG(pos__Z0XG);
+          put_string__33F(msg_err__AQG);
+          if ((type_error__5PG !=  2)) {
             exit(( 1));
           };
         };
-        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__AUE=result__DBH;
-    };
-    if (__tmp__AUE) {
-      __tmp__2VE=TRUE__;
-    } else {
-      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)) {
+        append__3OS(output_decl__VHE,(&__string_267));
+        append__3OS(output_decl__VHE,((__PROTOTYPE *)object__ZBC)->parent_named__5.name__LI);
+        Self__G5HH=((__STRING *)output_decl__VHE);
+        new_capacity__F5HH= 0;
+        if ((Self__G5HH->capacity__UCS <= Self__G5HH->count__SGC)) {
+          if ((Self__G5HH->capacity__UCS ==  0)) {
+            Self__G5HH->capacity__UCS= 32;
+            Self__G5HH->storage__3CS=create__YIEB( 32);
+          } else {
+            new_capacity__F5HH=(__INTEGER)(Self__G5HH->capacity__UCS <<  1);
+            Self__H5HH=((__CHARACTER *)Self__G5HH->storage__3CS);
+            old_nb_elts__I5HH=Self__G5HH->capacity__UCS;
+            new__J5HH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__H5HH),((__UINTEGER_32 )old_nb_elts__I5HH),((__UINTEGER_32 )new_capacity__F5HH)));
+            upper__TYJH=(__INTEGER)(new_capacity__F5HH -  1);
+            Self__RYJH=old_nb_elts__I5HH;
+            while ((Self__RYJH <= upper__TYJH)) {
+              new__J5HH[Self__RYJH]='\0';
+              Self__RYJH=(__INTEGER)(Self__RYJH +  1);
+            };
+            Self__G5HH->storage__3CS=new__J5HH;
+            Self__G5HH->capacity__UCS=new_capacity__F5HH;
+          };
+        };
+        ((__CHARACTER *)Self__G5HH->storage__3CS)[Self__G5HH->count__SGC]='\n';
+        Self__G5HH->count__SGC=(__INTEGER)(Self__G5HH->count__SGC +  1);
+        append__3OS(output_decl__VHE,last_string__D2C);
+        Self__M5HH=((__STRING *)output_decl__VHE);
+        new_capacity__L5HH= 0;
+        if ((Self__M5HH->capacity__UCS <= Self__M5HH->count__SGC)) {
+          if ((Self__M5HH->capacity__UCS ==  0)) {
+            Self__M5HH->capacity__UCS= 32;
+            Self__M5HH->storage__3CS=create__YIEB( 32);
+          } else {
+            new_capacity__L5HH=(__INTEGER)(Self__M5HH->capacity__UCS <<  1);
+            Self__N5HH=((__CHARACTER *)Self__M5HH->storage__3CS);
+            old_nb_elts__O5HH=Self__M5HH->capacity__UCS;
+            new__P5HH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__N5HH),((__UINTEGER_32 )old_nb_elts__O5HH),((__UINTEGER_32 )new_capacity__L5HH)));
+            upper__YYJH=(__INTEGER)(new_capacity__L5HH -  1);
+            Self__WYJH=old_nb_elts__O5HH;
+            while ((Self__WYJH <= upper__YYJH)) {
+              new__P5HH[Self__WYJH]='\0';
+              Self__WYJH=(__INTEGER)(Self__WYJH +  1);
+            };
+            Self__M5HH->storage__3CS=new__P5HH;
+            Self__M5HH->capacity__UCS=new_capacity__L5HH;
+          };
+        };
+        ((__CHARACTER *)Self__M5HH->storage__3CS)[Self__M5HH->count__SGC]='\n';
+        Self__M5HH->count__SGC=(__INTEGER)(Self__M5HH->count__SGC +  1);
+      };
+      __tmp__3UE=result__RBH;
+    };
+    if (__tmp__3UE) {
+      __tmp__ZWE=TRUE__;
+    } else {
+      result__DCH=read_word__ISF((&__string_66));
+      if (result__DCH) {
+        short__token__to__GDD((&__string_130),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__D2C)->count__DD),position__CCC);
+        if ((! read_symbol__4YJ((&__string_12)))) {
+          pos__10XG=current_position__B0F();
+          put_error__text__1PG( 2,(&__string_254));
+          put_position__FRG(pos__10XG);
+          put_string__33F(msg_err__AQG);
+          if ((type_error__5PG !=  2)) {
             exit(( 1));
           };
         };
-        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)) {
+        v__QFE=read_expr_primary__E5M(PARSER__);
+        if (((void *)v__QFE == (void *)NULL)) {
+          pos__30XG=current_position__B0F();
+          put_error__text__1PG( 0,(&__string_268));
+          put_position__FRG(pos__30XG);
+          put_string__33F(msg_err__AQG);
+          if ((type_error__5PG !=  2)) {
             exit(( 1));
           };
         };
-        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)) {
+        if (((void *)((__PROTOTYPE *)object__ZBC)->default_value__LWE != (void *)NULL)) {
+          pos__QD2G=current_position__B0F();
+          put_error__text__1PG( 1,(&__string_269));
+          put_position__FRG(pos__QD2G);
+          put_string__33F(msg_err__AQG);
+          if ((type_error__5PG !=  2)) {
             exit(( 1));
           };
         };
-        ((__PROTOTYPE *)object__ZBC)->default_value__OVE=v__TEE;
+        ((__PROTOTYPE *)object__ZBC)->default_value__LWE=v__QFE;
       };
-      __tmp__2VE=result__VBH;
+      __tmp__ZWE=result__DCH;
     };
-    if (__tmp__2VE) {
-      __tmp__YXE=TRUE__;
+    if (__tmp__ZWE) {
+      __tmp__VYE=TRUE__;
     } else {
-      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)) {
+      result__VCH=read_word__ISF((&__string_67));
+      if (result__VCH) {
+        short__token__to__GDD((&__string_130),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__D2C)->count__DD),position__CCC);
+        if ((! read_symbol__4YJ((&__string_12)))) {
+          pos__50XG=current_position__B0F();
+          put_error__text__1PG( 2,(&__string_254));
+          put_position__FRG(pos__50XG);
+          put_string__33F(msg_err__AQG);
+          if ((type_error__5PG !=  2)) {
             exit(( 1));
           };
         };
-        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)) {
+        if ((! read_external__2TO())) {
+          pos__B1XG=current_position__B0F();
+          put_error__text__1PG( 0,(&__string_266));
+          put_position__FRG(pos__B1XG);
+          put_string__33F(msg_err__AQG);
+          if ((type_error__5PG !=  2)) {
             exit(( 1));
           };
         };
-        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)) {
+        if (((void *)((__PROTOTYPE *)object__ZBC)->type_c__GYE != (void *)NULL)) {
+          pos__BKM=current_position__B0F();
+          put_error__text__1PG( 1,(&__string_270));
+          put_position__FRG(pos__BKM);
+          put_string__33F(msg_err__AQG);
+          if ((type_error__5PG !=  2)) {
             exit(( 1));
           };
         };
-        ((__PROTOTYPE *)object__ZBC)->type_c__JXE=last_string__V1C;
+        ((__PROTOTYPE *)object__ZBC)->type_c__GYE=last_string__D2C;
       };
-      __tmp__YXE=result__HCH;
+      __tmp__VYE=result__VCH;
     };
-    if (__tmp__YXE) {
-      __tmp__FZE=TRUE__;
+    if (__tmp__VYE) {
+      __tmp__C0E=TRUE__;
     } else {
-      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)) {
+      result__HDH=read_word__ISF((&__string_68));
+      if (result__HDH) {
+        short__token__to__GDD((&__string_130),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__D2C)->count__DD),position__CCC);
+        if ((! read_symbol__4YJ((&__string_12)))) {
+          pos__D1XG=current_position__B0F();
+          put_error__text__1PG( 2,(&__string_254));
+          put_position__FRG(pos__D1XG);
+          put_string__33F(msg_err__AQG);
+          if ((type_error__5PG !=  2)) {
             exit(( 1));
           };
         };
-        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)) {
+        if ((! read_integer__22P())) {
+          pos__F1XG=current_position__B0F();
+          put_error__text__1PG( 0,(&__string_271));
+          put_position__FRG(pos__F1XG);
+          put_string__33F(msg_err__AQG);
+          if ((type_error__5PG !=  2)) {
             exit(( 1));
           };
         };
       };
-      __tmp__FZE=result__ZCH;
+      __tmp__C0E=result__HDH;
     };
-    if (__tmp__FZE) {
-      __tmp__L1E=TRUE__;
+    if (__tmp__C0E) {
+      __tmp__I2E=TRUE__;
     } else {
-      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)) {
+      result__ZDH=read_word__ISF((&__string_88));
+      if (result__ZDH) {
+        if ((! read_symbol__4YJ((&__string_14)))) {
+          pos__H1XG=current_position__B0F();
+          put_error__text__1PG( 2,(&__string_272));
+          put_position__FRG(pos__H1XG);
+          put_string__33F(msg_err__AQG);
+          if ((type_error__5PG !=  2)) {
             exit(( 1));
           };
         };
-        result__YJJH=FALSE__;
-        if ((! read_space__MTD())) {
-          result__YJJH=FALSE__;
+        result__0YJH=FALSE__;
+        if ((! read_space__XTD())) {
+          result__0YJH=FALSE__;
         } else {
-          result__ZJJH='\0';
-          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__ZJJH=((__CHARACTER )(( 0)));
+          result__1YJH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+            result__1YJH=((__CHARACTER )(( 0)));
           } else {
-            result__ZJJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+            result__1YJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__ZJJH == '(')) {
+          if ((result__1YJH == '(')) {
             position__CCC=(__INTEGER)(position__CCC +  1);
-            result__YJJH=TRUE__;
+            result__0YJH=TRUE__;
           };
         };
-        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)) {
+        if ((! result__0YJH)) {
+          pos__J1XG=current_position__B0F();
+          put_error__text__1PG( 2,(&__string_273));
+          put_position__FRG(pos__J1XG);
+          put_string__33F(msg_err__AQG);
+          if ((type_error__5PG !=  2)) {
             exit(( 1));
           };
         };
-        while_do__FHFB:
+        while_do__UDFB:
         {
-          instr__1EE=readlip_expr__LVPB();
-          if (((void *)instr__1EE != (void *)NULL)) {
-            switch (((struct ___OBJ *)instr__1EE)->__id) {
+          instr__YFE=readlip_expr__YRPB();
+          if (((void *)instr__YFE != (void *)NULL)) {
+            switch (((struct ___OBJ *)instr__YFE)->__id) {
             case __LIP_AFFECT__: {
-              run__JJFC(instr__1EE);
+              run__0FFC(instr__YFE);
             } break;
             case __LIP_BINARY__: {
-              __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)) {
+              __tmp__SFQD=((__LIP_BINARY *)instr__YFE)->parent_lip_code__WNZB.parent_itm_object__XFE.position__SFJ;
+              put_error__text__1PG( 2,(&__string_274));
+              put_position__FRG(__tmp__SFQD);
+              put_string__33F(msg_err__AQG);
+              if ((type_error__5PG !=  2)) {
                 exit(( 1));
               };
             } break;
             case __LIP_UNARY__: {
-              __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)) {
+              __tmp__XFQD=((__LIP_UNARY *)instr__YFE)->parent_lip_code__FZ4B.parent_itm_object__XFE.position__SFJ;
+              put_error__text__1PG( 2,(&__string_274));
+              put_position__FRG(__tmp__XFQD);
+              put_string__33F(msg_err__AQG);
+              if ((type_error__5PG !=  2)) {
                 exit(( 1));
               };
             } break;
             case __LIP_CALL__: {
-              run__FQUE(instr__1EE);
+              run__WQUE(instr__YFE);
             } break;
             case __LIP_IF__: {
-              run__WEQD(instr__1EE);
+              run__ZFQD(instr__YFE);
             } break;
             case __LIP_PRINT__: {
-              run__ZUUE(instr__1EE);
+              run__KVUE(instr__YFE);
             } break;
             case __LIP_VALUE__: {
-              __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)) {
+              __tmp__SD2G=((__LIP_VALUE *)instr__YFE)->parent_lip_code__1IFE.parent_itm_object__XFE.position__SFJ;
+              put_error__text__1PG( 2,(&__string_274));
+              put_position__FRG(__tmp__SD2G);
+              put_string__33F(msg_err__AQG);
+              if ((type_error__5PG !=  2)) {
                 exit(( 1));
               };
             } break;
             };
-            result__1JJH=FALSE__;
-            if ((! read_space__MTD())) {
-              result__1JJH=FALSE__;
+            result__3YJH=FALSE__;
+            if ((! read_space__XTD())) {
+              result__3YJH=FALSE__;
             } else {
-              result__2JJH='\0';
-              if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                result__2JJH=((__CHARACTER )(( 0)));
+              result__4YJH='\0';
+              if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+                result__4YJH=((__CHARACTER )(( 0)));
               } else {
-                result__2JJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+                result__4YJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
               };
-              if ((result__2JJH == ';')) {
+              if ((result__4YJH == ';')) {
                 position__CCC=(__INTEGER)(position__CCC +  1);
-                result__1JJH=TRUE__;
+                result__3YJH=TRUE__;
               };
             };
-            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)) {
+            if ((! result__3YJH)) {
+              pos__L1XG=current_position__B0F();
+              put_error__text__1PG( 2,(&__string_167));
+              put_position__FRG(pos__L1XG);
+              put_string__33F(msg_err__AQG);
+              if ((type_error__5PG !=  2)) {
                 exit(( 1));
               };
             };
-            goto while_do__FHFB;
+            goto while_do__UDFB;
           };
         };
-        result__4JJH=FALSE__;
-        if ((! read_space__MTD())) {
-          result__4JJH=FALSE__;
+        result__AZJH=FALSE__;
+        if ((! read_space__XTD())) {
+          result__AZJH=FALSE__;
         } else {
-          result__5JJH='\0';
-          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__5JJH=((__CHARACTER )(( 0)));
+          result__BZJH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+            result__BZJH=((__CHARACTER )(( 0)));
           } else {
-            result__5JJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+            result__BZJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__5JJH == ')')) {
+          if ((result__BZJH == ')')) {
             position__CCC=(__INTEGER)(position__CCC +  1);
-            result__4JJH=TRUE__;
+            result__AZJH=TRUE__;
           };
         };
-        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)) {
+        if ((! result__AZJH)) {
+          pos__N1XG=current_position__B0F();
+          put_error__text__1PG( 2,(&__string_237));
+          put_position__FRG(pos__N1XG);
+          put_string__33F(msg_err__AQG);
+          if ((type_error__5PG !=  2)) {
             exit(( 1));
           };
         };
       };
-      __tmp__L1E=result__LDH;
+      __tmp__I2E=result__ZDH;
     };
-    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)) {
+    if ((! __tmp__I2E)) {
+      if (((((((read_word__ISF((&__string_69)) || read_word__ISF((&__string_70))) || read_word__ISF((&__string_71))) || read_word__ISF((&__string_72))) || read_word__ISF((&__string_73))) || read_word__ISF((&__string_74))) || read_word__ISF((&__string_75)))) {
+        short__token__to__GDD((&__string_130),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__D2C)->count__DD),position__CCC);
+        if ((! read_symbol__4YJ((&__string_12)))) {
+          pos__P1XG=current_position__B0F();
+          put_error__text__1PG( 2,(&__string_254));
+          put_position__FRG(pos__P1XG);
+          put_string__33F(msg_err__AQG);
+          if ((type_error__5PG !=  2)) {
             exit(( 1));
           };
         };
-        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)) {
+        if ((! read_string__HGQ())) {
+          pos__R1XG=current_position__B0F();
+          put_error__text__1PG( 0,(&__string_275));
+          put_position__FRG(pos__R1XG);
+          put_string__33F(msg_err__AQG);
+          if ((type_error__5PG !=  2)) {
             exit(( 1));
           };
         };
         if (is_shorter2__VI) {
-          ((__PROTOTYPE *)object__ZBC)->comment_slot__4UTC=last_string__V1C;
+          ((__PROTOTYPE *)object__ZBC)->comment_slot__YRTC=last_string__D2C;
         };
       } else {
-        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)) {
+        pos__T1XG=current_position__B0F();
+        put_error__text__1PG( 2,(&__string_276));
+        put_position__FRG(pos__T1XG);
+        put_string__33F(msg_err__AQG);
+        if ((type_error__5PG !=  2)) {
           exit(( 1));
         };
       };
     };
-    result__BKJH=FALSE__;
-    if ((! read_space__MTD())) {
-      result__BKJH=FALSE__;
+    result__DZJH=FALSE__;
+    if ((! read_space__XTD())) {
+      result__DZJH=FALSE__;
     } else {
-      result__CKJH='\0';
-      if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__CKJH=((__CHARACTER )(( 0)));
+      result__EZJH='\0';
+      if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+        result__EZJH=((__CHARACTER )(( 0)));
       } else {
-        result__CKJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+        result__EZJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__CKJH == ';')) {
+      if ((result__EZJH == ';')) {
         position__CCC=(__INTEGER)(position__CCC +  1);
-        result__BKJH=TRUE__;
+        result__DZJH=TRUE__;
       };
     };
-    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)) {
+    if ((! result__DZJH)) {
+      pos__V1XG=current_position__B0F();
+      put_error__text__1PG( 2,(&__string_241));
+      put_position__FRG(pos__V1XG);
+      put_string__33F(msg_err__AQG);
+      if ((type_error__5PG !=  2)) {
         exit(( 1));
       };
     };
   };
-  return(result__REE);
+  return(result__OFE);
 }
 
-static void* get_name__EVOB(void *n__GVOB)
+static void* get_name__TROB(void *n__VROB)
 // ({NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  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__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__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)));
+  void *result__FOEC,*result__XROB;
+  __SECTION_ *result__P2YB,*Self__YWFC;
+  __POINTER ptr__Q2YB,ptr_table__HZJH,next__GZJH,result__IZJH;
+  __POINTER ptr_table__MZJH,next__LZJH,result__NZJH,ptr__RDID;
+  __POINTER ptr_table__RZJH,next__QZJH,result__SZJH,ptr_table__WZJH;
+  __POINTER next__VZJH,result__XZJH;
+  __INTEGER typ_id__V2YB,h__GXFC,idx__HXFC,idx__HBID,new_capacity__IBID;
+  __INTEGER i__JBID,typ_id__WDID;
+  __UINTEGER_32 sz__S2YB,a__PSFH,new_size__QSFH,t__USFH,a__TSFH;
+  __UINTEGER_32 new_size__PZJH,lab_type__OZJH,sz__TDID,a__BSFH;
+  __UINTEGER_32 new_size__CSFH,t__GSFH,a__FSFH,new_size__ZZJH;
+  __UINTEGER_32 lab_type__YZJH;
+  __HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo *Self__ZNEC,*Self__3WFC;
+  void *node__EOEC,*node__IXFC,*node1__LBID,*node2__MBID,*__tmp__WYFC;
+  void **old_buckets__KBID;
+  __HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *result__QDID;
+  __HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *Self__LGTD;
+  Self__ZNEC=((__HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo *)bucket_name__2ROB);
+  result__FOEC=NULL;
+  node__EOEC=((void **)Self__ZNEC->buckets__MOEC)[(__INTEGER)(hash_code__RNW(n__VROB) % Self__ZNEC->capacity__HOEC)];
+  while ((! (((void *)node__EOEC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node__EOEC)->key__YOEC == (void *)n__VROB)))) {
+    node__EOEC=((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node__EOEC)->next__DPEC;
+  };
+  if (((void *)node__EOEC != (void *)NULL)) {
+    result__FOEC=((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node__EOEC)->item__LPEC;
+  };
+  result__XROB=result__FOEC;
+  if (((void *)result__FOEC == (void *)NULL)) {
+    result__P2YB=NULL;
+    ptr__Q2YB=((__POINTER )(NULL));
+    typ_id__V2YB= 0;
+    sz__S2YB=((__UINTEGER_32 )sizeof(__SECTION_));
+    if ((sz__S2YB ==  0)) {
+      result__P2YB=SECTION___;
+    } else {
+      typ_id__V2YB=__SECTION___;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__S2YB);
+      if ((typ_id__V2YB == (__INTEGER)(-  1))) {
+        a__PSFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__QSFH=(__UINTEGER_32)((__UINTEGER_32)(sz__S2YB + a__PSFH) & (__UINTEGER_32)(~ a__PSFH));
+        ptr_table__HZJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__QSFH / ((__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__RTJ(new_size__QSFH);
+          next__GZJH=(void *)((unsigned long)result__IZJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QSFH)));
+          ((__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__4XH)))) &  4095) + (__UINTEGER_32)(new_size__QSFH <<  1)) <=  4096)) {
+              next__GZJH=(void *)((unsigned long)result__IZJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QSFH)));
+            } else {
+              next__GZJH=new_lab__RTJ(new_size__QSFH);
+            };
+            ((__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__Q2YB=result__IZJH;
+      } else {
+        t__USFH=((__UINTEGER_32 )typ_id__V2YB);
+        a__TSFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__PZJH=(__UINTEGER_32)((__UINTEGER_32)(sz__S2YB + a__TSFH) & (__UINTEGER_32)(~ a__TSFH));
+        ptr_table__MZJH=((__POINTER )(&(table_type[(t__USFH)])));
+        lab_type__OZJH=(__UINTEGER_32)(t__USFH |  1);
+        next__LZJH=((__POINTER )(NULL));
+        result__NZJH=((__POINTER *)ptr_table__MZJH)[ 0];
+        if ((result__NZJH == (void *)NULL)) {
+          result__NZJH=new_lab__RTJ(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__4XH)))) &  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__LZJH=new_lab__RTJ(lab_type__OZJH);
+            };
+            ((__POINTER *)next__LZJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__MZJH)[ 0]=next__LZJH;
+          } else {
+            ((__POINTER *)result__NZJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LZJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__NZJH=next__LZJH;
+          };
+        };
+        ptr__Q2YB=result__NZJH;
+      };
+      result__P2YB=((__SECTION_ *)ptr__Q2YB);
+      *(result__P2YB) = *(SECTION___);
+    };
+    result__XROB=result__P2YB;
+    Self__YWFC=((__SECTION_ *)result__P2YB);
+    Self__YWFC->name__MYDC=n__VROB;
+    Self__YWFC->type_list__1WFC=NULL;
+    Self__3WFC=((__HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo *)bucket_name__2ROB);
+    h__GXFC=hash_code__RNW(n__VROB);
+    idx__HXFC=(__INTEGER)(h__GXFC % Self__3WFC->capacity__HOEC);
+    node__IXFC=((void **)Self__3WFC->buckets__MOEC)[idx__HXFC];
+    while ((! (((void *)node__IXFC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node__IXFC)->key__YOEC == (void *)n__VROB)))) {
+      node__IXFC=((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node__IXFC)->next__DPEC;
+    };
+    if (((void *)node__IXFC == (void *)NULL)) {
+      if ((Self__3WFC->capacity__HOEC == Self__3WFC->count__JYFC)) {
+        idx__HBID= 0;
+        node1__LBID=NULL;
+        node2__MBID=NULL;
+        old_buckets__KBID=Self__3WFC->buckets__MOEC;
+        new_capacity__IBID=prime_number_ceiling__021((__INTEGER)(Self__3WFC->capacity__HOEC +  1));
+        Self__3WFC->buckets__MOEC=create__C3XC(new_capacity__IBID);
+        i__JBID=(__INTEGER)(Self__3WFC->capacity__HOEC -  1);
+        Self__3WFC->capacity__HOEC=new_capacity__IBID;
+        while ((i__JBID >=  0)) {
+          node1__LBID=((void **)old_buckets__KBID)[i__JBID];
+          while (((void *)node1__LBID != (void *)NULL)) {
+            node2__MBID=((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node1__LBID)->next__DPEC;
+            idx__HBID=(__INTEGER)(hash_code__RNW(((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node1__LBID)->key__YOEC) % Self__3WFC->capacity__HOEC);
+            ((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node1__LBID)->next__DPEC=((void **)Self__3WFC->buckets__MOEC)[idx__HBID];
+            ((void **)Self__3WFC->buckets__MOEC)[idx__HBID]=node1__LBID;
+            node1__LBID=node2__MBID;
+          };
+          i__JBID=(__INTEGER)(i__JBID -  1);
+        };
+        idx__HXFC=(__INTEGER)(h__GXFC % Self__3WFC->capacity__HOEC);
+      };
+      __tmp__WYFC=((void **)Self__3WFC->buckets__MOEC)[idx__HXFC];
+      result__QDID=NULL;
+      ptr__RDID=((__POINTER )(NULL));
+      typ_id__WDID= 0;
+      sz__TDID=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo));
+      if ((sz__TDID ==  0)) {
+        result__QDID=HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__;
+      } else {
+        typ_id__WDID=__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__TDID);
+        if ((typ_id__WDID == (__INTEGER)(-  1))) {
+          a__BSFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__CSFH=(__UINTEGER_32)((__UINTEGER_32)(sz__TDID + a__BSFH) & (__UINTEGER_32)(~ a__BSFH));
+          ptr_table__RZJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__CSFH / ((__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__RTJ(new_size__CSFH);
+            next__QZJH=(void *)((unsigned long)result__SZJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CSFH)));
+            ((__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__4XH)))) &  4095) + (__UINTEGER_32)(new_size__CSFH <<  1)) <=  4096)) {
+                next__QZJH=(void *)((unsigned long)result__SZJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CSFH)));
               } else {
-                next__OKJH=new_lab__FTJ(new_size__WFGH);
-              };
-              ((__POINTER *)next__OKJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__PKJH)[ 0]=next__OKJH;
-            } else {
-              ((__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)));
+                next__QZJH=new_lab__RTJ(new_size__CSFH);
+              };
+              ((__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__RDID=result__SZJH;
+        } else {
+          t__GSFH=((__UINTEGER_32 )typ_id__WDID);
+          a__FSFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__ZZJH=(__UINTEGER_32)((__UINTEGER_32)(sz__TDID + a__FSFH) & (__UINTEGER_32)(~ a__FSFH));
+          ptr_table__WZJH=((__POINTER )(&(table_type[(t__GSFH)])));
+          lab_type__YZJH=(__UINTEGER_32)(t__GSFH |  1);
+          next__VZJH=((__POINTER )(NULL));
+          result__XZJH=((__POINTER *)ptr_table__WZJH)[ 0];
+          if ((result__XZJH == (void *)NULL)) {
+            result__XZJH=new_lab__RTJ(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__4XH)))) &  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__TKJH=new_lab__FTJ(lab_type__WKJH);
+                next__VZJH=new_lab__RTJ(lab_type__YZJH);
               };
-              ((__POINTER *)next__TKJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__UKJH)[ 0]=next__TKJH;
+              ((__POINTER *)next__VZJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__WZJH)[ 0]=next__VZJH;
             } else {
-              ((__POINTER *)result__VKJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TKJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__VKJH=next__TKJH;
+              ((__POINTER *)result__XZJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VZJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__XZJH=next__VZJH;
             };
           };
-          ptr__1DID=result__VKJH;
+          ptr__RDID=result__XZJH;
         };
-        result__0DID=((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)ptr__1DID);
-        *(result__0DID) = *(HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__);
+        result__QDID=((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)ptr__RDID);
+        *(result__QDID) = *(HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__);
       };
-      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);
+      Self__LGTD=((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)result__QDID);
+      Self__LGTD->item__LPEC=result__P2YB;
+      Self__LGTD->key__YOEC=n__VROB;
+      Self__LGTD->next__DPEC=__tmp__WYFC;
+      node__IXFC=result__QDID;
+      ((void **)Self__3WFC->buckets__MOEC)[idx__HXFC]=result__QDID;
+      Self__3WFC->count__JYFC=(__INTEGER)(Self__3WFC->count__JYFC +  1);
     } else {
-      ((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node__X0FC)->item__0SEC=result__CAZB;
+      ((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node__IXFC)->item__LPEC=result__P2YB;
     };
   };
-  return(result__IVOB);
+  return(result__XROB);
 }
 
-static void* read_type_list__YMO(__PARSER *Self__ZMO,__BOOLEAN is_section__0MO)
+static void* read_type_list__ENO(__PARSER *Self__FNO,__BOOLEAN is_section__GNO)
 // ({PARSER},{TRUExFALSE}) With resultNo recursive, No inlinable.
 {
-  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) {
+  void *ts__KNO,*__tmp__XNO,*__tmp__BPO;
+  void *t__JNO;
+  __POSITION pos__B4XG,pos__D4XG,pos__F4XG;
+  void *lst__INO,*result__JEHH;
+  __FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *Self__KEHH,*Self__LEHH;
+  __BOOLEAN result__0ZJH;
+  __CHARACTER result__1ZJH;
+  lst__INO=NULL;
+  ts__KNO=NULL;
+  t__JNO=read_type__CDM(Self__FNO,FALSE__);
+  if (((void *)t__JNO != (void *)NULL)) {
+    if (is_section__GNO) {
+      if (t__JNO==NULL) {
+        __tmp__XNO=NULL;
+      } else {
+        switch (((struct ___OBJ *)t__JNO)->__id) {
         case __ITM_TYPE_PARAMETER__: {
-          __tmp__LNO=((void *)t__3MO);
+          __tmp__XNO=((void *)t__JNO);
         } break;
         case __ITM_TYPE_SIMPLE__: {
-          __tmp__LNO=((void *)t__3MO);
+          __tmp__XNO=((void *)t__JNO);
         } break;
         case __ITM_TYPE_BLOCK__: {
-          __tmp__LNO=NULL;
+          __tmp__XNO=NULL;
         } break;
         case __ITM_TYPE_GENERIC__: {
-          __tmp__LNO=((void *)t__3MO);
+          __tmp__XNO=((void *)t__JNO);
         } break;
         case __ITM_TYPE_STYLE__: {
-          __tmp__LNO=((void *)t__3MO);
+          __tmp__XNO=((void *)t__JNO);
         } break;
         }
       };
-      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)) {
+      ts__KNO=__tmp__XNO;
+      if (((void *)__tmp__XNO == (void *)NULL)) {
+        pos__B4XG=current_position__B0F();
+        put_error__text__1PG( 0,(&__string_277));
+        put_position__FRG(pos__B4XG);
+        put_string__33F(msg_err__AQG);
+        if ((type_error__5PG !=  2)) {
           exit(( 1));
         };
       };
     };
-    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);
+    result__JEHH=NULL;
+    if ((((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__GVP)->parent_arrayed_collection__FVP.upper__ZUV <  0)) {
+      result__JEHH=create_with_capacity__EGR( 16);
     } else {
-      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);
+      Self__KEHH=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__GVP);
+      result__JEHH=((void **)Self__KEHH->parent_arrayed_collection__FVP.storage__PZV)[Self__KEHH->parent_arrayed_collection__FVP.upper__ZUV];
+      Self__LEHH=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__GVP);
+      Self__LEHH->parent_arrayed_collection__FVP.upper__ZUV=(__INTEGER)(Self__LEHH->parent_arrayed_collection__FVP.upper__ZUV -  1);
     };
-    lst__2MO=result__IGIH;
-    add_last__COV(result__IGIH,t__3MO);
-    while_do__MVP:
+    lst__INO=result__JEHH;
+    add_last__ONV(result__JEHH,t__JNO);
+    while_do__YVP:
     {
-      result__YKJH=FALSE__;
-      if ((! read_space__MTD())) {
-        result__YKJH=FALSE__;
+      result__0ZJH=FALSE__;
+      if ((! read_space__XTD())) {
+        result__0ZJH=FALSE__;
       } else {
-        result__ZKJH='\0';
-        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__ZKJH=((__CHARACTER )(( 0)));
+        result__1ZJH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+          result__1ZJH=((__CHARACTER )(( 0)));
         } else {
-          result__ZKJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+          result__1ZJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__ZKJH == ',')) {
+        if ((result__1ZJH == ',')) {
           position__CCC=(__INTEGER)(position__CCC +  1);
-          result__YKJH=TRUE__;
+          result__0ZJH=TRUE__;
         };
       };
-      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)) {
+      if (result__0ZJH) {
+        t__JNO=read_type__CDM(Self__FNO,FALSE__);
+        if (((void *)t__JNO == (void *)NULL)) {
+          pos__D4XG=current_position__B0F();
+          put_error__text__1PG( 0,(&__string_265));
+          put_position__FRG(pos__D4XG);
+          put_string__33F(msg_err__AQG);
+          if ((type_error__5PG !=  2)) {
             exit(( 1));
           };
         };
-        if (is_section__0MO) {
-          if (t__3MO==NULL) {
-            __tmp__VOO=NULL;
+        if (is_section__GNO) {
+          if (t__JNO==NULL) {
+            __tmp__BPO=NULL;
           } else {
-            switch (((struct ___OBJ *)t__3MO)->__id) {
+            switch (((struct ___OBJ *)t__JNO)->__id) {
             case __ITM_TYPE_PARAMETER__: {
-              __tmp__VOO=((void *)t__3MO);
+              __tmp__BPO=((void *)t__JNO);
             } break;
             case __ITM_TYPE_SIMPLE__: {
-              __tmp__VOO=((void *)t__3MO);
+              __tmp__BPO=((void *)t__JNO);
             } break;
             case __ITM_TYPE_BLOCK__: {
-              __tmp__VOO=NULL;
+              __tmp__BPO=NULL;
             } break;
             case __ITM_TYPE_GENERIC__: {
-              __tmp__VOO=((void *)t__3MO);
+              __tmp__BPO=((void *)t__JNO);
             } break;
             case __ITM_TYPE_STYLE__: {
-              __tmp__VOO=((void *)t__3MO);
+              __tmp__BPO=((void *)t__JNO);
             } break;
             }
           };
-          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)) {
+          ts__KNO=__tmp__BPO;
+          if (((void *)__tmp__BPO == (void *)NULL)) {
+            pos__F4XG=current_position__B0F();
+            put_error__text__1PG( 0,(&__string_277));
+            put_position__FRG(pos__F4XG);
+            put_string__33F(msg_err__AQG);
+            if ((type_error__5PG !=  2)) {
               exit(( 1));
             };
           };
         };
-        add_last__COV(lst__2MO,t__3MO);
-        goto while_do__MVP;
+        add_last__ONV(lst__INO,t__JNO);
+        goto while_do__YVP;
       };
     };
-    lst__2MO=alias__WVP(result__IGIH);
+    lst__INO=alias__CWP(result__JEHH);
   };
-  return(lst__2MO);
+  return(lst__INO);
 }
 
-static __INTEGER hash_code__X50(__FAST_ARRAYoITM_TYPE_MONOo *Self__Y50)
+static __INTEGER hash_code__S30(__FAST_ARRAYoITM_TYPE_MONOo *Self__T30)
 // ({FAST_ARRAYoITM_TYPE_MONOo}) With resultNo recursive, No inlinable.
 {
-  __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) {
+  __INTEGER result__V30,__tmp__E40,__tmp__T40;
+  void *__tmp__D40,*__tmp__S40;
+  __BOOLEAN __tmp__G40;
+  result__V30= 0;
+  if ((! (Self__T30->parent_arrayed_collection__SYC.upper__4HV <  0))) {
+    if (((void *)((void **)Self__T30->parent_arrayed_collection__SYC.storage__FMV)[Self__T30->parent_arrayed_collection__SYC.upper__4HV] != (void *)NULL)) {
+      __tmp__D40=((void **)Self__T30->parent_arrayed_collection__SYC.storage__FMV)[Self__T30->parent_arrayed_collection__SYC.upper__4HV];
+      switch (((struct ___OBJ *)__tmp__D40)->__id) {
       case __ITM_TYPE_PARAMETER__: {
-        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;
+        __tmp__E40=hash_code__RNW(((__ITM_TYPE_PARAMETER *)__tmp__D40)->parent_itm_type__VFE.name__GZP);
       } break;
       case __ITM_TYPE_SIMPLE__: {
-        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;
+        __tmp__E40=hash_code__RNW(((__ITM_TYPE_SIMPLE *)__tmp__D40)->name__GZP);
       } break;
       case __ITM_TYPE_BLOCK__: {
-        print__DJD((&__string_278));
+        print__OJD((&__string_278));
         fputc((int)('\n'),stdout);
         exit(( 1));
-        __tmp__JA1= 0;
+        __tmp__E40= 0;
       } break;
       case __ITM_TYPE_GENERIC__: {
-        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;
+        __tmp__E40=hash_code__RNW(((__ITM_TYPE_GENERIC *)__tmp__D40)->parent_itm_type_style__4SN.parent_itm_type_simple__3SN.name__GZP);
       } break;
       case __ITM_TYPE_STYLE__: {
-        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;
+        __tmp__E40=hash_code__RNW(((__ITM_TYPE_STYLE *)__tmp__D40)->parent_itm_type_simple__3SN.name__GZP);
       } break;
       };
-      result__050=__tmp__JA1;
-      __tmp__LA1=TRUE__;
+      result__V30=__tmp__E40;
+      __tmp__G40=TRUE__;
     } else {
-      __tmp__LA1=FALSE__;
+      __tmp__G40=FALSE__;
     };
-    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) {
+    if ((! __tmp__G40)) {
+      if (((void *)((void **)Self__T30->parent_arrayed_collection__SYC.storage__FMV)[ 0] != (void *)NULL)) {
+        __tmp__S40=((void **)Self__T30->parent_arrayed_collection__SYC.storage__FMV)[ 0];
+        switch (((struct ___OBJ *)__tmp__S40)->__id) {
         case __ITM_TYPE_PARAMETER__: {
-          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;
+          __tmp__T40=hash_code__RNW(((__ITM_TYPE_PARAMETER *)__tmp__S40)->parent_itm_type__VFE.name__GZP);
         } break;
         case __ITM_TYPE_SIMPLE__: {
-          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;
+          __tmp__T40=hash_code__RNW(((__ITM_TYPE_SIMPLE *)__tmp__S40)->name__GZP);
         } break;
         case __ITM_TYPE_BLOCK__: {
-          print__DJD((&__string_278));
+          print__OJD((&__string_278));
           fputc((int)('\n'),stdout);
           exit(( 1));
-          __tmp__YA1= 0;
+          __tmp__T40= 0;
         } break;
         case __ITM_TYPE_GENERIC__: {
-          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;
+          __tmp__T40=hash_code__RNW(((__ITM_TYPE_GENERIC *)__tmp__S40)->parent_itm_type_style__4SN.parent_itm_type_simple__3SN.name__GZP);
         } break;
         case __ITM_TYPE_STYLE__: {
-          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;
+          __tmp__T40=hash_code__RNW(((__ITM_TYPE_STYLE *)__tmp__S40)->parent_itm_type_simple__3SN.name__GZP);
         } break;
         };
-        result__050=__tmp__YA1;
+        result__V30=__tmp__T40;
       };
     };
   };
-  return(result__050);
+  return(result__V30);
 }
 
-static __CHARACTER read_style__STF()
+static __CHARACTER read_style__PUF()
 // () With resultNo recursive, No inlinable.
 {
-  __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__;
+  __CHARACTER result__SUF,result__4ZJH,result__B0JH;
+  __BOOLEAN result__3ZJH,__tmp__5UF,result__A0JH;
+  result__SUF='\0';
+  result__3ZJH=FALSE__;
+  if ((! read_space__XTD())) {
+    result__3ZJH=FALSE__;
   } else {
-    result__2KJH='\0';
-    if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-      result__2KJH=((__CHARACTER )(( 0)));
+    result__4ZJH='\0';
+    if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+      result__4ZJH=((__CHARACTER )(( 0)));
     } else {
-      result__2KJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+      result__4ZJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
     };
-    if ((result__2KJH == '-')) {
+    if ((result__4ZJH == '-')) {
       position__CCC=(__INTEGER)(position__CCC +  1);
-      result__1KJH=TRUE__;
+      result__3ZJH=TRUE__;
     };
   };
-  if (result__1KJH) {
-    result__VTF='-';
-    short__token__to__YCD((&__string_132),(__INTEGER)(position__CCC -  1),position__CCC);
-    __tmp__CUF=TRUE__;
+  if (result__3ZJH) {
+    result__SUF='-';
+    short__token__to__GDD((&__string_132),(__INTEGER)(position__CCC -  1),position__CCC);
+    __tmp__5UF=TRUE__;
   } else {
-    __tmp__CUF=FALSE__;
+    __tmp__5UF=FALSE__;
   };
-  if ((! __tmp__CUF)) {
-    result__4KJH=FALSE__;
-    if ((! read_space__MTD())) {
-      result__4KJH=FALSE__;
+  if ((! __tmp__5UF)) {
+    result__A0JH=FALSE__;
+    if ((! read_space__XTD())) {
+      result__A0JH=FALSE__;
     } else {
-      result__5KJH='\0';
-      if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__5KJH=((__CHARACTER )(( 0)));
+      result__B0JH='\0';
+      if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+        result__B0JH=((__CHARACTER )(( 0)));
       } else {
-        result__5KJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+        result__B0JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__5KJH == '+')) {
+      if ((result__B0JH == '+')) {
         position__CCC=(__INTEGER)(position__CCC +  1);
-        result__4KJH=TRUE__;
+        result__A0JH=TRUE__;
       };
     };
-    if (result__4KJH) {
-      result__VTF='+';
-      short__token__to__YCD((&__string_132),(__INTEGER)(position__CCC -  1),position__CCC);
+    if (result__A0JH) {
+      result__SUF='+';
+      short__token__to__GDD((&__string_132),(__INTEGER)(position__CCC -  1),position__CCC);
     } else {
-      result__VTF=' ';
+      result__SUF=' ';
     };
   };
-  return(result__VTF);
+  return(result__SUF);
 }
 
-static __FAST_ARRAYoITM_ARGUMENTo* create_with_capacity__4M5B(__INTEGER new_count__AN5B)
+static __FAST_ARRAYoITM_ARGUMENTo* create_with_capacity__LJ5B(__INTEGER new_count__NJ5B)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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__;
+  __POINTER ptr__C15B,ptr_table__E0JH,next__D0JH,result__F0JH;
+  __POINTER ptr_table__J0JH,next__I0JH,result__K0JH;
+  __INTEGER typ_id__H15B;
+  __UINTEGER_32 sz__E15B,a__XSFH,new_size__YSFH,t__2SFH,a__1SFH;
+  __UINTEGER_32 new_size__M0JH,lab_type__L0JH;
+  __FAST_ARRAYoITM_ARGUMENTo *result__B15B,*Self__KSHC;
+  result__B15B=NULL;
+  ptr__C15B=((__POINTER )(NULL));
+  typ_id__H15B= 0;
+  sz__E15B=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_ARGUMENTo));
+  if ((sz__E15B ==  0)) {
+    result__B15B=FAST_ARRAYoITM_ARGUMENTo__;
   } else {
-    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);
+    typ_id__H15B=__FAST_ARRAYoITM_ARGUMENTo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__E15B);
+    if ((typ_id__H15B == (__INTEGER)(-  1))) {
+      a__XSFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__YSFH=(__UINTEGER_32)((__UINTEGER_32)(sz__E15B + a__XSFH) & (__UINTEGER_32)(~ a__XSFH));
+      ptr_table__E0JH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__YSFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__D0JH=((__POINTER )(NULL));
+      result__F0JH=((__POINTER *)ptr_table__E0JH)[ 0];
+      if ((result__F0JH == (void *)NULL)) {
+        result__F0JH=new_lab__RTJ(new_size__YSFH);
+        next__D0JH=(void *)((unsigned long)result__F0JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YSFH)));
+        ((__POINTER *)next__D0JH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__E0JH)[ 0]=next__D0JH;
+      } else {
+        next__D0JH=((__POINTER *)result__F0JH)[ 0];
+        if ((next__D0JH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__F0JH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__YSFH <<  1)) <=  4096)) {
+            next__D0JH=(void *)((unsigned long)result__F0JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YSFH)));
+          } else {
+            next__D0JH=new_lab__RTJ(new_size__YSFH);
+          };
+          ((__POINTER *)next__D0JH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__E0JH)[ 0]=next__D0JH;
+        } else {
+          ((__POINTER *)result__F0JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__D0JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__F0JH=next__D0JH;
+        };
+      };
+      ptr__C15B=result__F0JH;
+    } else {
+      t__2SFH=((__UINTEGER_32 )typ_id__H15B);
+      a__1SFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__M0JH=(__UINTEGER_32)((__UINTEGER_32)(sz__E15B + a__1SFH) & (__UINTEGER_32)(~ a__1SFH));
+      ptr_table__J0JH=((__POINTER )(&(table_type[(t__2SFH)])));
+      lab_type__L0JH=(__UINTEGER_32)(t__2SFH |  1);
+      next__I0JH=((__POINTER )(NULL));
+      result__K0JH=((__POINTER *)ptr_table__J0JH)[ 0];
+      if ((result__K0JH == (void *)NULL)) {
+        result__K0JH=new_lab__RTJ(lab_type__L0JH);
+        next__I0JH=(void *)((unsigned long)result__K0JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__M0JH)));
+        ((__POINTER *)next__I0JH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__J0JH)[ 0]=next__I0JH;
+      } else {
+        next__I0JH=((__POINTER *)result__K0JH)[ 0];
+        if ((next__I0JH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__K0JH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__M0JH <<  1)) <=  4096)) {
+            next__I0JH=(void *)((unsigned long)result__K0JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__M0JH)));
+          } else {
+            next__I0JH=new_lab__RTJ(lab_type__L0JH);
+          };
+          ((__POINTER *)next__I0JH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__J0JH)[ 0]=next__I0JH;
+        } else {
+          ((__POINTER *)result__K0JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__I0JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__K0JH=next__I0JH;
+        };
+      };
+      ptr__C15B=result__K0JH;
+    };
+    result__B15B=((__FAST_ARRAYoITM_ARGUMENTo *)ptr__C15B);
+    *(result__B15B) = *(FAST_ARRAYoITM_ARGUMENTo__);
+  };
+  Self__KSHC=((__FAST_ARRAYoITM_ARGUMENTo *)result__B15B);
+  if ((Self__KSHC->parent_arrayed_collection__Z5YB.capacity__K5GC < new_count__NJ5B)) {
+    Self__KSHC->parent_arrayed_collection__Z5YB.storage__GAHC=create__PRBD(new_count__NJ5B);
+    Self__KSHC->parent_arrayed_collection__Z5YB.capacity__K5GC=new_count__NJ5B;
+  };
+  Self__KSHC->parent_arrayed_collection__Z5YB.upper__I5GC=(__INTEGER)(-  1);
+  return(result__B15B);
 }
 
-static void* read_loc_arg__with_self__SEHB(__PARSER *Self__TEHB,__BOOLEAN mute__UEHB,__BOOLEAN self_first__VEHB)
+static void* read_loc_arg__with_self__BBHB(__PARSER *Self__CBHB,__BOOLEAN mute__DBHB,__BOOLEAN self_first__EBHB)
 // ({PARSER},{TRUExFALSE},{TRUExFALSE}) With resultNo recursive, No inlinable.
 {
-  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));
+  void *result__GBHB,*result__A4EE;
+  void *t__HBHB,*t__03EE,*__tmp__ZCFE,*t__0X5B;
+  __POSITION pos__IBHB,pos__R5XG,pos__T5XG,pos__V5XG,pos__X5XG;
+  __POSITION pos__Z5XG,pos__GAYG,pos__IAYG,p__YX5B,p__DPMF,pos__SCYG;
+  __POSITION pos__UCYG;
+  void *n__LBHB,*n__ZX5B;
+  void *tb__MBHB,*__tmp__AEHB,*tb__B4EE,*__tmp__0CFE;
+  __ITM_ARG *result__S0JH,*Self__00JH,*result__YCAC,*Self__B0HC;
+  __POINTER ptr__T0JH,ptr_table__50JH,next__40JH,result__A1JH;
+  __POINTER ptr_table__E1JH,next__D1JH,result__F1JH,ptr__ZCAC;
+  __POINTER ptr_table__U1JH,next__T1JH,result__V1JH,ptr_table__Z1JH;
+  __POINTER next__Y1JH,result__01JH,ptr__ER1F,ptr_table__41JH;
+  __POINTER next__31JH,result__51JH,ptr_table__D2JH,next__C2JH;
+  __POINTER result__E2JH,ptr__VANF,ptr_table__I2JH,next__H2JH;
+  __POINTER result__J2JH,ptr_table__N2JH,next__M2JH,result__O2JH;
+  __INTEGER typ_id__U0JH,beg__43EE,Self__LNTF,limit_up__MNTF;
+  __INTEGER typ_id__4CAC,__tmp__Y0IG,i__2JOG,h__4OQF,idx__5OQF;
+  __INTEGER idx__LP2F,new_capacity__MP2F,i__KP2F,typ_id__JR1F;
+  __INTEGER typ_id__0ANF,__tmp__PEFE,Self__MPMF;
+  __UINTEGER_32 sz__V0JH,a__W0JH,new_size__X0JH,t__Y0JH,a__Z0JH;
+  __UINTEGER_32 new_size__H1JH,lab_type__G1JH,sz__1CAC,a__BVFH;
+  __UINTEGER_32 new_size__CVFH,t__GVFH,a__FVFH,new_size__21JH;
+  __UINTEGER_32 lab_type__11JH,sz__GR1F,a__AUFH,new_size__BUFH,t__FUFH;
+  __UINTEGER_32 a__EUFH,new_size__G2JH,lab_type__F2JH,sz__XANF,a__LUFH;
+  __UINTEGER_32 new_size__MUFH,t__QUFH,a__PUFH,new_size__Q2JH;
+  __UINTEGER_32 lab_type__P2JH;
+  void *tm__13EE;
+  __ITM_ARGS *result__UANF,*Self__TDQF;
+  __BOOLEAN result__O0JH,__tmp__XBHB,result__P0JH,__tmp__0CHB;
+  __BOOLEAN __tmp__DEHB,__tmp__HEHB,__tmp__MFHB,result__I1JH,mute__53EE;
+  __BOOLEAN result__M1JH,__tmp__M4EE,result__N1JH,__tmp__JAFE;
+  __BOOLEAN result__Q1JH,__tmp__ADFE,__tmp__3CFE,__tmp__DDFE;
+  __BOOLEAN __tmp__CMQF,result__WZIG,result__R2JH;
+  __CHARACTER result__Q0JH,result__I55G,result__J1JH,result__O1JH;
+  __CHARACTER result__N55G,result__R1JH,result__S2JH;
+  void *type__23EE,*result__AVP;
+  void *name__33EE,*result__MEHH,*result__BOMF,*e__XKQF,*result__KLQF;
+  void *e__XOQF;
+  __FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *Self__NEHH,*Self__OEHH;
+  __FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *Self__Y5AB,*Self__OABB;
+  __HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo *Self__WKQF,*Self__WOQF;
+  void *node__JLQF,*node__APQF,*node1__OP2F,*node2__PP2F,*__tmp__QQQF;
+  __FAST_ARRAYoSTRING_CONSTANTo *Self__TZIG,*o__XZIG,*__tmp__D0IG;
+  void **__tmp__T0IG,**__tmp__V0IG,**Self__IJOG;
+  void **old_buckets__NP2F;
+  __HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *result__DR1F;
+  __HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *Self__DL5F;
+  result__GBHB=NULL;
+  t__HBHB=NULL;
+  pos__IBHB=((__POSITION ) 0);
+  n__LBHB=NULL;
+  tb__MBHB=NULL;
+  if (self_first__EBHB) {
+    result__O0JH=read_word__ISF((&__string_58));
     if (is_shorter__LZ) {
-      if (result__MLJH) {
+      if (result__O0JH) {
         if (((void *)(&__string_58) == (void *)(&__string_4))) {
-          short__token__to__YCD((&__string_120),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V1C)->count__DD),position__CCC);
+          short__token__to__GDD((&__string_120),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__D2C)->count__DD),position__CCC);
         } else {
-          short__token__to__YCD((&__string_119),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V1C)->count__DD),position__CCC);
+          short__token__to__GDD((&__string_119),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__D2C)->count__DD),position__CCC);
         };
       };
     };
-    __tmp__IFHB=result__MLJH;
+    __tmp__XBHB=result__O0JH;
   } else {
-    __tmp__IFHB=FALSE__;
+    __tmp__XBHB=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__;
+  if ((__tmp__XBHB || ((! self_first__EBHB) && read_identifier__2BL()))) {
+    pos__IBHB=current_position__B0F();
+    n__LBHB=last_string__D2C;
+    result__P0JH=FALSE__;
+    if ((! read_space__XTD())) {
+      result__P0JH=FALSE__;
     } else {
-      result__OLJH='\0';
-      if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__OLJH=((__CHARACTER )(( 0)));
+      result__Q0JH='\0';
+      if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+        result__Q0JH=((__CHARACTER )(( 0)));
       } else {
-        result__OLJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+        result__Q0JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__OLJH == ':')) {
+      if ((result__Q0JH == ':')) {
         position__CCC=(__INTEGER)(position__CCC +  1);
-        result__NLJH=TRUE__;
+        result__P0JH=TRUE__;
       };
     };
-    if (result__NLJH) {
-      result__K25G='\0';
-      if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__K25G=((__CHARACTER )(( 0)));
+    if (result__P0JH) {
+      result__I55G='\0';
+      if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+        result__I55G=((__CHARACTER )(( 0)));
       } else {
-        result__K25G=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+        result__I55G=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
       };
-      __tmp__LGHB=(result__K25G != '=');
+      __tmp__0CHB=(result__I55G != '=');
     } else {
-      __tmp__LGHB=FALSE__;
+      __tmp__0CHB=FALSE__;
     };
-    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)) {
+    if (__tmp__0CHB) {
+      t__HBHB=read_type__CDM(Self__CBHB,TRUE__);
+      if (((void *)t__HBHB == (void *)NULL)) {
+        pos__R5XG=current_position__B0F();
+        put_error__text__1PG( 0,(&__string_279));
+        put_position__FRG(pos__R5XG);
+        put_string__33F(msg_err__AQG);
+        if ((type_error__5PG !=  2)) {
           exit(( 1));
         };
       };
-      if ((self_first__VEHB && ((void *)t__YEHB != (void *)type_self__XUN))) {
+      if ((self_first__EBHB && ((void *)t__HBHB != (void *)type_self__DVN))) {
         if (((void *)((__PROTOTYPE *)object__ZBC)->parent_named__5.name__LI != (void *)(&__string_40))) {
-          __tmp__UHHB=TRUE__;
+          __tmp__DEHB=TRUE__;
         } else {
-          if (t__YEHB==NULL) {
-            __tmp__RHHB=NULL;
+          if (t__HBHB==NULL) {
+            __tmp__AEHB=NULL;
           } else {
-            switch (((struct ___OBJ *)t__YEHB)->__id) {
+            switch (((struct ___OBJ *)t__HBHB)->__id) {
             case __ITM_TYPE_PARAMETER__: {
-              __tmp__RHHB=NULL;
+              __tmp__AEHB=NULL;
             } break;
             case __ITM_TYPE_SIMPLE__: {
-              __tmp__RHHB=NULL;
+              __tmp__AEHB=NULL;
             } break;
             case __ITM_TYPE_BLOCK__: {
-              __tmp__RHHB=((void *)t__YEHB);
+              __tmp__AEHB=((void *)t__HBHB);
             } break;
             case __ITM_TYPE_GENERIC__: {
-              __tmp__RHHB=NULL;
+              __tmp__AEHB=NULL;
             } break;
             case __ITM_TYPE_STYLE__: {
-              __tmp__RHHB=NULL;
+              __tmp__AEHB=NULL;
             } break;
             }
           };
-          tb__3EHB=__tmp__RHHB;
-          __tmp__UHHB=((void *)__tmp__RHHB == (void *)NULL);
+          tb__MBHB=__tmp__AEHB;
+          __tmp__DEHB=((void *)__tmp__AEHB == (void *)NULL);
         };
-        __tmp__YHHB=__tmp__UHHB;
+        __tmp__HEHB=__tmp__DEHB;
       } else {
-        __tmp__YHHB=FALSE__;
+        __tmp__HEHB=FALSE__;
       };
-      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)) {
+      if (__tmp__HEHB) {
+        pos__T5XG=current_position__B0F();
+        put_error__text__1PG( 0,(&__string_280));
+        put_position__FRG(pos__T5XG);
+        put_string__33F(msg_err__AQG);
+        if ((type_error__5PG !=  2)) {
           exit(( 1));
         };
       };
-      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)));
+      result__S0JH=NULL;
+      ptr__T0JH=((__POINTER )(NULL));
+      typ_id__U0JH= 0;
+      sz__V0JH=((__UINTEGER_32 )sizeof(__ITM_ARG));
+      if ((sz__V0JH ==  0)) {
+        result__S0JH=ITM_ARG__;
+      } else {
+        typ_id__U0JH=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__V0JH);
+        if ((typ_id__U0JH == (__INTEGER)(-  1))) {
+          a__W0JH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__X0JH=(__UINTEGER_32)((__UINTEGER_32)(sz__V0JH + a__W0JH) & (__UINTEGER_32)(~ a__W0JH));
+          ptr_table__50JH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__X0JH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__40JH=((__POINTER )(NULL));
+          result__A1JH=((__POINTER *)ptr_table__50JH)[ 0];
+          if ((result__A1JH == (void *)NULL)) {
+            result__A1JH=new_lab__RTJ(new_size__X0JH);
+            next__40JH=(void *)((unsigned long)result__A1JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__X0JH)));
+            ((__POINTER *)next__40JH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__50JH)[ 0]=next__40JH;
+          } 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__4XH)))) &  4095) + (__UINTEGER_32)(new_size__X0JH <<  1)) <=  4096)) {
+                next__40JH=(void *)((unsigned long)result__A1JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__X0JH)));
               } else {
-                next__2LJH=new_lab__FTJ(new_size__VLJH);
-              };
-              ((__POINTER *)next__2LJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__3LJH)[ 0]=next__2LJH;
-            } else {
-              ((__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)));
+                next__40JH=new_lab__RTJ(new_size__X0JH);
+              };
+              ((__POINTER *)next__40JH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__50JH)[ 0]=next__40JH;
+            } else {
+              ((__POINTER *)result__A1JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__40JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__A1JH=next__40JH;
+            };
+          };
+          ptr__T0JH=result__A1JH;
+        } else {
+          t__Y0JH=((__UINTEGER_32 )typ_id__U0JH);
+          a__Z0JH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__H1JH=(__UINTEGER_32)((__UINTEGER_32)(sz__V0JH + a__Z0JH) & (__UINTEGER_32)(~ a__Z0JH));
+          ptr_table__E1JH=((__POINTER )(&(table_type[(t__Y0JH)])));
+          lab_type__G1JH=(__UINTEGER_32)(t__Y0JH |  1);
+          next__D1JH=((__POINTER )(NULL));
+          result__F1JH=((__POINTER *)ptr_table__E1JH)[ 0];
+          if ((result__F1JH == (void *)NULL)) {
+            result__F1JH=new_lab__RTJ(lab_type__G1JH);
+            next__D1JH=(void *)((unsigned long)result__F1JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__H1JH)));
+            ((__POINTER *)next__D1JH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__E1JH)[ 0]=next__D1JH;
+          } else {
+            next__D1JH=((__POINTER *)result__F1JH)[ 0];
+            if ((next__D1JH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__F1JH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__H1JH <<  1)) <=  4096)) {
+                next__D1JH=(void *)((unsigned long)result__F1JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__H1JH)));
               } else {
-                next__BMJH=new_lab__FTJ(lab_type__EMJH);
+                next__D1JH=new_lab__RTJ(lab_type__G1JH);
               };
-              ((__POINTER *)next__BMJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__CMJH)[ 0]=next__BMJH;
+              ((__POINTER *)next__D1JH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__E1JH)[ 0]=next__D1JH;
             } else {
-              ((__POINTER *)result__DMJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BMJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__DMJH=next__BMJH;
+              ((__POINTER *)result__F1JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__D1JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__F1JH=next__D1JH;
             };
           };
-          ptr__RLJH=result__DMJH;
+          ptr__T0JH=result__F1JH;
         };
-        result__QLJH=((__ITM_ARG *)ptr__RLJH);
-        *(result__QLJH) = *(ITM_ARG__);
+        result__S0JH=((__ITM_ARG *)ptr__T0JH);
+        *(result__S0JH) = *(ITM_ARG__);
       };
-      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;
+      Self__00JH=((__ITM_ARG *)result__S0JH);
+      Self__00JH->parent_itm_argument__SEHB.parent_itm_code__O5M.position__SFJ=pos__IBHB;
+      Self__00JH->name__F0HC=n__LBHB;
+      Self__00JH->type__G0HC=t__HBHB;
+      result__GBHB=result__S0JH;
       if (is_shorter__LZ) {
-        add__MMHB(short_local__XCC,n__2EHB);
+        add__1IHB(short_local__XCC,n__LBHB);
       };
     } else {
-      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)) {
+      if ((! mute__DBHB)) {
+        pos__V5XG=current_position__B0F();
+        put_error__text__1PG( 2,(&__string_281));
+        put_position__FRG(pos__V5XG);
+        put_string__33F(msg_err__AQG);
+        if ((type_error__5PG !=  2)) {
           exit(( 1));
         };
       };
     };
-    __tmp__3IHB=TRUE__;
+    __tmp__MFHB=TRUE__;
   } else {
-    __tmp__3IHB=FALSE__;
+    __tmp__MFHB=FALSE__;
   };
-  if ((! __tmp__3IHB)) {
-    result__GMJH=FALSE__;
-    if ((! read_space__MTD())) {
-      result__GMJH=FALSE__;
+  if ((! __tmp__MFHB)) {
+    result__I1JH=FALSE__;
+    if ((! read_space__XTD())) {
+      result__I1JH=FALSE__;
     } else {
-      result__HMJH='\0';
-      if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__HMJH=((__CHARACTER )(( 0)));
+      result__J1JH='\0';
+      if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+        result__J1JH=((__CHARACTER )(( 0)));
       } else {
-        result__HMJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+        result__J1JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__HMJH == '(')) {
+      if ((result__J1JH == '(')) {
         position__CCC=(__INTEGER)(position__CCC +  1);
-        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));
+        result__I1JH=TRUE__;
+      };
+    };
+    if (result__I1JH) {
+      t__03EE=NULL;
+      tm__13EE=NULL;
+      type__23EE=NULL;
+      name__33EE=NULL;
+      beg__43EE= 0;
+      result__A4EE=NULL;
+      tb__B4EE=NULL;
+      mute__53EE=mute__DBHB;
+      if (self_first__EBHB) {
+        result__M1JH=read_word__ISF((&__string_58));
         if (is_shorter__LZ) {
-          if (result__KMJH) {
+          if (result__M1JH) {
             if (((void *)(&__string_58) == (void *)(&__string_4))) {
-              short__token__to__YCD((&__string_120),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V1C)->count__DD),position__CCC);
+              short__token__to__GDD((&__string_120),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__D2C)->count__DD),position__CCC);
             } else {
-              short__token__to__YCD((&__string_119),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V1C)->count__DD),position__CCC);
+              short__token__to__GDD((&__string_119),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__D2C)->count__DD),position__CCC);
             };
           };
         };
-        __tmp__33EE=result__KMJH;
+        __tmp__M4EE=result__M1JH;
       } else {
-        __tmp__33EE=FALSE__;
+        __tmp__M4EE=FALSE__;
       };
-      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);
+      if ((__tmp__M4EE || read_identifier__2BL())) {
+        result__MEHH=NULL;
+        if ((((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)free_list__1AL)->parent_arrayed_collection__0AL.upper__LUU <  0)) {
+          result__MEHH=create_with_capacity__THRC( 16);
         } else {
-          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);
+          Self__NEHH=((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)free_list__1AL);
+          result__MEHH=((void **)Self__NEHH->parent_arrayed_collection__0AL.storage__1WU)[Self__NEHH->parent_arrayed_collection__0AL.upper__LUU];
+          Self__OEHH=((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)free_list__1AL);
+          Self__OEHH->parent_arrayed_collection__0AL.upper__LUU=(__INTEGER)(Self__OEHH->parent_arrayed_collection__0AL.upper__LUU -  1);
         };
-        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);
+        name__33EE=result__MEHH;
+        result__AVP=NULL;
+        if ((((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__GVP)->parent_arrayed_collection__FVP.upper__ZUV <  0)) {
+          result__AVP=create_with_capacity__EGR( 16);
         } else {
-          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);
+          Self__Y5AB=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__GVP);
+          result__AVP=((void **)Self__Y5AB->parent_arrayed_collection__FVP.storage__PZV)[Self__Y5AB->parent_arrayed_collection__FVP.upper__ZUV];
+          Self__OABB=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__GVP);
+          Self__OABB->parent_arrayed_collection__FVP.upper__ZUV=(__INTEGER)(Self__OABB->parent_arrayed_collection__FVP.upper__ZUV -  1);
         };
-        type__N3EE=result__UUP;
-        beg__P3EE= 0;
+        type__23EE=result__AVP;
+        beg__43EE= 0;
         do {
-          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)) {
+          if (((((__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)name__33EE)->parent_arrayed_collection__MBJ.upper__2CPD +  1) !=  0) && (! read_identifier__2BL())) && (! mute__53EE))) {
+            pos__X5XG=current_position__B0F();
+            put_error__text__1PG( 0,(&__string_282));
+            put_position__FRG(pos__X5XG);
+            put_string__33F(msg_err__AQG);
+            if ((type_error__5PG !=  2)) {
               exit(( 1));
             };
           };
-          add_last__LDPD(name__O3EE,last_string__V1C);
-          result__LMJH=FALSE__;
-          if ((! read_space__MTD())) {
-            result__LMJH=FALSE__;
+          add_last__SEPD(name__33EE,last_string__D2C);
+          result__N1JH=FALSE__;
+          if ((! read_space__XTD())) {
+            result__N1JH=FALSE__;
           } else {
-            result__MMJH='\0';
-            if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-              result__MMJH=((__CHARACTER )(( 0)));
+            result__O1JH='\0';
+            if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+              result__O1JH=((__CHARACTER )(( 0)));
             } else {
-              result__MMJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+              result__O1JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
             };
-            if ((result__MMJH == ':')) {
+            if ((result__O1JH == ':')) {
               position__CCC=(__INTEGER)(position__CCC +  1);
-              result__LMJH=TRUE__;
+              result__N1JH=TRUE__;
             };
           };
-          if (result__LMJH) {
-            result__P25G='\0';
-            if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-              result__P25G=((__CHARACTER )(( 0)));
+          if (result__N1JH) {
+            result__N55G='\0';
+            if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+              result__N55G=((__CHARACTER )(( 0)));
             } else {
-              result__P25G=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+              result__N55G=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
             };
-            __tmp__05EE=(result__P25G != '=');
+            __tmp__JAFE=(result__N55G != '=');
           } else {
-            __tmp__05EE=FALSE__;
+            __tmp__JAFE=FALSE__;
           };
-          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)) {
+          if (__tmp__JAFE) {
+            mute__53EE=FALSE__;
+            t__03EE=read_type__CDM(Self__CBHB,TRUE__);
+            if (((void *)t__03EE == (void *)NULL)) {
+              pos__Z5XG=current_position__B0F();
+              put_error__text__1PG( 0,(&__string_283));
+              put_position__FRG(pos__Z5XG);
+              put_string__33F(msg_err__AQG);
+              if ((type_error__5PG !=  2)) {
                 exit(( 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);
+            Self__LNTF=beg__43EE;
+            limit_up__MNTF=((__FAST_ARRAYoSTRING_CONSTANTo *)name__33EE)->parent_arrayed_collection__MBJ.upper__2CPD;
+            while ((Self__LNTF <= limit_up__MNTF)) {
+              add_last__ONV(type__23EE,t__03EE);
+              Self__LNTF=(__INTEGER)(Self__LNTF +  1);
             };
-            beg__P3EE=(__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)name__O3EE)->parent_arrayed_collection__ABJ.upper__VBPD +  1);
+            beg__43EE=(__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)name__33EE)->parent_arrayed_collection__MBJ.upper__2CPD +  1);
           };
-          result__OMJH=FALSE__;
-          if ((! read_space__MTD())) {
-            result__OMJH=FALSE__;
+          result__Q1JH=FALSE__;
+          if ((! read_space__XTD())) {
+            result__Q1JH=FALSE__;
           } else {
-            result__PMJH='\0';
-            if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-              result__PMJH=((__CHARACTER )(( 0)));
+            result__R1JH='\0';
+            if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+              result__R1JH=((__CHARACTER )(( 0)));
             } else {
-              result__PMJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+              result__R1JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
             };
-            if ((result__PMJH == ',')) {
+            if ((result__R1JH == ',')) {
               position__CCC=(__INTEGER)(position__CCC +  1);
-              result__OMJH=TRUE__;
+              result__Q1JH=TRUE__;
             };
           };
-        } 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)) {
+        } while (result__Q1JH);
+        if ((beg__43EE != (__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)result__MEHH)->parent_arrayed_collection__MBJ.upper__2CPD +  1))) {
+          if ((! mute__53EE)) {
+            pos__GAYG=current_position__B0F();
+            put_error__text__1PG( 0,(&__string_283));
+            put_position__FRG(pos__GAYG);
+            put_string__33F(msg_err__AQG);
+            if ((type_error__5PG !=  2)) {
               exit(( 1));
             };
           };
-          free__EV5(result__THIH);
-          free__MNQ(result__UUP);
+          free__TR5(result__MEHH);
+          free__YNQ(result__AVP);
         } else {
-          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__;
+          if (self_first__EBHB) {
+            if (((void *)((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)result__AVP)->parent_arrayed_collection__SYC.storage__FMV)[ 0] != (void *)type_self__DVN)) {
+              __tmp__ADFE=TRUE__;
             } else {
               if (((void *)((__PROTOTYPE *)object__ZBC)->parent_named__5.name__LI == (void *)(&__string_40))) {
-                __tmp__KCFE=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)result__UUP)->parent_arrayed_collection__EYC.storage__ZMV)[ 0];
-                if (__tmp__KCFE==NULL) {
-                  __tmp__LCFE=NULL;
+                __tmp__ZCFE=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)result__AVP)->parent_arrayed_collection__SYC.storage__FMV)[ 0];
+                if (__tmp__ZCFE==NULL) {
+                  __tmp__0CFE=NULL;
                 } else {
-                  switch (((struct ___OBJ *)__tmp__KCFE)->__id) {
+                  switch (((struct ___OBJ *)__tmp__ZCFE)->__id) {
                   case __ITM_TYPE_PARAMETER__: {
-                    __tmp__LCFE=NULL;
+                    __tmp__0CFE=NULL;
                   } break;
                   case __ITM_TYPE_SIMPLE__: {
-                    __tmp__LCFE=NULL;
+                    __tmp__0CFE=NULL;
                   } break;
                   case __ITM_TYPE_BLOCK__: {
-                    __tmp__LCFE=((void *)__tmp__KCFE);
+                    __tmp__0CFE=((void *)__tmp__ZCFE);
                   } break;
                   case __ITM_TYPE_GENERIC__: {
-                    __tmp__LCFE=NULL;
+                    __tmp__0CFE=NULL;
                   } break;
                   case __ITM_TYPE_STYLE__: {
-                    __tmp__LCFE=NULL;
+                    __tmp__0CFE=NULL;
                   } break;
                   }
                 };
-                tb__S3EE=__tmp__LCFE;
-                __tmp__OCFE=((void *)__tmp__LCFE == (void *)NULL);
+                tb__B4EE=__tmp__0CFE;
+                __tmp__3CFE=((void *)__tmp__0CFE == (void *)NULL);
               } else {
-                __tmp__OCFE=FALSE__;
+                __tmp__3CFE=FALSE__;
               };
-              __tmp__RCFE=__tmp__OCFE;
+              __tmp__ADFE=__tmp__3CFE;
             };
-            __tmp__UCFE=__tmp__RCFE;
+            __tmp__DDFE=__tmp__ADFE;
           } else {
-            __tmp__UCFE=FALSE__;
+            __tmp__DDFE=FALSE__;
           };
-          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)) {
+          if (__tmp__DDFE) {
+            pos__IAYG=current_position__B0F();
+            put_error__text__1PG( 0,(&__string_280));
+            put_position__FRG(pos__IAYG);
+            put_string__33F(msg_err__AQG);
+            if ((type_error__5PG !=  2)) {
               exit(( 1));
             };
           };
-          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__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;
+          if (((__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)result__MEHH)->parent_arrayed_collection__MBJ.upper__2CPD +  1) ==  1)) {
+            p__YX5B=current_position__B0F();
+            n__ZX5B=((void **)((__FAST_ARRAYoSTRING_CONSTANTo *)result__MEHH)->parent_arrayed_collection__MBJ.storage__SFPD)[ 0];
+            t__0X5B=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)result__AVP)->parent_arrayed_collection__SYC.storage__FMV)[ 0];
+            result__YCAC=NULL;
+            ptr__ZCAC=((__POINTER )(NULL));
+            typ_id__4CAC= 0;
+            sz__1CAC=((__UINTEGER_32 )sizeof(__ITM_ARG));
+            if ((sz__1CAC ==  0)) {
+              result__YCAC=ITM_ARG__;
+            } else {
+              typ_id__4CAC=-1;
+              clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__1CAC);
+              if ((typ_id__4CAC == (__INTEGER)(-  1))) {
+                a__BVFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                new_size__CVFH=(__UINTEGER_32)((__UINTEGER_32)(sz__1CAC + a__BVFH) & (__UINTEGER_32)(~ a__BVFH));
+                ptr_table__U1JH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__CVFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                next__T1JH=((__POINTER )(NULL));
+                result__V1JH=((__POINTER *)ptr_table__U1JH)[ 0];
+                if ((result__V1JH == (void *)NULL)) {
+                  result__V1JH=new_lab__RTJ(new_size__CVFH);
+                  next__T1JH=(void *)((unsigned long)result__V1JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CVFH)));
+                  ((__POINTER *)next__T1JH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__U1JH)[ 0]=next__T1JH;
                 } else {
-                  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)));
+                  next__T1JH=((__POINTER *)result__V1JH)[ 0];
+                  if ((next__T1JH == (void *)NULL)) {
+                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__V1JH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__CVFH <<  1)) <=  4096)) {
+                      next__T1JH=(void *)((unsigned long)result__V1JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CVFH)));
                     } else {
-                      next__RMJH=new_lab__FTJ(new_size__2JGH);
+                      next__T1JH=new_lab__RTJ(new_size__CVFH);
                     };
-                    ((__POINTER *)next__RMJH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__SMJH)[ 0]=next__RMJH;
+                    ((__POINTER *)next__T1JH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__U1JH)[ 0]=next__T1JH;
                   } else {
-                    ((__POINTER *)result__TMJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RMJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__TMJH=next__RMJH;
+                    ((__POINTER *)result__V1JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__T1JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__V1JH=next__T1JH;
                   };
                 };
-                ptr__MGAC=result__TMJH;
+                ptr__ZCAC=result__V1JH;
               } else {
-                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;
+                t__GVFH=((__UINTEGER_32 )typ_id__4CAC);
+                a__FVFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                new_size__21JH=(__UINTEGER_32)((__UINTEGER_32)(sz__1CAC + a__FVFH) & (__UINTEGER_32)(~ a__FVFH));
+                ptr_table__Z1JH=((__POINTER )(&(table_type[(t__GVFH)])));
+                lab_type__11JH=(__UINTEGER_32)(t__GVFH |  1);
+                next__Y1JH=((__POINTER )(NULL));
+                result__01JH=((__POINTER *)ptr_table__Z1JH)[ 0];
+                if ((result__01JH == (void *)NULL)) {
+                  result__01JH=new_lab__RTJ(lab_type__11JH);
+                  next__Y1JH=(void *)((unsigned long)result__01JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__21JH)));
+                  ((__POINTER *)next__Y1JH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__Z1JH)[ 0]=next__Y1JH;
                 } else {
-                  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)));
+                  next__Y1JH=((__POINTER *)result__01JH)[ 0];
+                  if ((next__Y1JH == (void *)NULL)) {
+                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__01JH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__21JH <<  1)) <=  4096)) {
+                      next__Y1JH=(void *)((unsigned long)result__01JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__21JH)));
                     } else {
-                      next__WMJH=new_lab__FTJ(lab_type__ZMJH);
+                      next__Y1JH=new_lab__RTJ(lab_type__11JH);
                     };
-                    ((__POINTER *)next__WMJH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__XMJH)[ 0]=next__WMJH;
+                    ((__POINTER *)next__Y1JH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__Z1JH)[ 0]=next__Y1JH;
                   } else {
-                    ((__POINTER *)result__YMJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WMJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__YMJH=next__WMJH;
+                    ((__POINTER *)result__01JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__Y1JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__01JH=next__Y1JH;
                   };
                 };
-                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__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:
+                ptr__ZCAC=result__01JH;
+              };
+              result__YCAC=((__ITM_ARG *)ptr__ZCAC);
+              *(result__YCAC) = *(ITM_ARG__);
+            };
+            Self__B0HC=((__ITM_ARG *)result__YCAC);
+            Self__B0HC->parent_itm_argument__SEHB.parent_itm_code__O5M.position__SFJ=p__YX5B;
+            Self__B0HC->name__F0HC=n__ZX5B;
+            Self__B0HC->type__G0HC=t__0X5B;
+            result__A4EE=result__YCAC;
+            free__TR5(result__MEHH);
+            free__YNQ(result__AVP);
+          } else {
+            result__BOMF=NULL;
+            if ((((__FAST_ARRAYoSTRING_CONSTANTo *)result__MEHH)->parent_arrayed_collection__MBJ.upper__2CPD <  0)) {
+              result__BOMF=empty_list__IOMF;
+            } else {
+              Self__WKQF=((__HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo *)bucket__SOMF);
+              e__XKQF=result__MEHH;
+              result__KLQF=NULL;
+              node__JLQF=((void **)Self__WKQF->buckets__RLQF)[(__INTEGER)(hash_code__NVRF(result__MEHH) % Self__WKQF->capacity__MLQF)];
+              until_do__VWRF:
               {
-                if (((void *)node__PJQF == (void *)NULL)) {
-                  __tmp__IKQF=TRUE__;
+                if (((void *)node__JLQF == (void *)NULL)) {
+                  __tmp__CMQF=TRUE__;
                 } else {
-                  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__;
+                  Self__TZIG=((__FAST_ARRAYoSTRING_CONSTANTo *)((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__JLQF)->item__3LQF);
+                  result__WZIG=FALSE__;
+                  o__XZIG=NULL;
+                  if (((void *)Self__TZIG == (void *)e__XKQF)) {
+                    result__WZIG=TRUE__;
                   } else {
-                    if (e__3IQF==NULL) {
-                      __tmp__JYIG=NULL;
+                    if (e__XKQF==NULL) {
+                      __tmp__D0IG=NULL;
                     } else {
-                      __tmp__JYIG=((__FAST_ARRAYoSTRING_CONSTANTo *)e__3IQF);
+                      __tmp__D0IG=((__FAST_ARRAYoSTRING_CONSTANTo *)e__XKQF);
                     };
-                    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);
+                    o__XZIG=__tmp__D0IG;
+                    if ((((void *)__tmp__D0IG != (void *)NULL) && (Self__TZIG->parent_arrayed_collection__MBJ.upper__2CPD == __tmp__D0IG->parent_arrayed_collection__MBJ.upper__2CPD))) {
+                      __tmp__T0IG=Self__TZIG->parent_arrayed_collection__MBJ.storage__SFPD;
+                      __tmp__V0IG=__tmp__D0IG->parent_arrayed_collection__MBJ.storage__SFPD;
+                      __tmp__Y0IG=(__INTEGER)(Self__TZIG->parent_arrayed_collection__MBJ.upper__2CPD +  1);
+                      Self__IJOG=((void **)__tmp__T0IG);
+                      i__2JOG=(__INTEGER)(__tmp__Y0IG -  1);
+                      while (((i__2JOG >=  0) && ((void *)Self__IJOG[i__2JOG] == (void *)((void **)__tmp__V0IG)[i__2JOG]))) {
+                        i__2JOG=(__INTEGER)(i__2JOG -  1);
                       };
-                      result__2XIG=(i__CIOG <  0);
+                      result__WZIG=(i__2JOG <  0);
                     };
                   };
-                  __tmp__IKQF=result__2XIG;
+                  __tmp__CMQF=result__WZIG;
                 };
-                if ((! __tmp__IKQF)) {
-                  node__PJQF=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__PJQF)->next__PKQF;
-                  goto until_do__1URF;
+                if ((! __tmp__CMQF)) {
+                  node__JLQF=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__JLQF)->next__JMQF;
+                  goto until_do__VWRF;
                 };
               };
-              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__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__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__JLQF != (void *)NULL)) {
+                result__KLQF=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__JLQF)->item__3LQF;
+              };
+              result__BOMF=result__KLQF;
+              if (((void *)result__KLQF == (void *)NULL)) {
+                result__BOMF=create_with_capacity__THRC((__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)result__MEHH)->parent_arrayed_collection__MBJ.upper__2CPD +  1));
+                copy__BASD(result__BOMF,result__MEHH);
+                Self__WOQF=((__HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo *)bucket__SOMF);
+                e__XOQF=result__BOMF;
+                fast_has__H4RF(Self__WOQF,result__BOMF);
+                fast_has__H4RF(Self__WOQF,result__BOMF);
+                h__4OQF=hash_code__NVRF(result__BOMF);
+                idx__5OQF=(__INTEGER)(h__4OQF % Self__WOQF->capacity__MLQF);
+                node__APQF=((void **)Self__WOQF->buckets__RLQF)[idx__5OQF];
+                while ((! (((void *)node__APQF == (void *)NULL) || ((void *)((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__APQF)->item__3LQF == (void *)e__XOQF)))) {
+                  node__APQF=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__APQF)->next__JMQF;
                 };
-                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;
+                if (((void *)node__APQF == (void *)NULL)) {
+                  if ((Self__WOQF->capacity__MLQF == Self__WOQF->count__DQQF)) {
+                    idx__LP2F= 0;
+                    node1__OP2F=NULL;
+                    node2__PP2F=NULL;
+                    new_capacity__MP2F=prime_number_ceiling__021((__INTEGER)(Self__WOQF->capacity__MLQF +  1));
+                    old_buckets__NP2F=Self__WOQF->buckets__RLQF;
+                    Self__WOQF->buckets__RLQF=create__FNUF(new_capacity__MP2F);
+                    i__KP2F=(__INTEGER)(Self__WOQF->capacity__MLQF -  1);
+                    Self__WOQF->capacity__MLQF=new_capacity__MP2F;
+                    while ((i__KP2F >=  0)) {
+                      node1__OP2F=((void **)old_buckets__NP2F)[i__KP2F];
+                      while (((void *)node1__OP2F != (void *)NULL)) {
+                        node2__PP2F=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node1__OP2F)->next__JMQF;
+                        idx__LP2F=(__INTEGER)(hash_code__NVRF(((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node1__OP2F)->item__3LQF) % Self__WOQF->capacity__MLQF);
+                        ((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node1__OP2F)->next__JMQF=((void **)Self__WOQF->buckets__RLQF)[idx__LP2F];
+                        ((void **)Self__WOQF->buckets__RLQF)[idx__LP2F]=node1__OP2F;
+                        node1__OP2F=node2__PP2F;
                       };
-                      i__QN2F=(__INTEGER)(i__QN2F -  1);
+                      i__KP2F=(__INTEGER)(i__KP2F -  1);
                     };
-                    idx__FNQF=(__INTEGER)(h__ENQF % Self__2MQF->capacity__SJQF);
+                    idx__5OQF=(__INTEGER)(h__4OQF % Self__WOQF->capacity__MLQF);
                   };
-                  __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__;
+                  __tmp__QQQF=((void **)Self__WOQF->buckets__RLQF)[idx__5OQF];
+                  result__DR1F=NULL;
+                  ptr__ER1F=((__POINTER )(NULL));
+                  typ_id__JR1F= 0;
+                  sz__GR1F=((__UINTEGER_32 )sizeof(__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo));
+                  if ((sz__GR1F ==  0)) {
+                    result__DR1F=HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo__;
                   } else {
-                    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;
+                    typ_id__JR1F=__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo__;
+                    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__GR1F);
+                    if ((typ_id__JR1F == (__INTEGER)(-  1))) {
+                      a__AUFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                      new_size__BUFH=(__UINTEGER_32)((__UINTEGER_32)(sz__GR1F + a__AUFH) & (__UINTEGER_32)(~ a__AUFH));
+                      ptr_table__41JH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__BUFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                      next__31JH=((__POINTER )(NULL));
+                      result__51JH=((__POINTER *)ptr_table__41JH)[ 0];
+                      if ((result__51JH == (void *)NULL)) {
+                        result__51JH=new_lab__RTJ(new_size__BUFH);
+                        next__31JH=(void *)((unsigned long)result__51JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BUFH)));
+                        ((__POINTER *)next__31JH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__41JH)[ 0]=next__31JH;
                       } 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__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)));
+                        next__31JH=((__POINTER *)result__51JH)[ 0];
+                        if ((next__31JH == (void *)NULL)) {
+                          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__51JH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__BUFH <<  1)) <=  4096)) {
+                            next__31JH=(void *)((unsigned long)result__51JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BUFH)));
                           } else {
-                            next__5MJH=new_lab__FTJ(new_size__1IGH);
+                            next__31JH=new_lab__RTJ(new_size__BUFH);
                           };
-                          ((__POINTER *)next__5MJH)[ 0]=NULL;
-                          ((__POINTER *)ptr_table__ANJH)[ 0]=next__5MJH;
+                          ((__POINTER *)next__31JH)[ 0]=NULL;
+                          ((__POINTER *)ptr_table__41JH)[ 0]=next__31JH;
                         } else {
-                          ((__POINTER *)result__BNJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5MJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                          result__BNJH=next__5MJH;
+                          ((__POINTER *)result__51JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__31JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                          result__51JH=next__31JH;
                         };
                       };
-                      ptr__KP1F=result__BNJH;
+                      ptr__ER1F=result__51JH;
                     } else {
-                      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;
+                      t__FUFH=((__UINTEGER_32 )typ_id__JR1F);
+                      a__EUFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                      new_size__G2JH=(__UINTEGER_32)((__UINTEGER_32)(sz__GR1F + a__EUFH) & (__UINTEGER_32)(~ a__EUFH));
+                      ptr_table__D2JH=((__POINTER )(&(table_type[(t__FUFH)])));
+                      lab_type__F2JH=(__UINTEGER_32)(t__FUFH |  1);
+                      next__C2JH=((__POINTER )(NULL));
+                      result__E2JH=((__POINTER *)ptr_table__D2JH)[ 0];
+                      if ((result__E2JH == (void *)NULL)) {
+                        result__E2JH=new_lab__RTJ(lab_type__F2JH);
+                        next__C2JH=(void *)((unsigned long)result__E2JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__G2JH)));
+                        ((__POINTER *)next__C2JH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__D2JH)[ 0]=next__C2JH;
                       } 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__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)));
+                        next__C2JH=((__POINTER *)result__E2JH)[ 0];
+                        if ((next__C2JH == (void *)NULL)) {
+                          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__E2JH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__G2JH <<  1)) <=  4096)) {
+                            next__C2JH=(void *)((unsigned long)result__E2JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__G2JH)));
                           } else {
-                            next__ENJH=new_lab__FTJ(lab_type__HNJH);
+                            next__C2JH=new_lab__RTJ(lab_type__F2JH);
                           };
-                          ((__POINTER *)next__ENJH)[ 0]=NULL;
-                          ((__POINTER *)ptr_table__FNJH)[ 0]=next__ENJH;
+                          ((__POINTER *)next__C2JH)[ 0]=NULL;
+                          ((__POINTER *)ptr_table__D2JH)[ 0]=next__C2JH;
                         } else {
-                          ((__POINTER *)result__GNJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ENJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                          result__GNJH=next__ENJH;
+                          ((__POINTER *)result__E2JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__C2JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                          result__E2JH=next__C2JH;
                         };
                       };
-                      ptr__KP1F=result__GNJH;
+                      ptr__ER1F=result__E2JH;
                     };
-                    result__JP1F=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)ptr__KP1F);
-                    *(result__JP1F) = *(HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo__);
+                    result__DR1F=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)ptr__ER1F);
+                    *(result__DR1F) = *(HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo__);
                   };
-                  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);
+                  Self__DL5F=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)result__DR1F);
+                  Self__DL5F->item__3LQF=result__BOMF;
+                  Self__DL5F->next__JMQF=__tmp__QQQF;
+                  node__APQF=result__DR1F;
+                  ((void **)Self__WOQF->buckets__RLQF)[idx__5OQF]=result__DR1F;
+                  Self__WOQF->count__DQQF=(__INTEGER)(Self__WOQF->count__DQQF +  1);
                 };
               };
             };
-            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__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;
+            free__TR5(result__MEHH);
+            name__33EE=result__BOMF;
+            type__23EE=alias__CWP(result__AVP);
+            tm__13EE=get__4JP(type__23EE);
+            p__DPMF=current_position__B0F();
+            result__UANF=NULL;
+            ptr__VANF=((__POINTER )(NULL));
+            typ_id__0ANF= 0;
+            sz__XANF=((__UINTEGER_32 )sizeof(__ITM_ARGS));
+            if ((sz__XANF ==  0)) {
+              result__UANF=ITM_ARGS__;
+            } else {
+              typ_id__0ANF=-1;
+              clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__XANF);
+              if ((typ_id__0ANF == (__INTEGER)(-  1))) {
+                a__LUFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                new_size__MUFH=(__UINTEGER_32)((__UINTEGER_32)(sz__XANF + a__LUFH) & (__UINTEGER_32)(~ a__LUFH));
+                ptr_table__I2JH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__MUFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                next__H2JH=((__POINTER )(NULL));
+                result__J2JH=((__POINTER *)ptr_table__I2JH)[ 0];
+                if ((result__J2JH == (void *)NULL)) {
+                  result__J2JH=new_lab__RTJ(new_size__MUFH);
+                  next__H2JH=(void *)((unsigned long)result__J2JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MUFH)));
+                  ((__POINTER *)next__H2JH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__I2JH)[ 0]=next__H2JH;
                 } 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__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)));
+                  next__H2JH=((__POINTER *)result__J2JH)[ 0];
+                  if ((next__H2JH == (void *)NULL)) {
+                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__J2JH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__MUFH <<  1)) <=  4096)) {
+                      next__H2JH=(void *)((unsigned long)result__J2JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MUFH)));
                     } else {
-                      next__JNJH=new_lab__FTJ(new_size__GJGH);
+                      next__H2JH=new_lab__RTJ(new_size__MUFH);
                     };
-                    ((__POINTER *)next__JNJH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__KNJH)[ 0]=next__JNJH;
+                    ((__POINTER *)next__H2JH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__I2JH)[ 0]=next__H2JH;
                   } else {
-                    ((__POINTER *)result__LNJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JNJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__LNJH=next__JNJH;
+                    ((__POINTER *)result__J2JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__H2JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__J2JH=next__H2JH;
                   };
                 };
-                ptr__14MF=result__LNJH;
+                ptr__VANF=result__J2JH;
               } else {
-                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;
+                t__QUFH=((__UINTEGER_32 )typ_id__0ANF);
+                a__PUFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                new_size__Q2JH=(__UINTEGER_32)((__UINTEGER_32)(sz__XANF + a__PUFH) & (__UINTEGER_32)(~ a__PUFH));
+                ptr_table__N2JH=((__POINTER )(&(table_type[(t__QUFH)])));
+                lab_type__P2JH=(__UINTEGER_32)(t__QUFH |  1);
+                next__M2JH=((__POINTER )(NULL));
+                result__O2JH=((__POINTER *)ptr_table__N2JH)[ 0];
+                if ((result__O2JH == (void *)NULL)) {
+                  result__O2JH=new_lab__RTJ(lab_type__P2JH);
+                  next__M2JH=(void *)((unsigned long)result__O2JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Q2JH)));
+                  ((__POINTER *)next__M2JH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__N2JH)[ 0]=next__M2JH;
                 } 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__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)));
+                  next__M2JH=((__POINTER *)result__O2JH)[ 0];
+                  if ((next__M2JH == (void *)NULL)) {
+                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__O2JH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__Q2JH <<  1)) <=  4096)) {
+                      next__M2JH=(void *)((unsigned long)result__O2JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Q2JH)));
                     } else {
-                      next__ONJH=new_lab__FTJ(lab_type__RNJH);
+                      next__M2JH=new_lab__RTJ(lab_type__P2JH);
                     };
-                    ((__POINTER *)next__ONJH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__PNJH)[ 0]=next__ONJH;
+                    ((__POINTER *)next__M2JH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__N2JH)[ 0]=next__M2JH;
                   } else {
-                    ((__POINTER *)result__QNJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ONJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__QNJH=next__ONJH;
+                    ((__POINTER *)result__O2JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__M2JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__O2JH=next__M2JH;
                   };
                 };
-                ptr__14MF=result__QNJH;
+                ptr__VANF=result__O2JH;
               };
-              result__04MF=((__ITM_ARGS *)ptr__14MF);
-              *(result__04MF) = *(ITM_ARGS__);
+              result__UANF=((__ITM_ARGS *)ptr__VANF);
+              *(result__UANF) = *(ITM_ARGS__);
             };
-            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;
+            Self__TDQF=((__ITM_ARGS *)result__UANF);
+            Self__TDQF->parent_itm_argument__CEFE.parent_itm_code__O5M.position__SFJ=p__DPMF;
+            Self__TDQF->name__XDQF=result__BOMF;
+            Self__TDQF->type__YDQF=tm__13EE;
+            result__A4EE=result__UANF;
           };
           if (is_shorter__LZ) {
-            __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);
+            __tmp__PEFE=((__FAST_ARRAYoSTRING_CONSTANTo *)name__33EE)->parent_arrayed_collection__MBJ.upper__2CPD;
+            Self__MPMF= 0;
+            while ((Self__MPMF <= __tmp__PEFE)) {
+              add__1IHB(short_local__XCC,((void **)((__FAST_ARRAYoSTRING_CONSTANTo *)name__33EE)->parent_arrayed_collection__MBJ.storage__SFPD)[Self__MPMF]);
+              Self__MPMF=(__INTEGER)(Self__MPMF +  1);
             };
           };
         };
       };
-      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)) {
+      result__GBHB=result__A4EE;
+      if (((void *)result__A4EE == (void *)NULL)) {
+        if ((! mute__DBHB)) {
+          pos__SCYG=current_position__B0F();
+          put_error__text__1PG( 0,(&__string_284));
+          put_position__FRG(pos__SCYG);
+          put_string__33F(msg_err__AQG);
+          if ((type_error__5PG !=  2)) {
             exit(( 1));
           };
         };
       } else {
-        result__TNJH=FALSE__;
-        if ((! read_space__MTD())) {
-          result__TNJH=FALSE__;
+        result__R2JH=FALSE__;
+        if ((! read_space__XTD())) {
+          result__R2JH=FALSE__;
         } else {
-          result__UNJH='\0';
-          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__UNJH=((__CHARACTER )(( 0)));
+          result__S2JH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+            result__S2JH=((__CHARACTER )(( 0)));
           } else {
-            result__UNJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+            result__S2JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__UNJH == ')')) {
+          if ((result__S2JH == ')')) {
             position__CCC=(__INTEGER)(position__CCC +  1);
-            result__TNJH=TRUE__;
+            result__R2JH=TRUE__;
           };
         };
-        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)) {
+        if ((! result__R2JH)) {
+          pos__UCYG=current_position__B0F();
+          put_error__text__1PG( 2,(&__string_262));
+          put_position__FRG(pos__UCYG);
+          put_string__33F(msg_err__AQG);
+          if ((type_error__5PG !=  2)) {
             exit(( 1));
           };
         };
       };
     };
   };
-  return(result__XEHB);
+  return(result__GBHB);
 }
 
-static void* read_slot_operator__EW5B(void *list_arg__GW5B)
+static void* read_slot_operator__RS5B(void *list_arg__TS5B)
 // ({NULLxFAST_ARRAYoITM_ARGUMENTo}) With resultNo recursive, No inlinable.
 {
-  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)) {
+  void *associativity__XS5B,*name__VS5B,*pretty_name__WS5B;
+  __INTEGER priority__YS5B,typ_id__IKAC;
+  void *arg__ZS5B;
+  __POSITION pos__WCYG,pos__YCYG,pos__0CYG,pos__5CYG,pos__BDYG;
+  __POSITION pos__DDYG,__tmp__TX5B;
+  void *__tmp__UX5B;
+  __ITM_SLOT_OPERATOR *result__CKAC,*Self__Z1HC,*Self__LZHC;
+  __POINTER ptr__DKAC,ptr_table__22JH,next__12JH,result__32JH;
+  __POINTER ptr_table__B3JH,next__A3JH,result__C3JH;
+  __UINTEGER_32 sz__FKAC,a__ZUFH,new_size__0UFH,t__4UFH,a__3UFH;
+  __UINTEGER_32 new_size__E3JH,lab_type__D3JH;
+  __BOOLEAN result__U2JH,result__Y2JH,__tmp__YU5B,result__02JH;
+  __CHARACTER result__V2JH;
+  associativity__XS5B=NULL;
+  priority__YS5B= 0;
+  arg__ZS5B=NULL;
+  if ((! read_operator__GOM())) {
+    pos__WCYG=current_position__B0F();
+    put_error__text__1PG( 0,(&__string_285));
+    put_position__FRG(pos__WCYG);
+    put_string__33F(msg_err__AQG);
+    if ((type_error__5PG !=  2)) {
       exit(( 1));
     };
   };
-  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)) {
+  if ((((void *)last_string__D2C == (void *)(&__string_16)) || ((void *)last_string__D2C == (void *)(&__string_17)))) {
+    pos__YCYG=current_position__B0F();
+    put_error__text__1PG( 0,(&__string_286));
+    put_position__FRG(pos__YCYG);
+    put_string__33F(msg_err__AQG);
+    if ((type_error__5PG !=  2)) {
       exit(( 1));
     };
   };
-  name__IW5B=last_string__V1C;
-  pretty_name__JW5B=name__IW5B;
-  result__WNJH=FALSE__;
-  if ((! read_space__MTD())) {
-    result__WNJH=FALSE__;
+  name__VS5B=last_string__D2C;
+  pretty_name__WS5B=name__VS5B;
+  result__U2JH=FALSE__;
+  if ((! read_space__XTD())) {
+    result__U2JH=FALSE__;
   } else {
-    result__XNJH='\0';
-    if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-      result__XNJH=((__CHARACTER )(( 0)));
+    result__V2JH='\0';
+    if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+      result__V2JH=((__CHARACTER )(( 0)));
     } else {
-      result__XNJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+      result__V2JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
     };
-    if ((result__XNJH == '\'')) {
+    if ((result__V2JH == '\'')) {
       position__CCC=(__INTEGER)(position__CCC +  1);
-      result__WNJH=TRUE__;
+      result__U2JH=TRUE__;
     };
   };
-  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)) {
+  if ((! result__U2JH)) {
+    pos__0CYG=current_position__B0F();
+    put_error__text__1PG( 2,(&__string_287));
+    put_position__FRG(pos__0CYG);
+    put_string__33F(msg_err__AQG);
+    if ((type_error__5PG !=  2)) {
       exit(( 1));
     };
   };
-  result__0NJH=read_word__LRF((&__string_6));
+  result__Y2JH=read_word__ISF((&__string_6));
   if (is_shorter__LZ) {
-    if (result__0NJH) {
+    if (result__Y2JH) {
       if (((void *)(&__string_6) == (void *)(&__string_4))) {
-        short__token__to__YCD((&__string_120),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V1C)->count__DD),position__CCC);
+        short__token__to__GDD((&__string_120),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__D2C)->count__DD),position__CCC);
       } else {
-        short__token__to__YCD((&__string_119),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V1C)->count__DD),position__CCC);
+        short__token__to__GDD((&__string_119),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__D2C)->count__DD),position__CCC);
       };
     };
   };
-  if (result__0NJH) {
-    __tmp__LY5B=TRUE__;
+  if (result__Y2JH) {
+    __tmp__YU5B=TRUE__;
   } else {
-    result__2NJH=read_word__LRF((&__string_5));
+    result__02JH=read_word__ISF((&__string_5));
     if (is_shorter__LZ) {
-      if (result__2NJH) {
+      if (result__02JH) {
         if (((void *)(&__string_5) == (void *)(&__string_4))) {
-          short__token__to__YCD((&__string_120),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V1C)->count__DD),position__CCC);
+          short__token__to__GDD((&__string_120),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__D2C)->count__DD),position__CCC);
         } else {
-          short__token__to__YCD((&__string_119),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V1C)->count__DD),position__CCC);
+          short__token__to__GDD((&__string_119),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__D2C)->count__DD),position__CCC);
         };
       };
     };
-    __tmp__LY5B=result__2NJH;
+    __tmp__YU5B=result__02JH;
   };
-  if (__tmp__LY5B) {
-    associativity__KW5B=last_string__V1C;
-    if (read_integer__Q2P()) {
-      priority__LW5B=((__INTEGER )last_integer__JSO);
+  if (__tmp__YU5B) {
+    associativity__XS5B=last_string__D2C;
+    if (read_integer__22P()) {
+      priority__YS5B=((__INTEGER )last_integer__VSO);
     };
   };
-  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)) {
+  if ((((__FAST_ARRAYoITM_ARGUMENTo *)list_arg__TS5B)->parent_arrayed_collection__Z5YB.upper__I5GC <  0)) {
+    arg__ZS5B=read_loc_arg__with_self__BBHB(PARSER__,FALSE__,TRUE__);
+    if (((void *)arg__ZS5B == (void *)NULL)) {
+      pos__5CYG=current_position__B0F();
+      put_error__text__1PG( 0,(&__string_288));
+      put_position__FRG(pos__5CYG);
+      put_string__33F(msg_err__AQG);
+      if ((type_error__5PG !=  2)) {
         exit(( 1));
       };
     };
-    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)) {
+    add_last__E5GC(list_arg__TS5B,arg__ZS5B);
+    name__VS5B=operator__name__ZEO((&__string_83),name__VS5B);
+    if (((void *)associativity__XS5B != (void *)NULL)) {
+      pos__BDYG=current_position__B0F();
+      put_error__text__1PG( 0,(&__string_289));
+      put_position__FRG(pos__BDYG);
+      put_string__33F(msg_err__AQG);
+      if ((type_error__5PG !=  2)) {
         exit(( 1));
       };
     };
   } else {
-    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)) {
+    arg__ZS5B=read_loc_arg__with_self__BBHB(PARSER__,FALSE__,FALSE__);
+    if (((void *)arg__ZS5B != (void *)NULL)) {
+      add_last__E5GC(list_arg__TS5B,arg__ZS5B);
+      name__VS5B=operator__name__ZEO((&__string_81),name__VS5B);
+      if (((void *)associativity__XS5B == (void *)NULL)) {
+        associativity__XS5B=(&__string_6);
+      };
+    } else {
+      name__VS5B=operator__name__ZEO((&__string_82),name__VS5B);
+      if (((void *)associativity__XS5B != (void *)NULL)) {
+        pos__DDYG=current_position__B0F();
+        put_error__text__1PG( 0,(&__string_290));
+        put_position__FRG(pos__DDYG);
+        put_string__33F(msg_err__AQG);
+        if ((type_error__5PG !=  2)) {
           exit(( 1));
         };
       };
     };
   };
-  __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__;
+  __tmp__TX5B=current_position__B0F();
+  __tmp__UX5B=last_section__S2C;
+  result__CKAC=NULL;
+  ptr__DKAC=((__POINTER )(NULL));
+  typ_id__IKAC= 0;
+  sz__FKAC=((__UINTEGER_32 )sizeof(__ITM_SLOT_OPERATOR));
+  if ((sz__FKAC ==  0)) {
+    result__CKAC=ITM_SLOT_OPERATOR__;
   } else {
-    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;
+    typ_id__IKAC=-1;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__FKAC);
+    if ((typ_id__IKAC == (__INTEGER)(-  1))) {
+      a__ZUFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__0UFH=(__UINTEGER_32)((__UINTEGER_32)(sz__FKAC + a__ZUFH) & (__UINTEGER_32)(~ a__ZUFH));
+      ptr_table__22JH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__0UFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__12JH=((__POINTER )(NULL));
+      result__32JH=((__POINTER *)ptr_table__22JH)[ 0];
+      if ((result__32JH == (void *)NULL)) {
+        result__32JH=new_lab__RTJ(new_size__0UFH);
+        next__12JH=(void *)((unsigned long)result__32JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0UFH)));
+        ((__POINTER *)next__12JH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__22JH)[ 0]=next__12JH;
+      } else {
+        next__12JH=((__POINTER *)result__32JH)[ 0];
+        if ((next__12JH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__32JH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__0UFH <<  1)) <=  4096)) {
+            next__12JH=(void *)((unsigned long)result__32JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0UFH)));
+          } else {
+            next__12JH=new_lab__RTJ(new_size__0UFH);
+          };
+          ((__POINTER *)next__12JH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__22JH)[ 0]=next__12JH;
+        } else {
+          ((__POINTER *)result__32JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__12JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__32JH=next__12JH;
+        };
+      };
+      ptr__DKAC=result__32JH;
+    } else {
+      t__4UFH=((__UINTEGER_32 )typ_id__IKAC);
+      a__3UFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__E3JH=(__UINTEGER_32)((__UINTEGER_32)(sz__FKAC + a__3UFH) & (__UINTEGER_32)(~ a__3UFH));
+      ptr_table__B3JH=((__POINTER )(&(table_type[(t__4UFH)])));
+      lab_type__D3JH=(__UINTEGER_32)(t__4UFH |  1);
+      next__A3JH=((__POINTER )(NULL));
+      result__C3JH=((__POINTER *)ptr_table__B3JH)[ 0];
+      if ((result__C3JH == (void *)NULL)) {
+        result__C3JH=new_lab__RTJ(lab_type__D3JH);
+        next__A3JH=(void *)((unsigned long)result__C3JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__E3JH)));
+        ((__POINTER *)next__A3JH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__B3JH)[ 0]=next__A3JH;
+      } else {
+        next__A3JH=((__POINTER *)result__C3JH)[ 0];
+        if ((next__A3JH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__C3JH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__E3JH <<  1)) <=  4096)) {
+            next__A3JH=(void *)((unsigned long)result__C3JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__E3JH)));
+          } else {
+            next__A3JH=new_lab__RTJ(lab_type__D3JH);
+          };
+          ((__POINTER *)next__A3JH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__B3JH)[ 0]=next__A3JH;
+        } else {
+          ((__POINTER *)result__C3JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__A3JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__C3JH=next__A3JH;
+        };
+      };
+      ptr__DKAC=result__C3JH;
+    };
+    result__CKAC=((__ITM_SLOT_OPERATOR *)ptr__DKAC);
+    *(result__CKAC) = *(ITM_SLOT_OPERATOR__);
+  };
+  Self__Z1HC=((__ITM_SLOT_OPERATOR *)result__CKAC);
+  Self__Z1HC->parent_itm_slot__0S5B.parent_named__15.name__LI=name__VS5B;
+  Self__Z1HC->parent_itm_slot__0S5B.parent_named__15.parent_itm_object__4.position__SFJ=__tmp__TX5B;
+  Self__Z1HC->parent_itm_slot__0S5B.id_section__T3C=__tmp__UX5B;
+  Self__LZHC=((__ITM_SLOT_OPERATOR *)result__CKAC);
+  if (((void *)associativity__XS5B == (void *)(&__string_6))) {
+    Self__LZHC->priority_and_level__UZHC=priority__YS5B;
   } else {
-    Self__02HC->priority_and_level__D3HC=(__INTEGER)(- priority__LW5B);
+    Self__LZHC->priority_and_level__UZHC=(__INTEGER)(- priority__YS5B);
   };
-  ((__ITM_SLOT_OPERATOR *)result__VNAC)->pretty_name__O3HC=pretty_name__JW5B;
-  return(result__VNAC);
+  ((__ITM_SLOT_OPERATOR *)result__CKAC)->pretty_name__5ZHC=pretty_name__WS5B;
+  return(result__CKAC);
 }
 
-static void add_last__TCHC(__FAST_ARRAYoITM_ARGUMENTo *Self__UCHC,void *element__VCHC)
+static void add_last__E5GC(__FAST_ARRAYoITM_ARGUMENTo *Self__F5GC,void *element__G5GC)
 // ({FAST_ARRAYoITM_ARGUMENTo},{NULLxITM_ARGxITM_ARGS}) VoidNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER new_capacity__H5GC,__tmp__QAHC,__tmp__PKTD,Self__4EYE;
+  __BOOLEAN __tmp__X5GC;
+  void **__tmp__PAHC,**new__1JTD;
+  new_capacity__H5GC= 0;
+  if (((__INTEGER)(Self__F5GC->parent_arrayed_collection__Z5YB.upper__I5GC +  1) <= (__INTEGER)(Self__F5GC->parent_arrayed_collection__Z5YB.capacity__K5GC -  1))) {
+    Self__F5GC->parent_arrayed_collection__Z5YB.upper__I5GC=(__INTEGER)(Self__F5GC->parent_arrayed_collection__Z5YB.upper__I5GC +  1);
+    __tmp__X5GC=TRUE__;
   } else {
-    __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;
+    __tmp__X5GC=FALSE__;
+  };
+  if ((! __tmp__X5GC)) {
+    if ((Self__F5GC->parent_arrayed_collection__Z5YB.capacity__K5GC ==  0)) {
+      Self__F5GC->parent_arrayed_collection__Z5YB.storage__GAHC=create__PRBD( 2);
+      Self__F5GC->parent_arrayed_collection__Z5YB.capacity__K5GC= 2;
+      Self__F5GC->parent_arrayed_collection__Z5YB.upper__I5GC= 0;
+    } else {
+      new_capacity__H5GC=(__INTEGER)(Self__F5GC->parent_arrayed_collection__Z5YB.capacity__K5GC <<  1);
+      __tmp__PAHC=Self__F5GC->parent_arrayed_collection__Z5YB.storage__GAHC;
+      __tmp__QAHC=Self__F5GC->parent_arrayed_collection__Z5YB.capacity__K5GC;
+      new__1JTD=((void **)realloc_dynamic__old_size__new_size__KELC(((__POINTER )((void **)__tmp__PAHC)),((__UINTEGER_32 )(__INTEGER)(__tmp__QAHC * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__H5GC * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__PKTD=(__INTEGER)(new_capacity__H5GC -  1);
+      Self__4EYE=__tmp__QAHC;
+      while ((Self__4EYE <= __tmp__PKTD)) {
+        new__1JTD[Self__4EYE]=NULL;
+        Self__4EYE=(__INTEGER)(Self__4EYE +  1);
+      };
+      Self__F5GC->parent_arrayed_collection__Z5YB.storage__GAHC=new__1JTD;
+      Self__F5GC->parent_arrayed_collection__Z5YB.capacity__K5GC=new_capacity__H5GC;
+      Self__F5GC->parent_arrayed_collection__Z5YB.upper__I5GC=(__INTEGER)(Self__F5GC->parent_arrayed_collection__Z5YB.upper__I5GC +  1);
+    };
+  };
+  ((void **)Self__F5GC->parent_arrayed_collection__Z5YB.storage__GAHC)[Self__F5GC->parent_arrayed_collection__Z5YB.upper__I5GC]=element__G5GC;
 }
 
-static void* read_slot_keyword__R15B(void *list_arg__T15B)
+static void* read_slot_keyword__4X5B(void *list_arg__AY5B)
 // ({NULLxFAST_ARRAYoITM_ARGUMENTo}) With resultNo recursive, No inlinable.
 {
-  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)) {
+  void *n__CY5B,*result__2OP;
+  void *arg__DY5B;
+  void *result__EY5B;
+  __POSITION pos__5EYG,pos__BFYG,p__P3JH;
+  void *result__MRP;
+  void *sec__Q3JH;
+  __ITM_SLOT *result__F3JH,*Self__N3JH;
+  __POINTER ptr__G3JH,ptr_table__S3JH,next__R3JH,result__T3JH;
+  __POINTER ptr_table__X3JH,next__W3JH,result__Y3JH;
+  __INTEGER typ_id__H3JH;
+  __UINTEGER_32 sz__I3JH,a__J3JH,new_size__K3JH,t__L3JH,a__M3JH;
+  __UINTEGER_32 new_size__03JH,lab_type__Z3JH;
+  __FAST_ARRAYoSTRINGo *Self__ZZAB,*Self__P0AB;
+  n__CY5B=NULL;
+  arg__DY5B=NULL;
+  result__EY5B=NULL;
+  if (read_identifier__2BL()) {
+    short__token__to__GDD((&__string_130),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__D2C)->count__DD),position__CCC);
+    result__2OP=NULL;
+    if ((((__FAST_ARRAYoSTRINGo *)free__3OP)->parent_arrayed_collection__5KC.upper__CLC <  0)) {
+      result__2OP=create__ZBB( 128);
+    } else {
+      Self__ZZAB=((__FAST_ARRAYoSTRINGo *)free__3OP);
+      result__2OP=((void **)Self__ZZAB->parent_arrayed_collection__5KC.storage__UGT)[Self__ZZAB->parent_arrayed_collection__5KC.upper__CLC];
+      Self__P0AB=((__FAST_ARRAYoSTRINGo *)free__3OP);
+      Self__P0AB->parent_arrayed_collection__5KC.upper__CLC=(__INTEGER)(Self__P0AB->parent_arrayed_collection__5KC.upper__CLC -  1);
+    };
+    n__CY5B=result__2OP;
+    copy__VDS(result__2OP,last_string__D2C);
+    arg__DY5B=read_loc_arg__with_self__BBHB(PARSER__,FALSE__,FALSE__);
+    if (((void *)arg__DY5B != (void *)NULL)) {
+      add_last__E5GC(list_arg__AY5B,arg__DY5B);
+      if (read_identifier__2BL()) {
+        if (((void *)((__SECTION_ *)last_section__S2C)->name__MYDC == (void *)(&__string_30))) {
+          pos__5EYG=current_position__B0F();
+          put_error__text__1PG( 0,(&__string_291));
+          put_position__FRG(pos__5EYG);
+          put_string__33F(msg_err__AQG);
+          if ((type_error__5PG !=  2)) {
             exit(( 1));
           };
         };
         do {
-          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)) {
+          short__token__to__GDD((&__string_130),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__D2C)->count__DD),position__CCC);
+          append__3OS(n__CY5B,(&__string_112));
+          append__3OS(n__CY5B,last_string__D2C);
+          arg__DY5B=read_loc_arg__with_self__BBHB(PARSER__,FALSE__,FALSE__);
+          if (((void *)arg__DY5B == (void *)NULL)) {
+            pos__BFYG=current_position__B0F();
+            put_error__text__1PG( 0,(&__string_168));
+            put_position__FRG(pos__BFYG);
+            put_string__33F(msg_err__AQG);
+            if ((type_error__5PG !=  2)) {
               exit(( 1));
             };
           };
-          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)));
+          add_last__E5GC(list_arg__AY5B,arg__DY5B);
+        } while (read_identifier__2BL());
+      };
+    };
+    result__MRP=get__YWB(result__2OP);
+    add_last__URV(free__3OP,result__2OP);
+    ((__STRING *)result__2OP)->count__SGC= 0;
+    p__P3JH=current_position__B0F();
+    sec__Q3JH=last_section__S2C;
+    result__F3JH=NULL;
+    ptr__G3JH=((__POINTER )(NULL));
+    typ_id__H3JH= 0;
+    sz__I3JH=((__UINTEGER_32 )sizeof(__ITM_SLOT));
+    if ((sz__I3JH ==  0)) {
+      result__F3JH=ITM_SLOT__;
+    } else {
+      typ_id__H3JH=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__I3JH);
+      if ((typ_id__H3JH == (__INTEGER)(-  1))) {
+        a__J3JH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__K3JH=(__UINTEGER_32)((__UINTEGER_32)(sz__I3JH + a__J3JH) & (__UINTEGER_32)(~ a__J3JH));
+        ptr_table__S3JH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__K3JH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__R3JH=((__POINTER )(NULL));
+        result__T3JH=((__POINTER *)ptr_table__S3JH)[ 0];
+        if ((result__T3JH == (void *)NULL)) {
+          result__T3JH=new_lab__RTJ(new_size__K3JH);
+          next__R3JH=(void *)((unsigned long)result__T3JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__K3JH)));
+          ((__POINTER *)next__R3JH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__S3JH)[ 0]=next__R3JH;
+        } else {
+          next__R3JH=((__POINTER *)result__T3JH)[ 0];
+          if ((next__R3JH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__T3JH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__K3JH <<  1)) <=  4096)) {
+              next__R3JH=(void *)((unsigned long)result__T3JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__K3JH)));
             } else {
-              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)));
+              next__R3JH=new_lab__RTJ(new_size__K3JH);
+            };
+            ((__POINTER *)next__R3JH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__S3JH)[ 0]=next__R3JH;
+          } else {
+            ((__POINTER *)result__T3JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__R3JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__T3JH=next__R3JH;
+          };
+        };
+        ptr__G3JH=result__T3JH;
+      } else {
+        t__L3JH=((__UINTEGER_32 )typ_id__H3JH);
+        a__M3JH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__03JH=(__UINTEGER_32)((__UINTEGER_32)(sz__I3JH + a__M3JH) & (__UINTEGER_32)(~ a__M3JH));
+        ptr_table__X3JH=((__POINTER )(&(table_type[(t__L3JH)])));
+        lab_type__Z3JH=(__UINTEGER_32)(t__L3JH |  1);
+        next__W3JH=((__POINTER )(NULL));
+        result__Y3JH=((__POINTER *)ptr_table__X3JH)[ 0];
+        if ((result__Y3JH == (void *)NULL)) {
+          result__Y3JH=new_lab__RTJ(lab_type__Z3JH);
+          next__W3JH=(void *)((unsigned long)result__Y3JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__03JH)));
+          ((__POINTER *)next__W3JH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__X3JH)[ 0]=next__W3JH;
+        } else {
+          next__W3JH=((__POINTER *)result__Y3JH)[ 0];
+          if ((next__W3JH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__Y3JH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__03JH <<  1)) <=  4096)) {
+              next__W3JH=(void *)((unsigned long)result__Y3JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__03JH)));
             } else {
-              next__YOJH=new_lab__FTJ(lab_type__1OJH);
+              next__W3JH=new_lab__RTJ(lab_type__Z3JH);
             };
-            ((__POINTER *)next__YOJH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__ZOJH)[ 0]=next__YOJH;
+            ((__POINTER *)next__W3JH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__X3JH)[ 0]=next__W3JH;
           } else {
-            ((__POINTER *)result__0OJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YOJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__0OJH=next__YOJH;
+            ((__POINTER *)result__Y3JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__W3JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__Y3JH=next__W3JH;
           };
         };
-        ptr__IOJH=result__0OJH;
+        ptr__G3JH=result__Y3JH;
       };
-      result__HOJH=((__ITM_SLOT *)ptr__IOJH);
-      *(result__HOJH) = *(ITM_SLOT__);
+      result__F3JH=((__ITM_SLOT *)ptr__G3JH);
+      *(result__F3JH) = *(ITM_SLOT__);
     };
-    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;
+    Self__N3JH=((__ITM_SLOT *)result__F3JH);
+    Self__N3JH->parent_named__15.name__LI=result__MRP;
+    Self__N3JH->parent_named__15.parent_itm_object__4.position__SFJ=p__P3JH;
+    Self__N3JH->id_section__T3C=sec__Q3JH;
+    result__EY5B=result__F3JH;
   };
-  return(result__X15B);
+  return(result__EY5B);
 }
 
-static void** create__VUBD(__INTEGER nb_elements__XUBD)
+static void** create__PRBD(__INTEGER nb_elements__RRBD)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__REHH,a__QEHH,new_size__SEHH,new_size2__TEHH,a__UEHH;
+  __UINTEGER_32 new_size__VEHH;
+  __POINTER result__PEHH,ptr_table__23JH,next__13JH,result__33JH;
+  __INTEGER Self__NKXD;
+  void **Result__0FGD;
+  sz__REHH=((__UINTEGER_32 )(__INTEGER)(nb_elements__RRBD * ((__INTEGER )(sizeof(void *)))));
+  result__PEHH=((__POINTER )(NULL));
+  a__QEHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__SEHH=(__UINTEGER_32)((__UINTEGER_32)(sz__REHH + a__QEHH) & (__UINTEGER_32)(~ a__QEHH));
+  new_size2__TEHH=(__UINTEGER_32)(new_size__SEHH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__TEHH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__UEHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__VEHH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__TEHH + a__UEHH) & (__UINTEGER_32)(~ a__UEHH));
+    ptr_table__23JH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__VEHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__13JH=((__POINTER )(NULL));
+    result__33JH=((__POINTER *)ptr_table__23JH)[ 0];
+    if ((result__33JH == (void *)NULL)) {
+      result__33JH=new_lab__RTJ(new_size__VEHH);
+      next__13JH=(void *)((unsigned long)result__33JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VEHH)));
+      ((__POINTER *)next__13JH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__23JH)[ 0]=next__13JH;
+    } else {
+      next__13JH=((__POINTER *)result__33JH)[ 0];
+      if ((next__13JH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__33JH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__VEHH <<  1)) <=  4096)) {
+          next__13JH=(void *)((unsigned long)result__33JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VEHH)));
+        } else {
+          next__13JH=new_lab__RTJ(new_size__VEHH);
+        };
+        ((__POINTER *)next__13JH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__23JH)[ 0]=next__13JH;
+      } else {
+        ((__POINTER *)result__33JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__13JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__33JH=next__13JH;
+      };
+    };
+    ((__POINTER *)result__33JH)[ 0]=((__POINTER ) 3);
+    result__PEHH=(void *)((unsigned long)result__33JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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__CPJH == (void *)NULL)) {
-      result__CPJH=new_page__YC5();
-    };
-    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__PEHH=(void *)((unsigned long)((__POINTER )((__MEMORY *)search__XAVB(new_size__SEHH))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__0FGD=((void **)result__PEHH);
+  Self__NKXD=(__INTEGER)(nb_elements__RRBD -  1);
+  while ((Self__NKXD >=  0)) {
+    Result__0FGD[Self__NKXD]=NULL;
+    Self__NKXD=(__INTEGER)(Self__NKXD -  1);
   };
-  return(Result__VHGD);
+  return(Result__0FGD);
 }
 
-static void set_argument_list__OFHC(__ITM_SLOT *Self__PFHC,void *p__QFHC)
+static void set_argument_list__5BHC(__ITM_SLOT *Self__ACHC,void *p__BCHC)
 // ({ITM_SLOT},{NULLxFAST_ARRAYoITM_ARGUMENTo}) VoidNo recursive, No inlinable.
 {
-  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__;
+  void *__tmp__JCHC,*__tmp__1CHC,*__tmp__IDHC;
+  __INTEGER __tmp__KCHC;
+  __POSITION __tmp__2CHC,__tmp__JDHC;
+  __SECTION_ *Self__GE2G;
+  __BOOLEAN __tmp__OCHC;
+  __FAST_ARRAYoITM_ARGUMENTo *Self__52GH,*Self__G1ID;
+  if (((__INTEGER)(((__FAST_ARRAYoITM_ARGUMENTo *)p__BCHC)->parent_arrayed_collection__Z5YB.upper__I5GC +  1) >  1)) {
+    __tmp__OCHC=TRUE__;
   } else {
-    __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;
+    __tmp__JCHC=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)p__BCHC)->parent_arrayed_collection__Z5YB.storage__GAHC)[ 0];
+    if (((struct ___OBJ *)__tmp__JCHC)->__id==__ITM_ARG__) {
+      __tmp__KCHC= 1;
     } else {
-      __tmp__ZFHC=(__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)((__ITM_ARGS *)__tmp__YFHC)->name__3BQF)->parent_arrayed_collection__ABJ.upper__VBPD +  1);
+      __tmp__KCHC=(__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)((__ITM_ARGS *)__tmp__JCHC)->name__XDQF)->parent_arrayed_collection__MBJ.upper__2CPD +  1);
     };
-    __tmp__3FHC=(__tmp__ZFHC >  1);
+    __tmp__OCHC=(__tmp__KCHC >  1);
   };
-  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;
+  if (__tmp__OCHC) {
+    if (((void *)((__SECTION_ *)Self__ACHC->id_section__T3C)->name__MYDC == (void *)(&__string_25))) {
+      Self__52GH=((__FAST_ARRAYoITM_ARGUMENTo *)p__BCHC);
+      __tmp__1CHC=((void **)Self__52GH->parent_arrayed_collection__Z5YB.storage__GAHC)[Self__52GH->parent_arrayed_collection__Z5YB.upper__I5GC];
+      if (((struct ___OBJ *)__tmp__1CHC)->__id==__ITM_ARG__) {
+        __tmp__2CHC=((__ITM_ARG *)__tmp__1CHC)->parent_itm_argument__SEHB.parent_itm_code__O5M.position__SFJ;
       } else {
-        __tmp__LGHC=((__ITM_ARGS *)__tmp__KGHC)->parent_itm_argument__TDFE.parent_itm_code__C5M.position__GFJ;
+        __tmp__2CHC=((__ITM_ARGS *)__tmp__1CHC)->parent_itm_argument__CEFE.parent_itm_code__O5M.position__SFJ;
       };
-      put_error__text__NPG( 1,(&__string_234));
-      put_position__XQG(__tmp__LGHC);
-      put_string__P3F(msg_err__SPG);
-      if ((type_error__RPG !=  2)) {
+      put_error__text__1PG( 1,(&__string_233));
+      put_position__FRG(__tmp__2CHC);
+      put_string__33F(msg_err__AQG);
+      if ((type_error__5PG !=  2)) {
         exit(( 1));
       };
     };
-    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;
+    Self__GE2G=((__SECTION_ *)Self__ACHC->id_section__T3C);
+    if ((((void *)Self__GE2G->name__MYDC == (void *)(&__string_23)) || ((void *)Self__GE2G->name__MYDC == (void *)(&__string_24)))) {
+      Self__G1ID=((__FAST_ARRAYoITM_ARGUMENTo *)p__BCHC);
+      __tmp__IDHC=((void **)Self__G1ID->parent_arrayed_collection__Z5YB.storage__GAHC)[Self__G1ID->parent_arrayed_collection__Z5YB.upper__I5GC];
+      if (((struct ___OBJ *)__tmp__IDHC)->__id==__ITM_ARG__) {
+        __tmp__JDHC=((__ITM_ARG *)__tmp__IDHC)->parent_itm_argument__SEHB.parent_itm_code__O5M.position__SFJ;
       } else {
-        __tmp__YGHC=((__ITM_ARGS *)__tmp__XGHC)->parent_itm_argument__TDFE.parent_itm_code__C5M.position__GFJ;
+        __tmp__JDHC=((__ITM_ARGS *)__tmp__IDHC)->parent_itm_argument__CEFE.parent_itm_code__O5M.position__SFJ;
       };
-      put_error__text__NPG( 1,(&__string_235));
-      put_position__XQG(__tmp__YGHC);
-      put_string__P3F(msg_err__SPG);
-      if ((type_error__RPG !=  2)) {
+      put_error__text__1PG( 1,(&__string_234));
+      put_position__FRG(__tmp__JDHC);
+      put_string__33F(msg_err__AQG);
+      if ((type_error__5PG !=  2)) {
         exit(( 1));
       };
     };
   };
-  Self__PFHC->argument_list__5GHC=p__QFHC;
+  Self__ACHC->argument_list__QDHC=p__BCHC;
 }
 
-static __ITM_TYPE_MULTI* get__SJP(void *lt__UJP)
+static __ITM_TYPE_MULTI* get__4JP(void *lt__AKP)
 // ({NULLxFAST_ARRAYoITM_TYPE_MONOo}) With resultNo recursive, No inlinable.
 {
-  __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;
+  __ITM_TYPE_MULTI *result__CKP,*__tmp__ULP,*result__QZHB;
+  __INTEGER idx__DKP,__tmp__E3GH,typ_id__WZHB,new_capacity__MWAB;
+  __INTEGER __tmp__QXAB,__tmp__0MFC,Self__22VD;
+  void *__tmp__TLP;
+  __POINTER ptr__RZHB,ptr_table__B4JH,next__A4JH,result__C4JH;
+  __POINTER ptr_table__G4JH,next__F4JH,result__H4JH;
+  __UINTEGER_32 sz__TZHB,a__JVFH,new_size__KVFH,t__OVFH,a__NVFH;
+  __UINTEGER_32 new_size__J4JH,lab_type__I4JH;
+  void **__tmp__XEHH,**__tmp__PXAB,**new__GMFC;
+  __FAST_ARRAYoITM_TYPE_MULTIo *Self__KWAB;
+  __BOOLEAN __tmp__0WAB;
+  result__CKP=NULL;
+  idx__DKP= 0;
+  __tmp__E3GH=((__FAST_ARRAYoITM_TYPE_MULTIo *)dico__JKP)->parent_arrayed_collection__IKP.upper__SKP;
+  __tmp__XEHH=((__FAST_ARRAYoITM_TYPE_MULTIo *)dico__JKP)->parent_arrayed_collection__IKP.storage__21V;
+  while (((idx__DKP <= __tmp__E3GH) && ((void *)((__ITM_TYPE_MULTI *)((void **)__tmp__XEHH)[idx__DKP])->list_type__2KP != (void *)lt__AKP))) {
+    idx__DKP=(__INTEGER)(idx__DKP +  1);
+  };
+  if ((idx__DKP <= ((__FAST_ARRAYoITM_TYPE_MULTIo *)dico__JKP)->parent_arrayed_collection__IKP.upper__SKP)) {
+    __tmp__TLP=((void **)((__FAST_ARRAYoITM_TYPE_MULTIo *)dico__JKP)->parent_arrayed_collection__IKP.storage__21V)[idx__DKP];
+    if (__tmp__TLP==NULL) {
+      __tmp__ULP=NULL;
+    } else {
+      __tmp__ULP=((__ITM_TYPE_MULTI *)__tmp__TLP);
+    };
+    result__CKP=__tmp__ULP;
   } else {
-    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__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__KPJH=new_lab__FTJ(lab_type__NPJH);
-            };
-            ((__POINTER *)next__KPJH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__LPJH)[ 0]=next__KPJH;
-          } else {
-            ((__POINTER *)result__MPJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KPJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__MPJH=next__KPJH;
-          };
-        };
-        ptr__C3HB=result__MPJH;
-      };
-      result__B3HB=((__ITM_TYPE_MULTI *)ptr__C3HB);
-      *(result__B3HB) = *(ITM_TYPE_MULTI__);
-    };
-    ((__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__L0AB=FALSE__;
-    };
-    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__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__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__1ZAB->parent_arrayed_collection__2JP.storage__Q2V)[Self__1ZAB->parent_arrayed_collection__2JP.upper__GKP]=result__B3HB;
-  };
-  return(result__WJP);
+    result__QZHB=NULL;
+    ptr__RZHB=((__POINTER )(NULL));
+    typ_id__WZHB= 0;
+    sz__TZHB=((__UINTEGER_32 )sizeof(__ITM_TYPE_MULTI));
+    if ((sz__TZHB ==  0)) {
+      result__QZHB=ITM_TYPE_MULTI__;
+    } else {
+      typ_id__WZHB=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__TZHB);
+      if ((typ_id__WZHB == (__INTEGER)(-  1))) {
+        a__JVFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__KVFH=(__UINTEGER_32)((__UINTEGER_32)(sz__TZHB + a__JVFH) & (__UINTEGER_32)(~ a__JVFH));
+        ptr_table__B4JH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__KVFH / ((__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__RTJ(new_size__KVFH);
+          next__A4JH=(void *)((unsigned long)result__C4JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KVFH)));
+          ((__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__4XH)))) &  4095) + (__UINTEGER_32)(new_size__KVFH <<  1)) <=  4096)) {
+              next__A4JH=(void *)((unsigned long)result__C4JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KVFH)));
+            } else {
+              next__A4JH=new_lab__RTJ(new_size__KVFH);
+            };
+            ((__POINTER *)next__A4JH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__B4JH)[ 0]=next__A4JH;
+          } else {
+            ((__POINTER *)result__C4JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__A4JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__C4JH=next__A4JH;
+          };
+        };
+        ptr__RZHB=result__C4JH;
+      } else {
+        t__OVFH=((__UINTEGER_32 )typ_id__WZHB);
+        a__NVFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__J4JH=(__UINTEGER_32)((__UINTEGER_32)(sz__TZHB + a__NVFH) & (__UINTEGER_32)(~ a__NVFH));
+        ptr_table__G4JH=((__POINTER )(&(table_type[(t__OVFH)])));
+        lab_type__I4JH=(__UINTEGER_32)(t__OVFH |  1);
+        next__F4JH=((__POINTER )(NULL));
+        result__H4JH=((__POINTER *)ptr_table__G4JH)[ 0];
+        if ((result__H4JH == (void *)NULL)) {
+          result__H4JH=new_lab__RTJ(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__4XH)))) &  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__F4JH=new_lab__RTJ(lab_type__I4JH);
+            };
+            ((__POINTER *)next__F4JH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__G4JH)[ 0]=next__F4JH;
+          } else {
+            ((__POINTER *)result__H4JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__F4JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__H4JH=next__F4JH;
+          };
+        };
+        ptr__RZHB=result__H4JH;
+      };
+      result__QZHB=((__ITM_TYPE_MULTI *)ptr__RZHB);
+      *(result__QZHB) = *(ITM_TYPE_MULTI__);
+    };
+    ((__ITM_TYPE_MULTI *)result__QZHB)->list_type__2KP=lt__AKP;
+    result__CKP=result__QZHB;
+    Self__KWAB=((__FAST_ARRAYoITM_TYPE_MULTIo *)dico__JKP);
+    new_capacity__MWAB= 0;
+    if (((__INTEGER)(Self__KWAB->parent_arrayed_collection__IKP.upper__SKP +  1) <= (__INTEGER)(Self__KWAB->parent_arrayed_collection__IKP.capacity__R1V -  1))) {
+      Self__KWAB->parent_arrayed_collection__IKP.upper__SKP=(__INTEGER)(Self__KWAB->parent_arrayed_collection__IKP.upper__SKP +  1);
+      __tmp__0WAB=TRUE__;
+    } else {
+      __tmp__0WAB=FALSE__;
+    };
+    if ((! __tmp__0WAB)) {
+      if ((Self__KWAB->parent_arrayed_collection__IKP.capacity__R1V ==  0)) {
+        Self__KWAB->parent_arrayed_collection__IKP.storage__21V=create__PJXB( 2);
+        Self__KWAB->parent_arrayed_collection__IKP.capacity__R1V= 2;
+        Self__KWAB->parent_arrayed_collection__IKP.upper__SKP= 0;
+      } else {
+        new_capacity__MWAB=(__INTEGER)(Self__KWAB->parent_arrayed_collection__IKP.capacity__R1V <<  1);
+        __tmp__PXAB=Self__KWAB->parent_arrayed_collection__IKP.storage__21V;
+        __tmp__QXAB=Self__KWAB->parent_arrayed_collection__IKP.capacity__R1V;
+        new__GMFC=((void **)realloc_dynamic__old_size__new_size__KELC(((__POINTER )((void **)__tmp__PXAB)),((__UINTEGER_32 )(__INTEGER)(__tmp__QXAB * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__MWAB * ((__INTEGER )(sizeof(void *)))))));
+        __tmp__0MFC=(__INTEGER)(new_capacity__MWAB -  1);
+        Self__22VD=__tmp__QXAB;
+        while ((Self__22VD <= __tmp__0MFC)) {
+          new__GMFC[Self__22VD]=NULL;
+          Self__22VD=(__INTEGER)(Self__22VD +  1);
+        };
+        Self__KWAB->parent_arrayed_collection__IKP.storage__21V=new__GMFC;
+        Self__KWAB->parent_arrayed_collection__IKP.capacity__R1V=new_capacity__MWAB;
+        Self__KWAB->parent_arrayed_collection__IKP.upper__SKP=(__INTEGER)(Self__KWAB->parent_arrayed_collection__IKP.upper__SKP +  1);
+      };
+    };
+    ((void **)Self__KWAB->parent_arrayed_collection__IKP.storage__21V)[Self__KWAB->parent_arrayed_collection__IKP.upper__SKP]=result__QZHB;
+  };
+  return(result__CKP);
 }
 
-static void* read_type__WCM(__PARSER *Self__XCM,__BOOLEAN is_local__YCM)
+static void* read_type__CDM(__PARSER *Self__DDM,__BOOLEAN is_local__EDM)
 // ({PARSER},{TRUExFALSE}) With resultRecursive, No inlinable.
 {
-  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__;
+  void *style__GDM;
+  void *result__HDM;
+  void *typ_arg__JDM,*typ_res__KDM,*typ_arg__RMN,*typ_res__SMN;
+  __POSITION pos__QIYG,pos__SIYG,pos__UIYG,__tmp__NGM,pos__YIYG;
+  __POSITION pos__XKYG,pos__ZKYG;
+  __ITM_TYPE_STYLE *Self__S5HH;
+  __STRING *Self__U5HH;
+  __INTEGER new_capacity__T5HH,old_nb_elts__W5HH,upper__24JH,Self__04JH;
+  __INTEGER idx__VMN,__tmp__P3GH,typ_id__EYGB,new_capacity__QJAB;
+  __INTEGER __tmp__UKAB,__tmp__MKFC,Self__30VD;
+  void *result__UMN;
+  __ITM_TYPE_BLOCK *result__4XGB,*Self__LYCC;
+  __POINTER ptr__5XGB,ptr_table__C5JH,next__B5JH,result__D5JH;
+  __POINTER ptr_table__H5JH,next__G5JH,result__I5JH;
+  __UINTEGER_32 sz__BYGB,a__AWFH,new_size__BWFH,t__FWFH,a__EWFH;
+  __UINTEGER_32 new_size__K5JH,lab_type__J5JH;
+  void *lst__IDM;
+  __BOOLEAN result__K4JH,result__N4JH,result__Q4JH,result__T4JH;
+  __BOOLEAN result__W4JH,result__44JH,__tmp__4JAB,result__M5JH;
+  __BOOLEAN __tmp__MIM,result__O5JH;
+  __CHARACTER result__L4JH,result__O4JH,result__R4JH,result__U4JH;
+  __CHARACTER result__X4JH,result__54JH;
+  __CHARACTER *Self__V5HH,*new__X5HH;
+  void **__tmp__YEHH,**__tmp__ZEHH,**__tmp__TKAB,**new__YJFC;
+  __FAST_ARRAYoITM_TYPE_BLOCKo *Self__OJAB;
+  style__GDM=NULL;
+  result__HDM=NULL;
+  lst__IDM=NULL;
+  typ_arg__JDM=NULL;
+  typ_res__KDM=NULL;
+  result__K4JH=FALSE__;
+  if ((! read_space__XTD())) {
+    result__K4JH=FALSE__;
   } else {
-    result__QPJH='\0';
-    if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-      result__QPJH=((__CHARACTER )(( 0)));
+    result__L4JH='\0';
+    if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+      result__L4JH=((__CHARACTER )(( 0)));
     } else {
-      result__QPJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+      result__L4JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
     };
-    if ((result__QPJH == '{')) {
+    if ((result__L4JH == '{')) {
       position__CCC=(__INTEGER)(position__CCC +  1);
-      result__PPJH=TRUE__;
+      result__K4JH=TRUE__;
     };
   };
-  if (result__PPJH) {
-    result__SPJH=FALSE__;
-    if ((! read_space__MTD())) {
-      result__SPJH=FALSE__;
+  if (result__K4JH) {
+    result__N4JH=FALSE__;
+    if ((! read_space__XTD())) {
+      result__N4JH=FALSE__;
     } else {
-      result__TPJH='\0';
-      if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__TPJH=((__CHARACTER )(( 0)));
+      result__O4JH='\0';
+      if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+        result__O4JH=((__CHARACTER )(( 0)));
       } else {
-        result__TPJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+        result__O4JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__TPJH == '(')) {
+      if ((result__O4JH == '(')) {
         position__CCC=(__INTEGER)(position__CCC +  1);
-        result__SPJH=TRUE__;
+        result__N4JH=TRUE__;
       };
     };
-    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)) {
+    if (result__N4JH) {
+      lst__IDM=read_type_list__ENO(Self__DDM,FALSE__);
+      if (((void *)lst__IDM == (void *)NULL)) {
+        pos__QIYG=current_position__B0F();
+        put_error__text__1PG( 0,(&__string_265));
+        put_position__FRG(pos__QIYG);
+        put_string__33F(msg_err__AQG);
+        if ((type_error__5PG !=  2)) {
           exit(( 1));
         };
       };
-      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];
+      if (((__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)lst__IDM)->parent_arrayed_collection__SYC.upper__4HV +  1) ==  1)) {
+        typ_arg__JDM=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)lst__IDM)->parent_arrayed_collection__SYC.storage__FMV)[ 0];
       } else {
-        typ_arg__3CM=get__SJP(lst__2CM);
+        typ_arg__JDM=get__4JP(lst__IDM);
       };
-      result__VPJH=FALSE__;
-      if ((! read_space__MTD())) {
-        result__VPJH=FALSE__;
+      result__Q4JH=FALSE__;
+      if ((! read_space__XTD())) {
+        result__Q4JH=FALSE__;
       } else {
-        result__WPJH='\0';
-        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__WPJH=((__CHARACTER )(( 0)));
+        result__R4JH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+          result__R4JH=((__CHARACTER )(( 0)));
         } else {
-          result__WPJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+          result__R4JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__WPJH == ')')) {
+        if ((result__R4JH == ')')) {
           position__CCC=(__INTEGER)(position__CCC +  1);
-          result__VPJH=TRUE__;
+          result__Q4JH=TRUE__;
         };
       };
-      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)) {
+      if ((! result__Q4JH)) {
+        pos__SIYG=current_position__B0F();
+        put_error__text__1PG( 2,(&__string_262));
+        put_position__FRG(pos__SIYG);
+        put_string__33F(msg_err__AQG);
+        if ((type_error__5PG !=  2)) {
           exit(( 1));
         };
       };
-      result__YPJH=FALSE__;
-      if ((! read_space__MTD())) {
-        result__YPJH=FALSE__;
+      result__T4JH=FALSE__;
+      if ((! read_space__XTD())) {
+        result__T4JH=FALSE__;
       } else {
-        result__ZPJH='\0';
-        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__ZPJH=((__CHARACTER )(( 0)));
+        result__U4JH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+          result__U4JH=((__CHARACTER )(( 0)));
         } else {
-          result__ZPJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+          result__U4JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__ZPJH == ';')) {
+        if ((result__U4JH == ';')) {
           position__CCC=(__INTEGER)(position__CCC +  1);
-          result__YPJH=TRUE__;
+          result__T4JH=TRUE__;
         };
       };
-      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)) {
+      if ((! result__T4JH)) {
+        pos__UIYG=current_position__B0F();
+        put_error__text__1PG( 2,(&__string_241));
+        put_position__FRG(pos__UIYG);
+        put_string__33F(msg_err__AQG);
+        if ((type_error__5PG !=  2)) {
           exit(( 1));
         };
       };
-      lst__2CM=read_type_list__YMO(Self__XCM,FALSE__);
+      lst__IDM=read_type_list__ENO(Self__DDM,FALSE__);
     } else {
-      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__;
+      lst__IDM=read_type_list__ENO(Self__DDM,FALSE__);
+      if (((void *)lst__IDM != (void *)NULL)) {
+        result__W4JH=FALSE__;
+        if ((! read_space__XTD())) {
+          result__W4JH=FALSE__;
         } else {
-          result__2PJH='\0';
-          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__2PJH=((__CHARACTER )(( 0)));
+          result__X4JH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+            result__X4JH=((__CHARACTER )(( 0)));
           } else {
-            result__2PJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+            result__X4JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__2PJH == ';')) {
+          if ((result__X4JH == ';')) {
             position__CCC=(__INTEGER)(position__CCC +  1);
-            result__1PJH=TRUE__;
+            result__W4JH=TRUE__;
           };
         };
-        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];
+        if (result__W4JH) {
+          if (((__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)lst__IDM)->parent_arrayed_collection__SYC.upper__4HV +  1) ==  1)) {
+            typ_arg__JDM=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)lst__IDM)->parent_arrayed_collection__SYC.storage__FMV)[ 0];
           } else {
-            typ_arg__3CM=get__SJP(lst__2CM);
-            copy__JDS(string_tmp__VH,(&__string_292));
-            switch (((struct ___OBJ *)typ_arg__3CM)->__id) {
+            typ_arg__JDM=get__4JP(lst__IDM);
+            copy__VDS(string_tmp__VH,(&__string_292));
+            switch (((struct ___OBJ *)typ_arg__JDM)->__id) {
             case __ITM_TYPE_PARAMETER__: {
-              append__ROS(string_tmp__VH,((__ITM_TYPE_PARAMETER *)typ_arg__3CM)->parent_itm_type__YEE.name__0YP);
+              append__3OS(string_tmp__VH,((__ITM_TYPE_PARAMETER *)typ_arg__JDM)->parent_itm_type__VFE.name__GZP);
             } break;
             case __ITM_TYPE_SIMPLE__: {
-              append__ROS(string_tmp__VH,((__ITM_TYPE_SIMPLE *)typ_arg__3CM)->name__0YP);
+              append__3OS(string_tmp__VH,((__ITM_TYPE_SIMPLE *)typ_arg__JDM)->name__GZP);
             } break;
             case __ITM_TYPE_MULTI__: {
-              append_in__1KBC(typ_arg__3CM,string_tmp__VH);
+              append_in__MHBC(typ_arg__JDM,string_tmp__VH);
             } break;
             case __ITM_TYPE_BLOCK__: {
-              append_in__IIPD(typ_arg__3CM,string_tmp__VH);
+              append_in__PJPD(typ_arg__JDM,string_tmp__VH);
             } break;
             case __ITM_TYPE_GENERIC__: {
-              append_in__MJPD(typ_arg__3CM,string_tmp__VH);
+              append_in__TKPD(typ_arg__JDM,string_tmp__VH);
             } break;
             case __ITM_TYPE_STYLE__: {
-              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,' ');
+              Self__S5HH=((__ITM_TYPE_STYLE *)typ_arg__JDM);
+              if (((void *)Self__S5HH->style__PZP != (void *)NULL)) {
+                append__3OS(string_tmp__VH,Self__S5HH->style__PZP);
+                Self__U5HH=((__STRING *)string_tmp__VH);
+                new_capacity__T5HH= 0;
+                if ((Self__U5HH->capacity__UCS <= Self__U5HH->count__SGC)) {
+                  if ((Self__U5HH->capacity__UCS ==  0)) {
+                    Self__U5HH->capacity__UCS= 32;
+                    Self__U5HH->storage__3CS=create__YIEB( 32);
+                  } else {
+                    new_capacity__T5HH=(__INTEGER)(Self__U5HH->capacity__UCS <<  1);
+                    Self__V5HH=((__CHARACTER *)Self__U5HH->storage__3CS);
+                    old_nb_elts__W5HH=Self__U5HH->capacity__UCS;
+                    new__X5HH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__V5HH),((__UINTEGER_32 )old_nb_elts__W5HH),((__UINTEGER_32 )new_capacity__T5HH)));
+                    upper__24JH=(__INTEGER)(new_capacity__T5HH -  1);
+                    Self__04JH=old_nb_elts__W5HH;
+                    while ((Self__04JH <= upper__24JH)) {
+                      new__X5HH[Self__04JH]='\0';
+                      Self__04JH=(__INTEGER)(Self__04JH +  1);
+                    };
+                    Self__U5HH->storage__3CS=new__X5HH;
+                    Self__U5HH->capacity__UCS=new_capacity__T5HH;
+                  };
+                };
+                ((__CHARACTER *)Self__U5HH->storage__3CS)[Self__U5HH->count__SGC]=' ';
+                Self__U5HH->count__SGC=(__INTEGER)(Self__U5HH->count__SGC +  1);
               };
-              append__ROS(string_tmp__VH,Self__ULGH->parent_itm_type_simple__RSN.name__0YP);
+              append__3OS(string_tmp__VH,Self__S5HH->parent_itm_type_simple__3SN.name__GZP);
             } break;
             };
-            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)) {
+            append__3OS(string_tmp__VH,(&__string_293));
+            __tmp__NGM=current_position__B0F();
+            put_error__text__1PG( 2,string_tmp__VH);
+            put_position__FRG(__tmp__NGM);
+            put_string__33F(msg_err__AQG);
+            if ((type_error__5PG !=  2)) {
               exit(( 1));
             };
           };
-          lst__2CM=read_type_list__YMO(Self__XCM,FALSE__);
+          lst__IDM=read_type_list__ENO(Self__DDM,FALSE__);
         };
       };
     };
-    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];
+    if (((void *)lst__IDM != (void *)NULL)) {
+      if (((__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)lst__IDM)->parent_arrayed_collection__SYC.upper__4HV +  1) ==  1)) {
+        typ_res__KDM=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)lst__IDM)->parent_arrayed_collection__SYC.storage__FMV)[ 0];
       } else {
-        typ_res__4CM=get__SJP(lst__2CM);
+        typ_res__KDM=get__4JP(lst__IDM);
       };
     };
-    result__4PJH=FALSE__;
-    if ((! read_space__MTD())) {
-      result__4PJH=FALSE__;
+    result__44JH=FALSE__;
+    if ((! read_space__XTD())) {
+      result__44JH=FALSE__;
     } else {
-      result__5PJH='\0';
-      if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__5PJH=((__CHARACTER )(( 0)));
+      result__54JH='\0';
+      if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+        result__54JH=((__CHARACTER )(( 0)));
       } else {
-        result__5PJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+        result__54JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__5PJH == '}')) {
+      if ((result__54JH == '}')) {
         position__CCC=(__INTEGER)(position__CCC +  1);
-        result__4PJH=TRUE__;
+        result__44JH=TRUE__;
       };
     };
-    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)) {
+    if ((! result__44JH)) {
+      pos__YIYG=current_position__B0F();
+      put_error__text__1PG( 2,(&__string_294));
+      put_position__FRG(pos__YIYG);
+      put_string__33F(msg_err__AQG);
+      if ((type_error__5PG !=  2)) {
         exit(( 1));
       };
     };
-    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)));
+    typ_arg__RMN=typ_arg__JDM;
+    typ_res__SMN=typ_res__KDM;
+    result__UMN=NULL;
+    idx__VMN= 0;
+    __tmp__P3GH=((__FAST_ARRAYoITM_TYPE_BLOCKo *)dico__1MN)->parent_arrayed_collection__0MN.upper__ENN;
+    __tmp__YEHH=((__FAST_ARRAYoITM_TYPE_BLOCKo *)dico__1MN)->parent_arrayed_collection__0MN.storage__FKV;
+    __tmp__ZEHH=((__FAST_ARRAYoITM_TYPE_BLOCKo *)dico__1MN)->parent_arrayed_collection__0MN.storage__FKV;
+    while (((idx__VMN <= __tmp__P3GH) && (((void *)((__ITM_TYPE_BLOCK *)((void **)__tmp__YEHH)[idx__VMN])->type_argument__SNN != (void *)typ_arg__RMN) || ((void *)((__ITM_TYPE_BLOCK *)((void **)__tmp__ZEHH)[idx__VMN])->type_result__2NN != (void *)typ_res__SMN)))) {
+      idx__VMN=(__INTEGER)(idx__VMN +  1);
+    };
+    if ((idx__VMN <= ((__FAST_ARRAYoITM_TYPE_BLOCKo *)dico__1MN)->parent_arrayed_collection__0MN.upper__ENN)) {
+      result__UMN=((void **)((__FAST_ARRAYoITM_TYPE_BLOCKo *)dico__1MN)->parent_arrayed_collection__0MN.storage__FKV)[idx__VMN];
+    } else {
+      result__4XGB=NULL;
+      ptr__5XGB=((__POINTER )(NULL));
+      typ_id__EYGB= 0;
+      sz__BYGB=((__UINTEGER_32 )sizeof(__ITM_TYPE_BLOCK));
+      if ((sz__BYGB ==  0)) {
+        result__4XGB=ITM_TYPE_BLOCK__;
+      } else {
+        typ_id__EYGB=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__BYGB);
+        if ((typ_id__EYGB == (__INTEGER)(-  1))) {
+          a__AWFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__BWFH=(__UINTEGER_32)((__UINTEGER_32)(sz__BYGB + a__AWFH) & (__UINTEGER_32)(~ a__AWFH));
+          ptr_table__C5JH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__BWFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__B5JH=((__POINTER )(NULL));
+          result__D5JH=((__POINTER *)ptr_table__C5JH)[ 0];
+          if ((result__D5JH == (void *)NULL)) {
+            result__D5JH=new_lab__RTJ(new_size__BWFH);
+            next__B5JH=(void *)((unsigned long)result__D5JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BWFH)));
+            ((__POINTER *)next__B5JH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__C5JH)[ 0]=next__B5JH;
+          } else {
+            next__B5JH=((__POINTER *)result__D5JH)[ 0];
+            if ((next__B5JH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__D5JH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__BWFH <<  1)) <=  4096)) {
+                next__B5JH=(void *)((unsigned long)result__D5JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BWFH)));
               } else {
-                next__BQJH=new_lab__FTJ(new_size__4LGH);
-              };
-              ((__POINTER *)next__BQJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__CQJH)[ 0]=next__BQJH;
-            } else {
-              ((__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)));
+                next__B5JH=new_lab__RTJ(new_size__BWFH);
+              };
+              ((__POINTER *)next__B5JH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__C5JH)[ 0]=next__B5JH;
+            } else {
+              ((__POINTER *)result__D5JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__B5JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__D5JH=next__B5JH;
+            };
+          };
+          ptr__5XGB=result__D5JH;
+        } else {
+          t__FWFH=((__UINTEGER_32 )typ_id__EYGB);
+          a__EWFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__K5JH=(__UINTEGER_32)((__UINTEGER_32)(sz__BYGB + a__EWFH) & (__UINTEGER_32)(~ a__EWFH));
+          ptr_table__H5JH=((__POINTER )(&(table_type[(t__FWFH)])));
+          lab_type__J5JH=(__UINTEGER_32)(t__FWFH |  1);
+          next__G5JH=((__POINTER )(NULL));
+          result__I5JH=((__POINTER *)ptr_table__H5JH)[ 0];
+          if ((result__I5JH == (void *)NULL)) {
+            result__I5JH=new_lab__RTJ(lab_type__J5JH);
+            next__G5JH=(void *)((unsigned long)result__I5JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__K5JH)));
+            ((__POINTER *)next__G5JH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__H5JH)[ 0]=next__G5JH;
+          } else {
+            next__G5JH=((__POINTER *)result__I5JH)[ 0];
+            if ((next__G5JH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__I5JH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__K5JH <<  1)) <=  4096)) {
+                next__G5JH=(void *)((unsigned long)result__I5JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__K5JH)));
               } else {
-                next__GQJH=new_lab__FTJ(lab_type__JQJH);
+                next__G5JH=new_lab__RTJ(lab_type__J5JH);
               };
-              ((__POINTER *)next__GQJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__HQJH)[ 0]=next__GQJH;
+              ((__POINTER *)next__G5JH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__H5JH)[ 0]=next__G5JH;
             } else {
-              ((__POINTER *)result__IQJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GQJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__IQJH=next__GQJH;
+              ((__POINTER *)result__I5JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__G5JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__I5JH=next__G5JH;
             };
           };
-          ptr__Q1GB=result__IQJH;
+          ptr__5XGB=result__I5JH;
         };
-        result__P1GB=((__ITM_TYPE_BLOCK *)ptr__Q1GB);
-        *(result__P1GB) = *(ITM_TYPE_BLOCK__);
+        result__4XGB=((__ITM_TYPE_BLOCK *)ptr__5XGB);
+        *(result__4XGB) = *(ITM_TYPE_BLOCK__);
       };
-      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__;
+      Self__LYCC=((__ITM_TYPE_BLOCK *)result__4XGB);
+      Self__LYCC->type_argument__SNN=typ_arg__JDM;
+      Self__LYCC->type_result__2NN=typ_res__KDM;
+      result__UMN=result__4XGB;
+      Self__OJAB=((__FAST_ARRAYoITM_TYPE_BLOCKo *)dico__1MN);
+      new_capacity__QJAB= 0;
+      if (((__INTEGER)(Self__OJAB->parent_arrayed_collection__0MN.upper__ENN +  1) <= (__INTEGER)(Self__OJAB->parent_arrayed_collection__0MN.capacity__0JV -  1))) {
+        Self__OJAB->parent_arrayed_collection__0MN.upper__ENN=(__INTEGER)(Self__OJAB->parent_arrayed_collection__0MN.upper__ENN +  1);
+        __tmp__4JAB=TRUE__;
       } else {
-        __tmp__PNAB=FALSE__;
+        __tmp__4JAB=FALSE__;
       };
-      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;
+      if ((! __tmp__4JAB)) {
+        if ((Self__OJAB->parent_arrayed_collection__0MN.capacity__0JV ==  0)) {
+          Self__OJAB->parent_arrayed_collection__0MN.storage__FKV=create__KSWB( 2);
+          Self__OJAB->parent_arrayed_collection__0MN.capacity__0JV= 2;
+          Self__OJAB->parent_arrayed_collection__0MN.upper__ENN= 0;
         } else {
-          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);
+          new_capacity__QJAB=(__INTEGER)(Self__OJAB->parent_arrayed_collection__0MN.capacity__0JV <<  1);
+          __tmp__TKAB=Self__OJAB->parent_arrayed_collection__0MN.storage__FKV;
+          __tmp__UKAB=Self__OJAB->parent_arrayed_collection__0MN.capacity__0JV;
+          new__YJFC=((void **)realloc_dynamic__old_size__new_size__KELC(((__POINTER )((void **)__tmp__TKAB)),((__UINTEGER_32 )(__INTEGER)(__tmp__UKAB * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__QJAB * ((__INTEGER )(sizeof(void *)))))));
+          __tmp__MKFC=(__INTEGER)(new_capacity__QJAB -  1);
+          Self__30VD=__tmp__UKAB;
+          while ((Self__30VD <= __tmp__MKFC)) {
+            new__YJFC[Self__30VD]=NULL;
+            Self__30VD=(__INTEGER)(Self__30VD +  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);
+          Self__OJAB->parent_arrayed_collection__0MN.storage__FKV=new__YJFC;
+          Self__OJAB->parent_arrayed_collection__0MN.capacity__0JV=new_capacity__QJAB;
+          Self__OJAB->parent_arrayed_collection__0MN.upper__ENN=(__INTEGER)(Self__OJAB->parent_arrayed_collection__0MN.upper__ENN +  1);
         };
       };
-      ((void **)Self__5MAB->parent_arrayed_collection__OMN.storage__ZKV)[Self__5MAB->parent_arrayed_collection__OMN.upper__YMN]=result__P1GB;
+      ((void **)Self__OJAB->parent_arrayed_collection__0MN.storage__FKV)[Self__OJAB->parent_arrayed_collection__0MN.upper__ENN]=result__4XGB;
     };
-    result__1CM=result__IMN;
+    result__HDM=result__UMN;
   } else {
-    result__MQJH=read_word__LRF((&__string_9));
+    result__M5JH=read_word__ISF((&__string_9));
     if (is_shorter__LZ) {
-      if (result__MQJH) {
+      if (result__M5JH) {
         if (((void *)(&__string_9) == (void *)(&__string_4))) {
-          short__token__to__YCD((&__string_120),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V1C)->count__DD),position__CCC);
+          short__token__to__GDD((&__string_120),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__D2C)->count__DD),position__CCC);
         } else {
-          short__token__to__YCD((&__string_119),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V1C)->count__DD),position__CCC);
+          short__token__to__GDD((&__string_119),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__D2C)->count__DD),position__CCC);
         };
       };
     };
-    if (result__MQJH) {
-      __tmp__AIM=TRUE__;
+    if (result__M5JH) {
+      __tmp__MIM=TRUE__;
     } else {
-      result__OQJH=read_word__LRF((&__string_10));
+      result__O5JH=read_word__ISF((&__string_10));
       if (is_shorter__LZ) {
-        if (result__OQJH) {
+        if (result__O5JH) {
           if (((void *)(&__string_10) == (void *)(&__string_4))) {
-            short__token__to__YCD((&__string_120),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V1C)->count__DD),position__CCC);
+            short__token__to__GDD((&__string_120),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__D2C)->count__DD),position__CCC);
           } else {
-            short__token__to__YCD((&__string_119),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V1C)->count__DD),position__CCC);
+            short__token__to__GDD((&__string_119),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__D2C)->count__DD),position__CCC);
           };
         };
       };
-      __tmp__AIM=result__OQJH;
+      __tmp__MIM=result__O5JH;
     };
-    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)) {
+    if (__tmp__MIM) {
+      style__GDM=last_string__D2C;
+      if ((is_local__EDM && ((void *)last_string__D2C == (void *)(&__string_9)))) {
+        pos__XKYG=current_position__B0F();
+        put_error__text__1PG( 0,(&__string_295));
+        put_position__FRG(pos__XKYG);
+        put_string__33F(msg_err__AQG);
+        if ((type_error__5PG !=  2)) {
           exit(( 1));
         };
       };
     };
-    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)) {
+    result__HDM=read_prototype__DPN(Self__DDM,style__GDM);
+    if (((void *)read_contract__5VF(Self__DDM) != (void *)NULL)) {
+      pos__ZKYG=current_position__B0F();
+      put_error__text__1PG( 2,(&__string_260));
+      put_position__FRG(pos__ZKYG);
+      put_string__33F(msg_err__AQG);
+      if ((type_error__5PG !=  2)) {
         exit(( 1));
       };
     };
   };
-  return(result__1CM);
+  return(result__HDM);
 }
 
-static void set_result_type__FAGC(__ITM_SLOT *Self__GAGC,void *t__HAGC)
+static void set_result_type__W2FC(__ITM_SLOT *Self__X2FC,void *t__Y2FC)
 // ({ITM_SLOT},{NULLxITM_TYPE_PARAMETERxITM_TYPE_SIMPLExITM_TYPE_MULTIxITM_TYPE_BLOCKxITM_TYPE_GENERICxITM_TYPE_STYLE}) VoidNo recursive, No inlinable.
 {
-  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) {
+  void *tm__Z2FC,*__tmp__C3FC;
+  __SECTION_ *Self__ME2G;
+  __POSITION pos__U3ID;
+  tm__Z2FC=NULL;
+  Self__ME2G=((__SECTION_ *)Self__X2FC->id_section__T3C);
+  if ((((void *)Self__ME2G->name__MYDC == (void *)(&__string_23)) || ((void *)Self__ME2G->name__MYDC == (void *)(&__string_24)))) {
+    if (t__Y2FC==NULL) {
+      __tmp__C3FC=NULL;
+    } else {
+      switch (((struct ___OBJ *)t__Y2FC)->__id) {
       case __ITM_TYPE_PARAMETER__: {
-        __tmp__RAGC=((void *)t__HAGC);
+        __tmp__C3FC=((void *)t__Y2FC);
       } break;
       case __ITM_TYPE_SIMPLE__: {
-        __tmp__RAGC=((void *)t__HAGC);
+        __tmp__C3FC=((void *)t__Y2FC);
       } break;
       case __ITM_TYPE_MULTI__: {
-        __tmp__RAGC=NULL;
+        __tmp__C3FC=NULL;
       } break;
       case __ITM_TYPE_BLOCK__: {
-        __tmp__RAGC=((void *)t__HAGC);
+        __tmp__C3FC=((void *)t__Y2FC);
       } break;
       case __ITM_TYPE_GENERIC__: {
-        __tmp__RAGC=((void *)t__HAGC);
+        __tmp__C3FC=((void *)t__Y2FC);
       } break;
       case __ITM_TYPE_STYLE__: {
-        __tmp__RAGC=((void *)t__HAGC);
+        __tmp__C3FC=((void *)t__Y2FC);
       } break;
       }
     };
-    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)) {
+    tm__Z2FC=__tmp__C3FC;
+    if (((((void *)__tmp__C3FC == (void *)NULL) || ((void *)__tmp__C3FC == (void *)type_self__DVN)) || ((void *)__tmp__C3FC == (void *)type_void__WYF))) {
+      pos__U3ID=Self__X2FC->parent_named__15.parent_itm_object__4.position__SFJ;
+      put_error__text__1PG( 1,(&__string_238));
+      put_position__FRG(pos__U3ID);
+      put_string__33F(msg_err__AQG);
+      if ((type_error__5PG !=  2)) {
         exit(( 1));
       };
     };
   };
-  Self__GAGC->result_type__PBGC=t__HAGC;
+  Self__X2FC->result_type__A4FC=t__Y2FC;
 }
 
-static void* read_contract__CVF(__PARSER *Self__DVF)
+static void* read_contract__5VF(__PARSER *Self__AWF)
 // ({PARSER}) With resultNo recursive, No inlinable.
 {
-  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__;
+  void *e__DWF;
+  void *result__EWF;
+  __POSITION p__05JH,p__YYL,pos__BLYG,pos__DLYG,p__3AKH;
+  __ITM_LIST *result__S5JH;
+  __POINTER ptr__T5JH,ptr_table__25JH,next__15JH,result__35JH;
+  __POINTER ptr_table__BAKH,next__AAKH,result__CAKH,ptr__04L;
+  __POINTER ptr_table__GAKH,next__FAKH,result__HAKH,ptr_table__LAKH;
+  __POINTER next__KAKH,result__MAKH,ptr__WAKH,ptr_table__5AKH;
+  __POINTER next__4AKH,result__ABKH,ptr_table__EBKH,next__DBKH;
+  __POINTER result__FBKH;
+  __INTEGER typ_id__U5JH,typ_id__54L,typ_id__XAKH;
+  __UINTEGER_32 sz__V5JH,a__W5JH,new_size__X5JH,t__Y5JH,a__Z5JH;
+  __UINTEGER_32 new_size__EAKH,lab_type__DAKH,sz__24L,a__OWFH;
+  __UINTEGER_32 new_size__PWFH,t__TWFH,a__SWFH,new_size__OAKH;
+  __UINTEGER_32 lab_type__NAKH,sz__YAKH,a__ZAKH,new_size__0AKH,t__1AKH;
+  __UINTEGER_32 a__2AKH,new_size__HBKH,lab_type__GBKH;
+  __ITM_LDOTS *result__Z4L;
+  __ITM_PROTOTYPE *result__VAKH;
+  __BOOLEAN continue__CWF,result__P5JH,result__PAKH,result__SAKH;
+  void *lst__KWF,*result__0EHH;
+  __CHARACTER result__Q5JH,result__QAKH,result__TAKH;
+  __FAST_ARRAYoFAST_ARRAYoITM_CODEoo *Self__1EHH,*Self__2EHH;
+  continue__CWF=FALSE__;
+  e__DWF=NULL;
+  result__EWF=NULL;
+  lst__KWF=NULL;
+  result__P5JH=FALSE__;
+  if ((! read_space__XTD())) {
+    result__P5JH=FALSE__;
   } else {
-    result__QQJH='\0';
-    if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-      result__QQJH=((__CHARACTER )(( 0)));
+    result__Q5JH='\0';
+    if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+      result__Q5JH=((__CHARACTER )(( 0)));
     } else {
-      result__QQJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+      result__Q5JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
     };
-    if ((result__QQJH == '[')) {
+    if ((result__Q5JH == '[')) {
       position__CCC=(__INTEGER)(position__CCC +  1);
-      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__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__ARJH=new_lab__FTJ(lab_type__DRJH);
-            };
-            ((__POINTER *)next__ARJH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__BRJH)[ 0]=next__ARJH;
-          } else {
-            ((__POINTER *)result__CRJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ARJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__CRJH=next__ARJH;
-          };
-        };
-        ptr__TQJH=result__CRJH;
-      };
-      result__SQJH=((__ITM_LIST *)ptr__TQJH);
-      *(result__SQJH) = *(ITM_LIST__);
-    };
-    ((__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__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__NVF=result__WHIH;
+      result__P5JH=TRUE__;
+    };
+  };
+  if (result__P5JH) {
+    p__05JH=current_position__B0F();
+    result__S5JH=NULL;
+    ptr__T5JH=((__POINTER )(NULL));
+    typ_id__U5JH= 0;
+    sz__V5JH=((__UINTEGER_32 )sizeof(__ITM_LIST));
+    if ((sz__V5JH ==  0)) {
+      result__S5JH=ITM_LIST__;
+    } else {
+      typ_id__U5JH=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__V5JH);
+      if ((typ_id__U5JH == (__INTEGER)(-  1))) {
+        a__W5JH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__X5JH=(__UINTEGER_32)((__UINTEGER_32)(sz__V5JH + a__W5JH) & (__UINTEGER_32)(~ a__W5JH));
+        ptr_table__25JH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__X5JH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__15JH=((__POINTER )(NULL));
+        result__35JH=((__POINTER *)ptr_table__25JH)[ 0];
+        if ((result__35JH == (void *)NULL)) {
+          result__35JH=new_lab__RTJ(new_size__X5JH);
+          next__15JH=(void *)((unsigned long)result__35JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__X5JH)));
+          ((__POINTER *)next__15JH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__25JH)[ 0]=next__15JH;
+        } else {
+          next__15JH=((__POINTER *)result__35JH)[ 0];
+          if ((next__15JH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__35JH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__X5JH <<  1)) <=  4096)) {
+              next__15JH=(void *)((unsigned long)result__35JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__X5JH)));
+            } else {
+              next__15JH=new_lab__RTJ(new_size__X5JH);
+            };
+            ((__POINTER *)next__15JH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__25JH)[ 0]=next__15JH;
+          } else {
+            ((__POINTER *)result__35JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__15JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__35JH=next__15JH;
+          };
+        };
+        ptr__T5JH=result__35JH;
+      } else {
+        t__Y5JH=((__UINTEGER_32 )typ_id__U5JH);
+        a__Z5JH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__EAKH=(__UINTEGER_32)((__UINTEGER_32)(sz__V5JH + a__Z5JH) & (__UINTEGER_32)(~ a__Z5JH));
+        ptr_table__BAKH=((__POINTER )(&(table_type[(t__Y5JH)])));
+        lab_type__DAKH=(__UINTEGER_32)(t__Y5JH |  1);
+        next__AAKH=((__POINTER )(NULL));
+        result__CAKH=((__POINTER *)ptr_table__BAKH)[ 0];
+        if ((result__CAKH == (void *)NULL)) {
+          result__CAKH=new_lab__RTJ(lab_type__DAKH);
+          next__AAKH=(void *)((unsigned long)result__CAKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EAKH)));
+          ((__POINTER *)next__AAKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__BAKH)[ 0]=next__AAKH;
+        } else {
+          next__AAKH=((__POINTER *)result__CAKH)[ 0];
+          if ((next__AAKH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__CAKH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__EAKH <<  1)) <=  4096)) {
+              next__AAKH=(void *)((unsigned long)result__CAKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EAKH)));
+            } else {
+              next__AAKH=new_lab__RTJ(lab_type__DAKH);
+            };
+            ((__POINTER *)next__AAKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__BAKH)[ 0]=next__AAKH;
+          } else {
+            ((__POINTER *)result__CAKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__AAKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__CAKH=next__AAKH;
+          };
+        };
+        ptr__T5JH=result__CAKH;
+      };
+      result__S5JH=((__ITM_LIST *)ptr__T5JH);
+      *(result__S5JH) = *(ITM_LIST__);
+    };
+    ((__ITM_LIST *)result__S5JH)->parent_itm_code__SBF.parent_itm_object__PFE.position__SFJ=p__05JH;
+    last_group__TWF=result__S5JH;
+    result__EWF=result__S5JH;
+    read_def_local__M3H(Self__AWF);
+    result__0EHH=NULL;
+    if ((((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__QAI)->parent_arrayed_collection__PAI.upper__BYT <  0)) {
+      result__0EHH=create_with_capacity__XXI( 16);
+    } else {
+      Self__1EHH=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__QAI);
+      result__0EHH=((void **)Self__1EHH->parent_arrayed_collection__PAI.storage__PCU)[Self__1EHH->parent_arrayed_collection__PAI.upper__BYT];
+      Self__2EHH=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__QAI);
+      Self__2EHH->parent_arrayed_collection__PAI.upper__BYT=(__INTEGER)(Self__2EHH->parent_arrayed_collection__PAI.upper__BYT -  1);
+    };
+    lst__KWF=result__0EHH;
     do {
-      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;
+      e__DWF=read_expr__DBJ(Self__AWF);
+      if (((void *)e__DWF == (void *)NULL)) {
+        continue__CWF=read_word__ISF((&__string_7));
+        if (continue__CWF) {
+          p__YYL=current_position__B0F();
+          result__Z4L=NULL;
+          ptr__04L=((__POINTER )(NULL));
+          typ_id__54L= 0;
+          sz__24L=((__UINTEGER_32 )sizeof(__ITM_LDOTS));
+          if ((sz__24L ==  0)) {
+            result__Z4L=ITM_LDOTS__;
+          } else {
+            typ_id__54L=-1;
+            clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__24L);
+            if ((typ_id__54L == (__INTEGER)(-  1))) {
+              a__OWFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__PWFH=(__UINTEGER_32)((__UINTEGER_32)(sz__24L + a__OWFH) & (__UINTEGER_32)(~ a__OWFH));
+              ptr_table__GAKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__PWFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__FAKH=((__POINTER )(NULL));
+              result__HAKH=((__POINTER *)ptr_table__GAKH)[ 0];
+              if ((result__HAKH == (void *)NULL)) {
+                result__HAKH=new_lab__RTJ(new_size__PWFH);
+                next__FAKH=(void *)((unsigned long)result__HAKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PWFH)));
+                ((__POINTER *)next__FAKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__GAKH)[ 0]=next__FAKH;
               } else {
-                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)));
+                next__FAKH=((__POINTER *)result__HAKH)[ 0];
+                if ((next__FAKH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HAKH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__PWFH <<  1)) <=  4096)) {
+                    next__FAKH=(void *)((unsigned long)result__HAKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PWFH)));
                   } else {
-                    next__FRJH=new_lab__FTJ(new_size__MMGH);
+                    next__FAKH=new_lab__RTJ(new_size__PWFH);
                   };
-                  ((__POINTER *)next__FRJH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__GRJH)[ 0]=next__FRJH;
+                  ((__POINTER *)next__FAKH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__GAKH)[ 0]=next__FAKH;
                 } else {
-                  ((__POINTER *)result__HRJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FRJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__HRJH=next__FRJH;
+                  ((__POINTER *)result__HAKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FAKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__HAKH=next__FAKH;
                 };
               };
-              ptr__O4L=result__HRJH;
-            } else {
-              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;
+              ptr__04L=result__HAKH;
+            } else {
+              t__TWFH=((__UINTEGER_32 )typ_id__54L);
+              a__SWFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__OAKH=(__UINTEGER_32)((__UINTEGER_32)(sz__24L + a__SWFH) & (__UINTEGER_32)(~ a__SWFH));
+              ptr_table__LAKH=((__POINTER )(&(table_type[(t__TWFH)])));
+              lab_type__NAKH=(__UINTEGER_32)(t__TWFH |  1);
+              next__KAKH=((__POINTER )(NULL));
+              result__MAKH=((__POINTER *)ptr_table__LAKH)[ 0];
+              if ((result__MAKH == (void *)NULL)) {
+                result__MAKH=new_lab__RTJ(lab_type__NAKH);
+                next__KAKH=(void *)((unsigned long)result__MAKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OAKH)));
+                ((__POINTER *)next__KAKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__LAKH)[ 0]=next__KAKH;
               } else {
-                next__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)));
+                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__4XH)))) &  4095) + (__UINTEGER_32)(new_size__OAKH <<  1)) <=  4096)) {
+                    next__KAKH=(void *)((unsigned long)result__MAKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OAKH)));
                   } else {
-                    next__KRJH=new_lab__FTJ(lab_type__NRJH);
+                    next__KAKH=new_lab__RTJ(lab_type__NAKH);
                   };
-                  ((__POINTER *)next__KRJH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__LRJH)[ 0]=next__KRJH;
+                  ((__POINTER *)next__KAKH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__LAKH)[ 0]=next__KAKH;
                 } else {
-                  ((__POINTER *)result__MRJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KRJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__MRJH=next__KRJH;
+                  ((__POINTER *)result__MAKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KAKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__MAKH=next__KAKH;
                 };
               };
-              ptr__O4L=result__MRJH;
+              ptr__04L=result__MAKH;
             };
-            result__N4L=((__ITM_LDOTS *)ptr__O4L);
-            *(result__N4L) = *(ITM_LDOTS__);
+            result__Z4L=((__ITM_LDOTS *)ptr__04L);
+            *(result__Z4L) = *(ITM_LDOTS__);
           };
-          ((__ITM_LDOTS *)result__N4L)->parent_itm_constant__LWF.parent_itm_object__SEE.position__GFJ=p__MYL;
-          add_last__25U(lst__NVF,result__N4L);
+          ((__ITM_LDOTS *)result__Z4L)->parent_itm_constant__IXF.parent_itm_object__PFE.position__SFJ=p__YYL;
+          add_last__I5U(lst__KWF,result__Z4L);
         };
       } else {
-        add_last__25U(lst__NVF,e__GVF);
-        result__PRJH=FALSE__;
-        if ((! read_space__MTD())) {
-          result__PRJH=FALSE__;
+        add_last__I5U(lst__KWF,e__DWF);
+        result__PAKH=FALSE__;
+        if ((! read_space__XTD())) {
+          result__PAKH=FALSE__;
         } else {
-          result__QRJH='\0';
-          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__QRJH=((__CHARACTER )(( 0)));
+          result__QAKH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+            result__QAKH=((__CHARACTER )(( 0)));
           } else {
-            result__QRJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+            result__QAKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__QRJH == ';')) {
+          if ((result__QAKH == ';')) {
             position__CCC=(__INTEGER)(position__CCC +  1);
-            result__PRJH=TRUE__;
+            result__PAKH=TRUE__;
           };
         };
-        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)) {
+        if ((! result__PAKH)) {
+          pos__BLYG=current_position__B0F();
+          put_error__text__1PG( 2,(&__string_241));
+          put_position__FRG(pos__BLYG);
+          put_string__33F(msg_err__AQG);
+          if ((type_error__5PG !=  2)) {
             exit(( 1));
           };
         };
-        continue__FVF=TRUE__;
+        continue__CWF=TRUE__;
       };
-    } while (continue__FVF);
-    result__SRJH=FALSE__;
-    if ((! read_space__MTD())) {
-      result__SRJH=FALSE__;
+    } while (continue__CWF);
+    result__SAKH=FALSE__;
+    if ((! read_space__XTD())) {
+      result__SAKH=FALSE__;
     } else {
-      result__TRJH='\0';
-      if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__TRJH=((__CHARACTER )(( 0)));
+      result__TAKH='\0';
+      if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+        result__TAKH=((__CHARACTER )(( 0)));
       } else {
-        result__TRJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+        result__TAKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__TRJH == ']')) {
+      if ((result__TAKH == ']')) {
         position__CCC=(__INTEGER)(position__CCC +  1);
-        result__SRJH=TRUE__;
+        result__SAKH=TRUE__;
       };
     };
-    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)) {
+    if ((! result__SAKH)) {
+      pos__DLYG=current_position__B0F();
+      put_error__text__1PG( 2,(&__string_296));
+      put_position__FRG(pos__DLYG);
+      put_string__33F(msg_err__AQG);
+      if ((type_error__5PG !=  2)) {
         exit(( 1));
       };
     };
-    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)));
+    p__3AKH=current_position__B0F();
+    result__VAKH=NULL;
+    ptr__WAKH=((__POINTER )(NULL));
+    typ_id__XAKH= 0;
+    sz__YAKH=((__UINTEGER_32 )sizeof(__ITM_PROTOTYPE));
+    if ((sz__YAKH ==  0)) {
+      result__VAKH=ITM_PROTOTYPE__;
+    } else {
+      typ_id__XAKH=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__YAKH);
+      if ((typ_id__XAKH == (__INTEGER)(-  1))) {
+        a__ZAKH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__0AKH=(__UINTEGER_32)((__UINTEGER_32)(sz__YAKH + a__ZAKH) & (__UINTEGER_32)(~ a__ZAKH));
+        ptr_table__5AKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__0AKH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__4AKH=((__POINTER )(NULL));
+        result__ABKH=((__POINTER *)ptr_table__5AKH)[ 0];
+        if ((result__ABKH == (void *)NULL)) {
+          result__ABKH=new_lab__RTJ(new_size__0AKH);
+          next__4AKH=(void *)((unsigned long)result__ABKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0AKH)));
+          ((__POINTER *)next__4AKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__5AKH)[ 0]=next__4AKH;
+        } else {
+          next__4AKH=((__POINTER *)result__ABKH)[ 0];
+          if ((next__4AKH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ABKH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__0AKH <<  1)) <=  4096)) {
+              next__4AKH=(void *)((unsigned long)result__ABKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0AKH)));
             } else {
-              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)));
+              next__4AKH=new_lab__RTJ(new_size__0AKH);
+            };
+            ((__POINTER *)next__4AKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__5AKH)[ 0]=next__4AKH;
+          } else {
+            ((__POINTER *)result__ABKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4AKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__ABKH=next__4AKH;
+          };
+        };
+        ptr__WAKH=result__ABKH;
+      } else {
+        t__1AKH=((__UINTEGER_32 )typ_id__XAKH);
+        a__2AKH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__HBKH=(__UINTEGER_32)((__UINTEGER_32)(sz__YAKH + a__2AKH) & (__UINTEGER_32)(~ a__2AKH));
+        ptr_table__EBKH=((__POINTER )(&(table_type[(t__1AKH)])));
+        lab_type__GBKH=(__UINTEGER_32)(t__1AKH |  1);
+        next__DBKH=((__POINTER )(NULL));
+        result__FBKH=((__POINTER *)ptr_table__EBKH)[ 0];
+        if ((result__FBKH == (void *)NULL)) {
+          result__FBKH=new_lab__RTJ(lab_type__GBKH);
+          next__DBKH=(void *)((unsigned long)result__FBKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HBKH)));
+          ((__POINTER *)next__DBKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__EBKH)[ 0]=next__DBKH;
+        } else {
+          next__DBKH=((__POINTER *)result__FBKH)[ 0];
+          if ((next__DBKH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__FBKH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__HBKH <<  1)) <=  4096)) {
+              next__DBKH=(void *)((unsigned long)result__FBKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HBKH)));
             } else {
-              next__DSJH=new_lab__FTJ(lab_type__GSJH);
+              next__DBKH=new_lab__RTJ(lab_type__GBKH);
             };
-            ((__POINTER *)next__DSJH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__ESJH)[ 0]=next__DSJH;
+            ((__POINTER *)next__DBKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__EBKH)[ 0]=next__DBKH;
           } else {
-            ((__POINTER *)result__FSJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DSJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__FSJH=next__DSJH;
+            ((__POINTER *)result__FBKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DBKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__FBKH=next__DBKH;
           };
         };
-        ptr__WRJH=result__FSJH;
+        ptr__WAKH=result__FBKH;
       };
-      result__VRJH=((__ITM_PROTOTYPE *)ptr__WRJH);
-      *(result__VRJH) = *(ITM_PROTOTYPE__);
+      result__VAKH=((__ITM_PROTOTYPE *)ptr__WAKH);
+      *(result__VAKH) = *(ITM_PROTOTYPE__);
     };
-    ((__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);
+    ((__ITM_PROTOTYPE *)result__VAKH)->parent_itm_constant__UYF.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ=p__3AKH;
+    e__DWF=result__VAKH;
+    add_last__I5U(result__0EHH,result__VAKH);
+    copy__5BI(result__0EHH);
   };
-  return(result__HVF);
+  return(result__EWF);
 }
 
-static void* read_expr__XAJ(__PARSER *Self__YAJ)
+static void* read_expr__DBJ(__PARSER *Self__EBJ)
 // ({PARSER}) With resultRecursive, No inlinable.
 {
-  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__;
+  void *result__GBJ,*value__HBJ,*result__SGL,*expr__TGL,*__tmp__ZJL;
+  void *__tmp__ALL,*__tmp__GML;
+  __INTEGER p__OBJ,typ_id__LA1C,typ_id__3BKH,typ_id__QCKH,typ_id__DDKH;
+  __INTEGER typ_id__ESJD,typ_id__CAKD,typ_id__XTJD,last_msg__XGL;
+  __INTEGER first_msg__YGL,typ_id__UEKH,typ_id__VTP,typ_id__TFKH;
+  __INTEGER index__52LH,__tmp__32LH,i__A3LH,typ_id__GGKH,__tmp__CG1C;
+  __INTEGER i__QJCD,typ_id__JYO,typ_id__2ZO;
+  void *name__PBJ,*n__2EKH,*n__MIP;
+  __POSITION p__IFRC,pos__MLYG,p__DCKH,pos__OLYG,pos__QLYG,__tmp__JGJ;
+  __POSITION p__JDKH,pos__ULYG,__tmp__KJJ,__tmp__UJJ,__tmp__3JJ,p__1EKH;
+  __POSITION pos__5LYG,p__LIP,__tmp__3JL,__tmp__DLL,__tmp__KML;
+  __ITM_LIST_IDF *result__FA1C;
+  __POINTER ptr__GA1C,ptr_table__SBKH,next__RBKH,result__TBKH;
+  __POINTER ptr_table__XBKH,next__WBKH,result__YBKH,ptr__2BKH;
+  __POINTER ptr_table__FCKH,next__ECKH,result__GCKH,ptr_table__KCKH;
+  __POINTER next__JCKH,result__LCKH,ptr__PCKH,ptr_table__YCKH;
+  __POINTER next__XCKH,result__ZCKH,ptr_table__3CKH,next__2CKH;
+  __POINTER result__4CKH,ptr__CDKH,ptr_table__LDKH,next__KDKH;
+  __POINTER result__MDKH,ptr_table__QDKH,next__PDKH,result__RDKH;
+  __POINTER ptr__5RJD,ptr_table__VDKH,next__UDKH,result__WDKH;
+  __POINTER ptr_table__0DKH,next__ZDKH,result__1DKH,ptr__35JD;
+  __POINTER ptr_table__5DKH,next__4DKH,result__AEKH,ptr_table__EEKH;
+  __POINTER next__DEKH,result__FEKH,ptr__STJD,ptr_table__JEKH;
+  __POINTER next__IEKH,result__KEKH,ptr_table__OEKH,next__NEKH;
+  __POINTER result__PEKH,ptr__TEKH,ptr_table__4EKH,next__3EKH;
+  __POINTER result__5EKH,ptr_table__DFKH,next__CFKH,result__EFKH;
+  __POINTER ptr__QTP,ptr_table__IFKH,next__HFKH,result__JFKH;
+  __POINTER ptr_table__NFKH,next__MFKH,result__OFKH,ptr__SFKH;
+  __POINTER ptr_table__1FKH,next__0FKH,result__2FKH,ptr_table__AGKH;
+  __POINTER next__5FKH,result__BGKH,ptr__FGKH,ptr_table__OGKH;
+  __POINTER next__NGKH,result__PGKH,ptr_table__TGKH,next__SGKH;
+  __POINTER result__UGKH,ptr__EYO,ptr_table__YGKH,next__XGKH;
+  __POINTER result__ZGKH,ptr_table__3GKH,next__2GKH,result__4GKH;
+  __POINTER ptr__XZO,ptr_table__CHKH,next__BHKH,result__DHKH;
+  __POINTER ptr_table__HHKH,next__GHKH,result__IHKH;
+  __UINTEGER_32 sz__IA1C,a__WWFH,new_size__XWFH,t__1WFH,a__0WFH;
+  __UINTEGER_32 new_size__0BKH,lab_type__ZBKH,sz__4BKH,a__5BKH;
+  __UINTEGER_32 new_size__ACKH,t__BCKH,a__CCKH,new_size__NCKH;
+  __UINTEGER_32 lab_type__MCKH,sz__RCKH,a__SCKH,new_size__TCKH,t__UCKH;
+  __UINTEGER_32 a__VCKH,new_size__ADKH,lab_type__5CKH,sz__EDKH,a__FDKH;
+  __UINTEGER_32 new_size__GDKH,t__HDKH,a__IDKH,new_size__TDKH;
+  __UINTEGER_32 lab_type__SDKH,sz__BSJD,a__UEGH,new_size__VEGH,t__ZEGH;
+  __UINTEGER_32 a__YEGH,new_size__3DKH,lab_type__2DKH,sz__55JD,a__4WFH;
+  __UINTEGER_32 new_size__5WFH,t__DXFH,a__CXFH,new_size__HEKH;
+  __UINTEGER_32 lab_type__GEKH,sz__UTJD,a__2EGH,new_size__3EGH,t__BFGH;
+  __UINTEGER_32 a__AFGH,new_size__REKH,lab_type__QEKH,sz__VEKH,a__WEKH;
+  __UINTEGER_32 new_size__XEKH,t__YEKH,a__ZEKH,new_size__GFKH;
+  __UINTEGER_32 lab_type__FFKH,sz__STP,a__MFGH,new_size__NFGH,t__RFGH;
+  __UINTEGER_32 a__QFGH,new_size__QFKH,lab_type__PFKH,sz__UFKH,a__VFKH;
+  __UINTEGER_32 new_size__WFKH,t__XFKH,a__YFKH,new_size__DGKH;
+  __UINTEGER_32 lab_type__CGKH,sz__HGKH,a__IGKH,new_size__JGKH,t__KGKH;
+  __UINTEGER_32 a__LGKH,new_size__WGKH,lab_type__VGKH,sz__GYO,a__FGGH;
+  __UINTEGER_32 new_size__GGGH,t__KGGH,a__JGGH,new_size__AHKH;
+  __UINTEGER_32 lab_type__5GKH,sz__ZZO,a__QYFH,new_size__RYFH,t__VYFH;
+  __UINTEGER_32 a__UYFH,new_size__KHKH,lab_type__JHKH;
+  __ITM_WRITE_VALUE *result__1BKH,*result__4RJD;
+  __ITM_WRITE_CAST *result__OCKH,*result__RTJD;
+  __ITM_READ *result__BDKH;
+  __ITM_WRITE_CODE *result__25JD;
+  void *itm_op__WGL,*__tmp__0JL,*__tmp__BLL,*__tmp__HML;
+  __ITM_OPERATOR *result__SEKH,*Self__0EKH,*result__PTP,*Self__LNV;
+  __ITM_READ_ARG1 *result__RFKH,*result__EGKH;
+  __ITM_READ_ARG2 *result__DYO;
+  __ITM_EXPRESSION *result__WZO;
+  __CHARACTER affect__IBJ,result__JBKH,result__MBKH,result__PBKH;
+  __BOOLEAN again__JBJ,result__IBKH,result__LBKH,result__OBKH;
+  __BOOLEAN __tmp__TEJ,__tmp__VGJ,__tmp__ZLL;
+  void *l_assignment__NBJ,*result__VAL,*result__CFRC;
+  __FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *Self__XU5,*Self__NV5;
+  void *result__KAI,*l_expr__UGL;
+  __FAST_ARRAYoFAST_ARRAYoITM_CODEoo *Self__UM4,*Self__KN4;
+  __FAST_ARRAYoITM_CODEo *Self__12LH,*Self__YF1C;
+  void **__tmp__22LH,**Self__42LH,**__tmp__BG1C,**Self__5ICD;
+  result__GBJ=NULL;
+  value__HBJ=NULL;
+  affect__IBJ='\0';
+  again__JBJ=FALSE__;
+  l_assignment__NBJ=NULL;
+  p__OBJ= 0;
+  name__PBJ=NULL;
+  old_position__ITI=position__CCC;
+  old_pos_cur__KTI=pos_cur__FCC;
+  old_pos_line__MTI=pos_line__GCC;
+  old_pos_col__OTI=pos_col__HCC;
+  old_short_derive__QTI=short_derive__PCC;
+  result__IBKH=FALSE__;
+  if ((! read_space__XTD())) {
+    result__IBKH=FALSE__;
   } else {
-    result__JSJH='\0';
-    if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-      result__JSJH=((__CHARACTER )(( 0)));
+    result__JBKH='\0';
+    if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+      result__JBKH=((__CHARACTER )(( 0)));
     } else {
-      result__JSJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+      result__JBKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
     };
-    if ((result__JSJH == '(')) {
+    if ((result__JBKH == '(')) {
       position__CCC=(__INTEGER)(position__CCC +  1);
-      result__ISJH=TRUE__;
+      result__IBKH=TRUE__;
     };
   };
-  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);
+  if (result__IBKH) {
+    result__VAL=NULL;
+    if ((((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)free_list__1AL)->parent_arrayed_collection__0AL.upper__LUU <  0)) {
+      result__VAL=create_with_capacity__THRC( 16);
     } else {
-      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);
+      Self__XU5=((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)free_list__1AL);
+      result__VAL=((void **)Self__XU5->parent_arrayed_collection__0AL.storage__1WU)[Self__XU5->parent_arrayed_collection__0AL.upper__LUU];
+      Self__NV5=((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)free_list__1AL);
+      Self__NV5->parent_arrayed_collection__0AL.upper__LUU=(__INTEGER)(Self__NV5->parent_arrayed_collection__0AL.upper__LUU -  1);
     };
-    l_assignment__BBJ=result__JAL;
+    l_assignment__NBJ=result__VAL;
     do {
-      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);
+      again__JBJ=FALSE__;
+      if (read_identifier__2BL()) {
+        p__OBJ=(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__D2C)->count__DD);
+        copy__VDS(string_tmp2__GCJ,last_string__D2C);
+        while (read_identifier__2BL()) {
+          append__3OS(string_tmp2__GCJ,(&__string_112));
+          append__3OS(string_tmp2__GCJ,last_string__D2C);
+        };
+        name__PBJ=get__YWB(string_tmp2__GCJ);
+        add_last__SEPD(l_assignment__NBJ,name__PBJ);
         if (is_shorter__LZ) {
-          if ((! fast_has__FEV(short_local__XCC,name__DBJ))) {
-            short__token__to__YCD((&__string_131),p__CBJ,position__CCC);
+          if ((! fast_has__RDV(short_local__XCC,name__PBJ))) {
+            short__token__to__GDD((&__string_131),p__OBJ,position__CCC);
           };
         };
-        result__LSJH=FALSE__;
-        if ((! read_space__MTD())) {
-          result__LSJH=FALSE__;
+        result__LBKH=FALSE__;
+        if ((! read_space__XTD())) {
+          result__LBKH=FALSE__;
         } else {
-          result__MSJH='\0';
-          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__MSJH=((__CHARACTER )(( 0)));
+          result__MBKH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+            result__MBKH=((__CHARACTER )(( 0)));
           } else {
-            result__MSJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+            result__MBKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__MSJH == ',')) {
+          if ((result__MBKH == ',')) {
             position__CCC=(__INTEGER)(position__CCC +  1);
-            result__LSJH=TRUE__;
+            result__LBKH=TRUE__;
           };
         };
-        if (result__LSJH) {
-          again__3AJ=TRUE__;
+        if (result__LBKH) {
+          again__JBJ=TRUE__;
         };
       };
-    } 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__;
+    } while (again__JBJ);
+    if ((! (((__FAST_ARRAYoSTRING_CONSTANTo *)result__VAL)->parent_arrayed_collection__MBJ.upper__2CPD <  0))) {
+      result__OBKH=FALSE__;
+      if ((! read_space__XTD())) {
+        result__OBKH=FALSE__;
       } else {
-        result__PSJH='\0';
-        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__PSJH=((__CHARACTER )(( 0)));
+        result__PBKH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+          result__PBKH=((__CHARACTER )(( 0)));
         } else {
-          result__PSJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+          result__PBKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__PSJH == ')')) {
+        if ((result__PBKH == ')')) {
           position__CCC=(__INTEGER)(position__CCC +  1);
-          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)));
+          result__OBKH=TRUE__;
+        };
+      };
+      __tmp__TEJ=result__OBKH;
+    } else {
+      __tmp__TEJ=FALSE__;
+    };
+    if ((__tmp__TEJ && ((read_symbol__4YJ((&__string_12)) || read_symbol__4YJ((&__string_13))) || read_symbol__4YJ((&__string_14))))) {
+      result__CFRC=create_with_capacity__THRC((__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)result__VAL)->parent_arrayed_collection__MBJ.upper__2CPD +  1));
+      copy__BASD(result__CFRC,result__VAL);
+      free__TR5(result__VAL);
+      l_assignment__NBJ=result__CFRC;
+      p__IFRC=current_position__B0F();
+      result__FA1C=NULL;
+      ptr__GA1C=((__POINTER )(NULL));
+      typ_id__LA1C= 0;
+      sz__IA1C=((__UINTEGER_32 )sizeof(__ITM_LIST_IDF));
+      if ((sz__IA1C ==  0)) {
+        result__FA1C=ITM_LIST_IDF__;
+      } else {
+        typ_id__LA1C=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__IA1C);
+        if ((typ_id__LA1C == (__INTEGER)(-  1))) {
+          a__WWFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__XWFH=(__UINTEGER_32)((__UINTEGER_32)(sz__IA1C + a__WWFH) & (__UINTEGER_32)(~ a__WWFH));
+          ptr_table__SBKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__XWFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__RBKH=((__POINTER )(NULL));
+          result__TBKH=((__POINTER *)ptr_table__SBKH)[ 0];
+          if ((result__TBKH == (void *)NULL)) {
+            result__TBKH=new_lab__RTJ(new_size__XWFH);
+            next__RBKH=(void *)((unsigned long)result__TBKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XWFH)));
+            ((__POINTER *)next__RBKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__SBKH)[ 0]=next__RBKH;
+          } else {
+            next__RBKH=((__POINTER *)result__TBKH)[ 0];
+            if ((next__RBKH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TBKH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__XWFH <<  1)) <=  4096)) {
+                next__RBKH=(void *)((unsigned long)result__TBKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XWFH)));
               } else {
-                next__RSJH=new_lab__FTJ(new_size__UMGH);
-              };
-              ((__POINTER *)next__RSJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__SSJH)[ 0]=next__RSJH;
-            } else {
-              ((__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)));
+                next__RBKH=new_lab__RTJ(new_size__XWFH);
+              };
+              ((__POINTER *)next__RBKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__SBKH)[ 0]=next__RBKH;
+            } else {
+              ((__POINTER *)result__TBKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RBKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__TBKH=next__RBKH;
+            };
+          };
+          ptr__GA1C=result__TBKH;
+        } else {
+          t__1WFH=((__UINTEGER_32 )typ_id__LA1C);
+          a__0WFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__0BKH=(__UINTEGER_32)((__UINTEGER_32)(sz__IA1C + a__0WFH) & (__UINTEGER_32)(~ a__0WFH));
+          ptr_table__XBKH=((__POINTER )(&(table_type[(t__1WFH)])));
+          lab_type__ZBKH=(__UINTEGER_32)(t__1WFH |  1);
+          next__WBKH=((__POINTER )(NULL));
+          result__YBKH=((__POINTER *)ptr_table__XBKH)[ 0];
+          if ((result__YBKH == (void *)NULL)) {
+            result__YBKH=new_lab__RTJ(lab_type__ZBKH);
+            next__WBKH=(void *)((unsigned long)result__YBKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0BKH)));
+            ((__POINTER *)next__WBKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__XBKH)[ 0]=next__WBKH;
+          } else {
+            next__WBKH=((__POINTER *)result__YBKH)[ 0];
+            if ((next__WBKH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YBKH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__0BKH <<  1)) <=  4096)) {
+                next__WBKH=(void *)((unsigned long)result__YBKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0BKH)));
               } else {
-                next__WSJH=new_lab__FTJ(lab_type__ZSJH);
+                next__WBKH=new_lab__RTJ(lab_type__ZBKH);
               };
-              ((__POINTER *)next__WSJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__XSJH)[ 0]=next__WSJH;
+              ((__POINTER *)next__WBKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__XBKH)[ 0]=next__WBKH;
             } else {
-              ((__POINTER *)result__YSJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WSJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__YSJH=next__WSJH;
+              ((__POINTER *)result__YBKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WBKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__YBKH=next__WBKH;
             };
           };
-          ptr__MD1C=result__YSJH;
+          ptr__GA1C=result__YBKH;
         };
-        result__LD1C=((__ITM_LIST_IDF *)ptr__MD1C);
-        *(result__LD1C) = *(ITM_LIST_IDF__);
+        result__FA1C=((__ITM_LIST_IDF *)ptr__GA1C);
+        *(result__FA1C) = *(ITM_LIST_IDF__);
       };
-      ((__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)) {
+      ((__ITM_LIST_IDF *)result__FA1C)->parent_itm_code__1EJ.parent_itm_object__PFE.position__SFJ=p__IFRC;
+      result__GBJ=result__FA1C;
+      affect__IBJ=((__CHARACTER *)((__STRING_CONSTANT *)last_string__D2C)->storage__RRO)[ 0];
+      value__HBJ=read_expr__DBJ(Self__EBJ);
+      if (((void *)value__HBJ == (void *)NULL)) {
+        pos__MLYG=current_position__B0F();
+        put_error__text__1PG( 0,(&__string_239));
+        put_position__FRG(pos__MLYG);
+        put_string__33F(msg_err__AQG);
+        if ((type_error__5PG !=  2)) {
           exit(( 1));
         };
       };
-      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__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)));
+      if ((affect__IBJ == ':')) {
+        p__DCKH=result__FA1C->parent_itm_code__1EJ.parent_itm_object__PFE.position__SFJ;
+        result__1BKH=NULL;
+        ptr__2BKH=((__POINTER )(NULL));
+        typ_id__3BKH= 0;
+        sz__4BKH=((__UINTEGER_32 )sizeof(__ITM_WRITE_VALUE));
+        if ((sz__4BKH ==  0)) {
+          result__1BKH=ITM_WRITE_VALUE__;
+        } else {
+          typ_id__3BKH=-1;
+          clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__4BKH);
+          if ((typ_id__3BKH == (__INTEGER)(-  1))) {
+            a__5BKH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__ACKH=(__UINTEGER_32)((__UINTEGER_32)(sz__4BKH + a__5BKH) & (__UINTEGER_32)(~ a__5BKH));
+            ptr_table__FCKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ACKH / ((__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__RTJ(new_size__ACKH);
+              next__ECKH=(void *)((unsigned long)result__GCKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ACKH)));
+              ((__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__4XH)))) &  4095) + (__UINTEGER_32)(new_size__ACKH <<  1)) <=  4096)) {
+                  next__ECKH=(void *)((unsigned long)result__GCKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ACKH)));
                 } else {
-                  next__ETJH=new_lab__FTJ(new_size__ATJH);
+                  next__ECKH=new_lab__RTJ(new_size__ACKH);
                 };
-                ((__POINTER *)next__ETJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__FTJH)[ 0]=next__ETJH;
+                ((__POINTER *)next__ECKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__FCKH)[ 0]=next__ECKH;
               } else {
-                ((__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__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)));
+                ((__POINTER *)result__GCKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ECKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__GCKH=next__ECKH;
+              };
+            };
+            ptr__2BKH=result__GCKH;
+          } else {
+            t__BCKH=((__UINTEGER_32 )typ_id__3BKH);
+            a__CCKH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__NCKH=(__UINTEGER_32)((__UINTEGER_32)(sz__4BKH + a__CCKH) & (__UINTEGER_32)(~ a__CCKH));
+            ptr_table__KCKH=((__POINTER )(&(table_type[(t__BCKH)])));
+            lab_type__MCKH=(__UINTEGER_32)(t__BCKH |  1);
+            next__JCKH=((__POINTER )(NULL));
+            result__LCKH=((__POINTER *)ptr_table__KCKH)[ 0];
+            if ((result__LCKH == (void *)NULL)) {
+              result__LCKH=new_lab__RTJ(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__4XH)))) &  4095) + (__UINTEGER_32)(new_size__NCKH <<  1)) <=  4096)) {
+                  next__JCKH=(void *)((unsigned long)result__LCKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NCKH)));
                 } else {
-                  next__JTJH=new_lab__FTJ(lab_type__MTJH);
+                  next__JCKH=new_lab__RTJ(lab_type__MCKH);
                 };
-                ((__POINTER *)next__JTJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__KTJH)[ 0]=next__JTJH;
+                ((__POINTER *)next__JCKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__KCKH)[ 0]=next__JCKH;
               } else {
-                ((__POINTER *)result__LTJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JTJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__LTJH=next__JTJH;
+                ((__POINTER *)result__LCKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JCKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__LCKH=next__JCKH;
               };
             };
-            ptr__2SJH=result__LTJH;
+            ptr__2BKH=result__LCKH;
           };
-          result__1SJH=((__ITM_WRITE_VALUE *)ptr__2SJH);
-          *(result__1SJH) = *(ITM_WRITE_VALUE__);
+          result__1BKH=((__ITM_WRITE_VALUE *)ptr__2BKH);
+          *(result__1BKH) = *(ITM_WRITE_VALUE__);
         };
-        ((__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;
+        ((__ITM_WRITE_VALUE *)result__1BKH)->parent_itm_write__RFJ.parent_itm_code__QFJ.parent_itm_object__PFE.position__SFJ=p__DCKH;
+        result__GBJ=result__1BKH;
       };
-      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)) {
+      if ((affect__IBJ == '<')) {
+        pos__OLYG=current_position__B0F();
+        put_error__text__1PG( 0,(&__string_297));
+        put_position__FRG(pos__OLYG);
+        put_string__33F(msg_err__AQG);
+        if ((type_error__5PG !=  2)) {
           exit(( 1));
         };
       };
-      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)) {
+      if ((affect__IBJ == '?')) {
+        pos__QLYG=current_position__B0F();
+        put_error__text__1PG( 0,(&__string_298));
+        put_position__FRG(pos__QLYG);
+        put_string__33F(msg_err__AQG);
+        if ((type_error__5PG !=  2)) {
           exit(( 1));
         };
-        switch (((struct ___OBJ *)result__0AJ)->__id) {
+        switch (((struct ___OBJ *)result__GBJ)->__id) {
         case __ITM_LIST__: {
-          __tmp__3FJ=((__ITM_LIST *)result__0AJ)->parent_itm_code__VAF.parent_itm_object__SEE.position__GFJ;
+          __tmp__JGJ=((__ITM_LIST *)result__GBJ)->parent_itm_code__SBF.parent_itm_object__PFE.position__SFJ;
         } break;
         case __ITM_LDOTS__: {
-          __tmp__3FJ=((__ITM_LDOTS *)result__0AJ)->parent_itm_constant__LWF.parent_itm_object__SEE.position__GFJ;
+          __tmp__JGJ=((__ITM_LDOTS *)result__GBJ)->parent_itm_constant__IXF.parent_itm_object__PFE.position__SFJ;
         } break;
         case __ITM_PROTOTYPE__: {
-          __tmp__3FJ=((__ITM_PROTOTYPE *)result__0AJ)->parent_itm_constant__XXF.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
+          __tmp__JGJ=((__ITM_PROTOTYPE *)result__GBJ)->parent_itm_constant__UYF.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ;
         } break;
         case __ITM_LIST_IDF__: {
-          __tmp__3FJ=((__ITM_LIST_IDF *)result__0AJ)->parent_itm_code__PEJ.parent_itm_object__SEE.position__GFJ;
+          __tmp__JGJ=((__ITM_LIST_IDF *)result__GBJ)->parent_itm_code__1EJ.parent_itm_object__PFE.position__SFJ;
         } break;
         case __ITM_WRITE_VALUE__: {
-          __tmp__3FJ=((__ITM_WRITE_VALUE *)result__0AJ)->parent_itm_write__FFJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
+          __tmp__JGJ=((__ITM_WRITE_VALUE *)result__GBJ)->parent_itm_write__RFJ.parent_itm_code__QFJ.parent_itm_object__PFE.position__SFJ;
         } break;
         case __ITM_WRITE_CAST__: {
-          __tmp__3FJ=((__ITM_WRITE_CAST *)result__0AJ)->parent_itm_write__2FJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
+          __tmp__JGJ=((__ITM_WRITE_CAST *)result__GBJ)->parent_itm_write__IGJ.parent_itm_code__QFJ.parent_itm_object__PFE.position__SFJ;
         } break;
         case __ITM_READ__: {
-          __tmp__3FJ=((__ITM_READ *)result__0AJ)->parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
+          __tmp__JGJ=((__ITM_READ *)result__GBJ)->parent_itm_code__VIJ.parent_itm_object__PFE.position__SFJ;
         } break;
         case __ITM_WRITE_CODE__: {
-          __tmp__3FJ=((__ITM_WRITE_CODE *)result__0AJ)->parent_itm_write__HJJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
+          __tmp__JGJ=((__ITM_WRITE_CODE *)result__GBJ)->parent_itm_write__TJJ.parent_itm_code__QFJ.parent_itm_object__PFE.position__SFJ;
         } break;
         case __ITM_OPERATOR__: {
-          __tmp__3FJ=((__ITM_OPERATOR *)result__0AJ)->parent_itm_code__JGL.parent_itm_object__SEE.position__GFJ;
+          __tmp__JGJ=((__ITM_OPERATOR *)result__GBJ)->parent_itm_code__VGL.parent_itm_object__PFE.position__SFJ;
         } break;
         case __ITM_READ_ARG1__: {
-          __tmp__3FJ=((__ITM_READ_ARG1 *)result__0AJ)->parent_itm_read__PJL.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
+          __tmp__JGJ=((__ITM_READ_ARG1 *)result__GBJ)->parent_itm_read__1JL.parent_itm_code__VIJ.parent_itm_object__PFE.position__SFJ;
         } break;
         case __ITM_READ_ARG2__: {
-          __tmp__3FJ=((__ITM_READ_ARG2 *)result__0AJ)->parent_itm_read__2LL.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
+          __tmp__JGJ=((__ITM_READ_ARG2 *)result__GBJ)->parent_itm_read__IML.parent_itm_code__VIJ.parent_itm_object__PFE.position__SFJ;
         } break;
         case __ITM_EXPRESSION__: {
-          __tmp__3FJ=position__SE5B(result__0AJ);
+          __tmp__JGJ=position__5A5B(result__GBJ);
         } break;
         case __ITM_OLD__: {
-          __tmp__3FJ=((__ITM_OLD *)result__0AJ)->parent_itm_code__K3L.parent_itm_object__SEE.position__GFJ;
+          __tmp__JGJ=((__ITM_OLD *)result__GBJ)->parent_itm_code__W3L.parent_itm_object__PFE.position__SFJ;
         } break;
         case __ITM_EXTERNAL_TYPE__: {
-          __tmp__3FJ=((__ITM_EXTERNAL_TYPE *)result__0AJ)->parent_itm_extern__54M.parent_itm_code__44M.parent_itm_object__SEE.position__GFJ;
+          __tmp__JGJ=((__ITM_EXTERNAL_TYPE *)result__GBJ)->parent_itm_extern__L5M.parent_itm_code__K5M.parent_itm_object__PFE.position__SFJ;
         } break;
         case __ITM_BLOCK__: {
-          __tmp__3FJ=((__ITM_LIST *)((__ITM_BLOCK *)result__0AJ)->list__ZPDC)->parent_itm_code__VAF.parent_itm_object__SEE.position__GFJ;
+          __tmp__JGJ=((__ITM_LIST *)((__ITM_BLOCK *)result__GBJ)->list__KMDC)->parent_itm_code__SBF.parent_itm_object__PFE.position__SFJ;
         } break;
         case __ITM_EXTERNAL__: {
-          __tmp__3FJ=((__ITM_EXTERNAL *)result__0AJ)->parent_itm_extern__EGN.parent_itm_code__44M.parent_itm_object__SEE.position__GFJ;
+          __tmp__JGJ=((__ITM_EXTERNAL *)result__GBJ)->parent_itm_extern__QGN.parent_itm_code__K5M.parent_itm_object__PFE.position__SFJ;
         } break;
         case __ITM_READ_ARGS__: {
-          __tmp__3FJ=((__ITM_READ_ARGS *)result__0AJ)->parent_itm_read__0DO.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
+          __tmp__JGJ=((__ITM_READ_ARGS *)result__GBJ)->parent_itm_read__GEO.parent_itm_code__VIJ.parent_itm_object__PFE.position__SFJ;
         } break;
         case __ITM_REAL__: {
-          __tmp__3FJ=((__ITM_REAL *)result__0AJ)->parent_itm_constant__VRO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
+          __tmp__JGJ=((__ITM_REAL *)result__GBJ)->parent_itm_constant__BSO.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ;
         } break;
         case __ITM_NUMBER__: {
-          __tmp__3FJ=((__ITM_NUMBER *)result__0AJ)->parent_itm_constant__HSO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
+          __tmp__JGJ=((__ITM_NUMBER *)result__GBJ)->parent_itm_constant__TSO.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ;
         } break;
         case __ITM_CHARACTER__: {
-          __tmp__3FJ=((__ITM_CHARACTER *)result__0AJ)->parent_itm_constant__ZSO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
+          __tmp__JGJ=((__ITM_CHARACTER *)result__GBJ)->parent_itm_constant__FTO.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ;
         } break;
         case __ITM_STRING__: {
-          __tmp__3FJ=((__ITM_STRING *)result__0AJ)->parent_itm_constant__KTO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
+          __tmp__JGJ=((__ITM_STRING *)result__GBJ)->parent_itm_constant__WTO.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ;
         } break;
         case __ITM_RESULT__: {
-          __tmp__3FJ=position__4LHC(result__0AJ);
+          __tmp__JGJ=position__PIHC(result__GBJ);
         } break;
         };
-        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__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)));
+        result__OCKH=NULL;
+        ptr__PCKH=((__POINTER )(NULL));
+        typ_id__QCKH= 0;
+        sz__RCKH=((__UINTEGER_32 )sizeof(__ITM_WRITE_CAST));
+        if ((sz__RCKH ==  0)) {
+          result__OCKH=ITM_WRITE_CAST__;
+        } else {
+          typ_id__QCKH=-1;
+          clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__RCKH);
+          if ((typ_id__QCKH == (__INTEGER)(-  1))) {
+            a__SCKH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__TCKH=(__UINTEGER_32)((__UINTEGER_32)(sz__RCKH + a__SCKH) & (__UINTEGER_32)(~ a__SCKH));
+            ptr_table__YCKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__TCKH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__XCKH=((__POINTER )(NULL));
+            result__ZCKH=((__POINTER *)ptr_table__YCKH)[ 0];
+            if ((result__ZCKH == (void *)NULL)) {
+              result__ZCKH=new_lab__RTJ(new_size__TCKH);
+              next__XCKH=(void *)((unsigned long)result__ZCKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TCKH)));
+              ((__POINTER *)next__XCKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__YCKH)[ 0]=next__XCKH;
+            } else {
+              next__XCKH=((__POINTER *)result__ZCKH)[ 0];
+              if ((next__XCKH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ZCKH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__TCKH <<  1)) <=  4096)) {
+                  next__XCKH=(void *)((unsigned long)result__ZCKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TCKH)));
                 } else {
-                  next__XTJH=new_lab__FTJ(new_size__TTJH);
+                  next__XCKH=new_lab__RTJ(new_size__TCKH);
                 };
-                ((__POINTER *)next__XTJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__YTJH)[ 0]=next__XTJH;
+                ((__POINTER *)next__XCKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__YCKH)[ 0]=next__XCKH;
               } else {
-                ((__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__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)));
+                ((__POINTER *)result__ZCKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XCKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__ZCKH=next__XCKH;
+              };
+            };
+            ptr__PCKH=result__ZCKH;
+          } else {
+            t__UCKH=((__UINTEGER_32 )typ_id__QCKH);
+            a__VCKH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__ADKH=(__UINTEGER_32)((__UINTEGER_32)(sz__RCKH + a__VCKH) & (__UINTEGER_32)(~ a__VCKH));
+            ptr_table__3CKH=((__POINTER )(&(table_type[(t__UCKH)])));
+            lab_type__5CKH=(__UINTEGER_32)(t__UCKH |  1);
+            next__2CKH=((__POINTER )(NULL));
+            result__4CKH=((__POINTER *)ptr_table__3CKH)[ 0];
+            if ((result__4CKH == (void *)NULL)) {
+              result__4CKH=new_lab__RTJ(lab_type__5CKH);
+              next__2CKH=(void *)((unsigned long)result__4CKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ADKH)));
+              ((__POINTER *)next__2CKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__3CKH)[ 0]=next__2CKH;
+            } else {
+              next__2CKH=((__POINTER *)result__4CKH)[ 0];
+              if ((next__2CKH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4CKH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__ADKH <<  1)) <=  4096)) {
+                  next__2CKH=(void *)((unsigned long)result__4CKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ADKH)));
                 } else {
-                  next__2TJH=new_lab__FTJ(lab_type__5TJH);
+                  next__2CKH=new_lab__RTJ(lab_type__5CKH);
                 };
-                ((__POINTER *)next__2TJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__3TJH)[ 0]=next__2TJH;
+                ((__POINTER *)next__2CKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__3CKH)[ 0]=next__2CKH;
               } else {
-                ((__POINTER *)result__4TJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2TJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__4TJH=next__2TJH;
+                ((__POINTER *)result__4CKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2CKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__4CKH=next__2CKH;
               };
             };
-            ptr__PTJH=result__4TJH;
+            ptr__PCKH=result__4CKH;
           };
-          result__OTJH=((__ITM_WRITE_CAST *)ptr__PTJH);
-          *(result__OTJH) = *(ITM_WRITE_CAST__);
+          result__OCKH=((__ITM_WRITE_CAST *)ptr__PCKH);
+          *(result__OCKH) = *(ITM_WRITE_CAST__);
         };
-        ((__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;
+        ((__ITM_WRITE_CAST *)result__OCKH)->parent_itm_write__IGJ.parent_itm_code__QFJ.parent_itm_object__PFE.position__SFJ=__tmp__JGJ;
+        result__GBJ=result__OCKH;
       };
     } else {
-      free__EV5(l_assignment__BBJ);
+      free__TR5(l_assignment__NBJ);
     };
-    __tmp__JGJ=TRUE__;
+    __tmp__VGJ=TRUE__;
   } else {
-    __tmp__JGJ=FALSE__;
+    __tmp__VGJ=FALSE__;
   };
-  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);
+  if ((! __tmp__VGJ)) {
+    if (read_identifier__2BL()) {
+      p__OBJ=(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__D2C)->count__DD);
+      copy__VDS(string_tmp2__GCJ,last_string__D2C);
+      while (read_identifier__2BL()) {
+        append__3OS(string_tmp2__GCJ,(&__string_112));
+        append__3OS(string_tmp2__GCJ,last_string__D2C);
       };
-      name__DBJ=get__YWB(string_tmp2__0BJ);
+      name__PBJ=get__YWB(string_tmp2__GCJ);
       if (is_shorter__LZ) {
-        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__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)));
+        if ((! fast_has__RDV(short_local__XCC,name__PBJ))) {
+          short__token__to__GDD((&__string_131),p__OBJ,position__CCC);
+        };
+      };
+      if (((read_symbol__4YJ((&__string_12)) || read_symbol__4YJ((&__string_13))) || read_symbol__4YJ((&__string_14)))) {
+        p__JDKH=current_position__B0F();
+        result__BDKH=NULL;
+        ptr__CDKH=((__POINTER )(NULL));
+        typ_id__DDKH= 0;
+        sz__EDKH=((__UINTEGER_32 )sizeof(__ITM_READ));
+        if ((sz__EDKH ==  0)) {
+          result__BDKH=ITM_READ__;
+        } else {
+          typ_id__DDKH=-1;
+          clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__EDKH);
+          if ((typ_id__DDKH == (__INTEGER)(-  1))) {
+            a__FDKH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__GDKH=(__UINTEGER_32)((__UINTEGER_32)(sz__EDKH + a__FDKH) & (__UINTEGER_32)(~ a__FDKH));
+            ptr_table__LDKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__GDKH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__KDKH=((__POINTER )(NULL));
+            result__MDKH=((__POINTER *)ptr_table__LDKH)[ 0];
+            if ((result__MDKH == (void *)NULL)) {
+              result__MDKH=new_lab__RTJ(new_size__GDKH);
+              next__KDKH=(void *)((unsigned long)result__MDKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GDKH)));
+              ((__POINTER *)next__KDKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__LDKH)[ 0]=next__KDKH;
+            } else {
+              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__4XH)))) &  4095) + (__UINTEGER_32)(new_size__GDKH <<  1)) <=  4096)) {
+                  next__KDKH=(void *)((unsigned long)result__MDKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GDKH)));
                 } else {
-                  next__KUJH=new_lab__FTJ(new_size__GUJH);
+                  next__KDKH=new_lab__RTJ(new_size__GDKH);
                 };
-                ((__POINTER *)next__KUJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__LUJH)[ 0]=next__KUJH;
+                ((__POINTER *)next__KDKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__LDKH)[ 0]=next__KDKH;
               } else {
-                ((__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__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)));
+                ((__POINTER *)result__MDKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KDKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__MDKH=next__KDKH;
+              };
+            };
+            ptr__CDKH=result__MDKH;
+          } else {
+            t__HDKH=((__UINTEGER_32 )typ_id__DDKH);
+            a__IDKH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__TDKH=(__UINTEGER_32)((__UINTEGER_32)(sz__EDKH + a__IDKH) & (__UINTEGER_32)(~ a__IDKH));
+            ptr_table__QDKH=((__POINTER )(&(table_type[(t__HDKH)])));
+            lab_type__SDKH=(__UINTEGER_32)(t__HDKH |  1);
+            next__PDKH=((__POINTER )(NULL));
+            result__RDKH=((__POINTER *)ptr_table__QDKH)[ 0];
+            if ((result__RDKH == (void *)NULL)) {
+              result__RDKH=new_lab__RTJ(lab_type__SDKH);
+              next__PDKH=(void *)((unsigned long)result__RDKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TDKH)));
+              ((__POINTER *)next__PDKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__QDKH)[ 0]=next__PDKH;
+            } 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__4XH)))) &  4095) + (__UINTEGER_32)(new_size__TDKH <<  1)) <=  4096)) {
+                  next__PDKH=(void *)((unsigned long)result__RDKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TDKH)));
                 } else {
-                  next__PUJH=new_lab__FTJ(lab_type__SUJH);
+                  next__PDKH=new_lab__RTJ(lab_type__SDKH);
                 };
-                ((__POINTER *)next__PUJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__QUJH)[ 0]=next__PUJH;
+                ((__POINTER *)next__PDKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__QDKH)[ 0]=next__PDKH;
               } else {
-                ((__POINTER *)result__RUJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PUJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__RUJH=next__PUJH;
+                ((__POINTER *)result__RDKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PDKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__RDKH=next__PDKH;
               };
             };
-            ptr__CUJH=result__RUJH;
+            ptr__CDKH=result__RDKH;
           };
-          result__BUJH=((__ITM_READ *)ptr__CUJH);
-          *(result__BUJH) = *(ITM_READ__);
+          result__BDKH=((__ITM_READ *)ptr__CDKH);
+          *(result__BDKH) = *(ITM_READ__);
         };
-        ((__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)) {
+        ((__ITM_READ *)result__BDKH)->parent_itm_code__VIJ.parent_itm_object__PFE.position__SFJ=p__JDKH;
+        result__GBJ=result__BDKH;
+        affect__IBJ=((__CHARACTER *)((__STRING_CONSTANT *)last_string__D2C)->storage__RRO)[ 0];
+        value__HBJ=read_expr__DBJ(Self__EBJ);
+        if (((void *)value__HBJ == (void *)NULL)) {
+          pos__ULYG=current_position__B0F();
+          put_error__text__1PG( 0,(&__string_239));
+          put_position__FRG(pos__ULYG);
+          put_string__33F(msg_err__AQG);
+          if ((type_error__5PG !=  2)) {
             exit(( 1));
           };
         };
-        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;
+        if ((affect__IBJ == ':')) {
+          __tmp__KJJ=result__BDKH->parent_itm_code__VIJ.parent_itm_object__PFE.position__SFJ;
+          result__4RJD=NULL;
+          ptr__5RJD=((__POINTER )(NULL));
+          typ_id__ESJD= 0;
+          sz__BSJD=((__UINTEGER_32 )sizeof(__ITM_WRITE_VALUE));
+          if ((sz__BSJD ==  0)) {
+            result__4RJD=ITM_WRITE_VALUE__;
+          } else {
+            typ_id__ESJD=-1;
+            clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__BSJD);
+            if ((typ_id__ESJD == (__INTEGER)(-  1))) {
+              a__UEGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__VEGH=(__UINTEGER_32)((__UINTEGER_32)(sz__BSJD + a__UEGH) & (__UINTEGER_32)(~ a__UEGH));
+              ptr_table__VDKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__VEGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__UDKH=((__POINTER )(NULL));
+              result__WDKH=((__POINTER *)ptr_table__VDKH)[ 0];
+              if ((result__WDKH == (void *)NULL)) {
+                result__WDKH=new_lab__RTJ(new_size__VEGH);
+                next__UDKH=(void *)((unsigned long)result__WDKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VEGH)));
+                ((__POINTER *)next__UDKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__VDKH)[ 0]=next__UDKH;
               } else {
-                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)));
+                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__4XH)))) &  4095) + (__UINTEGER_32)(new_size__VEGH <<  1)) <=  4096)) {
+                    next__UDKH=(void *)((unsigned long)result__WDKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VEGH)));
                   } else {
-                    next__UUJH=new_lab__FTJ(new_size__V1GH);
+                    next__UDKH=new_lab__RTJ(new_size__VEGH);
                   };
-                  ((__POINTER *)next__UUJH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__VUJH)[ 0]=next__UUJH;
+                  ((__POINTER *)next__UDKH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__VDKH)[ 0]=next__UDKH;
                 } else {
-                  ((__POINTER *)result__WUJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UUJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__WUJH=next__UUJH;
+                  ((__POINTER *)result__WDKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UDKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__WDKH=next__UDKH;
                 };
               };
-              ptr__0QJD=result__WUJH;
-            } else {
-              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;
+              ptr__5RJD=result__WDKH;
+            } else {
+              t__ZEGH=((__UINTEGER_32 )typ_id__ESJD);
+              a__YEGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__3DKH=(__UINTEGER_32)((__UINTEGER_32)(sz__BSJD + a__YEGH) & (__UINTEGER_32)(~ a__YEGH));
+              ptr_table__0DKH=((__POINTER )(&(table_type[(t__ZEGH)])));
+              lab_type__2DKH=(__UINTEGER_32)(t__ZEGH |  1);
+              next__ZDKH=((__POINTER )(NULL));
+              result__1DKH=((__POINTER *)ptr_table__0DKH)[ 0];
+              if ((result__1DKH == (void *)NULL)) {
+                result__1DKH=new_lab__RTJ(lab_type__2DKH);
+                next__ZDKH=(void *)((unsigned long)result__1DKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3DKH)));
+                ((__POINTER *)next__ZDKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__0DKH)[ 0]=next__ZDKH;
               } else {
-                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)));
+                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__4XH)))) &  4095) + (__UINTEGER_32)(new_size__3DKH <<  1)) <=  4096)) {
+                    next__ZDKH=(void *)((unsigned long)result__1DKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3DKH)));
                   } else {
-                    next__ZUJH=new_lab__FTJ(lab_type__2UJH);
+                    next__ZDKH=new_lab__RTJ(lab_type__2DKH);
                   };
-                  ((__POINTER *)next__ZUJH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__0UJH)[ 0]=next__ZUJH;
+                  ((__POINTER *)next__ZDKH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__0DKH)[ 0]=next__ZDKH;
                 } else {
-                  ((__POINTER *)result__1UJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZUJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__1UJH=next__ZUJH;
+                  ((__POINTER *)result__1DKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZDKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__1DKH=next__ZDKH;
                 };
               };
-              ptr__0QJD=result__1UJH;
+              ptr__5RJD=result__1DKH;
             };
-            result__ZQJD=((__ITM_WRITE_VALUE *)ptr__0QJD);
-            *(result__ZQJD) = *(ITM_WRITE_VALUE__);
+            result__4RJD=((__ITM_WRITE_VALUE *)ptr__5RJD);
+            *(result__4RJD) = *(ITM_WRITE_VALUE__);
           };
-          ((__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;
+          ((__ITM_WRITE_VALUE *)result__4RJD)->parent_itm_write__RFJ.parent_itm_code__QFJ.parent_itm_object__PFE.position__SFJ=__tmp__KJJ;
+          result__GBJ=result__4RJD;
         };
-        if ((affect__2AJ == '<')) {
-          switch (((struct ___OBJ *)result__0AJ)->__id) {
+        if ((affect__IBJ == '<')) {
+          switch (((struct ___OBJ *)result__GBJ)->__id) {
           case __ITM_LIST__: {
-            __tmp__IJJ=((__ITM_LIST *)result__0AJ)->parent_itm_code__VAF.parent_itm_object__SEE.position__GFJ;
+            __tmp__UJJ=((__ITM_LIST *)result__GBJ)->parent_itm_code__SBF.parent_itm_object__PFE.position__SFJ;
           } break;
           case __ITM_LDOTS__: {
-            __tmp__IJJ=((__ITM_LDOTS *)result__0AJ)->parent_itm_constant__LWF.parent_itm_object__SEE.position__GFJ;
+            __tmp__UJJ=((__ITM_LDOTS *)result__GBJ)->parent_itm_constant__IXF.parent_itm_object__PFE.position__SFJ;
           } break;
           case __ITM_PROTOTYPE__: {
-            __tmp__IJJ=((__ITM_PROTOTYPE *)result__0AJ)->parent_itm_constant__XXF.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
+            __tmp__UJJ=((__ITM_PROTOTYPE *)result__GBJ)->parent_itm_constant__UYF.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ;
           } break;
           case __ITM_LIST_IDF__: {
-            __tmp__IJJ=((__ITM_LIST_IDF *)result__0AJ)->parent_itm_code__PEJ.parent_itm_object__SEE.position__GFJ;
+            __tmp__UJJ=((__ITM_LIST_IDF *)result__GBJ)->parent_itm_code__1EJ.parent_itm_object__PFE.position__SFJ;
           } break;
           case __ITM_WRITE_VALUE__: {
-            __tmp__IJJ=((__ITM_WRITE_VALUE *)result__0AJ)->parent_itm_write__FFJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
+            __tmp__UJJ=((__ITM_WRITE_VALUE *)result__GBJ)->parent_itm_write__RFJ.parent_itm_code__QFJ.parent_itm_object__PFE.position__SFJ;
           } break;
           case __ITM_WRITE_CAST__: {
-            __tmp__IJJ=((__ITM_WRITE_CAST *)result__0AJ)->parent_itm_write__2FJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
+            __tmp__UJJ=((__ITM_WRITE_CAST *)result__GBJ)->parent_itm_write__IGJ.parent_itm_code__QFJ.parent_itm_object__PFE.position__SFJ;
           } break;
           case __ITM_READ__: {
-            __tmp__IJJ=((__ITM_READ *)result__0AJ)->parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
+            __tmp__UJJ=((__ITM_READ *)result__GBJ)->parent_itm_code__VIJ.parent_itm_object__PFE.position__SFJ;
           } break;
           case __ITM_WRITE_CODE__: {
-            __tmp__IJJ=((__ITM_WRITE_CODE *)result__0AJ)->parent_itm_write__HJJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
+            __tmp__UJJ=((__ITM_WRITE_CODE *)result__GBJ)->parent_itm_write__TJJ.parent_itm_code__QFJ.parent_itm_object__PFE.position__SFJ;
           } break;
           case __ITM_OPERATOR__: {
-            __tmp__IJJ=((__ITM_OPERATOR *)result__0AJ)->parent_itm_code__JGL.parent_itm_object__SEE.position__GFJ;
+            __tmp__UJJ=((__ITM_OPERATOR *)result__GBJ)->parent_itm_code__VGL.parent_itm_object__PFE.position__SFJ;
           } break;
           case __ITM_READ_ARG1__: {
-            __tmp__IJJ=((__ITM_READ_ARG1 *)result__0AJ)->parent_itm_read__PJL.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
+            __tmp__UJJ=((__ITM_READ_ARG1 *)result__GBJ)->parent_itm_read__1JL.parent_itm_code__VIJ.parent_itm_object__PFE.position__SFJ;
           } break;
           case __ITM_READ_ARG2__: {
-            __tmp__IJJ=((__ITM_READ_ARG2 *)result__0AJ)->parent_itm_read__2LL.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
+            __tmp__UJJ=((__ITM_READ_ARG2 *)result__GBJ)->parent_itm_read__IML.parent_itm_code__VIJ.parent_itm_object__PFE.position__SFJ;
           } break;
           case __ITM_EXPRESSION__: {
-            __tmp__IJJ=position__SE5B(result__0AJ);
+            __tmp__UJJ=position__5A5B(result__GBJ);
           } break;
           case __ITM_OLD__: {
-            __tmp__IJJ=((__ITM_OLD *)result__0AJ)->parent_itm_code__K3L.parent_itm_object__SEE.position__GFJ;
+            __tmp__UJJ=((__ITM_OLD *)result__GBJ)->parent_itm_code__W3L.parent_itm_object__PFE.position__SFJ;
           } break;
           case __ITM_EXTERNAL_TYPE__: {
-            __tmp__IJJ=((__ITM_EXTERNAL_TYPE *)result__0AJ)->parent_itm_extern__54M.parent_itm_code__44M.parent_itm_object__SEE.position__GFJ;
+            __tmp__UJJ=((__ITM_EXTERNAL_TYPE *)result__GBJ)->parent_itm_extern__L5M.parent_itm_code__K5M.parent_itm_object__PFE.position__SFJ;
           } break;
           case __ITM_BLOCK__: {
-            __tmp__IJJ=((__ITM_LIST *)((__ITM_BLOCK *)result__0AJ)->list__ZPDC)->parent_itm_code__VAF.parent_itm_object__SEE.position__GFJ;
+            __tmp__UJJ=((__ITM_LIST *)((__ITM_BLOCK *)result__GBJ)->list__KMDC)->parent_itm_code__SBF.parent_itm_object__PFE.position__SFJ;
           } break;
           case __ITM_EXTERNAL__: {
-            __tmp__IJJ=((__ITM_EXTERNAL *)result__0AJ)->parent_itm_extern__EGN.parent_itm_code__44M.parent_itm_object__SEE.position__GFJ;
+            __tmp__UJJ=((__ITM_EXTERNAL *)result__GBJ)->parent_itm_extern__QGN.parent_itm_code__K5M.parent_itm_object__PFE.position__SFJ;
           } break;
           case __ITM_READ_ARGS__: {
-            __tmp__IJJ=((__ITM_READ_ARGS *)result__0AJ)->parent_itm_read__0DO.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
+            __tmp__UJJ=((__ITM_READ_ARGS *)result__GBJ)->parent_itm_read__GEO.parent_itm_code__VIJ.parent_itm_object__PFE.position__SFJ;
           } break;
           case __ITM_REAL__: {
-            __tmp__IJJ=((__ITM_REAL *)result__0AJ)->parent_itm_constant__VRO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
+            __tmp__UJJ=((__ITM_REAL *)result__GBJ)->parent_itm_constant__BSO.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ;
           } break;
           case __ITM_NUMBER__: {
-            __tmp__IJJ=((__ITM_NUMBER *)result__0AJ)->parent_itm_constant__HSO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
+            __tmp__UJJ=((__ITM_NUMBER *)result__GBJ)->parent_itm_constant__TSO.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ;
           } break;
           case __ITM_CHARACTER__: {
-            __tmp__IJJ=((__ITM_CHARACTER *)result__0AJ)->parent_itm_constant__ZSO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
+            __tmp__UJJ=((__ITM_CHARACTER *)result__GBJ)->parent_itm_constant__FTO.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ;
           } break;
           case __ITM_STRING__: {
-            __tmp__IJJ=((__ITM_STRING *)result__0AJ)->parent_itm_constant__KTO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
+            __tmp__UJJ=((__ITM_STRING *)result__GBJ)->parent_itm_constant__WTO.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ;
           } break;
           case __ITM_RESULT__: {
-            __tmp__IJJ=position__4LHC(result__0AJ);
+            __tmp__UJJ=position__PIHC(result__GBJ);
           } break;
           };
-          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;
+          result__25JD=NULL;
+          ptr__35JD=((__POINTER )(NULL));
+          typ_id__CAKD= 0;
+          sz__55JD=((__UINTEGER_32 )sizeof(__ITM_WRITE_CODE));
+          if ((sz__55JD ==  0)) {
+            result__25JD=ITM_WRITE_CODE__;
+          } else {
+            typ_id__CAKD=-1;
+            clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__55JD);
+            if ((typ_id__CAKD == (__INTEGER)(-  1))) {
+              a__4WFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__5WFH=(__UINTEGER_32)((__UINTEGER_32)(sz__55JD + a__4WFH) & (__UINTEGER_32)(~ a__4WFH));
+              ptr_table__5DKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__5WFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__4DKH=((__POINTER )(NULL));
+              result__AEKH=((__POINTER *)ptr_table__5DKH)[ 0];
+              if ((result__AEKH == (void *)NULL)) {
+                result__AEKH=new_lab__RTJ(new_size__5WFH);
+                next__4DKH=(void *)((unsigned long)result__AEKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5WFH)));
+                ((__POINTER *)next__4DKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__5DKH)[ 0]=next__4DKH;
               } else {
-                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)));
+                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__4XH)))) &  4095) + (__UINTEGER_32)(new_size__5WFH <<  1)) <=  4096)) {
+                    next__4DKH=(void *)((unsigned long)result__AEKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5WFH)));
                   } else {
-                    next__4UJH=new_lab__FTJ(new_size__2MGH);
+                    next__4DKH=new_lab__RTJ(new_size__5WFH);
                   };
-                  ((__POINTER *)next__4UJH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__5UJH)[ 0]=next__4UJH;
+                  ((__POINTER *)next__4DKH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__5DKH)[ 0]=next__4DKH;
                 } else {
-                  ((__POINTER *)result__AVJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4UJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__AVJH=next__4UJH;
+                  ((__POINTER *)result__AEKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4DKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__AEKH=next__4DKH;
                 };
               };
-              ptr__Y4JD=result__AVJH;
-            } else {
-              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;
+              ptr__35JD=result__AEKH;
+            } else {
+              t__DXFH=((__UINTEGER_32 )typ_id__CAKD);
+              a__CXFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__HEKH=(__UINTEGER_32)((__UINTEGER_32)(sz__55JD + a__CXFH) & (__UINTEGER_32)(~ a__CXFH));
+              ptr_table__EEKH=((__POINTER )(&(table_type[(t__DXFH)])));
+              lab_type__GEKH=(__UINTEGER_32)(t__DXFH |  1);
+              next__DEKH=((__POINTER )(NULL));
+              result__FEKH=((__POINTER *)ptr_table__EEKH)[ 0];
+              if ((result__FEKH == (void *)NULL)) {
+                result__FEKH=new_lab__RTJ(lab_type__GEKH);
+                next__DEKH=(void *)((unsigned long)result__FEKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HEKH)));
+                ((__POINTER *)next__DEKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__EEKH)[ 0]=next__DEKH;
               } else {
-                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)));
+                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__4XH)))) &  4095) + (__UINTEGER_32)(new_size__HEKH <<  1)) <=  4096)) {
+                    next__DEKH=(void *)((unsigned long)result__FEKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HEKH)));
                   } else {
-                    next__DVJH=new_lab__FTJ(lab_type__GVJH);
+                    next__DEKH=new_lab__RTJ(lab_type__GEKH);
                   };
-                  ((__POINTER *)next__DVJH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__EVJH)[ 0]=next__DVJH;
+                  ((__POINTER *)next__DEKH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__EEKH)[ 0]=next__DEKH;
                 } else {
-                  ((__POINTER *)result__FVJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DVJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__FVJH=next__DVJH;
+                  ((__POINTER *)result__FEKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DEKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__FEKH=next__DEKH;
                 };
               };
-              ptr__Y4JD=result__FVJH;
+              ptr__35JD=result__FEKH;
             };
-            result__X4JD=((__ITM_WRITE_CODE *)ptr__Y4JD);
-            *(result__X4JD) = *(ITM_WRITE_CODE__);
+            result__25JD=((__ITM_WRITE_CODE *)ptr__35JD);
+            *(result__25JD) = *(ITM_WRITE_CODE__);
           };
-          ((__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;
+          ((__ITM_WRITE_CODE *)result__25JD)->parent_itm_write__TJJ.parent_itm_code__QFJ.parent_itm_object__PFE.position__SFJ=__tmp__UJJ;
+          result__GBJ=result__25JD;
         };
-        if ((affect__2AJ == '?')) {
-          switch (((struct ___OBJ *)result__0AJ)->__id) {
+        if ((affect__IBJ == '?')) {
+          switch (((struct ___OBJ *)result__GBJ)->__id) {
           case __ITM_LIST__: {
-            __tmp__RJJ=((__ITM_LIST *)result__0AJ)->parent_itm_code__VAF.parent_itm_object__SEE.position__GFJ;
+            __tmp__3JJ=((__ITM_LIST *)result__GBJ)->parent_itm_code__SBF.parent_itm_object__PFE.position__SFJ;
           } break;
           case __ITM_LDOTS__: {
-            __tmp__RJJ=((__ITM_LDOTS *)result__0AJ)->parent_itm_constant__LWF.parent_itm_object__SEE.position__GFJ;
+            __tmp__3JJ=((__ITM_LDOTS *)result__GBJ)->parent_itm_constant__IXF.parent_itm_object__PFE.position__SFJ;
           } break;
           case __ITM_PROTOTYPE__: {
-            __tmp__RJJ=((__ITM_PROTOTYPE *)result__0AJ)->parent_itm_constant__XXF.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
+            __tmp__3JJ=((__ITM_PROTOTYPE *)result__GBJ)->parent_itm_constant__UYF.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ;
           } break;
           case __ITM_LIST_IDF__: {
-            __tmp__RJJ=((__ITM_LIST_IDF *)result__0AJ)->parent_itm_code__PEJ.parent_itm_object__SEE.position__GFJ;
+            __tmp__3JJ=((__ITM_LIST_IDF *)result__GBJ)->parent_itm_code__1EJ.parent_itm_object__PFE.position__SFJ;
           } break;
           case __ITM_WRITE_VALUE__: {
-            __tmp__RJJ=((__ITM_WRITE_VALUE *)result__0AJ)->parent_itm_write__FFJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
+            __tmp__3JJ=((__ITM_WRITE_VALUE *)result__GBJ)->parent_itm_write__RFJ.parent_itm_code__QFJ.parent_itm_object__PFE.position__SFJ;
           } break;
           case __ITM_WRITE_CAST__: {
-            __tmp__RJJ=((__ITM_WRITE_CAST *)result__0AJ)->parent_itm_write__2FJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
+            __tmp__3JJ=((__ITM_WRITE_CAST *)result__GBJ)->parent_itm_write__IGJ.parent_itm_code__QFJ.parent_itm_object__PFE.position__SFJ;
           } break;
           case __ITM_READ__: {
-            __tmp__RJJ=((__ITM_READ *)result__0AJ)->parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
+            __tmp__3JJ=((__ITM_READ *)result__GBJ)->parent_itm_code__VIJ.parent_itm_object__PFE.position__SFJ;
           } break;
           case __ITM_WRITE_CODE__: {
-            __tmp__RJJ=((__ITM_WRITE_CODE *)result__0AJ)->parent_itm_write__HJJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
+            __tmp__3JJ=((__ITM_WRITE_CODE *)result__GBJ)->parent_itm_write__TJJ.parent_itm_code__QFJ.parent_itm_object__PFE.position__SFJ;
           } break;
           case __ITM_OPERATOR__: {
-            __tmp__RJJ=((__ITM_OPERATOR *)result__0AJ)->parent_itm_code__JGL.parent_itm_object__SEE.position__GFJ;
+            __tmp__3JJ=((__ITM_OPERATOR *)result__GBJ)->parent_itm_code__VGL.parent_itm_object__PFE.position__SFJ;
           } break;
           case __ITM_READ_ARG1__: {
-            __tmp__RJJ=((__ITM_READ_ARG1 *)result__0AJ)->parent_itm_read__PJL.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
+            __tmp__3JJ=((__ITM_READ_ARG1 *)result__GBJ)->parent_itm_read__1JL.parent_itm_code__VIJ.parent_itm_object__PFE.position__SFJ;
           } break;
           case __ITM_READ_ARG2__: {
-            __tmp__RJJ=((__ITM_READ_ARG2 *)result__0AJ)->parent_itm_read__2LL.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
+            __tmp__3JJ=((__ITM_READ_ARG2 *)result__GBJ)->parent_itm_read__IML.parent_itm_code__VIJ.parent_itm_object__PFE.position__SFJ;
           } break;
           case __ITM_EXPRESSION__: {
-            __tmp__RJJ=position__SE5B(result__0AJ);
+            __tmp__3JJ=position__5A5B(result__GBJ);
           } break;
           case __ITM_OLD__: {
-            __tmp__RJJ=((__ITM_OLD *)result__0AJ)->parent_itm_code__K3L.parent_itm_object__SEE.position__GFJ;
+            __tmp__3JJ=((__ITM_OLD *)result__GBJ)->parent_itm_code__W3L.parent_itm_object__PFE.position__SFJ;
           } break;
           case __ITM_EXTERNAL_TYPE__: {
-            __tmp__RJJ=((__ITM_EXTERNAL_TYPE *)result__0AJ)->parent_itm_extern__54M.parent_itm_code__44M.parent_itm_object__SEE.position__GFJ;
+            __tmp__3JJ=((__ITM_EXTERNAL_TYPE *)result__GBJ)->parent_itm_extern__L5M.parent_itm_code__K5M.parent_itm_object__PFE.position__SFJ;
           } break;
           case __ITM_BLOCK__: {
-            __tmp__RJJ=((__ITM_LIST *)((__ITM_BLOCK *)result__0AJ)->list__ZPDC)->parent_itm_code__VAF.parent_itm_object__SEE.position__GFJ;
+            __tmp__3JJ=((__ITM_LIST *)((__ITM_BLOCK *)result__GBJ)->list__KMDC)->parent_itm_code__SBF.parent_itm_object__PFE.position__SFJ;
           } break;
           case __ITM_EXTERNAL__: {
-            __tmp__RJJ=((__ITM_EXTERNAL *)result__0AJ)->parent_itm_extern__EGN.parent_itm_code__44M.parent_itm_object__SEE.position__GFJ;
+            __tmp__3JJ=((__ITM_EXTERNAL *)result__GBJ)->parent_itm_extern__QGN.parent_itm_code__K5M.parent_itm_object__PFE.position__SFJ;
           } break;
           case __ITM_READ_ARGS__: {
-            __tmp__RJJ=((__ITM_READ_ARGS *)result__0AJ)->parent_itm_read__0DO.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
+            __tmp__3JJ=((__ITM_READ_ARGS *)result__GBJ)->parent_itm_read__GEO.parent_itm_code__VIJ.parent_itm_object__PFE.position__SFJ;
           } break;
           case __ITM_REAL__: {
-            __tmp__RJJ=((__ITM_REAL *)result__0AJ)->parent_itm_constant__VRO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
+            __tmp__3JJ=((__ITM_REAL *)result__GBJ)->parent_itm_constant__BSO.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ;
           } break;
           case __ITM_NUMBER__: {
-            __tmp__RJJ=((__ITM_NUMBER *)result__0AJ)->parent_itm_constant__HSO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
+            __tmp__3JJ=((__ITM_NUMBER *)result__GBJ)->parent_itm_constant__TSO.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ;
           } break;
           case __ITM_CHARACTER__: {
-            __tmp__RJJ=((__ITM_CHARACTER *)result__0AJ)->parent_itm_constant__ZSO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
+            __tmp__3JJ=((__ITM_CHARACTER *)result__GBJ)->parent_itm_constant__FTO.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ;
           } break;
           case __ITM_STRING__: {
-            __tmp__RJJ=((__ITM_STRING *)result__0AJ)->parent_itm_constant__KTO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
+            __tmp__3JJ=((__ITM_STRING *)result__GBJ)->parent_itm_constant__WTO.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ;
           } break;
           case __ITM_RESULT__: {
-            __tmp__RJJ=position__4LHC(result__0AJ);
+            __tmp__3JJ=position__PIHC(result__GBJ);
           } break;
           };
-          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;
+          result__RTJD=NULL;
+          ptr__STJD=((__POINTER )(NULL));
+          typ_id__XTJD= 0;
+          sz__UTJD=((__UINTEGER_32 )sizeof(__ITM_WRITE_CAST));
+          if ((sz__UTJD ==  0)) {
+            result__RTJD=ITM_WRITE_CAST__;
+          } else {
+            typ_id__XTJD=-1;
+            clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__UTJD);
+            if ((typ_id__XTJD == (__INTEGER)(-  1))) {
+              a__2EGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__3EGH=(__UINTEGER_32)((__UINTEGER_32)(sz__UTJD + a__2EGH) & (__UINTEGER_32)(~ a__2EGH));
+              ptr_table__JEKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__3EGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__IEKH=((__POINTER )(NULL));
+              result__KEKH=((__POINTER *)ptr_table__JEKH)[ 0];
+              if ((result__KEKH == (void *)NULL)) {
+                result__KEKH=new_lab__RTJ(new_size__3EGH);
+                next__IEKH=(void *)((unsigned long)result__KEKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3EGH)));
+                ((__POINTER *)next__IEKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__JEKH)[ 0]=next__IEKH;
               } else {
-                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)));
+                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__4XH)))) &  4095) + (__UINTEGER_32)(new_size__3EGH <<  1)) <=  4096)) {
+                    next__IEKH=(void *)((unsigned long)result__KEKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3EGH)));
                   } else {
-                    next__IVJH=new_lab__FTJ(new_size__31GH);
+                    next__IEKH=new_lab__RTJ(new_size__3EGH);
                   };
-                  ((__POINTER *)next__IVJH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__JVJH)[ 0]=next__IVJH;
+                  ((__POINTER *)next__IEKH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__JEKH)[ 0]=next__IEKH;
                 } else {
-                  ((__POINTER *)result__KVJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__IVJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__KVJH=next__IVJH;
+                  ((__POINTER *)result__KEKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__IEKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__KEKH=next__IEKH;
                 };
               };
-              ptr__NSJD=result__KVJH;
-            } else {
-              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;
+              ptr__STJD=result__KEKH;
+            } else {
+              t__BFGH=((__UINTEGER_32 )typ_id__XTJD);
+              a__AFGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__REKH=(__UINTEGER_32)((__UINTEGER_32)(sz__UTJD + a__AFGH) & (__UINTEGER_32)(~ a__AFGH));
+              ptr_table__OEKH=((__POINTER )(&(table_type[(t__BFGH)])));
+              lab_type__QEKH=(__UINTEGER_32)(t__BFGH |  1);
+              next__NEKH=((__POINTER )(NULL));
+              result__PEKH=((__POINTER *)ptr_table__OEKH)[ 0];
+              if ((result__PEKH == (void *)NULL)) {
+                result__PEKH=new_lab__RTJ(lab_type__QEKH);
+                next__NEKH=(void *)((unsigned long)result__PEKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__REKH)));
+                ((__POINTER *)next__NEKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__OEKH)[ 0]=next__NEKH;
               } else {
-                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)));
+                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__4XH)))) &  4095) + (__UINTEGER_32)(new_size__REKH <<  1)) <=  4096)) {
+                    next__NEKH=(void *)((unsigned long)result__PEKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__REKH)));
                   } else {
-                    next__NVJH=new_lab__FTJ(lab_type__QVJH);
+                    next__NEKH=new_lab__RTJ(lab_type__QEKH);
                   };
-                  ((__POINTER *)next__NVJH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__OVJH)[ 0]=next__NVJH;
+                  ((__POINTER *)next__NEKH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__OEKH)[ 0]=next__NEKH;
                 } else {
-                  ((__POINTER *)result__PVJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NVJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__PVJH=next__NVJH;
+                  ((__POINTER *)result__PEKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NEKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__PEKH=next__NEKH;
                 };
               };
-              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)));
+              ptr__STJD=result__PEKH;
+            };
+            result__RTJD=((__ITM_WRITE_CAST *)ptr__STJD);
+            *(result__RTJD) = *(ITM_WRITE_CAST__);
+          };
+          ((__ITM_WRITE_CAST *)result__RTJD)->parent_itm_write__IGJ.parent_itm_code__QFJ.parent_itm_object__PFE.position__SFJ=__tmp__3JJ;
+          result__GBJ=result__RTJD;
+        };
+      };
+    };
+  };
+  if (((void *)result__GBJ == (void *)NULL)) {
+    restore_context__EFL();
+    result__SGL=NULL;
+    expr__TGL=NULL;
+    itm_op__WGL=NULL;
+    last_msg__XGL= 0;
+    first_msg__YGL= 0;
+    result__KAI=NULL;
+    if ((((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__QAI)->parent_arrayed_collection__PAI.upper__BYT <  0)) {
+      result__KAI=create_with_capacity__XXI( 16);
+    } else {
+      Self__UM4=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__QAI);
+      result__KAI=((void **)Self__UM4->parent_arrayed_collection__PAI.storage__PCU)[Self__UM4->parent_arrayed_collection__PAI.upper__BYT];
+      Self__KN4=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__QAI);
+      Self__KN4->parent_arrayed_collection__PAI.upper__BYT=(__INTEGER)(Self__KN4->parent_arrayed_collection__PAI.upper__BYT -  1);
+    };
+    l_expr__UGL=result__KAI;
+    while (read_operator__GOM()) {
+      p__1EKH=current_position__B0F();
+      n__2EKH=last_string__D2C;
+      result__SEKH=NULL;
+      ptr__TEKH=((__POINTER )(NULL));
+      typ_id__UEKH= 0;
+      sz__VEKH=((__UINTEGER_32 )sizeof(__ITM_OPERATOR));
+      if ((sz__VEKH ==  0)) {
+        result__SEKH=ITM_OPERATOR__;
+      } else {
+        typ_id__UEKH=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__VEKH);
+        if ((typ_id__UEKH == (__INTEGER)(-  1))) {
+          a__WEKH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__XEKH=(__UINTEGER_32)((__UINTEGER_32)(sz__VEKH + a__WEKH) & (__UINTEGER_32)(~ a__WEKH));
+          ptr_table__4EKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__XEKH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__3EKH=((__POINTER )(NULL));
+          result__5EKH=((__POINTER *)ptr_table__4EKH)[ 0];
+          if ((result__5EKH == (void *)NULL)) {
+            result__5EKH=new_lab__RTJ(new_size__XEKH);
+            next__3EKH=(void *)((unsigned long)result__5EKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XEKH)));
+            ((__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__4XH)))) &  4095) + (__UINTEGER_32)(new_size__XEKH <<  1)) <=  4096)) {
+                next__3EKH=(void *)((unsigned long)result__5EKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XEKH)));
               } else {
-                next__3VJH=new_lab__FTJ(new_size__XVJH);
-              };
-              ((__POINTER *)next__3VJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__4VJH)[ 0]=next__3VJH;
-            } else {
-              ((__POINTER *)result__5VJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3VJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__5VJH=next__3VJH;
-            };
-          };
-          ptr__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)));
+                next__3EKH=new_lab__RTJ(new_size__XEKH);
+              };
+              ((__POINTER *)next__3EKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__4EKH)[ 0]=next__3EKH;
+            } else {
+              ((__POINTER *)result__5EKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3EKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__5EKH=next__3EKH;
+            };
+          };
+          ptr__TEKH=result__5EKH;
+        } else {
+          t__YEKH=((__UINTEGER_32 )typ_id__UEKH);
+          a__ZEKH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__GFKH=(__UINTEGER_32)((__UINTEGER_32)(sz__VEKH + a__ZEKH) & (__UINTEGER_32)(~ a__ZEKH));
+          ptr_table__DFKH=((__POINTER )(&(table_type[(t__YEKH)])));
+          lab_type__FFKH=(__UINTEGER_32)(t__YEKH |  1);
+          next__CFKH=((__POINTER )(NULL));
+          result__EFKH=((__POINTER *)ptr_table__DFKH)[ 0];
+          if ((result__EFKH == (void *)NULL)) {
+            result__EFKH=new_lab__RTJ(lab_type__FFKH);
+            next__CFKH=(void *)((unsigned long)result__EFKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GFKH)));
+            ((__POINTER *)next__CFKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__DFKH)[ 0]=next__CFKH;
+          } else {
+            next__CFKH=((__POINTER *)result__EFKH)[ 0];
+            if ((next__CFKH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__EFKH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__GFKH <<  1)) <=  4096)) {
+                next__CFKH=(void *)((unsigned long)result__EFKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GFKH)));
               } else {
-                next__CWJH=new_lab__FTJ(lab_type__FWJH);
+                next__CFKH=new_lab__RTJ(lab_type__FFKH);
               };
-              ((__POINTER *)next__CWJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__DWJH)[ 0]=next__CWJH;
+              ((__POINTER *)next__CFKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__DFKH)[ 0]=next__CFKH;
             } else {
-              ((__POINTER *)result__EWJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CWJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__EWJH=next__CWJH;
+              ((__POINTER *)result__EFKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CFKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__EFKH=next__CFKH;
             };
           };
-          ptr__TVJH=result__EWJH;
+          ptr__TEKH=result__EFKH;
         };
-        result__SVJH=((__ITM_OPERATOR *)ptr__TVJH);
-        *(result__SVJH) = *(ITM_OPERATOR__);
+        result__SEKH=((__ITM_OPERATOR *)ptr__TEKH);
+        *(result__SEKH) = *(ITM_OPERATOR__);
       };
-      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);
+      Self__0EKH=((__ITM_OPERATOR *)result__SEKH);
+      Self__0EKH->parent_itm_code__VGL.parent_itm_object__PFE.position__SFJ=p__1EKH;
+      Self__0EKH->name__AKL=n__2EKH;
+      expr__TGL=result__SEKH;
+      add_last__I5U(l_expr__UGL,result__SEKH);
     };
-    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)) {
+    expr__TGL=read_expr_message__LXL(Self__EBJ);
+    if (((void *)expr__TGL == (void *)NULL)) {
+      if ((! (((__FAST_ARRAYoITM_CODEo *)result__KAI)->parent_arrayed_collection__JWF.upper__NJL <  0))) {
+        pos__5LYG=current_position__B0F();
+        put_error__text__1PG( 0,(&__string_239));
+        put_position__FRG(pos__5LYG);
+        put_string__33F(msg_err__AQG);
+        if ((type_error__5PG !=  2)) {
           exit(( 1));
         };
       };
-      free__RXI(result__45H);
+      free__3XI(result__KAI);
     } else {
-      first_msg__MGL=(__INTEGER)(((__FAST_ARRAYoITM_CODEo *)result__45H)->parent_arrayed_collection__MVF.upper__BJL +  1);
+      first_msg__YGL=(__INTEGER)(((__FAST_ARRAYoITM_CODEo *)result__KAI)->parent_arrayed_collection__JWF.upper__NJL +  1);
       do {
-        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()) {
+        last_msg__XGL=(__INTEGER)(((__FAST_ARRAYoITM_CODEo *)l_expr__UGL)->parent_arrayed_collection__JWF.upper__NJL +  1);
+        add_last__I5U(l_expr__UGL,expr__TGL);
+        if (read_operator__GOM()) {
           do {
-            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__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;
+            p__LIP=current_position__B0F();
+            n__MIP=last_string__D2C;
+            result__PTP=NULL;
+            ptr__QTP=((__POINTER )(NULL));
+            typ_id__VTP= 0;
+            sz__STP=((__UINTEGER_32 )sizeof(__ITM_OPERATOR));
+            if ((sz__STP ==  0)) {
+              result__PTP=ITM_OPERATOR__;
+            } else {
+              typ_id__VTP=-1;
+              clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__STP);
+              if ((typ_id__VTP == (__INTEGER)(-  1))) {
+                a__MFGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                new_size__NFGH=(__UINTEGER_32)((__UINTEGER_32)(sz__STP + a__MFGH) & (__UINTEGER_32)(~ a__MFGH));
+                ptr_table__IFKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__NFGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                next__HFKH=((__POINTER )(NULL));
+                result__JFKH=((__POINTER *)ptr_table__IFKH)[ 0];
+                if ((result__JFKH == (void *)NULL)) {
+                  result__JFKH=new_lab__RTJ(new_size__NFGH);
+                  next__HFKH=(void *)((unsigned long)result__JFKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NFGH)));
+                  ((__POINTER *)next__HFKH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__IFKH)[ 0]=next__HFKH;
                 } else {
-                  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)));
+                  next__HFKH=((__POINTER *)result__JFKH)[ 0];
+                  if ((next__HFKH == (void *)NULL)) {
+                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__JFKH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__NFGH <<  1)) <=  4096)) {
+                      next__HFKH=(void *)((unsigned long)result__JFKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NFGH)));
                     } else {
-                      next__HWJH=new_lab__FTJ(new_size__N2GH);
+                      next__HFKH=new_lab__RTJ(new_size__NFGH);
                     };
-                    ((__POINTER *)next__HWJH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__IWJH)[ 0]=next__HWJH;
+                    ((__POINTER *)next__HFKH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__IFKH)[ 0]=next__HFKH;
                   } else {
-                    ((__POINTER *)result__JWJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HWJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__JWJH=next__HWJH;
+                    ((__POINTER *)result__JFKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HFKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__JFKH=next__HFKH;
                   };
                 };
-                ptr__ETP=result__JWJH;
+                ptr__QTP=result__JFKH;
               } else {
-                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;
+                t__RFGH=((__UINTEGER_32 )typ_id__VTP);
+                a__QFGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                new_size__QFKH=(__UINTEGER_32)((__UINTEGER_32)(sz__STP + a__QFGH) & (__UINTEGER_32)(~ a__QFGH));
+                ptr_table__NFKH=((__POINTER )(&(table_type[(t__RFGH)])));
+                lab_type__PFKH=(__UINTEGER_32)(t__RFGH |  1);
+                next__MFKH=((__POINTER )(NULL));
+                result__OFKH=((__POINTER *)ptr_table__NFKH)[ 0];
+                if ((result__OFKH == (void *)NULL)) {
+                  result__OFKH=new_lab__RTJ(lab_type__PFKH);
+                  next__MFKH=(void *)((unsigned long)result__OFKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QFKH)));
+                  ((__POINTER *)next__MFKH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__NFKH)[ 0]=next__MFKH;
                 } else {
-                  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)));
+                  next__MFKH=((__POINTER *)result__OFKH)[ 0];
+                  if ((next__MFKH == (void *)NULL)) {
+                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__OFKH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__QFKH <<  1)) <=  4096)) {
+                      next__MFKH=(void *)((unsigned long)result__OFKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QFKH)));
                     } else {
-                      next__MWJH=new_lab__FTJ(lab_type__PWJH);
+                      next__MFKH=new_lab__RTJ(lab_type__PFKH);
                     };
-                    ((__POINTER *)next__MWJH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__NWJH)[ 0]=next__MWJH;
+                    ((__POINTER *)next__MFKH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__NFKH)[ 0]=next__MFKH;
                   } else {
-                    ((__POINTER *)result__OWJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MWJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__OWJH=next__MWJH;
+                    ((__POINTER *)result__OFKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MFKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__OFKH=next__MFKH;
                   };
                 };
-                ptr__ETP=result__OWJH;
+                ptr__QTP=result__OFKH;
               };
-              result__DTP=((__ITM_OPERATOR *)ptr__ETP);
-              *(result__DTP) = *(ITM_OPERATOR__);
+              result__PTP=((__ITM_OPERATOR *)ptr__QTP);
+              *(result__PTP) = *(ITM_OPERATOR__);
             };
-            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);
+            Self__LNV=((__ITM_OPERATOR *)result__PTP);
+            Self__LNV->parent_itm_code__VGL.parent_itm_object__PFE.position__SFJ=p__LIP;
+            Self__LNV->name__AKL=n__MIP;
+            expr__TGL=result__PTP;
+            add_last__I5U(l_expr__UGL,result__PTP);
+          } while (read_operator__GOM());
+          expr__TGL=read_expr_message__LXL(Self__EBJ);
         } else {
-          expr__HGL=NULL;
+          expr__TGL=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;
+      } while (((void *)expr__TGL != (void *)NULL));
+      while ((last_msg__XGL < ((__FAST_ARRAYoITM_CODEo *)l_expr__UGL)->parent_arrayed_collection__JWF.upper__NJL)) {
+        __tmp__ZJL=((void **)((__FAST_ARRAYoITM_CODEo *)l_expr__UGL)->parent_arrayed_collection__JWF.storage__4ZT)[(__INTEGER)(last_msg__XGL +  1)];
+        if (__tmp__ZJL==NULL) {
+          __tmp__0JL=NULL;
         } else {
-          switch (((struct ___OBJ *)__tmp__NJL)->__id) {
+          switch (((struct ___OBJ *)__tmp__ZJL)->__id) {
           case __ITM_LIST__: {
-            __tmp__OJL=NULL;
+            __tmp__0JL=NULL;
           } break;
           case __ITM_LDOTS__: {
-            __tmp__OJL=NULL;
+            __tmp__0JL=NULL;
           } break;
           case __ITM_PROTOTYPE__: {
-            __tmp__OJL=NULL;
+            __tmp__0JL=NULL;
           } break;
           case __ITM_LIST_IDF__: {
-            __tmp__OJL=NULL;
+            __tmp__0JL=NULL;
           } break;
           case __ITM_WRITE_VALUE__: {
-            __tmp__OJL=NULL;
+            __tmp__0JL=NULL;
           } break;
           case __ITM_WRITE_CAST__: {
-            __tmp__OJL=NULL;
+            __tmp__0JL=NULL;
           } break;
           case __ITM_READ__: {
-            __tmp__OJL=NULL;
+            __tmp__0JL=NULL;
           } break;
           case __ITM_WRITE_CODE__: {
-            __tmp__OJL=NULL;
+            __tmp__0JL=NULL;
           } break;
           case __ITM_OPERATOR__: {
-            __tmp__OJL=((void *)__tmp__NJL);
+            __tmp__0JL=((void *)__tmp__ZJL);
           } break;
           case __ITM_READ_ARG1__: {
-            __tmp__OJL=NULL;
+            __tmp__0JL=NULL;
           } break;
           case __ITM_READ_ARG2__: {
-            __tmp__OJL=NULL;
+            __tmp__0JL=NULL;
           } break;
           case __ITM_EXPRESSION__: {
-            __tmp__OJL=NULL;
+            __tmp__0JL=NULL;
           } break;
           case __ITM_OLD__: {
-            __tmp__OJL=NULL;
+            __tmp__0JL=NULL;
           } break;
           case __ITM_EXTERNAL_TYPE__: {
-            __tmp__OJL=NULL;
+            __tmp__0JL=NULL;
           } break;
           case __ITM_BLOCK__: {
-            __tmp__OJL=NULL;
+            __tmp__0JL=NULL;
           } break;
           case __ITM_EXTERNAL__: {
-            __tmp__OJL=NULL;
+            __tmp__0JL=NULL;
           } break;
           case __ITM_READ_ARGS__: {
-            __tmp__OJL=NULL;
+            __tmp__0JL=NULL;
           } break;
           case __ITM_REAL__: {
-            __tmp__OJL=NULL;
+            __tmp__0JL=NULL;
           } break;
           case __ITM_NUMBER__: {
-            __tmp__OJL=NULL;
+            __tmp__0JL=NULL;
           } break;
           case __ITM_CHARACTER__: {
-            __tmp__OJL=NULL;
+            __tmp__0JL=NULL;
           } break;
           case __ITM_STRING__: {
-            __tmp__OJL=NULL;
+            __tmp__0JL=NULL;
           } break;
           case __ITM_RESULT__: {
-            __tmp__OJL=NULL;
+            __tmp__0JL=NULL;
           } break;
           }
         };
-        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__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)));
+        itm_op__WGL=__tmp__0JL;
+        __tmp__3JL=((__ITM_OPERATOR *)__tmp__0JL)->parent_itm_code__VGL.parent_itm_object__PFE.position__SFJ;
+        operator__name__ZEO((&__string_82),((__ITM_OPERATOR *)__tmp__0JL)->name__AKL);
+        result__RFKH=NULL;
+        ptr__SFKH=((__POINTER )(NULL));
+        typ_id__TFKH= 0;
+        sz__UFKH=((__UINTEGER_32 )sizeof(__ITM_READ_ARG1));
+        if ((sz__UFKH ==  0)) {
+          result__RFKH=ITM_READ_ARG1__;
+        } else {
+          typ_id__TFKH=-1;
+          clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__UFKH);
+          if ((typ_id__TFKH == (__INTEGER)(-  1))) {
+            a__VFKH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__WFKH=(__UINTEGER_32)((__UINTEGER_32)(sz__UFKH + a__VFKH) & (__UINTEGER_32)(~ a__VFKH));
+            ptr_table__1FKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__WFKH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__0FKH=((__POINTER )(NULL));
+            result__2FKH=((__POINTER *)ptr_table__1FKH)[ 0];
+            if ((result__2FKH == (void *)NULL)) {
+              result__2FKH=new_lab__RTJ(new_size__WFKH);
+              next__0FKH=(void *)((unsigned long)result__2FKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WFKH)));
+              ((__POINTER *)next__0FKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__1FKH)[ 0]=next__0FKH;
+            } else {
+              next__0FKH=((__POINTER *)result__2FKH)[ 0];
+              if ((next__0FKH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2FKH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__WFKH <<  1)) <=  4096)) {
+                  next__0FKH=(void *)((unsigned long)result__2FKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WFKH)));
                 } else {
-                  next__0WJH=new_lab__FTJ(new_size__WWJH);
+                  next__0FKH=new_lab__RTJ(new_size__WFKH);
                 };
-                ((__POINTER *)next__0WJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__1WJH)[ 0]=next__0WJH;
+                ((__POINTER *)next__0FKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__1FKH)[ 0]=next__0FKH;
               } else {
-                ((__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__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)));
+                ((__POINTER *)result__2FKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0FKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__2FKH=next__0FKH;
+              };
+            };
+            ptr__SFKH=result__2FKH;
+          } else {
+            t__XFKH=((__UINTEGER_32 )typ_id__TFKH);
+            a__YFKH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__DGKH=(__UINTEGER_32)((__UINTEGER_32)(sz__UFKH + a__YFKH) & (__UINTEGER_32)(~ a__YFKH));
+            ptr_table__AGKH=((__POINTER )(&(table_type[(t__XFKH)])));
+            lab_type__CGKH=(__UINTEGER_32)(t__XFKH |  1);
+            next__5FKH=((__POINTER )(NULL));
+            result__BGKH=((__POINTER *)ptr_table__AGKH)[ 0];
+            if ((result__BGKH == (void *)NULL)) {
+              result__BGKH=new_lab__RTJ(lab_type__CGKH);
+              next__5FKH=(void *)((unsigned long)result__BGKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DGKH)));
+              ((__POINTER *)next__5FKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__AGKH)[ 0]=next__5FKH;
+            } else {
+              next__5FKH=((__POINTER *)result__BGKH)[ 0];
+              if ((next__5FKH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BGKH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__DGKH <<  1)) <=  4096)) {
+                  next__5FKH=(void *)((unsigned long)result__BGKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DGKH)));
                 } else {
-                  next__5WJH=new_lab__FTJ(lab_type__CXJH);
+                  next__5FKH=new_lab__RTJ(lab_type__CGKH);
                 };
-                ((__POINTER *)next__5WJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__AXJH)[ 0]=next__5WJH;
+                ((__POINTER *)next__5FKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__AGKH)[ 0]=next__5FKH;
               } else {
-                ((__POINTER *)result__BXJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5WJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__BXJH=next__5WJH;
+                ((__POINTER *)result__BGKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5FKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__BGKH=next__5FKH;
               };
             };
-            ptr__SWJH=result__BXJH;
+            ptr__SFKH=result__BGKH;
           };
-          result__RWJH=((__ITM_READ_ARG1 *)ptr__SWJH);
-          *(result__RWJH) = *(ITM_READ_ARG1__);
+          result__RFKH=((__ITM_READ_ARG1 *)ptr__SFKH);
+          *(result__RFKH) = *(ITM_READ_ARG1__);
         };
-        ((__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);
+        ((__ITM_READ_ARG1 *)result__RFKH)->parent_itm_read__1JL.parent_itm_code__VIJ.parent_itm_object__PFE.position__SFJ=__tmp__3JL;
+        expr__TGL=result__RFKH;
+        ((void **)((__FAST_ARRAYoITM_CODEo *)l_expr__UGL)->parent_arrayed_collection__JWF.storage__4ZT)[last_msg__XGL]=result__RFKH;
+        Self__12LH=((__FAST_ARRAYoITM_CODEo *)l_expr__UGL);
+        index__52LH=(__INTEGER)(last_msg__XGL +  1);
+        __tmp__22LH=Self__12LH->parent_arrayed_collection__JWF.storage__4ZT;
+        __tmp__32LH=Self__12LH->parent_arrayed_collection__JWF.upper__NJL;
+        Self__42LH=((void **)__tmp__22LH);
+        i__A3LH=index__52LH;
+        while ((i__A3LH != __tmp__32LH)) {
+          Self__42LH[i__A3LH]=Self__42LH[(__INTEGER)(i__A3LH +  1)];
+          i__A3LH=(__INTEGER)(i__A3LH +  1);
         };
-        Self__EXJH->parent_arrayed_collection__MVF.upper__BJL=(__INTEGER)(Self__EXJH->parent_arrayed_collection__MVF.upper__BJL -  1);
+        Self__12LH->parent_arrayed_collection__JWF.upper__NJL=(__INTEGER)(Self__12LH->parent_arrayed_collection__JWF.upper__NJL -  1);
       };
-      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;
+      if (((__INTEGER)(last_msg__XGL - first_msg__YGL) <  3)) {
+        while ((first_msg__YGL !=  0)) {
+          __tmp__ALL=((void **)((__FAST_ARRAYoITM_CODEo *)l_expr__UGL)->parent_arrayed_collection__JWF.storage__4ZT)[(__INTEGER)(first_msg__YGL -  1)];
+          if (__tmp__ALL==NULL) {
+            __tmp__BLL=NULL;
           } else {
-            switch (((struct ___OBJ *)__tmp__UKL)->__id) {
+            switch (((struct ___OBJ *)__tmp__ALL)->__id) {
             case __ITM_LIST__: {
-              __tmp__VKL=NULL;
+              __tmp__BLL=NULL;
             } break;
             case __ITM_LDOTS__: {
-              __tmp__VKL=NULL;
+              __tmp__BLL=NULL;
             } break;
             case __ITM_PROTOTYPE__: {
-              __tmp__VKL=NULL;
+              __tmp__BLL=NULL;
             } break;
             case __ITM_LIST_IDF__: {
-              __tmp__VKL=NULL;
+              __tmp__BLL=NULL;
             } break;
             case __ITM_WRITE_VALUE__: {
-              __tmp__VKL=NULL;
+              __tmp__BLL=NULL;
             } break;
             case __ITM_WRITE_CAST__: {
-              __tmp__VKL=NULL;
+              __tmp__BLL=NULL;
             } break;
             case __ITM_READ__: {
-              __tmp__VKL=NULL;
+              __tmp__BLL=NULL;
             } break;
             case __ITM_WRITE_CODE__: {
-              __tmp__VKL=NULL;
+              __tmp__BLL=NULL;
             } break;
             case __ITM_OPERATOR__: {
-              __tmp__VKL=((void *)__tmp__UKL);
+              __tmp__BLL=((void *)__tmp__ALL);
             } break;
             case __ITM_READ_ARG1__: {
-              __tmp__VKL=NULL;
+              __tmp__BLL=NULL;
             } break;
             case __ITM_READ_ARG2__: {
-              __tmp__VKL=NULL;
+              __tmp__BLL=NULL;
             } break;
             case __ITM_EXPRESSION__: {
-              __tmp__VKL=NULL;
+              __tmp__BLL=NULL;
             } break;
             case __ITM_OLD__: {
-              __tmp__VKL=NULL;
+              __tmp__BLL=NULL;
             } break;
             case __ITM_EXTERNAL_TYPE__: {
-              __tmp__VKL=NULL;
+              __tmp__BLL=NULL;
             } break;
             case __ITM_BLOCK__: {
-              __tmp__VKL=NULL;
+              __tmp__BLL=NULL;
             } break;
             case __ITM_EXTERNAL__: {
-              __tmp__VKL=NULL;
+              __tmp__BLL=NULL;
             } break;
             case __ITM_READ_ARGS__: {
-              __tmp__VKL=NULL;
+              __tmp__BLL=NULL;
             } break;
             case __ITM_REAL__: {
-              __tmp__VKL=NULL;
+              __tmp__BLL=NULL;
             } break;
             case __ITM_NUMBER__: {
-              __tmp__VKL=NULL;
+              __tmp__BLL=NULL;
             } break;
             case __ITM_CHARACTER__: {
-              __tmp__VKL=NULL;
+              __tmp__BLL=NULL;
             } break;
             case __ITM_STRING__: {
-              __tmp__VKL=NULL;
+              __tmp__BLL=NULL;
             } break;
             case __ITM_RESULT__: {
-              __tmp__VKL=NULL;
+              __tmp__BLL=NULL;
             } break;
             }
           };
-          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;
+          itm_op__WGL=__tmp__BLL;
+          __tmp__DLL=((__ITM_OPERATOR *)__tmp__BLL)->parent_itm_code__VGL.parent_itm_object__PFE.position__SFJ;
+          operator__name__ZEO((&__string_83),((__ITM_OPERATOR *)__tmp__BLL)->name__AKL);
+          result__EGKH=NULL;
+          ptr__FGKH=((__POINTER )(NULL));
+          typ_id__GGKH= 0;
+          sz__HGKH=((__UINTEGER_32 )sizeof(__ITM_READ_ARG1));
+          if ((sz__HGKH ==  0)) {
+            result__EGKH=ITM_READ_ARG1__;
+          } else {
+            typ_id__GGKH=-1;
+            clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__HGKH);
+            if ((typ_id__GGKH == (__INTEGER)(-  1))) {
+              a__IGKH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__JGKH=(__UINTEGER_32)((__UINTEGER_32)(sz__HGKH + a__IGKH) & (__UINTEGER_32)(~ a__IGKH));
+              ptr_table__OGKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__JGKH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__NGKH=((__POINTER )(NULL));
+              result__PGKH=((__POINTER *)ptr_table__OGKH)[ 0];
+              if ((result__PGKH == (void *)NULL)) {
+                result__PGKH=new_lab__RTJ(new_size__JGKH);
+                next__NGKH=(void *)((unsigned long)result__PGKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JGKH)));
+                ((__POINTER *)next__NGKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__OGKH)[ 0]=next__NGKH;
               } else {
-                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)));
+                next__NGKH=((__POINTER *)result__PGKH)[ 0];
+                if ((next__NGKH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__PGKH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__JGKH <<  1)) <=  4096)) {
+                    next__NGKH=(void *)((unsigned long)result__PGKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JGKH)));
                   } else {
-                    next__UXJH=new_lab__FTJ(new_size__QXJH);
+                    next__NGKH=new_lab__RTJ(new_size__JGKH);
                   };
-                  ((__POINTER *)next__UXJH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__VXJH)[ 0]=next__UXJH;
+                  ((__POINTER *)next__NGKH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__OGKH)[ 0]=next__NGKH;
                 } else {
-                  ((__POINTER *)result__WXJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UXJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__WXJH=next__UXJH;
+                  ((__POINTER *)result__PGKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NGKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__PGKH=next__NGKH;
                 };
               };
-              ptr__MXJH=result__WXJH;
-            } else {
-              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;
+              ptr__FGKH=result__PGKH;
+            } else {
+              t__KGKH=((__UINTEGER_32 )typ_id__GGKH);
+              a__LGKH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__WGKH=(__UINTEGER_32)((__UINTEGER_32)(sz__HGKH + a__LGKH) & (__UINTEGER_32)(~ a__LGKH));
+              ptr_table__TGKH=((__POINTER )(&(table_type[(t__KGKH)])));
+              lab_type__VGKH=(__UINTEGER_32)(t__KGKH |  1);
+              next__SGKH=((__POINTER )(NULL));
+              result__UGKH=((__POINTER *)ptr_table__TGKH)[ 0];
+              if ((result__UGKH == (void *)NULL)) {
+                result__UGKH=new_lab__RTJ(lab_type__VGKH);
+                next__SGKH=(void *)((unsigned long)result__UGKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WGKH)));
+                ((__POINTER *)next__SGKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__TGKH)[ 0]=next__SGKH;
               } else {
-                next__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)));
+                next__SGKH=((__POINTER *)result__UGKH)[ 0];
+                if ((next__SGKH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__UGKH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__WGKH <<  1)) <=  4096)) {
+                    next__SGKH=(void *)((unsigned long)result__UGKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WGKH)));
                   } else {
-                    next__ZXJH=new_lab__FTJ(lab_type__2XJH);
+                    next__SGKH=new_lab__RTJ(lab_type__VGKH);
                   };
-                  ((__POINTER *)next__ZXJH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__0XJH)[ 0]=next__ZXJH;
+                  ((__POINTER *)next__SGKH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__TGKH)[ 0]=next__SGKH;
                 } else {
-                  ((__POINTER *)result__1XJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZXJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__1XJH=next__ZXJH;
+                  ((__POINTER *)result__UGKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__SGKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__UGKH=next__SGKH;
                 };
               };
-              ptr__MXJH=result__1XJH;
+              ptr__FGKH=result__UGKH;
             };
-            result__LXJH=((__ITM_READ_ARG1 *)ptr__MXJH);
-            *(result__LXJH) = *(ITM_READ_ARG1__);
+            result__EGKH=((__ITM_READ_ARG1 *)ptr__FGKH);
+            *(result__EGKH) = *(ITM_READ_ARG1__);
           };
-          ((__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);
+          ((__ITM_READ_ARG1 *)result__EGKH)->parent_itm_read__1JL.parent_itm_code__VIJ.parent_itm_object__PFE.position__SFJ=__tmp__DLL;
+          expr__TGL=result__EGKH;
+          ((void **)((__FAST_ARRAYoITM_CODEo *)l_expr__UGL)->parent_arrayed_collection__JWF.storage__4ZT)[first_msg__YGL]=result__EGKH;
+          first_msg__YGL=(__INTEGER)(first_msg__YGL -  1);
+          Self__YF1C=((__FAST_ARRAYoITM_CODEo *)l_expr__UGL);
+          __tmp__BG1C=Self__YF1C->parent_arrayed_collection__JWF.storage__4ZT;
+          __tmp__CG1C=Self__YF1C->parent_arrayed_collection__JWF.upper__NJL;
+          Self__5ICD=((void **)__tmp__BG1C);
+          i__QJCD=first_msg__YGL;
+          while ((i__QJCD != __tmp__CG1C)) {
+            Self__5ICD[i__QJCD]=Self__5ICD[(__INTEGER)(i__QJCD +  1)];
+            i__QJCD=(__INTEGER)(i__QJCD +  1);
           };
-          Self__4I1C->parent_arrayed_collection__MVF.upper__BJL=(__INTEGER)(Self__4I1C->parent_arrayed_collection__MVF.upper__BJL -  1);
+          Self__YF1C->parent_arrayed_collection__JWF.upper__NJL=(__INTEGER)(Self__YF1C->parent_arrayed_collection__JWF.upper__NJL -  1);
         };
       };
-      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__;
+      if (((__INTEGER)(((__FAST_ARRAYoITM_CODEo *)result__KAI)->parent_arrayed_collection__JWF.upper__NJL +  1) ==  1)) {
+        result__SGL=((void **)((__FAST_ARRAYoITM_CODEo *)result__KAI)->parent_arrayed_collection__JWF.storage__4ZT)[ 0];
+        free__3XI(result__KAI);
+        __tmp__ZLL=TRUE__;
       } else {
-        __tmp__NLL=FALSE__;
+        __tmp__ZLL=FALSE__;
       };
-      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;
+      if ((! __tmp__ZLL)) {
+        if (((__INTEGER)(((__FAST_ARRAYoITM_CODEo *)result__KAI)->parent_arrayed_collection__JWF.upper__NJL +  1) ==  3)) {
+          __tmp__GML=((void **)((__FAST_ARRAYoITM_CODEo *)result__KAI)->parent_arrayed_collection__JWF.storage__4ZT)[ 1];
+          if (__tmp__GML==NULL) {
+            __tmp__HML=NULL;
           } else {
-            switch (((struct ___OBJ *)__tmp__0LL)->__id) {
+            switch (((struct ___OBJ *)__tmp__GML)->__id) {
             case __ITM_LIST__: {
-              __tmp__1LL=NULL;
+              __tmp__HML=NULL;
             } break;
             case __ITM_LDOTS__: {
-              __tmp__1LL=NULL;
+              __tmp__HML=NULL;
             } break;
             case __ITM_PROTOTYPE__: {
-              __tmp__1LL=NULL;
+              __tmp__HML=NULL;
             } break;
             case __ITM_LIST_IDF__: {
-              __tmp__1LL=NULL;
+              __tmp__HML=NULL;
             } break;
             case __ITM_WRITE_VALUE__: {
-              __tmp__1LL=NULL;
+              __tmp__HML=NULL;
             } break;
             case __ITM_WRITE_CAST__: {
-              __tmp__1LL=NULL;
+              __tmp__HML=NULL;
             } break;
             case __ITM_READ__: {
-              __tmp__1LL=NULL;
+              __tmp__HML=NULL;
             } break;
             case __ITM_WRITE_CODE__: {
-              __tmp__1LL=NULL;
+              __tmp__HML=NULL;
             } break;
             case __ITM_OPERATOR__: {
-              __tmp__1LL=((void *)__tmp__0LL);
+              __tmp__HML=((void *)__tmp__GML);
             } break;
             case __ITM_READ_ARG1__: {
-              __tmp__1LL=NULL;
+              __tmp__HML=NULL;
             } break;
             case __ITM_READ_ARG2__: {
-              __tmp__1LL=NULL;
+              __tmp__HML=NULL;
             } break;
             case __ITM_EXPRESSION__: {
-              __tmp__1LL=NULL;
+              __tmp__HML=NULL;
             } break;
             case __ITM_OLD__: {
-              __tmp__1LL=NULL;
+              __tmp__HML=NULL;
             } break;
             case __ITM_EXTERNAL_TYPE__: {
-              __tmp__1LL=NULL;
+              __tmp__HML=NULL;
             } break;
             case __ITM_BLOCK__: {
-              __tmp__1LL=NULL;
+              __tmp__HML=NULL;
             } break;
             case __ITM_EXTERNAL__: {
-              __tmp__1LL=NULL;
+              __tmp__HML=NULL;
             } break;
             case __ITM_READ_ARGS__: {
-              __tmp__1LL=NULL;
+              __tmp__HML=NULL;
             } break;
             case __ITM_REAL__: {
-              __tmp__1LL=NULL;
+              __tmp__HML=NULL;
             } break;
             case __ITM_NUMBER__: {
-              __tmp__1LL=NULL;
+              __tmp__HML=NULL;
             } break;
             case __ITM_CHARACTER__: {
-              __tmp__1LL=NULL;
+              __tmp__HML=NULL;
             } break;
             case __ITM_STRING__: {
-              __tmp__1LL=NULL;
+              __tmp__HML=NULL;
             } break;
             case __ITM_RESULT__: {
-              __tmp__1LL=NULL;
+              __tmp__HML=NULL;
             } break;
             }
           };
-          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;
+          itm_op__WGL=__tmp__HML;
+          __tmp__KML=((__ITM_OPERATOR *)__tmp__HML)->parent_itm_code__VGL.parent_itm_object__PFE.position__SFJ;
+          operator__name__ZEO((&__string_81),((__ITM_OPERATOR *)__tmp__HML)->name__AKL);
+          result__DYO=NULL;
+          ptr__EYO=((__POINTER )(NULL));
+          typ_id__JYO= 0;
+          sz__GYO=((__UINTEGER_32 )sizeof(__ITM_READ_ARG2));
+          if ((sz__GYO ==  0)) {
+            result__DYO=ITM_READ_ARG2__;
+          } else {
+            typ_id__JYO=-1;
+            clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__GYO);
+            if ((typ_id__JYO == (__INTEGER)(-  1))) {
+              a__FGGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__GGGH=(__UINTEGER_32)((__UINTEGER_32)(sz__GYO + a__FGGH) & (__UINTEGER_32)(~ a__FGGH));
+              ptr_table__YGKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__GGGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__XGKH=((__POINTER )(NULL));
+              result__ZGKH=((__POINTER *)ptr_table__YGKH)[ 0];
+              if ((result__ZGKH == (void *)NULL)) {
+                result__ZGKH=new_lab__RTJ(new_size__GGGH);
+                next__XGKH=(void *)((unsigned long)result__ZGKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GGGH)));
+                ((__POINTER *)next__XGKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__YGKH)[ 0]=next__XGKH;
               } else {
-                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)));
+                next__XGKH=((__POINTER *)result__ZGKH)[ 0];
+                if ((next__XGKH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ZGKH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__GGGH <<  1)) <=  4096)) {
+                    next__XGKH=(void *)((unsigned long)result__ZGKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GGGH)));
                   } else {
-                    next__4XJH=new_lab__FTJ(new_size__D3GH);
+                    next__XGKH=new_lab__RTJ(new_size__GGGH);
                   };
-                  ((__POINTER *)next__4XJH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__5XJH)[ 0]=next__4XJH;
+                  ((__POINTER *)next__XGKH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__YGKH)[ 0]=next__XGKH;
                 } else {
-                  ((__POINTER *)result__AYJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4XJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__AYJH=next__4XJH;
+                  ((__POINTER *)result__ZGKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XGKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__ZGKH=next__XGKH;
                 };
               };
-              ptr__YXO=result__AYJH;
-            } else {
-              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;
+              ptr__EYO=result__ZGKH;
+            } else {
+              t__KGGH=((__UINTEGER_32 )typ_id__JYO);
+              a__JGGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__AHKH=(__UINTEGER_32)((__UINTEGER_32)(sz__GYO + a__JGGH) & (__UINTEGER_32)(~ a__JGGH));
+              ptr_table__3GKH=((__POINTER )(&(table_type[(t__KGGH)])));
+              lab_type__5GKH=(__UINTEGER_32)(t__KGGH |  1);
+              next__2GKH=((__POINTER )(NULL));
+              result__4GKH=((__POINTER *)ptr_table__3GKH)[ 0];
+              if ((result__4GKH == (void *)NULL)) {
+                result__4GKH=new_lab__RTJ(lab_type__5GKH);
+                next__2GKH=(void *)((unsigned long)result__4GKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AHKH)));
+                ((__POINTER *)next__2GKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__3GKH)[ 0]=next__2GKH;
               } else {
-                next__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)));
+                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__4XH)))) &  4095) + (__UINTEGER_32)(new_size__AHKH <<  1)) <=  4096)) {
+                    next__2GKH=(void *)((unsigned long)result__4GKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AHKH)));
                   } else {
-                    next__DYJH=new_lab__FTJ(lab_type__GYJH);
+                    next__2GKH=new_lab__RTJ(lab_type__5GKH);
                   };
-                  ((__POINTER *)next__DYJH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__EYJH)[ 0]=next__DYJH;
+                  ((__POINTER *)next__2GKH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__3GKH)[ 0]=next__2GKH;
                 } else {
-                  ((__POINTER *)result__FYJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DYJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__FYJH=next__DYJH;
+                  ((__POINTER *)result__4GKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2GKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__4GKH=next__2GKH;
                 };
               };
-              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;
+              ptr__EYO=result__4GKH;
+            };
+            result__DYO=((__ITM_READ_ARG2 *)ptr__EYO);
+            *(result__DYO) = *(ITM_READ_ARG2__);
+          };
+          ((__ITM_READ_ARG2 *)result__DYO)->parent_itm_read__IML.parent_itm_code__VIJ.parent_itm_object__PFE.position__SFJ=__tmp__KML;
+          result__SGL=result__DYO;
+          free__3XI(result__KAI);
+        } else {
+          l_expr__UGL=copy__5BI(result__KAI);
+          result__WZO=NULL;
+          ptr__XZO=((__POINTER )(NULL));
+          typ_id__2ZO= 0;
+          sz__ZZO=((__UINTEGER_32 )sizeof(__ITM_EXPRESSION));
+          if ((sz__ZZO ==  0)) {
+            result__WZO=ITM_EXPRESSION__;
+          } else {
+            typ_id__2ZO=-1;
+            clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__ZZO);
+            if ((typ_id__2ZO == (__INTEGER)(-  1))) {
+              a__QYFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__RYFH=(__UINTEGER_32)((__UINTEGER_32)(sz__ZZO + a__QYFH) & (__UINTEGER_32)(~ a__QYFH));
+              ptr_table__CHKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__RYFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__BHKH=((__POINTER )(NULL));
+              result__DHKH=((__POINTER *)ptr_table__CHKH)[ 0];
+              if ((result__DHKH == (void *)NULL)) {
+                result__DHKH=new_lab__RTJ(new_size__RYFH);
+                next__BHKH=(void *)((unsigned long)result__DHKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RYFH)));
+                ((__POINTER *)next__BHKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__CHKH)[ 0]=next__BHKH;
               } else {
-                next__IYJH=((__POINTER *)result__KYJH)[ 0];
-                if ((next__IYJH == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__KYJH - (unsigned long)begin_memory__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)));
+                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__4XH)))) &  4095) + (__UINTEGER_32)(new_size__RYFH <<  1)) <=  4096)) {
+                    next__BHKH=(void *)((unsigned long)result__DHKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RYFH)));
                   } else {
-                    next__IYJH=new_lab__FTJ(new_size__2OGH);
+                    next__BHKH=new_lab__RTJ(new_size__RYFH);
                   };
-                  ((__POINTER *)next__IYJH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__JYJH)[ 0]=next__IYJH;
+                  ((__POINTER *)next__BHKH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__CHKH)[ 0]=next__BHKH;
                 } else {
-                  ((__POINTER *)result__KYJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__IYJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__KYJH=next__IYJH;
+                  ((__POINTER *)result__DHKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BHKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__DHKH=next__BHKH;
                 };
               };
-              ptr__LZO=result__KYJH;
-            } else {
-              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;
+              ptr__XZO=result__DHKH;
+            } else {
+              t__VYFH=((__UINTEGER_32 )typ_id__2ZO);
+              a__UYFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__KHKH=(__UINTEGER_32)((__UINTEGER_32)(sz__ZZO + a__UYFH) & (__UINTEGER_32)(~ a__UYFH));
+              ptr_table__HHKH=((__POINTER )(&(table_type[(t__VYFH)])));
+              lab_type__JHKH=(__UINTEGER_32)(t__VYFH |  1);
+              next__GHKH=((__POINTER )(NULL));
+              result__IHKH=((__POINTER *)ptr_table__HHKH)[ 0];
+              if ((result__IHKH == (void *)NULL)) {
+                result__IHKH=new_lab__RTJ(lab_type__JHKH);
+                next__GHKH=(void *)((unsigned long)result__IHKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KHKH)));
+                ((__POINTER *)next__GHKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__HHKH)[ 0]=next__GHKH;
               } else {
-                next__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)));
+                next__GHKH=((__POINTER *)result__IHKH)[ 0];
+                if ((next__GHKH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__IHKH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__KHKH <<  1)) <=  4096)) {
+                    next__GHKH=(void *)((unsigned long)result__IHKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KHKH)));
                   } else {
-                    next__NYJH=new_lab__FTJ(lab_type__QYJH);
+                    next__GHKH=new_lab__RTJ(lab_type__JHKH);
                   };
-                  ((__POINTER *)next__NYJH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__OYJH)[ 0]=next__NYJH;
+                  ((__POINTER *)next__GHKH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__HHKH)[ 0]=next__GHKH;
                 } else {
-                  ((__POINTER *)result__PYJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NYJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__PYJH=next__NYJH;
+                  ((__POINTER *)result__IHKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GHKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__IHKH=next__GHKH;
                 };
               };
-              ptr__LZO=result__PYJH;
+              ptr__XZO=result__IHKH;
             };
-            result__KZO=((__ITM_EXPRESSION *)ptr__LZO);
-            *(result__KZO) = *(ITM_EXPRESSION__);
+            result__WZO=((__ITM_EXPRESSION *)ptr__XZO);
+            *(result__WZO) = *(ITM_EXPRESSION__);
           };
-          ((__ITM_EXPRESSION *)result__KZO)->value_list__DKV=l_expr__IGL;
-          result__GGL=result__KZO;
+          ((__ITM_EXPRESSION *)result__WZO)->value_list__PJV=l_expr__UGL;
+          result__SGL=result__WZO;
         };
       };
     };
-    result__0AJ=result__GGL;
+    result__GBJ=result__SGL;
   };
-  return(result__0AJ);
+  return(result__GBJ);
 }
 
-static void set_value__type__SIHC(__ITM_SLOT *Self__TIHC,void *e__UIHC,void *p__VIHC)
+static void set_value__type__DFHC(__ITM_SLOT *Self__EFHC,void *e__FFHC,void *p__GFHC)
 // ({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__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) {
+  void *n__WDBD;
+  void *sec__XDBD;
+  __POSITION __tmp__DEBD,__tmp__LEBD,__tmp__5EBD,__tmp__IFBD;
+  __ITM_ARG *result__35HH,*Self__FAIH;
+  __POINTER ptr__45HH,ptr_table__MHKH,next__LHKH,result__NHKH;
+  __POINTER ptr_table__RHKH,next__QHKH,result__SHKH,ptr__YQAC;
+  __POINTER ptr_table__WHKH,next__VHKH,result__XHKH,ptr_table__1HKH;
+  __POINTER next__0HKH,result__2HKH,ptr__OWI,ptr_table__AIKH,next__5HKH;
+  __POINTER result__BIKH,ptr_table__FIKH,next__EIKH,result__GIKH;
+  __POINTER ptr__1GCD,ptr_table__KIKH,next__JIKH,result__LIKH;
+  __POINTER ptr_table__PIKH,next__OIKH,result__QIKH;
+  __INTEGER typ_id__55HH,typ_id__3QAC,typ_id__TWI,typ_id__AHCD;
+  __UINTEGER_32 sz__AAIH,a__BAIH,new_size__CAIH,t__DAIH,a__EAIH;
+  __UINTEGER_32 new_size__UHKH,lab_type__THKH,sz__0QAC,a__YYFH;
+  __UINTEGER_32 new_size__ZYFH,t__3YFH,a__2YFH,new_size__4HKH;
+  __UINTEGER_32 lab_type__3HKH,sz__QWI,a__UZFH,new_size__VZFH,t__ZZFH;
+  __UINTEGER_32 a__YZFH,new_size__IIKH,lab_type__HIKH,sz__3GCD,a__2ZFH;
+  __UINTEGER_32 new_size__3ZFH,t__B0FH,a__A0FH,new_size__SIKH;
+  __UINTEGER_32 lab_type__RIKH;
+  __ITM_SLOT *result__XQAC,*Self__C2HC;
+  __ITM_PROTOTYPE *result__NWI;
+  __ITM_READ_ARG1 *result__0GCD;
+  void *larg__YDBD;
+  if ((Self__EFHC->affect__P5FC != '<')) {
+    copy__VDS(string_tmp__VH,(&__string_240));
+    append__3OS(string_tmp__VH,Self__EFHC->parent_named__15.name__LI);
+    n__WDBD=get__YWB(string_tmp__VH);
+    sec__XDBD=get_name__TROB((&__string_27));
+    larg__YDBD=create_with_capacity__LJ5B( 1);
+    switch (((struct ___OBJ *)e__FFHC)->__id) {
     case __ITM_LIST__: {
-      __tmp__JHBD=((__ITM_LIST *)e__UIHC)->parent_itm_code__VAF.parent_itm_object__SEE.position__GFJ;
+      __tmp__DEBD=((__ITM_LIST *)e__FFHC)->parent_itm_code__SBF.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_LDOTS__: {
-      __tmp__JHBD=((__ITM_LDOTS *)e__UIHC)->parent_itm_constant__LWF.parent_itm_object__SEE.position__GFJ;
+      __tmp__DEBD=((__ITM_LDOTS *)e__FFHC)->parent_itm_constant__IXF.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_PROTOTYPE__: {
-      __tmp__JHBD=((__ITM_PROTOTYPE *)e__UIHC)->parent_itm_constant__XXF.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
+      __tmp__DEBD=((__ITM_PROTOTYPE *)e__FFHC)->parent_itm_constant__UYF.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_LIST_IDF__: {
-      __tmp__JHBD=((__ITM_LIST_IDF *)e__UIHC)->parent_itm_code__PEJ.parent_itm_object__SEE.position__GFJ;
+      __tmp__DEBD=((__ITM_LIST_IDF *)e__FFHC)->parent_itm_code__1EJ.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_WRITE_VALUE__: {
-      __tmp__JHBD=((__ITM_WRITE_VALUE *)e__UIHC)->parent_itm_write__FFJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
+      __tmp__DEBD=((__ITM_WRITE_VALUE *)e__FFHC)->parent_itm_write__RFJ.parent_itm_code__QFJ.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_WRITE_CAST__: {
-      __tmp__JHBD=((__ITM_WRITE_CAST *)e__UIHC)->parent_itm_write__2FJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
+      __tmp__DEBD=((__ITM_WRITE_CAST *)e__FFHC)->parent_itm_write__IGJ.parent_itm_code__QFJ.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_READ__: {
-      __tmp__JHBD=((__ITM_READ *)e__UIHC)->parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
+      __tmp__DEBD=((__ITM_READ *)e__FFHC)->parent_itm_code__VIJ.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_WRITE_CODE__: {
-      __tmp__JHBD=((__ITM_WRITE_CODE *)e__UIHC)->parent_itm_write__HJJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
+      __tmp__DEBD=((__ITM_WRITE_CODE *)e__FFHC)->parent_itm_write__TJJ.parent_itm_code__QFJ.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_OPERATOR__: {
-      __tmp__JHBD=((__ITM_OPERATOR *)e__UIHC)->parent_itm_code__JGL.parent_itm_object__SEE.position__GFJ;
+      __tmp__DEBD=((__ITM_OPERATOR *)e__FFHC)->parent_itm_code__VGL.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_READ_ARG1__: {
-      __tmp__JHBD=((__ITM_READ_ARG1 *)e__UIHC)->parent_itm_read__PJL.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
+      __tmp__DEBD=((__ITM_READ_ARG1 *)e__FFHC)->parent_itm_read__1JL.parent_itm_code__VIJ.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_READ_ARG2__: {
-      __tmp__JHBD=((__ITM_READ_ARG2 *)e__UIHC)->parent_itm_read__2LL.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
+      __tmp__DEBD=((__ITM_READ_ARG2 *)e__FFHC)->parent_itm_read__IML.parent_itm_code__VIJ.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_EXPRESSION__: {
-      __tmp__JHBD=position__SE5B(e__UIHC);
+      __tmp__DEBD=position__5A5B(e__FFHC);
     } break;
     case __ITM_OLD__: {
-      __tmp__JHBD=((__ITM_OLD *)e__UIHC)->parent_itm_code__K3L.parent_itm_object__SEE.position__GFJ;
+      __tmp__DEBD=((__ITM_OLD *)e__FFHC)->parent_itm_code__W3L.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_EXTERNAL_TYPE__: {
-      __tmp__JHBD=((__ITM_EXTERNAL_TYPE *)e__UIHC)->parent_itm_extern__54M.parent_itm_code__44M.parent_itm_object__SEE.position__GFJ;
+      __tmp__DEBD=((__ITM_EXTERNAL_TYPE *)e__FFHC)->parent_itm_extern__L5M.parent_itm_code__K5M.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_BLOCK__: {
-      __tmp__JHBD=((__ITM_LIST *)((__ITM_BLOCK *)e__UIHC)->list__ZPDC)->parent_itm_code__VAF.parent_itm_object__SEE.position__GFJ;
+      __tmp__DEBD=((__ITM_LIST *)((__ITM_BLOCK *)e__FFHC)->list__KMDC)->parent_itm_code__SBF.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_EXTERNAL__: {
-      __tmp__JHBD=((__ITM_EXTERNAL *)e__UIHC)->parent_itm_extern__EGN.parent_itm_code__44M.parent_itm_object__SEE.position__GFJ;
+      __tmp__DEBD=((__ITM_EXTERNAL *)e__FFHC)->parent_itm_extern__QGN.parent_itm_code__K5M.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_READ_ARGS__: {
-      __tmp__JHBD=((__ITM_READ_ARGS *)e__UIHC)->parent_itm_read__0DO.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
+      __tmp__DEBD=((__ITM_READ_ARGS *)e__FFHC)->parent_itm_read__GEO.parent_itm_code__VIJ.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_REAL__: {
-      __tmp__JHBD=((__ITM_REAL *)e__UIHC)->parent_itm_constant__VRO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
+      __tmp__DEBD=((__ITM_REAL *)e__FFHC)->parent_itm_constant__BSO.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_NUMBER__: {
-      __tmp__JHBD=((__ITM_NUMBER *)e__UIHC)->parent_itm_constant__HSO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
+      __tmp__DEBD=((__ITM_NUMBER *)e__FFHC)->parent_itm_constant__TSO.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_CHARACTER__: {
-      __tmp__JHBD=((__ITM_CHARACTER *)e__UIHC)->parent_itm_constant__ZSO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
+      __tmp__DEBD=((__ITM_CHARACTER *)e__FFHC)->parent_itm_constant__FTO.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_STRING__: {
-      __tmp__JHBD=((__ITM_STRING *)e__UIHC)->parent_itm_constant__KTO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
+      __tmp__DEBD=((__ITM_STRING *)e__FFHC)->parent_itm_constant__WTO.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_RESULT__: {
-      __tmp__JHBD=position__4LHC(e__UIHC);
+      __tmp__DEBD=position__PIHC(e__FFHC);
     } break;
     };
-    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__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__XYJH=new_lab__FTJ(lab_type__0YJH);
-            };
-            ((__POINTER *)next__XYJH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__YYJH)[ 0]=next__XYJH;
-          } else {
-            ((__POINTER *)result__ZYJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XYJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__ZYJH=next__XYJH;
-          };
-        };
-        ptr__4HIH=result__ZYJH;
-      };
-      result__3HIH=((__ITM_ARG *)ptr__4HIH);
-      *(result__3HIH) = *(ITM_ARG__);
-    };
-    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) {
+    result__35HH=NULL;
+    ptr__45HH=((__POINTER )(NULL));
+    typ_id__55HH= 0;
+    sz__AAIH=((__UINTEGER_32 )sizeof(__ITM_ARG));
+    if ((sz__AAIH ==  0)) {
+      result__35HH=ITM_ARG__;
+    } else {
+      typ_id__55HH=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__AAIH);
+      if ((typ_id__55HH == (__INTEGER)(-  1))) {
+        a__BAIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__CAIH=(__UINTEGER_32)((__UINTEGER_32)(sz__AAIH + a__BAIH) & (__UINTEGER_32)(~ a__BAIH));
+        ptr_table__MHKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__CAIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__LHKH=((__POINTER )(NULL));
+        result__NHKH=((__POINTER *)ptr_table__MHKH)[ 0];
+        if ((result__NHKH == (void *)NULL)) {
+          result__NHKH=new_lab__RTJ(new_size__CAIH);
+          next__LHKH=(void *)((unsigned long)result__NHKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CAIH)));
+          ((__POINTER *)next__LHKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__MHKH)[ 0]=next__LHKH;
+        } else {
+          next__LHKH=((__POINTER *)result__NHKH)[ 0];
+          if ((next__LHKH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__NHKH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__CAIH <<  1)) <=  4096)) {
+              next__LHKH=(void *)((unsigned long)result__NHKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CAIH)));
+            } else {
+              next__LHKH=new_lab__RTJ(new_size__CAIH);
+            };
+            ((__POINTER *)next__LHKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__MHKH)[ 0]=next__LHKH;
+          } else {
+            ((__POINTER *)result__NHKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LHKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__NHKH=next__LHKH;
+          };
+        };
+        ptr__45HH=result__NHKH;
+      } else {
+        t__DAIH=((__UINTEGER_32 )typ_id__55HH);
+        a__EAIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__UHKH=(__UINTEGER_32)((__UINTEGER_32)(sz__AAIH + a__EAIH) & (__UINTEGER_32)(~ a__EAIH));
+        ptr_table__RHKH=((__POINTER )(&(table_type[(t__DAIH)])));
+        lab_type__THKH=(__UINTEGER_32)(t__DAIH |  1);
+        next__QHKH=((__POINTER )(NULL));
+        result__SHKH=((__POINTER *)ptr_table__RHKH)[ 0];
+        if ((result__SHKH == (void *)NULL)) {
+          result__SHKH=new_lab__RTJ(lab_type__THKH);
+          next__QHKH=(void *)((unsigned long)result__SHKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UHKH)));
+          ((__POINTER *)next__QHKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__RHKH)[ 0]=next__QHKH;
+        } else {
+          next__QHKH=((__POINTER *)result__SHKH)[ 0];
+          if ((next__QHKH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__SHKH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__UHKH <<  1)) <=  4096)) {
+              next__QHKH=(void *)((unsigned long)result__SHKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UHKH)));
+            } else {
+              next__QHKH=new_lab__RTJ(lab_type__THKH);
+            };
+            ((__POINTER *)next__QHKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__RHKH)[ 0]=next__QHKH;
+          } else {
+            ((__POINTER *)result__SHKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QHKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__SHKH=next__QHKH;
+          };
+        };
+        ptr__45HH=result__SHKH;
+      };
+      result__35HH=((__ITM_ARG *)ptr__45HH);
+      *(result__35HH) = *(ITM_ARG__);
+    };
+    Self__FAIH=((__ITM_ARG *)result__35HH);
+    Self__FAIH->parent_itm_argument__SEHB.parent_itm_code__O5M.position__SFJ=__tmp__DEBD;
+    Self__FAIH->name__F0HC=(&__string_58);
+    Self__FAIH->type__G0HC=type_self__DVN;
+    add_last__E5GC(larg__YDBD,result__35HH);
+    switch (((struct ___OBJ *)e__FFHC)->__id) {
     case __ITM_LIST__: {
-      __tmp__RHBD=((__ITM_LIST *)e__UIHC)->parent_itm_code__VAF.parent_itm_object__SEE.position__GFJ;
+      __tmp__LEBD=((__ITM_LIST *)e__FFHC)->parent_itm_code__SBF.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_LDOTS__: {
-      __tmp__RHBD=((__ITM_LDOTS *)e__UIHC)->parent_itm_constant__LWF.parent_itm_object__SEE.position__GFJ;
+      __tmp__LEBD=((__ITM_LDOTS *)e__FFHC)->parent_itm_constant__IXF.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_PROTOTYPE__: {
-      __tmp__RHBD=((__ITM_PROTOTYPE *)e__UIHC)->parent_itm_constant__XXF.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
+      __tmp__LEBD=((__ITM_PROTOTYPE *)e__FFHC)->parent_itm_constant__UYF.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_LIST_IDF__: {
-      __tmp__RHBD=((__ITM_LIST_IDF *)e__UIHC)->parent_itm_code__PEJ.parent_itm_object__SEE.position__GFJ;
+      __tmp__LEBD=((__ITM_LIST_IDF *)e__FFHC)->parent_itm_code__1EJ.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_WRITE_VALUE__: {
-      __tmp__RHBD=((__ITM_WRITE_VALUE *)e__UIHC)->parent_itm_write__FFJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
+      __tmp__LEBD=((__ITM_WRITE_VALUE *)e__FFHC)->parent_itm_write__RFJ.parent_itm_code__QFJ.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_WRITE_CAST__: {
-      __tmp__RHBD=((__ITM_WRITE_CAST *)e__UIHC)->parent_itm_write__2FJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
+      __tmp__LEBD=((__ITM_WRITE_CAST *)e__FFHC)->parent_itm_write__IGJ.parent_itm_code__QFJ.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_READ__: {
-      __tmp__RHBD=((__ITM_READ *)e__UIHC)->parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
+      __tmp__LEBD=((__ITM_READ *)e__FFHC)->parent_itm_code__VIJ.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_WRITE_CODE__: {
-      __tmp__RHBD=((__ITM_WRITE_CODE *)e__UIHC)->parent_itm_write__HJJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
+      __tmp__LEBD=((__ITM_WRITE_CODE *)e__FFHC)->parent_itm_write__TJJ.parent_itm_code__QFJ.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_OPERATOR__: {
-      __tmp__RHBD=((__ITM_OPERATOR *)e__UIHC)->parent_itm_code__JGL.parent_itm_object__SEE.position__GFJ;
+      __tmp__LEBD=((__ITM_OPERATOR *)e__FFHC)->parent_itm_code__VGL.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_READ_ARG1__: {
-      __tmp__RHBD=((__ITM_READ_ARG1 *)e__UIHC)->parent_itm_read__PJL.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
+      __tmp__LEBD=((__ITM_READ_ARG1 *)e__FFHC)->parent_itm_read__1JL.parent_itm_code__VIJ.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_READ_ARG2__: {
-      __tmp__RHBD=((__ITM_READ_ARG2 *)e__UIHC)->parent_itm_read__2LL.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
+      __tmp__LEBD=((__ITM_READ_ARG2 *)e__FFHC)->parent_itm_read__IML.parent_itm_code__VIJ.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_EXPRESSION__: {
-      __tmp__RHBD=position__SE5B(e__UIHC);
+      __tmp__LEBD=position__5A5B(e__FFHC);
     } break;
     case __ITM_OLD__: {
-      __tmp__RHBD=((__ITM_OLD *)e__UIHC)->parent_itm_code__K3L.parent_itm_object__SEE.position__GFJ;
+      __tmp__LEBD=((__ITM_OLD *)e__FFHC)->parent_itm_code__W3L.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_EXTERNAL_TYPE__: {
-      __tmp__RHBD=((__ITM_EXTERNAL_TYPE *)e__UIHC)->parent_itm_extern__54M.parent_itm_code__44M.parent_itm_object__SEE.position__GFJ;
+      __tmp__LEBD=((__ITM_EXTERNAL_TYPE *)e__FFHC)->parent_itm_extern__L5M.parent_itm_code__K5M.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_BLOCK__: {
-      __tmp__RHBD=((__ITM_LIST *)((__ITM_BLOCK *)e__UIHC)->list__ZPDC)->parent_itm_code__VAF.parent_itm_object__SEE.position__GFJ;
+      __tmp__LEBD=((__ITM_LIST *)((__ITM_BLOCK *)e__FFHC)->list__KMDC)->parent_itm_code__SBF.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_EXTERNAL__: {
-      __tmp__RHBD=((__ITM_EXTERNAL *)e__UIHC)->parent_itm_extern__EGN.parent_itm_code__44M.parent_itm_object__SEE.position__GFJ;
+      __tmp__LEBD=((__ITM_EXTERNAL *)e__FFHC)->parent_itm_extern__QGN.parent_itm_code__K5M.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_READ_ARGS__: {
-      __tmp__RHBD=((__ITM_READ_ARGS *)e__UIHC)->parent_itm_read__0DO.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
+      __tmp__LEBD=((__ITM_READ_ARGS *)e__FFHC)->parent_itm_read__GEO.parent_itm_code__VIJ.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_REAL__: {
-      __tmp__RHBD=((__ITM_REAL *)e__UIHC)->parent_itm_constant__VRO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
+      __tmp__LEBD=((__ITM_REAL *)e__FFHC)->parent_itm_constant__BSO.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_NUMBER__: {
-      __tmp__RHBD=((__ITM_NUMBER *)e__UIHC)->parent_itm_constant__HSO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
+      __tmp__LEBD=((__ITM_NUMBER *)e__FFHC)->parent_itm_constant__TSO.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_CHARACTER__: {
-      __tmp__RHBD=((__ITM_CHARACTER *)e__UIHC)->parent_itm_constant__ZSO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
+      __tmp__LEBD=((__ITM_CHARACTER *)e__FFHC)->parent_itm_constant__FTO.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_STRING__: {
-      __tmp__RHBD=((__ITM_STRING *)e__UIHC)->parent_itm_constant__KTO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
+      __tmp__LEBD=((__ITM_STRING *)e__FFHC)->parent_itm_constant__WTO.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_RESULT__: {
-      __tmp__RHBD=position__4LHC(e__UIHC);
+      __tmp__LEBD=position__PIHC(e__FFHC);
     } break;
     };
-    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__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__BZJH=new_lab__FTJ(lab_type__EZJH);
-            };
-            ((__POINTER *)next__BZJH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__CZJH)[ 0]=next__BZJH;
-          } else {
-            ((__POINTER *)result__DZJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BZJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__DZJH=next__BZJH;
-          };
-        };
-        ptr__LUAC=result__DZJH;
-      };
-      result__KUAC=((__ITM_SLOT *)ptr__LUAC);
-      *(result__KUAC) = *(ITM_SLOT__);
-    };
-    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) {
+    result__XQAC=NULL;
+    ptr__YQAC=((__POINTER )(NULL));
+    typ_id__3QAC= 0;
+    sz__0QAC=((__UINTEGER_32 )sizeof(__ITM_SLOT));
+    if ((sz__0QAC ==  0)) {
+      result__XQAC=ITM_SLOT__;
+    } else {
+      typ_id__3QAC=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__0QAC);
+      if ((typ_id__3QAC == (__INTEGER)(-  1))) {
+        a__YYFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__ZYFH=(__UINTEGER_32)((__UINTEGER_32)(sz__0QAC + a__YYFH) & (__UINTEGER_32)(~ a__YYFH));
+        ptr_table__WHKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ZYFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__VHKH=((__POINTER )(NULL));
+        result__XHKH=((__POINTER *)ptr_table__WHKH)[ 0];
+        if ((result__XHKH == (void *)NULL)) {
+          result__XHKH=new_lab__RTJ(new_size__ZYFH);
+          next__VHKH=(void *)((unsigned long)result__XHKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZYFH)));
+          ((__POINTER *)next__VHKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__WHKH)[ 0]=next__VHKH;
+        } else {
+          next__VHKH=((__POINTER *)result__XHKH)[ 0];
+          if ((next__VHKH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XHKH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__ZYFH <<  1)) <=  4096)) {
+              next__VHKH=(void *)((unsigned long)result__XHKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZYFH)));
+            } else {
+              next__VHKH=new_lab__RTJ(new_size__ZYFH);
+            };
+            ((__POINTER *)next__VHKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__WHKH)[ 0]=next__VHKH;
+          } else {
+            ((__POINTER *)result__XHKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VHKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__XHKH=next__VHKH;
+          };
+        };
+        ptr__YQAC=result__XHKH;
+      } else {
+        t__3YFH=((__UINTEGER_32 )typ_id__3QAC);
+        a__2YFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__4HKH=(__UINTEGER_32)((__UINTEGER_32)(sz__0QAC + a__2YFH) & (__UINTEGER_32)(~ a__2YFH));
+        ptr_table__1HKH=((__POINTER )(&(table_type[(t__3YFH)])));
+        lab_type__3HKH=(__UINTEGER_32)(t__3YFH |  1);
+        next__0HKH=((__POINTER )(NULL));
+        result__2HKH=((__POINTER *)ptr_table__1HKH)[ 0];
+        if ((result__2HKH == (void *)NULL)) {
+          result__2HKH=new_lab__RTJ(lab_type__3HKH);
+          next__0HKH=(void *)((unsigned long)result__2HKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4HKH)));
+          ((__POINTER *)next__0HKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__1HKH)[ 0]=next__0HKH;
+        } else {
+          next__0HKH=((__POINTER *)result__2HKH)[ 0];
+          if ((next__0HKH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2HKH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__4HKH <<  1)) <=  4096)) {
+              next__0HKH=(void *)((unsigned long)result__2HKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4HKH)));
+            } else {
+              next__0HKH=new_lab__RTJ(lab_type__3HKH);
+            };
+            ((__POINTER *)next__0HKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__1HKH)[ 0]=next__0HKH;
+          } else {
+            ((__POINTER *)result__2HKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0HKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__2HKH=next__0HKH;
+          };
+        };
+        ptr__YQAC=result__2HKH;
+      };
+      result__XQAC=((__ITM_SLOT *)ptr__YQAC);
+      *(result__XQAC) = *(ITM_SLOT__);
+    };
+    Self__C2HC=((__ITM_SLOT *)result__XQAC);
+    Self__C2HC->parent_named__15.name__LI=n__WDBD;
+    Self__C2HC->parent_named__15.parent_itm_object__4.position__SFJ=__tmp__LEBD;
+    Self__C2HC->id_section__T3C=sec__XDBD;
+    ((__ITM_SLOT *)result__XQAC)->affect__P5FC='<';
+    set_value__type__DFHC(result__XQAC,e__FFHC,p__GFHC);
+    set_argument_list__5BHC(result__XQAC,larg__YDBD);
+    set_result_type__W2FC(result__XQAC,Self__EFHC->result_type__A4FC);
+    fast_put__to__LNGC(((__PROTOTYPE *)p__GFHC)->slot_list__YVS,result__XQAC,result__XQAC->parent_named__15.name__LI);
+    switch (((struct ___OBJ *)e__FFHC)->__id) {
     case __ITM_LIST__: {
-      __tmp__FIBD=((__ITM_LIST *)e__UIHC)->parent_itm_code__VAF.parent_itm_object__SEE.position__GFJ;
+      __tmp__5EBD=((__ITM_LIST *)e__FFHC)->parent_itm_code__SBF.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_LDOTS__: {
-      __tmp__FIBD=((__ITM_LDOTS *)e__UIHC)->parent_itm_constant__LWF.parent_itm_object__SEE.position__GFJ;
+      __tmp__5EBD=((__ITM_LDOTS *)e__FFHC)->parent_itm_constant__IXF.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_PROTOTYPE__: {
-      __tmp__FIBD=((__ITM_PROTOTYPE *)e__UIHC)->parent_itm_constant__XXF.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
+      __tmp__5EBD=((__ITM_PROTOTYPE *)e__FFHC)->parent_itm_constant__UYF.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_LIST_IDF__: {
-      __tmp__FIBD=((__ITM_LIST_IDF *)e__UIHC)->parent_itm_code__PEJ.parent_itm_object__SEE.position__GFJ;
+      __tmp__5EBD=((__ITM_LIST_IDF *)e__FFHC)->parent_itm_code__1EJ.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_WRITE_VALUE__: {
-      __tmp__FIBD=((__ITM_WRITE_VALUE *)e__UIHC)->parent_itm_write__FFJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
+      __tmp__5EBD=((__ITM_WRITE_VALUE *)e__FFHC)->parent_itm_write__RFJ.parent_itm_code__QFJ.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_WRITE_CAST__: {
-      __tmp__FIBD=((__ITM_WRITE_CAST *)e__UIHC)->parent_itm_write__2FJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
+      __tmp__5EBD=((__ITM_WRITE_CAST *)e__FFHC)->parent_itm_write__IGJ.parent_itm_code__QFJ.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_READ__: {
-      __tmp__FIBD=((__ITM_READ *)e__UIHC)->parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
+      __tmp__5EBD=((__ITM_READ *)e__FFHC)->parent_itm_code__VIJ.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_WRITE_CODE__: {
-      __tmp__FIBD=((__ITM_WRITE_CODE *)e__UIHC)->parent_itm_write__HJJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
+      __tmp__5EBD=((__ITM_WRITE_CODE *)e__FFHC)->parent_itm_write__TJJ.parent_itm_code__QFJ.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_OPERATOR__: {
-      __tmp__FIBD=((__ITM_OPERATOR *)e__UIHC)->parent_itm_code__JGL.parent_itm_object__SEE.position__GFJ;
+      __tmp__5EBD=((__ITM_OPERATOR *)e__FFHC)->parent_itm_code__VGL.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_READ_ARG1__: {
-      __tmp__FIBD=((__ITM_READ_ARG1 *)e__UIHC)->parent_itm_read__PJL.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
+      __tmp__5EBD=((__ITM_READ_ARG1 *)e__FFHC)->parent_itm_read__1JL.parent_itm_code__VIJ.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_READ_ARG2__: {
-      __tmp__FIBD=((__ITM_READ_ARG2 *)e__UIHC)->parent_itm_read__2LL.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
+      __tmp__5EBD=((__ITM_READ_ARG2 *)e__FFHC)->parent_itm_read__IML.parent_itm_code__VIJ.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_EXPRESSION__: {
-      __tmp__FIBD=position__SE5B(e__UIHC);
+      __tmp__5EBD=position__5A5B(e__FFHC);
     } break;
     case __ITM_OLD__: {
-      __tmp__FIBD=((__ITM_OLD *)e__UIHC)->parent_itm_code__K3L.parent_itm_object__SEE.position__GFJ;
+      __tmp__5EBD=((__ITM_OLD *)e__FFHC)->parent_itm_code__W3L.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_EXTERNAL_TYPE__: {
-      __tmp__FIBD=((__ITM_EXTERNAL_TYPE *)e__UIHC)->parent_itm_extern__54M.parent_itm_code__44M.parent_itm_object__SEE.position__GFJ;
+      __tmp__5EBD=((__ITM_EXTERNAL_TYPE *)e__FFHC)->parent_itm_extern__L5M.parent_itm_code__K5M.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_BLOCK__: {
-      __tmp__FIBD=((__ITM_LIST *)((__ITM_BLOCK *)e__UIHC)->list__ZPDC)->parent_itm_code__VAF.parent_itm_object__SEE.position__GFJ;
+      __tmp__5EBD=((__ITM_LIST *)((__ITM_BLOCK *)e__FFHC)->list__KMDC)->parent_itm_code__SBF.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_EXTERNAL__: {
-      __tmp__FIBD=((__ITM_EXTERNAL *)e__UIHC)->parent_itm_extern__EGN.parent_itm_code__44M.parent_itm_object__SEE.position__GFJ;
+      __tmp__5EBD=((__ITM_EXTERNAL *)e__FFHC)->parent_itm_extern__QGN.parent_itm_code__K5M.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_READ_ARGS__: {
-      __tmp__FIBD=((__ITM_READ_ARGS *)e__UIHC)->parent_itm_read__0DO.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
+      __tmp__5EBD=((__ITM_READ_ARGS *)e__FFHC)->parent_itm_read__GEO.parent_itm_code__VIJ.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_REAL__: {
-      __tmp__FIBD=((__ITM_REAL *)e__UIHC)->parent_itm_constant__VRO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
+      __tmp__5EBD=((__ITM_REAL *)e__FFHC)->parent_itm_constant__BSO.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_NUMBER__: {
-      __tmp__FIBD=((__ITM_NUMBER *)e__UIHC)->parent_itm_constant__HSO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
+      __tmp__5EBD=((__ITM_NUMBER *)e__FFHC)->parent_itm_constant__TSO.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_CHARACTER__: {
-      __tmp__FIBD=((__ITM_CHARACTER *)e__UIHC)->parent_itm_constant__ZSO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
+      __tmp__5EBD=((__ITM_CHARACTER *)e__FFHC)->parent_itm_constant__FTO.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_STRING__: {
-      __tmp__FIBD=((__ITM_STRING *)e__UIHC)->parent_itm_constant__KTO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
+      __tmp__5EBD=((__ITM_STRING *)e__FFHC)->parent_itm_constant__WTO.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_RESULT__: {
-      __tmp__FIBD=position__4LHC(e__UIHC);
+      __tmp__5EBD=position__PIHC(e__FFHC);
     } break;
     };
-    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)));
+    get__IVI(((__PROTOTYPE *)p__GFHC)->parent_named__5.name__LI);
+    result__NWI=NULL;
+    ptr__OWI=((__POINTER )(NULL));
+    typ_id__TWI= 0;
+    sz__QWI=((__UINTEGER_32 )sizeof(__ITM_PROTOTYPE));
+    if ((sz__QWI ==  0)) {
+      result__NWI=ITM_PROTOTYPE__;
+    } else {
+      typ_id__TWI=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__QWI);
+      if ((typ_id__TWI == (__INTEGER)(-  1))) {
+        a__UZFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__VZFH=(__UINTEGER_32)((__UINTEGER_32)(sz__QWI + a__UZFH) & (__UINTEGER_32)(~ a__UZFH));
+        ptr_table__AIKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__VZFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__5HKH=((__POINTER )(NULL));
+        result__BIKH=((__POINTER *)ptr_table__AIKH)[ 0];
+        if ((result__BIKH == (void *)NULL)) {
+          result__BIKH=new_lab__RTJ(new_size__VZFH);
+          next__5HKH=(void *)((unsigned long)result__BIKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VZFH)));
+          ((__POINTER *)next__5HKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__AIKH)[ 0]=next__5HKH;
+        } else {
+          next__5HKH=((__POINTER *)result__BIKH)[ 0];
+          if ((next__5HKH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BIKH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__VZFH <<  1)) <=  4096)) {
+              next__5HKH=(void *)((unsigned long)result__BIKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VZFH)));
             } else {
-              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)));
+              next__5HKH=new_lab__RTJ(new_size__VZFH);
+            };
+            ((__POINTER *)next__5HKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__AIKH)[ 0]=next__5HKH;
+          } else {
+            ((__POINTER *)result__BIKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5HKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__BIKH=next__5HKH;
+          };
+        };
+        ptr__OWI=result__BIKH;
+      } else {
+        t__ZZFH=((__UINTEGER_32 )typ_id__TWI);
+        a__YZFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__IIKH=(__UINTEGER_32)((__UINTEGER_32)(sz__QWI + a__YZFH) & (__UINTEGER_32)(~ a__YZFH));
+        ptr_table__FIKH=((__POINTER )(&(table_type[(t__ZZFH)])));
+        lab_type__HIKH=(__UINTEGER_32)(t__ZZFH |  1);
+        next__EIKH=((__POINTER )(NULL));
+        result__GIKH=((__POINTER *)ptr_table__FIKH)[ 0];
+        if ((result__GIKH == (void *)NULL)) {
+          result__GIKH=new_lab__RTJ(lab_type__HIKH);
+          next__EIKH=(void *)((unsigned long)result__GIKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IIKH)));
+          ((__POINTER *)next__EIKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__FIKH)[ 0]=next__EIKH;
+        } else {
+          next__EIKH=((__POINTER *)result__GIKH)[ 0];
+          if ((next__EIKH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GIKH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__IIKH <<  1)) <=  4096)) {
+              next__EIKH=(void *)((unsigned long)result__GIKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IIKH)));
             } else {
-              next__LZJH=new_lab__FTJ(lab_type__OZJH);
+              next__EIKH=new_lab__RTJ(lab_type__HIKH);
             };
-            ((__POINTER *)next__LZJH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__MZJH)[ 0]=next__LZJH;
+            ((__POINTER *)next__EIKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__FIKH)[ 0]=next__EIKH;
           } else {
-            ((__POINTER *)result__NZJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LZJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__NZJH=next__LZJH;
+            ((__POINTER *)result__GIKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EIKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__GIKH=next__EIKH;
           };
         };
-        ptr__CWI=result__NZJH;
+        ptr__OWI=result__GIKH;
       };
-      result__BWI=((__ITM_PROTOTYPE *)ptr__CWI);
-      *(result__BWI) = *(ITM_PROTOTYPE__);
+      result__NWI=((__ITM_PROTOTYPE *)ptr__OWI);
+      *(result__NWI) = *(ITM_PROTOTYPE__);
     };
-    ((__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) {
+    ((__ITM_PROTOTYPE *)result__NWI)->parent_itm_constant__UYF.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ=__tmp__5EBD;
+    switch (((struct ___OBJ *)e__FFHC)->__id) {
     case __ITM_LIST__: {
-      __tmp__OIBD=((__ITM_LIST *)e__UIHC)->parent_itm_code__VAF.parent_itm_object__SEE.position__GFJ;
+      __tmp__IFBD=((__ITM_LIST *)e__FFHC)->parent_itm_code__SBF.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_LDOTS__: {
-      __tmp__OIBD=((__ITM_LDOTS *)e__UIHC)->parent_itm_constant__LWF.parent_itm_object__SEE.position__GFJ;
+      __tmp__IFBD=((__ITM_LDOTS *)e__FFHC)->parent_itm_constant__IXF.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_PROTOTYPE__: {
-      __tmp__OIBD=((__ITM_PROTOTYPE *)e__UIHC)->parent_itm_constant__XXF.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
+      __tmp__IFBD=((__ITM_PROTOTYPE *)e__FFHC)->parent_itm_constant__UYF.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_LIST_IDF__: {
-      __tmp__OIBD=((__ITM_LIST_IDF *)e__UIHC)->parent_itm_code__PEJ.parent_itm_object__SEE.position__GFJ;
+      __tmp__IFBD=((__ITM_LIST_IDF *)e__FFHC)->parent_itm_code__1EJ.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_WRITE_VALUE__: {
-      __tmp__OIBD=((__ITM_WRITE_VALUE *)e__UIHC)->parent_itm_write__FFJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
+      __tmp__IFBD=((__ITM_WRITE_VALUE *)e__FFHC)->parent_itm_write__RFJ.parent_itm_code__QFJ.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_WRITE_CAST__: {
-      __tmp__OIBD=((__ITM_WRITE_CAST *)e__UIHC)->parent_itm_write__2FJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
+      __tmp__IFBD=((__ITM_WRITE_CAST *)e__FFHC)->parent_itm_write__IGJ.parent_itm_code__QFJ.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_READ__: {
-      __tmp__OIBD=((__ITM_READ *)e__UIHC)->parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
+      __tmp__IFBD=((__ITM_READ *)e__FFHC)->parent_itm_code__VIJ.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_WRITE_CODE__: {
-      __tmp__OIBD=((__ITM_WRITE_CODE *)e__UIHC)->parent_itm_write__HJJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
+      __tmp__IFBD=((__ITM_WRITE_CODE *)e__FFHC)->parent_itm_write__TJJ.parent_itm_code__QFJ.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_OPERATOR__: {
-      __tmp__OIBD=((__ITM_OPERATOR *)e__UIHC)->parent_itm_code__JGL.parent_itm_object__SEE.position__GFJ;
+      __tmp__IFBD=((__ITM_OPERATOR *)e__FFHC)->parent_itm_code__VGL.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_READ_ARG1__: {
-      __tmp__OIBD=((__ITM_READ_ARG1 *)e__UIHC)->parent_itm_read__PJL.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
+      __tmp__IFBD=((__ITM_READ_ARG1 *)e__FFHC)->parent_itm_read__1JL.parent_itm_code__VIJ.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_READ_ARG2__: {
-      __tmp__OIBD=((__ITM_READ_ARG2 *)e__UIHC)->parent_itm_read__2LL.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
+      __tmp__IFBD=((__ITM_READ_ARG2 *)e__FFHC)->parent_itm_read__IML.parent_itm_code__VIJ.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_EXPRESSION__: {
-      __tmp__OIBD=position__SE5B(e__UIHC);
+      __tmp__IFBD=position__5A5B(e__FFHC);
     } break;
     case __ITM_OLD__: {
-      __tmp__OIBD=((__ITM_OLD *)e__UIHC)->parent_itm_code__K3L.parent_itm_object__SEE.position__GFJ;
+      __tmp__IFBD=((__ITM_OLD *)e__FFHC)->parent_itm_code__W3L.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_EXTERNAL_TYPE__: {
-      __tmp__OIBD=((__ITM_EXTERNAL_TYPE *)e__UIHC)->parent_itm_extern__54M.parent_itm_code__44M.parent_itm_object__SEE.position__GFJ;
+      __tmp__IFBD=((__ITM_EXTERNAL_TYPE *)e__FFHC)->parent_itm_extern__L5M.parent_itm_code__K5M.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_BLOCK__: {
-      __tmp__OIBD=((__ITM_LIST *)((__ITM_BLOCK *)e__UIHC)->list__ZPDC)->parent_itm_code__VAF.parent_itm_object__SEE.position__GFJ;
+      __tmp__IFBD=((__ITM_LIST *)((__ITM_BLOCK *)e__FFHC)->list__KMDC)->parent_itm_code__SBF.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_EXTERNAL__: {
-      __tmp__OIBD=((__ITM_EXTERNAL *)e__UIHC)->parent_itm_extern__EGN.parent_itm_code__44M.parent_itm_object__SEE.position__GFJ;
+      __tmp__IFBD=((__ITM_EXTERNAL *)e__FFHC)->parent_itm_extern__QGN.parent_itm_code__K5M.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_READ_ARGS__: {
-      __tmp__OIBD=((__ITM_READ_ARGS *)e__UIHC)->parent_itm_read__0DO.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
+      __tmp__IFBD=((__ITM_READ_ARGS *)e__FFHC)->parent_itm_read__GEO.parent_itm_code__VIJ.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_REAL__: {
-      __tmp__OIBD=((__ITM_REAL *)e__UIHC)->parent_itm_constant__VRO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
+      __tmp__IFBD=((__ITM_REAL *)e__FFHC)->parent_itm_constant__BSO.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_NUMBER__: {
-      __tmp__OIBD=((__ITM_NUMBER *)e__UIHC)->parent_itm_constant__HSO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
+      __tmp__IFBD=((__ITM_NUMBER *)e__FFHC)->parent_itm_constant__TSO.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_CHARACTER__: {
-      __tmp__OIBD=((__ITM_CHARACTER *)e__UIHC)->parent_itm_constant__ZSO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
+      __tmp__IFBD=((__ITM_CHARACTER *)e__FFHC)->parent_itm_constant__FTO.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_STRING__: {
-      __tmp__OIBD=((__ITM_STRING *)e__UIHC)->parent_itm_constant__KTO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
+      __tmp__IFBD=((__ITM_STRING *)e__FFHC)->parent_itm_constant__WTO.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ;
     } break;
     case __ITM_RESULT__: {
-      __tmp__OIBD=position__4LHC(e__UIHC);
+      __tmp__IFBD=position__PIHC(e__FFHC);
     } break;
     };
-    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__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)));
+    result__0GCD=NULL;
+    ptr__1GCD=((__POINTER )(NULL));
+    typ_id__AHCD= 0;
+    sz__3GCD=((__UINTEGER_32 )sizeof(__ITM_READ_ARG1));
+    if ((sz__3GCD ==  0)) {
+      result__0GCD=ITM_READ_ARG1__;
+    } else {
+      typ_id__AHCD=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__3GCD);
+      if ((typ_id__AHCD == (__INTEGER)(-  1))) {
+        a__2ZFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__3ZFH=(__UINTEGER_32)((__UINTEGER_32)(sz__3GCD + a__2ZFH) & (__UINTEGER_32)(~ a__2ZFH));
+        ptr_table__KIKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__3ZFH / ((__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__RTJ(new_size__3ZFH);
+          next__JIKH=(void *)((unsigned long)result__LIKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3ZFH)));
+          ((__POINTER *)next__JIKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__KIKH)[ 0]=next__JIKH;
+        } else {
+          next__JIKH=((__POINTER *)result__LIKH)[ 0];
+          if ((next__JIKH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LIKH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__3ZFH <<  1)) <=  4096)) {
+              next__JIKH=(void *)((unsigned long)result__LIKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3ZFH)));
+            } else {
+              next__JIKH=new_lab__RTJ(new_size__3ZFH);
+            };
+            ((__POINTER *)next__JIKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__KIKH)[ 0]=next__JIKH;
+          } else {
+            ((__POINTER *)result__LIKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JIKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__LIKH=next__JIKH;
+          };
+        };
+        ptr__1GCD=result__LIKH;
+      } else {
+        t__B0FH=((__UINTEGER_32 )typ_id__AHCD);
+        a__A0FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__SIKH=(__UINTEGER_32)((__UINTEGER_32)(sz__3GCD + a__A0FH) & (__UINTEGER_32)(~ a__A0FH));
+        ptr_table__PIKH=((__POINTER )(&(table_type[(t__B0FH)])));
+        lab_type__RIKH=(__UINTEGER_32)(t__B0FH |  1);
+        next__OIKH=((__POINTER )(NULL));
+        result__QIKH=((__POINTER *)ptr_table__PIKH)[ 0];
+        if ((result__QIKH == (void *)NULL)) {
+          result__QIKH=new_lab__RTJ(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__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__4XH)))) &  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__VZJH=new_lab__FTJ(lab_type__YZJH);
+              next__OIKH=new_lab__RTJ(lab_type__RIKH);
             };
-            ((__POINTER *)next__VZJH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__WZJH)[ 0]=next__VZJH;
+            ((__POINTER *)next__OIKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__PIKH)[ 0]=next__OIKH;
           } else {
-            ((__POINTER *)result__XZJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VZJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__XZJH=next__VZJH;
+            ((__POINTER *)result__QIKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OIKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__QIKH=next__OIKH;
           };
         };
-        ptr__WICD=result__XZJH;
+        ptr__1GCD=result__QIKH;
       };
-      result__VICD=((__ITM_READ_ARG1 *)ptr__WICD);
-      *(result__VICD) = *(ITM_READ_ARG1__);
+      result__0GCD=((__ITM_READ_ARG1 *)ptr__1GCD);
+      *(result__0GCD) = *(ITM_READ_ARG1__);
     };
-    ((__ITM_READ_ARG1 *)result__VICD)->parent_itm_read__PJL.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ=__tmp__OIBD;
+    ((__ITM_READ_ARG1 *)result__0GCD)->parent_itm_read__1JL.parent_itm_code__VIJ.parent_itm_object__PFE.position__SFJ=__tmp__IFBD;
   };
 }
 
-static __POSITION position__SE5B(__ITM_EXPRESSION *Self__TE5B)
+static __POSITION position__5A5B(__ITM_EXPRESSION *Self__AB5B)
 // ({ITM_EXPRESSION}) With resultRecursive, No inlinable.
 {
-  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) {
+  void *__tmp__DB5B;
+  __POSITION __tmp__EB5B;
+  __tmp__DB5B=((void **)((__FAST_ARRAYoITM_CODEo *)Self__AB5B->value_list__PJV)->parent_arrayed_collection__JWF.storage__4ZT)[ 0];
+  switch (((struct ___OBJ *)__tmp__DB5B)->__id) {
   case __ITM_LIST__: {
-    __tmp__XE5B=((__ITM_LIST *)__tmp__WE5B)->parent_itm_code__VAF.parent_itm_object__SEE.position__GFJ;
+    __tmp__EB5B=((__ITM_LIST *)__tmp__DB5B)->parent_itm_code__SBF.parent_itm_object__PFE.position__SFJ;
   } break;
   case __ITM_LDOTS__: {
-    __tmp__XE5B=((__ITM_LDOTS *)__tmp__WE5B)->parent_itm_constant__LWF.parent_itm_object__SEE.position__GFJ;
+    __tmp__EB5B=((__ITM_LDOTS *)__tmp__DB5B)->parent_itm_constant__IXF.parent_itm_object__PFE.position__SFJ;
   } break;
   case __ITM_PROTOTYPE__: {
-    __tmp__XE5B=((__ITM_PROTOTYPE *)__tmp__WE5B)->parent_itm_constant__XXF.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
+    __tmp__EB5B=((__ITM_PROTOTYPE *)__tmp__DB5B)->parent_itm_constant__UYF.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ;
   } break;
   case __ITM_LIST_IDF__: {
-    __tmp__XE5B=((__ITM_LIST_IDF *)__tmp__WE5B)->parent_itm_code__PEJ.parent_itm_object__SEE.position__GFJ;
+    __tmp__EB5B=((__ITM_LIST_IDF *)__tmp__DB5B)->parent_itm_code__1EJ.parent_itm_object__PFE.position__SFJ;
   } break;
   case __ITM_WRITE_VALUE__: {
-    __tmp__XE5B=((__ITM_WRITE_VALUE *)__tmp__WE5B)->parent_itm_write__FFJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
+    __tmp__EB5B=((__ITM_WRITE_VALUE *)__tmp__DB5B)->parent_itm_write__RFJ.parent_itm_code__QFJ.parent_itm_object__PFE.position__SFJ;
   } break;
   case __ITM_WRITE_CAST__: {
-    __tmp__XE5B=((__ITM_WRITE_CAST *)__tmp__WE5B)->parent_itm_write__2FJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
+    __tmp__EB5B=((__ITM_WRITE_CAST *)__tmp__DB5B)->parent_itm_write__IGJ.parent_itm_code__QFJ.parent_itm_object__PFE.position__SFJ;
   } break;
   case __ITM_READ__: {
-    __tmp__XE5B=((__ITM_READ *)__tmp__WE5B)->parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
+    __tmp__EB5B=((__ITM_READ *)__tmp__DB5B)->parent_itm_code__VIJ.parent_itm_object__PFE.position__SFJ;
   } break;
   case __ITM_WRITE_CODE__: {
-    __tmp__XE5B=((__ITM_WRITE_CODE *)__tmp__WE5B)->parent_itm_write__HJJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
+    __tmp__EB5B=((__ITM_WRITE_CODE *)__tmp__DB5B)->parent_itm_write__TJJ.parent_itm_code__QFJ.parent_itm_object__PFE.position__SFJ;
   } break;
   case __ITM_OPERATOR__: {
-    __tmp__XE5B=((__ITM_OPERATOR *)__tmp__WE5B)->parent_itm_code__JGL.parent_itm_object__SEE.position__GFJ;
+    __tmp__EB5B=((__ITM_OPERATOR *)__tmp__DB5B)->parent_itm_code__VGL.parent_itm_object__PFE.position__SFJ;
   } break;
   case __ITM_READ_ARG1__: {
-    __tmp__XE5B=((__ITM_READ_ARG1 *)__tmp__WE5B)->parent_itm_read__PJL.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
+    __tmp__EB5B=((__ITM_READ_ARG1 *)__tmp__DB5B)->parent_itm_read__1JL.parent_itm_code__VIJ.parent_itm_object__PFE.position__SFJ;
   } break;
   case __ITM_READ_ARG2__: {
-    __tmp__XE5B=((__ITM_READ_ARG2 *)__tmp__WE5B)->parent_itm_read__2LL.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
+    __tmp__EB5B=((__ITM_READ_ARG2 *)__tmp__DB5B)->parent_itm_read__IML.parent_itm_code__VIJ.parent_itm_object__PFE.position__SFJ;
   } break;
   case __ITM_EXPRESSION__: {
-    __tmp__XE5B=position__SE5B(__tmp__WE5B);
+    __tmp__EB5B=position__5A5B(__tmp__DB5B);
   } break;
   case __ITM_OLD__: {
-    __tmp__XE5B=((__ITM_OLD *)__tmp__WE5B)->parent_itm_code__K3L.parent_itm_object__SEE.position__GFJ;
+    __tmp__EB5B=((__ITM_OLD *)__tmp__DB5B)->parent_itm_code__W3L.parent_itm_object__PFE.position__SFJ;
   } break;
   case __ITM_EXTERNAL_TYPE__: {
-    __tmp__XE5B=((__ITM_EXTERNAL_TYPE *)__tmp__WE5B)->parent_itm_extern__54M.parent_itm_code__44M.parent_itm_object__SEE.position__GFJ;
+    __tmp__EB5B=((__ITM_EXTERNAL_TYPE *)__tmp__DB5B)->parent_itm_extern__L5M.parent_itm_code__K5M.parent_itm_object__PFE.position__SFJ;
   } break;
   case __ITM_BLOCK__: {
-    __tmp__XE5B=((__ITM_LIST *)((__ITM_BLOCK *)__tmp__WE5B)->list__ZPDC)->parent_itm_code__VAF.parent_itm_object__SEE.position__GFJ;
+    __tmp__EB5B=((__ITM_LIST *)((__ITM_BLOCK *)__tmp__DB5B)->list__KMDC)->parent_itm_code__SBF.parent_itm_object__PFE.position__SFJ;
   } break;
   case __ITM_EXTERNAL__: {
-    __tmp__XE5B=((__ITM_EXTERNAL *)__tmp__WE5B)->parent_itm_extern__EGN.parent_itm_code__44M.parent_itm_object__SEE.position__GFJ;
+    __tmp__EB5B=((__ITM_EXTERNAL *)__tmp__DB5B)->parent_itm_extern__QGN.parent_itm_code__K5M.parent_itm_object__PFE.position__SFJ;
   } break;
   case __ITM_READ_ARGS__: {
-    __tmp__XE5B=((__ITM_READ_ARGS *)__tmp__WE5B)->parent_itm_read__0DO.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
+    __tmp__EB5B=((__ITM_READ_ARGS *)__tmp__DB5B)->parent_itm_read__GEO.parent_itm_code__VIJ.parent_itm_object__PFE.position__SFJ;
   } break;
   case __ITM_REAL__: {
-    __tmp__XE5B=((__ITM_REAL *)__tmp__WE5B)->parent_itm_constant__VRO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
+    __tmp__EB5B=((__ITM_REAL *)__tmp__DB5B)->parent_itm_constant__BSO.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ;
   } break;
   case __ITM_NUMBER__: {
-    __tmp__XE5B=((__ITM_NUMBER *)__tmp__WE5B)->parent_itm_constant__HSO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
+    __tmp__EB5B=((__ITM_NUMBER *)__tmp__DB5B)->parent_itm_constant__TSO.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ;
   } break;
   case __ITM_CHARACTER__: {
-    __tmp__XE5B=((__ITM_CHARACTER *)__tmp__WE5B)->parent_itm_constant__ZSO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
+    __tmp__EB5B=((__ITM_CHARACTER *)__tmp__DB5B)->parent_itm_constant__FTO.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ;
   } break;
   case __ITM_STRING__: {
-    __tmp__XE5B=((__ITM_STRING *)__tmp__WE5B)->parent_itm_constant__KTO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
+    __tmp__EB5B=((__ITM_STRING *)__tmp__DB5B)->parent_itm_constant__WTO.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ;
   } break;
   case __ITM_RESULT__: {
-    __tmp__XE5B=position__4LHC(__tmp__WE5B);
+    __tmp__EB5B=position__PIHC(__tmp__DB5B);
   } break;
   };
-  return(__tmp__XE5B);
+  return(__tmp__EB5B);
 }
 
-static __POSITION position__4LHC(__ITM_RESULT *Self__5LHC)
+static __POSITION position__PIHC(__ITM_RESULT *Self__QIHC)
 // ({ITM_RESULT}) With resultRecursive, No inlinable.
 {
-  void *__tmp__BMHC;
-  __POSITION __tmp__CMHC;
-  __tmp__BMHC=Self__5LHC->value__FOFC;
-  switch (((struct ___OBJ *)__tmp__BMHC)->__id) {
+  void *__tmp__SIHC;
+  __POSITION __tmp__TIHC;
+  __tmp__SIHC=Self__QIHC->value__WKFC;
+  switch (((struct ___OBJ *)__tmp__SIHC)->__id) {
   case __ITM_LIST__: {
-    __tmp__CMHC=((__ITM_LIST *)__tmp__BMHC)->parent_itm_code__VAF.parent_itm_object__SEE.position__GFJ;
+    __tmp__TIHC=((__ITM_LIST *)__tmp__SIHC)->parent_itm_code__SBF.parent_itm_object__PFE.position__SFJ;
   } break;
   case __ITM_LDOTS__: {
-    __tmp__CMHC=((__ITM_LDOTS *)__tmp__BMHC)->parent_itm_constant__LWF.parent_itm_object__SEE.position__GFJ;
+    __tmp__TIHC=((__ITM_LDOTS *)__tmp__SIHC)->parent_itm_constant__IXF.parent_itm_object__PFE.position__SFJ;
   } break;
   case __ITM_PROTOTYPE__: {
-    __tmp__CMHC=((__ITM_PROTOTYPE *)__tmp__BMHC)->parent_itm_constant__XXF.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
+    __tmp__TIHC=((__ITM_PROTOTYPE *)__tmp__SIHC)->parent_itm_constant__UYF.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ;
   } break;
   case __ITM_LIST_IDF__: {
-    __tmp__CMHC=((__ITM_LIST_IDF *)__tmp__BMHC)->parent_itm_code__PEJ.parent_itm_object__SEE.position__GFJ;
+    __tmp__TIHC=((__ITM_LIST_IDF *)__tmp__SIHC)->parent_itm_code__1EJ.parent_itm_object__PFE.position__SFJ;
   } break;
   case __ITM_WRITE_VALUE__: {
-    __tmp__CMHC=((__ITM_WRITE_VALUE *)__tmp__BMHC)->parent_itm_write__FFJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
+    __tmp__TIHC=((__ITM_WRITE_VALUE *)__tmp__SIHC)->parent_itm_write__RFJ.parent_itm_code__QFJ.parent_itm_object__PFE.position__SFJ;
   } break;
   case __ITM_WRITE_CAST__: {
-    __tmp__CMHC=((__ITM_WRITE_CAST *)__tmp__BMHC)->parent_itm_write__2FJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
+    __tmp__TIHC=((__ITM_WRITE_CAST *)__tmp__SIHC)->parent_itm_write__IGJ.parent_itm_code__QFJ.parent_itm_object__PFE.position__SFJ;
   } break;
   case __ITM_READ__: {
-    __tmp__CMHC=((__ITM_READ *)__tmp__BMHC)->parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
+    __tmp__TIHC=((__ITM_READ *)__tmp__SIHC)->parent_itm_code__VIJ.parent_itm_object__PFE.position__SFJ;
   } break;
   case __ITM_WRITE_CODE__: {
-    __tmp__CMHC=((__ITM_WRITE_CODE *)__tmp__BMHC)->parent_itm_write__HJJ.parent_itm_code__EFJ.parent_itm_object__SEE.position__GFJ;
+    __tmp__TIHC=((__ITM_WRITE_CODE *)__tmp__SIHC)->parent_itm_write__TJJ.parent_itm_code__QFJ.parent_itm_object__PFE.position__SFJ;
   } break;
   case __ITM_OPERATOR__: {
-    __tmp__CMHC=((__ITM_OPERATOR *)__tmp__BMHC)->parent_itm_code__JGL.parent_itm_object__SEE.position__GFJ;
+    __tmp__TIHC=((__ITM_OPERATOR *)__tmp__SIHC)->parent_itm_code__VGL.parent_itm_object__PFE.position__SFJ;
   } break;
   case __ITM_READ_ARG1__: {
-    __tmp__CMHC=((__ITM_READ_ARG1 *)__tmp__BMHC)->parent_itm_read__PJL.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
+    __tmp__TIHC=((__ITM_READ_ARG1 *)__tmp__SIHC)->parent_itm_read__1JL.parent_itm_code__VIJ.parent_itm_object__PFE.position__SFJ;
   } break;
   case __ITM_READ_ARG2__: {
-    __tmp__CMHC=((__ITM_READ_ARG2 *)__tmp__BMHC)->parent_itm_read__2LL.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
+    __tmp__TIHC=((__ITM_READ_ARG2 *)__tmp__SIHC)->parent_itm_read__IML.parent_itm_code__VIJ.parent_itm_object__PFE.position__SFJ;
   } break;
   case __ITM_EXPRESSION__: {
-    __tmp__CMHC=position__SE5B(__tmp__BMHC);
+    __tmp__TIHC=position__5A5B(__tmp__SIHC);
   } break;
   case __ITM_OLD__: {
-    __tmp__CMHC=((__ITM_OLD *)__tmp__BMHC)->parent_itm_code__K3L.parent_itm_object__SEE.position__GFJ;
+    __tmp__TIHC=((__ITM_OLD *)__tmp__SIHC)->parent_itm_code__W3L.parent_itm_object__PFE.position__SFJ;
   } break;
   case __ITM_EXTERNAL_TYPE__: {
-    __tmp__CMHC=((__ITM_EXTERNAL_TYPE *)__tmp__BMHC)->parent_itm_extern__54M.parent_itm_code__44M.parent_itm_object__SEE.position__GFJ;
+    __tmp__TIHC=((__ITM_EXTERNAL_TYPE *)__tmp__SIHC)->parent_itm_extern__L5M.parent_itm_code__K5M.parent_itm_object__PFE.position__SFJ;
   } break;
   case __ITM_BLOCK__: {
-    __tmp__CMHC=((__ITM_LIST *)((__ITM_BLOCK *)__tmp__BMHC)->list__ZPDC)->parent_itm_code__VAF.parent_itm_object__SEE.position__GFJ;
+    __tmp__TIHC=((__ITM_LIST *)((__ITM_BLOCK *)__tmp__SIHC)->list__KMDC)->parent_itm_code__SBF.parent_itm_object__PFE.position__SFJ;
   } break;
   case __ITM_EXTERNAL__: {
-    __tmp__CMHC=((__ITM_EXTERNAL *)__tmp__BMHC)->parent_itm_extern__EGN.parent_itm_code__44M.parent_itm_object__SEE.position__GFJ;
+    __tmp__TIHC=((__ITM_EXTERNAL *)__tmp__SIHC)->parent_itm_extern__QGN.parent_itm_code__K5M.parent_itm_object__PFE.position__SFJ;
   } break;
   case __ITM_READ_ARGS__: {
-    __tmp__CMHC=((__ITM_READ_ARGS *)__tmp__BMHC)->parent_itm_read__0DO.parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ;
+    __tmp__TIHC=((__ITM_READ_ARGS *)__tmp__SIHC)->parent_itm_read__GEO.parent_itm_code__VIJ.parent_itm_object__PFE.position__SFJ;
   } break;
   case __ITM_REAL__: {
-    __tmp__CMHC=((__ITM_REAL *)__tmp__BMHC)->parent_itm_constant__VRO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
+    __tmp__TIHC=((__ITM_REAL *)__tmp__SIHC)->parent_itm_constant__BSO.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ;
   } break;
   case __ITM_NUMBER__: {
-    __tmp__CMHC=((__ITM_NUMBER *)__tmp__BMHC)->parent_itm_constant__HSO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
+    __tmp__TIHC=((__ITM_NUMBER *)__tmp__SIHC)->parent_itm_constant__TSO.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ;
   } break;
   case __ITM_CHARACTER__: {
-    __tmp__CMHC=((__ITM_CHARACTER *)__tmp__BMHC)->parent_itm_constant__ZSO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
+    __tmp__TIHC=((__ITM_CHARACTER *)__tmp__SIHC)->parent_itm_constant__FTO.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ;
   } break;
   case __ITM_STRING__: {
-    __tmp__CMHC=((__ITM_STRING *)__tmp__BMHC)->parent_itm_constant__KTO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ;
+    __tmp__TIHC=((__ITM_STRING *)__tmp__SIHC)->parent_itm_constant__WTO.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ;
   } break;
   case __ITM_RESULT__: {
-    __tmp__CMHC=position__4LHC(__tmp__BMHC);
+    __tmp__TIHC=position__PIHC(__tmp__SIHC);
   } break;
   };
-  return(__tmp__CMHC);
+  return(__tmp__TIHC);
 }
 
-static void fast_put__to__0QGC(__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *Self__1QGC,void *v__2QGC,void *k__3QGC)
+static void fast_put__to__LNGC(__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *Self__MNGC,void *v__NNGC,void *k__ONGC)
 // ({HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo},{NULLxITM_SLOTxITM_SLOT_OPERATOR},{NULLxSTRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __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__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__5ZJH=new_lab__FTJ(lab_type__C0JH);
-            };
-            ((__POINTER *)next__5ZJH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__A0JH)[ 0]=next__5ZJH;
-          } else {
-            ((__POINTER *)result__B0JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5ZJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__B0JH=next__5ZJH;
-          };
-        };
-        ptr__4TID=result__B0JH;
-      };
-      result__3TID=((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)ptr__4TID);
-      *(result__3TID) = *(HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__);
-    };
-    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);
+  __INTEGER h__VNGC,idx__WNGC,idx__KRID,new_capacity__LRID,i__MRID;
+  __INTEGER typ_id__ZTID;
+  __POINTER ptr__UTID,ptr_table__UIKH,next__TIKH,result__VIKH;
+  __POINTER ptr_table__ZIKH,next__YIKH,result__0IKH;
+  __UINTEGER_32 sz__WTID,a__MZFH,new_size__NZFH,t__RZFH,a__QZFH;
+  __UINTEGER_32 new_size__2IKH,lab_type__1IKH;
+  void *node__XNGC,*node1__ORID,*node2__PRID,*__tmp__FPGC;
+  void **old_buckets__NRID;
+  __HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *result__TTID;
+  __HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *Self__FITD;
+  h__VNGC=hash_code__RNW(k__ONGC);
+  idx__WNGC=(__INTEGER)(h__VNGC % Self__MNGC->capacity__W3BC);
+  node__XNGC=((void **)Self__MNGC->buckets__NAGC)[idx__WNGC];
+  while ((! (((void *)node__XNGC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node__XNGC)->key__ZAGC == (void *)k__ONGC)))) {
+    node__XNGC=((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node__XNGC)->next__EBGC;
+  };
+  if (((void *)node__XNGC == (void *)NULL)) {
+    if ((Self__MNGC->capacity__W3BC == Self__MNGC->count__YOGC)) {
+      idx__KRID= 0;
+      node1__ORID=NULL;
+      node2__PRID=NULL;
+      old_buckets__NRID=Self__MNGC->buckets__NAGC;
+      new_capacity__LRID=prime_number_ceiling__021((__INTEGER)(Self__MNGC->capacity__W3BC +  1));
+      Self__MNGC->buckets__NAGC=create__PRSC(new_capacity__LRID);
+      i__MRID=(__INTEGER)(Self__MNGC->capacity__W3BC -  1);
+      Self__MNGC->capacity__W3BC=new_capacity__LRID;
+      while ((i__MRID >=  0)) {
+        node1__ORID=((void **)old_buckets__NRID)[i__MRID];
+        while (((void *)node1__ORID != (void *)NULL)) {
+          node2__PRID=((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node1__ORID)->next__EBGC;
+          idx__KRID=(__INTEGER)(hash_code__RNW(((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node1__ORID)->key__ZAGC) % Self__MNGC->capacity__W3BC);
+          ((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node1__ORID)->next__EBGC=((void **)Self__MNGC->buckets__NAGC)[idx__KRID];
+          ((void **)Self__MNGC->buckets__NAGC)[idx__KRID]=node1__ORID;
+          node1__ORID=node2__PRID;
+        };
+        i__MRID=(__INTEGER)(i__MRID -  1);
+      };
+      idx__WNGC=(__INTEGER)(h__VNGC % Self__MNGC->capacity__W3BC);
+    };
+    __tmp__FPGC=((void **)Self__MNGC->buckets__NAGC)[idx__WNGC];
+    result__TTID=NULL;
+    ptr__UTID=((__POINTER )(NULL));
+    typ_id__ZTID= 0;
+    sz__WTID=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo));
+    if ((sz__WTID ==  0)) {
+      result__TTID=HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__;
+    } else {
+      typ_id__ZTID=__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__WTID);
+      if ((typ_id__ZTID == (__INTEGER)(-  1))) {
+        a__MZFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__NZFH=(__UINTEGER_32)((__UINTEGER_32)(sz__WTID + a__MZFH) & (__UINTEGER_32)(~ a__MZFH));
+        ptr_table__UIKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__NZFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__TIKH=((__POINTER )(NULL));
+        result__VIKH=((__POINTER *)ptr_table__UIKH)[ 0];
+        if ((result__VIKH == (void *)NULL)) {
+          result__VIKH=new_lab__RTJ(new_size__NZFH);
+          next__TIKH=(void *)((unsigned long)result__VIKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NZFH)));
+          ((__POINTER *)next__TIKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__UIKH)[ 0]=next__TIKH;
+        } else {
+          next__TIKH=((__POINTER *)result__VIKH)[ 0];
+          if ((next__TIKH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__VIKH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__NZFH <<  1)) <=  4096)) {
+              next__TIKH=(void *)((unsigned long)result__VIKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NZFH)));
+            } else {
+              next__TIKH=new_lab__RTJ(new_size__NZFH);
+            };
+            ((__POINTER *)next__TIKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__UIKH)[ 0]=next__TIKH;
+          } else {
+            ((__POINTER *)result__VIKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TIKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__VIKH=next__TIKH;
+          };
+        };
+        ptr__UTID=result__VIKH;
+      } else {
+        t__RZFH=((__UINTEGER_32 )typ_id__ZTID);
+        a__QZFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__2IKH=(__UINTEGER_32)((__UINTEGER_32)(sz__WTID + a__QZFH) & (__UINTEGER_32)(~ a__QZFH));
+        ptr_table__ZIKH=((__POINTER )(&(table_type[(t__RZFH)])));
+        lab_type__1IKH=(__UINTEGER_32)(t__RZFH |  1);
+        next__YIKH=((__POINTER )(NULL));
+        result__0IKH=((__POINTER *)ptr_table__ZIKH)[ 0];
+        if ((result__0IKH == (void *)NULL)) {
+          result__0IKH=new_lab__RTJ(lab_type__1IKH);
+          next__YIKH=(void *)((unsigned long)result__0IKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2IKH)));
+          ((__POINTER *)next__YIKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__ZIKH)[ 0]=next__YIKH;
+        } else {
+          next__YIKH=((__POINTER *)result__0IKH)[ 0];
+          if ((next__YIKH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__0IKH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__2IKH <<  1)) <=  4096)) {
+              next__YIKH=(void *)((unsigned long)result__0IKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2IKH)));
+            } else {
+              next__YIKH=new_lab__RTJ(lab_type__1IKH);
+            };
+            ((__POINTER *)next__YIKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__ZIKH)[ 0]=next__YIKH;
+          } else {
+            ((__POINTER *)result__0IKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YIKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__0IKH=next__YIKH;
+          };
+        };
+        ptr__UTID=result__0IKH;
+      };
+      result__TTID=((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)ptr__UTID);
+      *(result__TTID) = *(HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__);
+    };
+    Self__FITD=((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)result__TTID);
+    Self__FITD->item__MBGC=v__NNGC;
+    Self__FITD->key__ZAGC=k__ONGC;
+    Self__FITD->next__EBGC=__tmp__FPGC;
+    node__XNGC=result__TTID;
+    ((void **)Self__MNGC->buckets__NAGC)[idx__WNGC]=result__TTID;
+    Self__MNGC->count__YOGC=(__INTEGER)(Self__MNGC->count__YOGC +  1);
   } else {
-    ((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node__GRGC)->item__1EGC=v__2QGC;
+    ((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node__XNGC)->item__MBGC=v__NNGC;
   };
 }
 
-static void* fast_reference_at__JDGC(__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *Self__KDGC,void *k__LDGC)
+static void* fast_reference_at__05FC(__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *Self__15FC,void *k__25FC)
 // ({HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  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);
+  void *result__HAGC;
+  void *node__GAGC;
+  result__HAGC=NULL;
+  node__GAGC=((void **)Self__15FC->buckets__NAGC)[(__INTEGER)(hash_code__RNW(k__25FC) % Self__15FC->capacity__W3BC)];
+  while ((! (((void *)node__GAGC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node__GAGC)->key__ZAGC == (void *)k__25FC)))) {
+    node__GAGC=((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node__GAGC)->next__EBGC;
+  };
+  if (((void *)node__GAGC != (void *)NULL)) {
+    result__HAGC=((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node__GAGC)->item__MBGC;
+  };
+  return(result__HAGC);
 }
 
-static void* fast_reference_at__TLNE(__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__ULNE,void *k__VLNE)
+static void* fast_reference_at__CMNE(__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__DMNE,void *k__EMNE)
 // ({HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __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);
+  void *result__OMNE;
+  void *node__NMNE;
+  result__OMNE=NULL;
+  node__NMNE=((void **)Self__DMNE->buckets__1DT)[(__INTEGER)(hash_code__RNW(k__EMNE) % Self__DMNE->capacity__WDT)];
+  while ((! (((void *)node__NMNE == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__NMNE)->key__HET == (void *)k__EMNE)))) {
+    node__NMNE=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__NMNE)->next__SET;
+  };
+  if (((void *)node__NMNE != (void *)NULL)) {
+    result__OMNE=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__NMNE)->item__KW3;
+  };
+  return(result__OMNE);
 }
 
-static void append_in__IIPD(__ITM_TYPE_BLOCK *Self__JIPD,void *buffer__KIPD)
+static void append_in__PJPD(__ITM_TYPE_BLOCK *Self__QJPD,void *buffer__RJPD)
 // ({ITM_TYPE_BLOCK},{NULLxSTRING}) VoidRecursive, No inlinable.
 {
-  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) {
+  void *typ_mul__SJPD,*__tmp__EKPD;
+  __STRING *Self__KAIH,*Self__SAIH,*Self__YAIH,*Self__4AIH,*Self__GBIH;
+  __STRING *Self__MBIH;
+  __INTEGER new_capacity__JAIH,old_nb_elts__MAIH,upper__AJKH,Self__4IKH;
+  __INTEGER new_capacity__RAIH,old_nb_elts__UAIH,upper__FJKH,Self__DJKH;
+  __INTEGER new_capacity__XAIH,old_nb_elts__0AIH,upper__KJKH,Self__IJKH;
+  __INTEGER new_capacity__3AIH,old_nb_elts__ABIH,upper__PJKH,Self__NJKH;
+  __INTEGER new_capacity__FBIH,old_nb_elts__IBIH,upper__UJKH,Self__SJKH;
+  __INTEGER new_capacity__LBIH,old_nb_elts__OBIH,upper__ZJKH,Self__XJKH;
+  void *__tmp__ZJPD,*__tmp__DKPD,*__tmp__KKPD;
+  __ITM_TYPE_STYLE *Self__QAIH,*Self__EBIH;
+  __CHARACTER *Self__LAIH,*new__NAIH,*Self__TAIH,*new__VAIH,*Self__ZAIH;
+  __CHARACTER *new__1AIH,*Self__5AIH,*new__BBIH,*Self__HBIH,*new__JBIH;
+  __CHARACTER *Self__NBIH,*new__PBIH;
+  typ_mul__SJPD=NULL;
+  Self__KAIH=((__STRING *)buffer__RJPD);
+  new_capacity__JAIH= 0;
+  if ((Self__KAIH->capacity__UCS <= Self__KAIH->count__SGC)) {
+    if ((Self__KAIH->capacity__UCS ==  0)) {
+      Self__KAIH->capacity__UCS= 32;
+      Self__KAIH->storage__3CS=create__YIEB( 32);
+    } else {
+      new_capacity__JAIH=(__INTEGER)(Self__KAIH->capacity__UCS <<  1);
+      Self__LAIH=((__CHARACTER *)Self__KAIH->storage__3CS);
+      old_nb_elts__MAIH=Self__KAIH->capacity__UCS;
+      new__NAIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__LAIH),((__UINTEGER_32 )old_nb_elts__MAIH),((__UINTEGER_32 )new_capacity__JAIH)));
+      upper__AJKH=(__INTEGER)(new_capacity__JAIH -  1);
+      Self__4IKH=old_nb_elts__MAIH;
+      while ((Self__4IKH <= upper__AJKH)) {
+        new__NAIH[Self__4IKH]='\0';
+        Self__4IKH=(__INTEGER)(Self__4IKH +  1);
+      };
+      Self__KAIH->storage__3CS=new__NAIH;
+      Self__KAIH->capacity__UCS=new_capacity__JAIH;
+    };
+  };
+  ((__CHARACTER *)Self__KAIH->storage__3CS)[Self__KAIH->count__SGC]='{';
+  Self__KAIH->count__SGC=(__INTEGER)(Self__KAIH->count__SGC +  1);
+  if (((void *)Self__QJPD->type_argument__SNN != (void *)NULL)) {
+    __tmp__ZJPD=Self__QJPD->type_argument__SNN;
+    switch (((struct ___OBJ *)__tmp__ZJPD)->__id) {
     case __ITM_TYPE_PARAMETER__: {
-      append__ROS(buffer__KIPD,((__ITM_TYPE_PARAMETER *)__tmp__SIPD)->parent_itm_type__YEE.name__0YP);
+      append__3OS(buffer__RJPD,((__ITM_TYPE_PARAMETER *)__tmp__ZJPD)->parent_itm_type__VFE.name__GZP);
     } break;
     case __ITM_TYPE_SIMPLE__: {
-      append__ROS(buffer__KIPD,((__ITM_TYPE_SIMPLE *)__tmp__SIPD)->name__0YP);
+      append__3OS(buffer__RJPD,((__ITM_TYPE_SIMPLE *)__tmp__ZJPD)->name__GZP);
     } break;
     case __ITM_TYPE_MULTI__: {
-      append_in__1KBC(__tmp__SIPD,buffer__KIPD);
+      append_in__MHBC(__tmp__ZJPD,buffer__RJPD);
     } break;
     case __ITM_TYPE_BLOCK__: {
-      append_in__IIPD(__tmp__SIPD,buffer__KIPD);
+      append_in__PJPD(__tmp__ZJPD,buffer__RJPD);
     } break;
     case __ITM_TYPE_GENERIC__: {
-      append_in__MJPD(__tmp__SIPD,buffer__KIPD);
+      append_in__TKPD(__tmp__ZJPD,buffer__RJPD);
     } break;
     case __ITM_TYPE_STYLE__: {
-      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__ROS(buffer__KIPD,Self__XQGH->parent_itm_type_simple__RSN.name__0YP);
+      Self__QAIH=((__ITM_TYPE_STYLE *)__tmp__ZJPD);
+      if (((void *)Self__QAIH->style__PZP != (void *)NULL)) {
+        append__3OS(buffer__RJPD,Self__QAIH->style__PZP);
+        Self__SAIH=((__STRING *)buffer__RJPD);
+        new_capacity__RAIH= 0;
+        if ((Self__SAIH->capacity__UCS <= Self__SAIH->count__SGC)) {
+          if ((Self__SAIH->capacity__UCS ==  0)) {
+            Self__SAIH->capacity__UCS= 32;
+            Self__SAIH->storage__3CS=create__YIEB( 32);
+          } else {
+            new_capacity__RAIH=(__INTEGER)(Self__SAIH->capacity__UCS <<  1);
+            Self__TAIH=((__CHARACTER *)Self__SAIH->storage__3CS);
+            old_nb_elts__UAIH=Self__SAIH->capacity__UCS;
+            new__VAIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__TAIH),((__UINTEGER_32 )old_nb_elts__UAIH),((__UINTEGER_32 )new_capacity__RAIH)));
+            upper__FJKH=(__INTEGER)(new_capacity__RAIH -  1);
+            Self__DJKH=old_nb_elts__UAIH;
+            while ((Self__DJKH <= upper__FJKH)) {
+              new__VAIH[Self__DJKH]='\0';
+              Self__DJKH=(__INTEGER)(Self__DJKH +  1);
+            };
+            Self__SAIH->storage__3CS=new__VAIH;
+            Self__SAIH->capacity__UCS=new_capacity__RAIH;
+          };
+        };
+        ((__CHARACTER *)Self__SAIH->storage__3CS)[Self__SAIH->count__SGC]=' ';
+        Self__SAIH->count__SGC=(__INTEGER)(Self__SAIH->count__SGC +  1);
+      };
+      append__3OS(buffer__RJPD,Self__QAIH->parent_itm_type_simple__3SN.name__GZP);
     } break;
     };
-    add_last__GOT(buffer__KIPD,';');
-    add_last__GOT(buffer__KIPD,' ');
-  };
-  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__2IPD)->__id) {
+    Self__YAIH=((__STRING *)buffer__RJPD);
+    new_capacity__XAIH= 0;
+    if ((Self__YAIH->capacity__UCS <= Self__YAIH->count__SGC)) {
+      if ((Self__YAIH->capacity__UCS ==  0)) {
+        Self__YAIH->capacity__UCS= 32;
+        Self__YAIH->storage__3CS=create__YIEB( 32);
+      } else {
+        new_capacity__XAIH=(__INTEGER)(Self__YAIH->capacity__UCS <<  1);
+        Self__ZAIH=((__CHARACTER *)Self__YAIH->storage__3CS);
+        old_nb_elts__0AIH=Self__YAIH->capacity__UCS;
+        new__1AIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__ZAIH),((__UINTEGER_32 )old_nb_elts__0AIH),((__UINTEGER_32 )new_capacity__XAIH)));
+        upper__KJKH=(__INTEGER)(new_capacity__XAIH -  1);
+        Self__IJKH=old_nb_elts__0AIH;
+        while ((Self__IJKH <= upper__KJKH)) {
+          new__1AIH[Self__IJKH]='\0';
+          Self__IJKH=(__INTEGER)(Self__IJKH +  1);
+        };
+        Self__YAIH->storage__3CS=new__1AIH;
+        Self__YAIH->capacity__UCS=new_capacity__XAIH;
+      };
+    };
+    ((__CHARACTER *)Self__YAIH->storage__3CS)[Self__YAIH->count__SGC]=';';
+    Self__YAIH->count__SGC=(__INTEGER)(Self__YAIH->count__SGC +  1);
+    Self__4AIH=((__STRING *)buffer__RJPD);
+    new_capacity__3AIH= 0;
+    if ((Self__4AIH->capacity__UCS <= Self__4AIH->count__SGC)) {
+      if ((Self__4AIH->capacity__UCS ==  0)) {
+        Self__4AIH->capacity__UCS= 32;
+        Self__4AIH->storage__3CS=create__YIEB( 32);
+      } else {
+        new_capacity__3AIH=(__INTEGER)(Self__4AIH->capacity__UCS <<  1);
+        Self__5AIH=((__CHARACTER *)Self__4AIH->storage__3CS);
+        old_nb_elts__ABIH=Self__4AIH->capacity__UCS;
+        new__BBIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__5AIH),((__UINTEGER_32 )old_nb_elts__ABIH),((__UINTEGER_32 )new_capacity__3AIH)));
+        upper__PJKH=(__INTEGER)(new_capacity__3AIH -  1);
+        Self__NJKH=old_nb_elts__ABIH;
+        while ((Self__NJKH <= upper__PJKH)) {
+          new__BBIH[Self__NJKH]='\0';
+          Self__NJKH=(__INTEGER)(Self__NJKH +  1);
+        };
+        Self__4AIH->storage__3CS=new__BBIH;
+        Self__4AIH->capacity__UCS=new_capacity__3AIH;
+      };
+    };
+    ((__CHARACTER *)Self__4AIH->storage__3CS)[Self__4AIH->count__SGC]=' ';
+    Self__4AIH->count__SGC=(__INTEGER)(Self__4AIH->count__SGC +  1);
+  };
+  if (((void *)Self__QJPD->type_result__2NN != (void *)NULL)) {
+    __tmp__DKPD=Self__QJPD->type_result__2NN;
+    if (__tmp__DKPD==NULL) {
+      __tmp__EKPD=NULL;
+    } else {
+      switch (((struct ___OBJ *)__tmp__DKPD)->__id) {
       case __ITM_TYPE_PARAMETER__: {
-        __tmp__3IPD=NULL;
+        __tmp__EKPD=NULL;
       } break;
       case __ITM_TYPE_SIMPLE__: {
-        __tmp__3IPD=NULL;
+        __tmp__EKPD=NULL;
       } break;
       case __ITM_TYPE_MULTI__: {
-        __tmp__3IPD=((void *)__tmp__2IPD);
+        __tmp__EKPD=((void *)__tmp__DKPD);
       } break;
       case __ITM_TYPE_BLOCK__: {
-        __tmp__3IPD=NULL;
+        __tmp__EKPD=NULL;
       } break;
       case __ITM_TYPE_GENERIC__: {
-        __tmp__3IPD=NULL;
+        __tmp__EKPD=NULL;
       } break;
       case __ITM_TYPE_STYLE__: {
-        __tmp__3IPD=NULL;
+        __tmp__EKPD=NULL;
       } break;
       }
     };
-    typ_mul__LIPD=__tmp__3IPD;
-    if (((void *)__tmp__3IPD == (void *)NULL)) {
-      __tmp__DJPD=Self__JIPD->type_result__QNN;
-      switch (((struct ___OBJ *)__tmp__DJPD)->__id) {
+    typ_mul__SJPD=__tmp__EKPD;
+    if (((void *)__tmp__EKPD == (void *)NULL)) {
+      __tmp__KKPD=Self__QJPD->type_result__2NN;
+      switch (((struct ___OBJ *)__tmp__KKPD)->__id) {
       case __ITM_TYPE_PARAMETER__: {
-        append__ROS(buffer__KIPD,((__ITM_TYPE_PARAMETER *)__tmp__DJPD)->parent_itm_type__YEE.name__0YP);
+        append__3OS(buffer__RJPD,((__ITM_TYPE_PARAMETER *)__tmp__KKPD)->parent_itm_type__VFE.name__GZP);
       } break;
       case __ITM_TYPE_SIMPLE__: {
-        append__ROS(buffer__KIPD,((__ITM_TYPE_SIMPLE *)__tmp__DJPD)->name__0YP);
+        append__3OS(buffer__RJPD,((__ITM_TYPE_SIMPLE *)__tmp__KKPD)->name__GZP);
       } break;
       case __ITM_TYPE_MULTI__: {
-        append_in__1KBC(__tmp__DJPD,buffer__KIPD);
+        append_in__MHBC(__tmp__KKPD,buffer__RJPD);
       } break;
       case __ITM_TYPE_BLOCK__: {
-        append_in__IIPD(__tmp__DJPD,buffer__KIPD);
+        append_in__PJPD(__tmp__KKPD,buffer__RJPD);
       } break;
       case __ITM_TYPE_GENERIC__: {
-        append_in__MJPD(__tmp__DJPD,buffer__KIPD);
+        append_in__TKPD(__tmp__KKPD,buffer__RJPD);
       } break;
       case __ITM_TYPE_STYLE__: {
-        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,' ');
+        Self__EBIH=((__ITM_TYPE_STYLE *)__tmp__KKPD);
+        if (((void *)Self__EBIH->style__PZP != (void *)NULL)) {
+          append__3OS(buffer__RJPD,Self__EBIH->style__PZP);
+          Self__GBIH=((__STRING *)buffer__RJPD);
+          new_capacity__FBIH= 0;
+          if ((Self__GBIH->capacity__UCS <= Self__GBIH->count__SGC)) {
+            if ((Self__GBIH->capacity__UCS ==  0)) {
+              Self__GBIH->capacity__UCS= 32;
+              Self__GBIH->storage__3CS=create__YIEB( 32);
+            } else {
+              new_capacity__FBIH=(__INTEGER)(Self__GBIH->capacity__UCS <<  1);
+              Self__HBIH=((__CHARACTER *)Self__GBIH->storage__3CS);
+              old_nb_elts__IBIH=Self__GBIH->capacity__UCS;
+              new__JBIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__HBIH),((__UINTEGER_32 )old_nb_elts__IBIH),((__UINTEGER_32 )new_capacity__FBIH)));
+              upper__UJKH=(__INTEGER)(new_capacity__FBIH -  1);
+              Self__SJKH=old_nb_elts__IBIH;
+              while ((Self__SJKH <= upper__UJKH)) {
+                new__JBIH[Self__SJKH]='\0';
+                Self__SJKH=(__INTEGER)(Self__SJKH +  1);
+              };
+              Self__GBIH->storage__3CS=new__JBIH;
+              Self__GBIH->capacity__UCS=new_capacity__FBIH;
+            };
+          };
+          ((__CHARACTER *)Self__GBIH->storage__3CS)[Self__GBIH->count__SGC]=' ';
+          Self__GBIH->count__SGC=(__INTEGER)(Self__GBIH->count__SGC +  1);
         };
-        append__ROS(buffer__KIPD,Self__ZQGH->parent_itm_type_simple__RSN.name__0YP);
+        append__3OS(buffer__RJPD,Self__EBIH->parent_itm_type_simple__3SN.name__GZP);
       } break;
       };
     } else {
-      display_raw__1OIC(__tmp__3IPD,buffer__KIPD);
+      display_raw__MLIC(__tmp__EKPD,buffer__RJPD);
     };
   };
-  add_last__GOT(buffer__KIPD,'}');
+  Self__MBIH=((__STRING *)buffer__RJPD);
+  new_capacity__LBIH= 0;
+  if ((Self__MBIH->capacity__UCS <= Self__MBIH->count__SGC)) {
+    if ((Self__MBIH->capacity__UCS ==  0)) {
+      Self__MBIH->capacity__UCS= 32;
+      Self__MBIH->storage__3CS=create__YIEB( 32);
+    } else {
+      new_capacity__LBIH=(__INTEGER)(Self__MBIH->capacity__UCS <<  1);
+      Self__NBIH=((__CHARACTER *)Self__MBIH->storage__3CS);
+      old_nb_elts__OBIH=Self__MBIH->capacity__UCS;
+      new__PBIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__NBIH),((__UINTEGER_32 )old_nb_elts__OBIH),((__UINTEGER_32 )new_capacity__LBIH)));
+      upper__ZJKH=(__INTEGER)(new_capacity__LBIH -  1);
+      Self__XJKH=old_nb_elts__OBIH;
+      while ((Self__XJKH <= upper__ZJKH)) {
+        new__PBIH[Self__XJKH]='\0';
+        Self__XJKH=(__INTEGER)(Self__XJKH +  1);
+      };
+      Self__MBIH->storage__3CS=new__PBIH;
+      Self__MBIH->capacity__UCS=new_capacity__LBIH;
+    };
+  };
+  ((__CHARACTER *)Self__MBIH->storage__3CS)[Self__MBIH->count__SGC]='}';
+  Self__MBIH->count__SGC=(__INTEGER)(Self__MBIH->count__SGC +  1);
 }
 
-static void append_in__MJPD(__ITM_TYPE_GENERIC *Self__NJPD,void *buffer__OJPD)
+static void append_in__TKPD(__ITM_TYPE_GENERIC *Self__UKPD,void *buffer__VKPD)
 // ({ITM_TYPE_GENERIC},{NULLxSTRING}) VoidRecursive, No inlinable.
 {
-  __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) {
+  __STRING *Self__SBIH,*Self__YBIH,*Self__ACIH,*Self__GCIH,*Self__MCIH;
+  __STRING *Self__SCIH;
+  __INTEGER new_capacity__RBIH,old_nb_elts__UBIH,upper__4JKH,Self__2JKH;
+  __INTEGER new_capacity__XBIH,old_nb_elts__0BIH,upper__DKKH,Self__BKKH;
+  __INTEGER __tmp__GLPD,Self__Y2UD,new_capacity__5BIH,old_nb_elts__CCIH;
+  __INTEGER upper__IKKH,Self__GKKH,new_capacity__FCIH,old_nb_elts__ICIH;
+  __INTEGER upper__NKKH,Self__LKKH,new_capacity__LCIH,old_nb_elts__OCIH;
+  __INTEGER upper__SKKH,Self__QKKH,new_capacity__RCIH,old_nb_elts__UCIH;
+  __INTEGER upper__XKKH,Self__VKKH;
+  void *__tmp__NLPD,*__tmp__QLPD;
+  __ITM_TYPE_STYLE *Self__4BIH,*Self__SLPD;
+  __CHARACTER *Self__TBIH,*new__VBIH,*Self__ZBIH,*new__1BIH,*Self__BCIH;
+  __CHARACTER *new__DCIH,*Self__HCIH,*new__JCIH,*Self__NCIH,*new__PCIH;
+  __CHARACTER *Self__TCIH,*new__VCIH;
+  __FAST_ARRAYoITM_TYPE_MONOo *Self__2ARB;
+  if (((void *)Self__UKPD->parent_itm_type_style__4SN.style__PZP != (void *)NULL)) {
+    append__3OS(buffer__VKPD,Self__UKPD->parent_itm_type_style__4SN.style__PZP);
+    Self__SBIH=((__STRING *)buffer__VKPD);
+    new_capacity__RBIH= 0;
+    if ((Self__SBIH->capacity__UCS <= Self__SBIH->count__SGC)) {
+      if ((Self__SBIH->capacity__UCS ==  0)) {
+        Self__SBIH->capacity__UCS= 32;
+        Self__SBIH->storage__3CS=create__YIEB( 32);
+      } else {
+        new_capacity__RBIH=(__INTEGER)(Self__SBIH->capacity__UCS <<  1);
+        Self__TBIH=((__CHARACTER *)Self__SBIH->storage__3CS);
+        old_nb_elts__UBIH=Self__SBIH->capacity__UCS;
+        new__VBIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__TBIH),((__UINTEGER_32 )old_nb_elts__UBIH),((__UINTEGER_32 )new_capacity__RBIH)));
+        upper__4JKH=(__INTEGER)(new_capacity__RBIH -  1);
+        Self__2JKH=old_nb_elts__UBIH;
+        while ((Self__2JKH <= upper__4JKH)) {
+          new__VBIH[Self__2JKH]='\0';
+          Self__2JKH=(__INTEGER)(Self__2JKH +  1);
+        };
+        Self__SBIH->storage__3CS=new__VBIH;
+        Self__SBIH->capacity__UCS=new_capacity__RBIH;
+      };
+    };
+    ((__CHARACTER *)Self__SBIH->storage__3CS)[Self__SBIH->count__SGC]=' ';
+    Self__SBIH->count__SGC=(__INTEGER)(Self__SBIH->count__SGC +  1);
+  };
+  append__3OS(buffer__VKPD,Self__UKPD->parent_itm_type_style__4SN.parent_itm_type_simple__3SN.name__GZP);
+  Self__YBIH=((__STRING *)buffer__VKPD);
+  new_capacity__XBIH= 0;
+  if ((Self__YBIH->capacity__UCS <= Self__YBIH->count__SGC)) {
+    if ((Self__YBIH->capacity__UCS ==  0)) {
+      Self__YBIH->capacity__UCS= 32;
+      Self__YBIH->storage__3CS=create__YIEB( 32);
+    } else {
+      new_capacity__XBIH=(__INTEGER)(Self__YBIH->capacity__UCS <<  1);
+      Self__ZBIH=((__CHARACTER *)Self__YBIH->storage__3CS);
+      old_nb_elts__0BIH=Self__YBIH->capacity__UCS;
+      new__1BIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__ZBIH),((__UINTEGER_32 )old_nb_elts__0BIH),((__UINTEGER_32 )new_capacity__XBIH)));
+      upper__DKKH=(__INTEGER)(new_capacity__XBIH -  1);
+      Self__BKKH=old_nb_elts__0BIH;
+      while ((Self__BKKH <= upper__DKKH)) {
+        new__1BIH[Self__BKKH]='\0';
+        Self__BKKH=(__INTEGER)(Self__BKKH +  1);
+      };
+      Self__YBIH->storage__3CS=new__1BIH;
+      Self__YBIH->capacity__UCS=new_capacity__XBIH;
+    };
+  };
+  ((__CHARACTER *)Self__YBIH->storage__3CS)[Self__YBIH->count__SGC]='(';
+  Self__YBIH->count__SGC=(__INTEGER)(Self__YBIH->count__SGC +  1);
+  __tmp__GLPD=(__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)Self__UKPD->list_type__ZZP)->parent_arrayed_collection__SYC.upper__4HV -  1);
+  Self__Y2UD= 0;
+  while ((Self__Y2UD <= __tmp__GLPD)) {
+    __tmp__NLPD=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)Self__UKPD->list_type__ZZP)->parent_arrayed_collection__SYC.storage__FMV)[Self__Y2UD];
+    switch (((struct ___OBJ *)__tmp__NLPD)->__id) {
     case __ITM_TYPE_PARAMETER__: {
-      append__ROS(buffer__OJPD,((__ITM_TYPE_PARAMETER *)__tmp__GKPD)->parent_itm_type__YEE.name__0YP);
+      append__3OS(buffer__VKPD,((__ITM_TYPE_PARAMETER *)__tmp__NLPD)->parent_itm_type__VFE.name__GZP);
     } break;
     case __ITM_TYPE_SIMPLE__: {
-      append__ROS(buffer__OJPD,((__ITM_TYPE_SIMPLE *)__tmp__GKPD)->name__0YP);
+      append__3OS(buffer__VKPD,((__ITM_TYPE_SIMPLE *)__tmp__NLPD)->name__GZP);
     } break;
     case __ITM_TYPE_BLOCK__: {
-      append_in__IIPD(__tmp__GKPD,buffer__OJPD);
+      append_in__PJPD(__tmp__NLPD,buffer__VKPD);
     } break;
     case __ITM_TYPE_GENERIC__: {
-      append_in__MJPD(__tmp__GKPD,buffer__OJPD);
+      append_in__TKPD(__tmp__NLPD,buffer__VKPD);
     } break;
     case __ITM_TYPE_STYLE__: {
-      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__ROS(buffer__OJPD,Self__4QGH->parent_itm_type_simple__RSN.name__0YP);
+      Self__4BIH=((__ITM_TYPE_STYLE *)__tmp__NLPD);
+      if (((void *)Self__4BIH->style__PZP != (void *)NULL)) {
+        append__3OS(buffer__VKPD,Self__4BIH->style__PZP);
+        Self__ACIH=((__STRING *)buffer__VKPD);
+        new_capacity__5BIH= 0;
+        if ((Self__ACIH->capacity__UCS <= Self__ACIH->count__SGC)) {
+          if ((Self__ACIH->capacity__UCS ==  0)) {
+            Self__ACIH->capacity__UCS= 32;
+            Self__ACIH->storage__3CS=create__YIEB( 32);
+          } else {
+            new_capacity__5BIH=(__INTEGER)(Self__ACIH->capacity__UCS <<  1);
+            Self__BCIH=((__CHARACTER *)Self__ACIH->storage__3CS);
+            old_nb_elts__CCIH=Self__ACIH->capacity__UCS;
+            new__DCIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__BCIH),((__UINTEGER_32 )old_nb_elts__CCIH),((__UINTEGER_32 )new_capacity__5BIH)));
+            upper__IKKH=(__INTEGER)(new_capacity__5BIH -  1);
+            Self__GKKH=old_nb_elts__CCIH;
+            while ((Self__GKKH <= upper__IKKH)) {
+              new__DCIH[Self__GKKH]='\0';
+              Self__GKKH=(__INTEGER)(Self__GKKH +  1);
+            };
+            Self__ACIH->storage__3CS=new__DCIH;
+            Self__ACIH->capacity__UCS=new_capacity__5BIH;
+          };
+        };
+        ((__CHARACTER *)Self__ACIH->storage__3CS)[Self__ACIH->count__SGC]=' ';
+        Self__ACIH->count__SGC=(__INTEGER)(Self__ACIH->count__SGC +  1);
+      };
+      append__3OS(buffer__VKPD,Self__4BIH->parent_itm_type_simple__3SN.name__GZP);
     } break;
     };
-    add_last__GOT(buffer__OJPD,',');
-    Self__R1UD=(__INTEGER)(Self__R1UD +  1);
-  };
-  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) {
+    Self__GCIH=((__STRING *)buffer__VKPD);
+    new_capacity__FCIH= 0;
+    if ((Self__GCIH->capacity__UCS <= Self__GCIH->count__SGC)) {
+      if ((Self__GCIH->capacity__UCS ==  0)) {
+        Self__GCIH->capacity__UCS= 32;
+        Self__GCIH->storage__3CS=create__YIEB( 32);
+      } else {
+        new_capacity__FCIH=(__INTEGER)(Self__GCIH->capacity__UCS <<  1);
+        Self__HCIH=((__CHARACTER *)Self__GCIH->storage__3CS);
+        old_nb_elts__ICIH=Self__GCIH->capacity__UCS;
+        new__JCIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__HCIH),((__UINTEGER_32 )old_nb_elts__ICIH),((__UINTEGER_32 )new_capacity__FCIH)));
+        upper__NKKH=(__INTEGER)(new_capacity__FCIH -  1);
+        Self__LKKH=old_nb_elts__ICIH;
+        while ((Self__LKKH <= upper__NKKH)) {
+          new__JCIH[Self__LKKH]='\0';
+          Self__LKKH=(__INTEGER)(Self__LKKH +  1);
+        };
+        Self__GCIH->storage__3CS=new__JCIH;
+        Self__GCIH->capacity__UCS=new_capacity__FCIH;
+      };
+    };
+    ((__CHARACTER *)Self__GCIH->storage__3CS)[Self__GCIH->count__SGC]=',';
+    Self__GCIH->count__SGC=(__INTEGER)(Self__GCIH->count__SGC +  1);
+    Self__Y2UD=(__INTEGER)(Self__Y2UD +  1);
+  };
+  Self__2ARB=((__FAST_ARRAYoITM_TYPE_MONOo *)Self__UKPD->list_type__ZZP);
+  __tmp__QLPD=((void **)Self__2ARB->parent_arrayed_collection__SYC.storage__FMV)[Self__2ARB->parent_arrayed_collection__SYC.upper__4HV];
+  switch (((struct ___OBJ *)__tmp__QLPD)->__id) {
   case __ITM_TYPE_PARAMETER__: {
-    append__ROS(buffer__OJPD,((__ITM_TYPE_PARAMETER *)__tmp__JKPD)->parent_itm_type__YEE.name__0YP);
+    append__3OS(buffer__VKPD,((__ITM_TYPE_PARAMETER *)__tmp__QLPD)->parent_itm_type__VFE.name__GZP);
   } break;
   case __ITM_TYPE_SIMPLE__: {
-    append__ROS(buffer__OJPD,((__ITM_TYPE_SIMPLE *)__tmp__JKPD)->name__0YP);
+    append__3OS(buffer__VKPD,((__ITM_TYPE_SIMPLE *)__tmp__QLPD)->name__GZP);
   } break;
   case __ITM_TYPE_BLOCK__: {
-    append_in__IIPD(__tmp__JKPD,buffer__OJPD);
+    append_in__PJPD(__tmp__QLPD,buffer__VKPD);
   } break;
   case __ITM_TYPE_GENERIC__: {
-    append_in__MJPD(__tmp__JKPD,buffer__OJPD);
+    append_in__TKPD(__tmp__QLPD,buffer__VKPD);
   } break;
   case __ITM_TYPE_STYLE__: {
-    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__ROS(buffer__OJPD,Self__LKPD->parent_itm_type_simple__RSN.name__0YP);
+    Self__SLPD=((__ITM_TYPE_STYLE *)__tmp__QLPD);
+    if (((void *)Self__SLPD->style__PZP != (void *)NULL)) {
+      append__3OS(buffer__VKPD,Self__SLPD->style__PZP);
+      Self__MCIH=((__STRING *)buffer__VKPD);
+      new_capacity__LCIH= 0;
+      if ((Self__MCIH->capacity__UCS <= Self__MCIH->count__SGC)) {
+        if ((Self__MCIH->capacity__UCS ==  0)) {
+          Self__MCIH->capacity__UCS= 32;
+          Self__MCIH->storage__3CS=create__YIEB( 32);
+        } else {
+          new_capacity__LCIH=(__INTEGER)(Self__MCIH->capacity__UCS <<  1);
+          Self__NCIH=((__CHARACTER *)Self__MCIH->storage__3CS);
+          old_nb_elts__OCIH=Self__MCIH->capacity__UCS;
+          new__PCIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__NCIH),((__UINTEGER_32 )old_nb_elts__OCIH),((__UINTEGER_32 )new_capacity__LCIH)));
+          upper__SKKH=(__INTEGER)(new_capacity__LCIH -  1);
+          Self__QKKH=old_nb_elts__OCIH;
+          while ((Self__QKKH <= upper__SKKH)) {
+            new__PCIH[Self__QKKH]='\0';
+            Self__QKKH=(__INTEGER)(Self__QKKH +  1);
+          };
+          Self__MCIH->storage__3CS=new__PCIH;
+          Self__MCIH->capacity__UCS=new_capacity__LCIH;
+        };
+      };
+      ((__CHARACTER *)Self__MCIH->storage__3CS)[Self__MCIH->count__SGC]=' ';
+      Self__MCIH->count__SGC=(__INTEGER)(Self__MCIH->count__SGC +  1);
+    };
+    append__3OS(buffer__VKPD,Self__SLPD->parent_itm_type_simple__3SN.name__GZP);
   } break;
   };
-  add_last__GOT(buffer__OJPD,')');
+  Self__SCIH=((__STRING *)buffer__VKPD);
+  new_capacity__RCIH= 0;
+  if ((Self__SCIH->capacity__UCS <= Self__SCIH->count__SGC)) {
+    if ((Self__SCIH->capacity__UCS ==  0)) {
+      Self__SCIH->capacity__UCS= 32;
+      Self__SCIH->storage__3CS=create__YIEB( 32);
+    } else {
+      new_capacity__RCIH=(__INTEGER)(Self__SCIH->capacity__UCS <<  1);
+      Self__TCIH=((__CHARACTER *)Self__SCIH->storage__3CS);
+      old_nb_elts__UCIH=Self__SCIH->capacity__UCS;
+      new__VCIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__TCIH),((__UINTEGER_32 )old_nb_elts__UCIH),((__UINTEGER_32 )new_capacity__RCIH)));
+      upper__XKKH=(__INTEGER)(new_capacity__RCIH -  1);
+      Self__VKKH=old_nb_elts__UCIH;
+      while ((Self__VKKH <= upper__XKKH)) {
+        new__VCIH[Self__VKKH]='\0';
+        Self__VKKH=(__INTEGER)(Self__VKKH +  1);
+      };
+      Self__SCIH->storage__3CS=new__VCIH;
+      Self__SCIH->capacity__UCS=new_capacity__RCIH;
+    };
+  };
+  ((__CHARACTER *)Self__SCIH->storage__3CS)[Self__SCIH->count__SGC]=')';
+  Self__SCIH->count__SGC=(__INTEGER)(Self__SCIH->count__SGC +  1);
 }
 
-static void put__to__like__PLBG(void *tok__RLBG,void *buf__SLBG,void *key__TLBG)
+static void put__to__like__JNBG(void *tok__LNBG,void *buf__MNBG,void *key__NNBG)
 // ({NULLxSTRING_CONSTANTxSTRING},{NULLxSTRING},{STRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER __tmp__4NBG,Self__KPHG;
+  void *lst__ONBG;
+  lst__ONBG=NULL;
+  if (((void *)key__NNBG != (void *)NULL)) {
+    lst__ONBG=fast_reference_at__CMNE(short_dico__QD,key__NNBG);
+    if (((void *)lst__ONBG != (void *)NULL)) {
+      __tmp__4NBG=((__LINKED_LISToSTRING_CONSTANTo *)lst__ONBG)->parent_linked_collection__LD.upper__0ED;
+      Self__KPHG= 1;
+      while ((Self__KPHG <= __tmp__4NBG)) {
+        if (((void *)item__X3ND(lst__ONBG,Self__KPHG) == (void *)NULL)) {
+          append__3OS(buf__MNBG,tok__LNBG);
         } else {
-          append__ROS(buf__SLBG,item__Q2ND(lst__ULBG,Self__QNHG));
+          append__3OS(buf__MNBG,item__X3ND(lst__ONBG,Self__KPHG));
         };
-        Self__QNHG=(__INTEGER)(Self__QNHG +  1);
+        Self__KPHG=(__INTEGER)(Self__KPHG +  1);
       };
     };
   };
 }
 
-static void shorter_in__QIBG(__ITM_ARG *Self__RIBG,void *buf__SIBG)
+static void shorter_in__KKBG(__ITM_ARG *Self__LKBG,void *buf__MKBG)
 // ({ITM_ARG},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  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));
+  __STRING *Self__YCIH,*Self__ADIH;
+  __INTEGER new_capacity__XCIH,old_nb_elts__0CIH,upper__2KKH,Self__0KKH;
+  __INTEGER new_capacity__5CIH,old_nb_elts__CDIH,upper__BLKH,Self__5KKH;
+  void *__tmp__ALBG;
+  __ITM_TYPE_STYLE *Self__3CIH;
+  __CHARACTER *Self__ZCIH,*new__1CIH,*Self__BDIH,*new__DDIH;
+  if (((void *)Self__LKBG->name__F0HC == (void *)(&__string_58))) {
+    put__to__like__URGG(Self__LKBG->name__F0HC,buf__MKBG,(&__string_119));
   } else {
-    put__to__like__0PGG(Self__RIBG->name__U3HC,buf__SIBG,(&__string_134));
-  };
-  add_last__GOT(buf__SIBG,':');
-  __tmp__GJBG=Self__RIBG->type__V3HC;
-  switch (((struct ___OBJ *)__tmp__GJBG)->__id) {
+    put__to__like__URGG(Self__LKBG->name__F0HC,buf__MKBG,(&__string_134));
+  };
+  Self__YCIH=((__STRING *)buf__MKBG);
+  new_capacity__XCIH= 0;
+  if ((Self__YCIH->capacity__UCS <= Self__YCIH->count__SGC)) {
+    if ((Self__YCIH->capacity__UCS ==  0)) {
+      Self__YCIH->capacity__UCS= 32;
+      Self__YCIH->storage__3CS=create__YIEB( 32);
+    } else {
+      new_capacity__XCIH=(__INTEGER)(Self__YCIH->capacity__UCS <<  1);
+      Self__ZCIH=((__CHARACTER *)Self__YCIH->storage__3CS);
+      old_nb_elts__0CIH=Self__YCIH->capacity__UCS;
+      new__1CIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__ZCIH),((__UINTEGER_32 )old_nb_elts__0CIH),((__UINTEGER_32 )new_capacity__XCIH)));
+      upper__2KKH=(__INTEGER)(new_capacity__XCIH -  1);
+      Self__0KKH=old_nb_elts__0CIH;
+      while ((Self__0KKH <= upper__2KKH)) {
+        new__1CIH[Self__0KKH]='\0';
+        Self__0KKH=(__INTEGER)(Self__0KKH +  1);
+      };
+      Self__YCIH->storage__3CS=new__1CIH;
+      Self__YCIH->capacity__UCS=new_capacity__XCIH;
+    };
+  };
+  ((__CHARACTER *)Self__YCIH->storage__3CS)[Self__YCIH->count__SGC]=':';
+  Self__YCIH->count__SGC=(__INTEGER)(Self__YCIH->count__SGC +  1);
+  __tmp__ALBG=Self__LKBG->type__G0HC;
+  switch (((struct ___OBJ *)__tmp__ALBG)->__id) {
   case __ITM_TYPE_PARAMETER__: {
-    shorter_in__ASDG(__tmp__GJBG,buf__SIBG);
+    shorter_in__0TDG(__tmp__ALBG,buf__MKBG);
   } break;
   case __ITM_TYPE_SIMPLE__: {
-    shorter_in__RSDG(__tmp__GJBG,buf__SIBG);
+    shorter_in__LUDG(__tmp__ALBG,buf__MKBG);
   } break;
   case __ITM_TYPE_BLOCK__: {
-    shorter_in__CTDG(__tmp__GJBG,buf__SIBG);
+    shorter_in__2UDG(__tmp__ALBG,buf__MKBG);
   } break;
   case __ITM_TYPE_GENERIC__: {
-    shorter_in__KUDG(__tmp__GJBG,buf__SIBG);
+    shorter_in__EWDG(__tmp__ALBG,buf__MKBG);
   } break;
   case __ITM_TYPE_STYLE__: {
-    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__OYFG(Self__CRGH->parent_itm_type_simple__RSN.name__0YP,buf__SIBG,(&__string_125));
+    Self__3CIH=((__ITM_TYPE_STYLE *)__tmp__ALBG);
+    if (((void *)Self__3CIH->style__PZP != (void *)NULL)) {
+      put__to__like__I0FG(Self__3CIH->style__PZP,buf__MKBG,(&__string_119));
+      Self__ADIH=((__STRING *)buf__MKBG);
+      new_capacity__5CIH= 0;
+      if ((Self__ADIH->capacity__UCS <= Self__ADIH->count__SGC)) {
+        if ((Self__ADIH->capacity__UCS ==  0)) {
+          Self__ADIH->capacity__UCS= 32;
+          Self__ADIH->storage__3CS=create__YIEB( 32);
+        } else {
+          new_capacity__5CIH=(__INTEGER)(Self__ADIH->capacity__UCS <<  1);
+          Self__BDIH=((__CHARACTER *)Self__ADIH->storage__3CS);
+          old_nb_elts__CDIH=Self__ADIH->capacity__UCS;
+          new__DDIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__BDIH),((__UINTEGER_32 )old_nb_elts__CDIH),((__UINTEGER_32 )new_capacity__5CIH)));
+          upper__BLKH=(__INTEGER)(new_capacity__5CIH -  1);
+          Self__5KKH=old_nb_elts__CDIH;
+          while ((Self__5KKH <= upper__BLKH)) {
+            new__DDIH[Self__5KKH]='\0';
+            Self__5KKH=(__INTEGER)(Self__5KKH +  1);
+          };
+          Self__ADIH->storage__3CS=new__DDIH;
+          Self__ADIH->capacity__UCS=new_capacity__5CIH;
+        };
+      };
+      ((__CHARACTER *)Self__ADIH->storage__3CS)[Self__ADIH->count__SGC]=' ';
+      Self__ADIH->count__SGC=(__INTEGER)(Self__ADIH->count__SGC +  1);
+    };
+    put__to__like__I0FG(Self__3CIH->parent_itm_type_simple__3SN.name__GZP,buf__MKBG,(&__string_125));
   } break;
   };
 }
 
-static void shorter_in__HJBG(__ITM_ARGS *Self__IJBG,void *buf__JJBG)
+static void shorter_in__BLBG(__ITM_ARGS *Self__CLBG,void *buf__DLBG)
 // ({ITM_ARGS},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __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) {
+  __STRING *Self__GDIH,*Self__MDIH,*Self__UDIH,*Self__0DIH,*Self__AEIH;
+  __STRING *Self__IEIH,*Self__OEIH;
+  __INTEGER new_capacity__FDIH,old_nb_elts__IDIH,upper__GLKH,Self__ELKH;
+  __INTEGER __tmp__KLBG,Self__1XDG,new_capacity__LDIH,old_nb_elts__ODIH;
+  __INTEGER upper__LLKH,Self__JLKH,new_capacity__TDIH,old_nb_elts__WDIH;
+  __INTEGER upper__QLKH,Self__OLKH,new_capacity__ZDIH,old_nb_elts__2DIH;
+  __INTEGER upper__VLKH,Self__TLKH,new_capacity__5DIH,old_nb_elts__CEIH;
+  __INTEGER upper__0LKH,Self__YLKH,new_capacity__HEIH,old_nb_elts__KEIH;
+  __INTEGER upper__5LKH,Self__3LKH,new_capacity__NEIH,old_nb_elts__QEIH;
+  __INTEGER upper__EMKH,Self__CMKH;
+  void *__tmp__JMBG,*__tmp__RMBG;
+  __ITM_TYPE_STYLE *Self__RDIH,*Self__FEIH;
+  __CHARACTER *Self__HDIH,*new__JDIH,*Self__NDIH,*new__PDIH,*Self__VDIH;
+  __CHARACTER *new__XDIH,*Self__1DIH,*new__3DIH,*Self__BEIH,*new__DEIH;
+  __CHARACTER *Self__JEIH,*new__LEIH,*Self__PEIH,*new__REIH;
+  __FAST_ARRAYoSTRING_CONSTANTo *Self__C4GH;
+  __FAST_ARRAYoITM_TYPE_MONOo *Self__E1FH;
+  Self__GDIH=((__STRING *)buf__DLBG);
+  new_capacity__FDIH= 0;
+  if ((Self__GDIH->capacity__UCS <= Self__GDIH->count__SGC)) {
+    if ((Self__GDIH->capacity__UCS ==  0)) {
+      Self__GDIH->capacity__UCS= 32;
+      Self__GDIH->storage__3CS=create__YIEB( 32);
+    } else {
+      new_capacity__FDIH=(__INTEGER)(Self__GDIH->capacity__UCS <<  1);
+      Self__HDIH=((__CHARACTER *)Self__GDIH->storage__3CS);
+      old_nb_elts__IDIH=Self__GDIH->capacity__UCS;
+      new__JDIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__HDIH),((__UINTEGER_32 )old_nb_elts__IDIH),((__UINTEGER_32 )new_capacity__FDIH)));
+      upper__GLKH=(__INTEGER)(new_capacity__FDIH -  1);
+      Self__ELKH=old_nb_elts__IDIH;
+      while ((Self__ELKH <= upper__GLKH)) {
+        new__JDIH[Self__ELKH]='\0';
+        Self__ELKH=(__INTEGER)(Self__ELKH +  1);
+      };
+      Self__GDIH->storage__3CS=new__JDIH;
+      Self__GDIH->capacity__UCS=new_capacity__FDIH;
+    };
+  };
+  ((__CHARACTER *)Self__GDIH->storage__3CS)[Self__GDIH->count__SGC]='(';
+  Self__GDIH->count__SGC=(__INTEGER)(Self__GDIH->count__SGC +  1);
+  __tmp__KLBG=(__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)Self__CLBG->name__XDQF)->parent_arrayed_collection__MBJ.upper__2CPD -  1);
+  Self__1XDG= 0;
+  while ((Self__1XDG <= __tmp__KLBG)) {
+    if (((void *)((void **)((__FAST_ARRAYoSTRING_CONSTANTo *)Self__CLBG->name__XDQF)->parent_arrayed_collection__MBJ.storage__SFPD)[Self__1XDG] == (void *)(&__string_58))) {
+      put__to__like__NYDG(((void **)((__FAST_ARRAYoSTRING_CONSTANTo *)Self__CLBG->name__XDQF)->parent_arrayed_collection__MBJ.storage__SFPD)[Self__1XDG],buf__DLBG,(&__string_119));
+    } else {
+      put__to__like__NYDG(((void **)((__FAST_ARRAYoSTRING_CONSTANTo *)Self__CLBG->name__XDQF)->parent_arrayed_collection__MBJ.storage__SFPD)[Self__1XDG],buf__DLBG,(&__string_134));
+    };
+    Self__MDIH=((__STRING *)buf__DLBG);
+    new_capacity__LDIH= 0;
+    if ((Self__MDIH->capacity__UCS <= Self__MDIH->count__SGC)) {
+      if ((Self__MDIH->capacity__UCS ==  0)) {
+        Self__MDIH->capacity__UCS= 32;
+        Self__MDIH->storage__3CS=create__YIEB( 32);
+      } else {
+        new_capacity__LDIH=(__INTEGER)(Self__MDIH->capacity__UCS <<  1);
+        Self__NDIH=((__CHARACTER *)Self__MDIH->storage__3CS);
+        old_nb_elts__ODIH=Self__MDIH->capacity__UCS;
+        new__PDIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__NDIH),((__UINTEGER_32 )old_nb_elts__ODIH),((__UINTEGER_32 )new_capacity__LDIH)));
+        upper__LLKH=(__INTEGER)(new_capacity__LDIH -  1);
+        Self__JLKH=old_nb_elts__ODIH;
+        while ((Self__JLKH <= upper__LLKH)) {
+          new__PDIH[Self__JLKH]='\0';
+          Self__JLKH=(__INTEGER)(Self__JLKH +  1);
+        };
+        Self__MDIH->storage__3CS=new__PDIH;
+        Self__MDIH->capacity__UCS=new_capacity__LDIH;
+      };
+    };
+    ((__CHARACTER *)Self__MDIH->storage__3CS)[Self__MDIH->count__SGC]=':';
+    Self__MDIH->count__SGC=(__INTEGER)(Self__MDIH->count__SGC +  1);
+    __tmp__JMBG=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)((__ITM_TYPE_MULTI *)Self__CLBG->type__YDQF)->list_type__2KP)->parent_arrayed_collection__SYC.storage__FMV)[Self__1XDG];
+    switch (((struct ___OBJ *)__tmp__JMBG)->__id) {
     case __ITM_TYPE_PARAMETER__: {
-      shorter_in__ASDG(__tmp__PKBG,buf__JJBG);
+      shorter_in__0TDG(__tmp__JMBG,buf__DLBG);
     } break;
     case __ITM_TYPE_SIMPLE__: {
-      shorter_in__RSDG(__tmp__PKBG,buf__JJBG);
+      shorter_in__LUDG(__tmp__JMBG,buf__DLBG);
     } break;
     case __ITM_TYPE_BLOCK__: {
-      shorter_in__CTDG(__tmp__PKBG,buf__JJBG);
+      shorter_in__2UDG(__tmp__JMBG,buf__DLBG);
     } break;
     case __ITM_TYPE_GENERIC__: {
-      shorter_in__KUDG(__tmp__PKBG,buf__JJBG);
+      shorter_in__EWDG(__tmp__JMBG,buf__DLBG);
     } break;
     case __ITM_TYPE_STYLE__: {
-      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__OYFG(Self__WRGH->parent_itm_type_simple__RSN.name__0YP,buf__JJBG,(&__string_125));
+      Self__RDIH=((__ITM_TYPE_STYLE *)__tmp__JMBG);
+      if (((void *)Self__RDIH->style__PZP != (void *)NULL)) {
+        put__to__like__I0FG(Self__RDIH->style__PZP,buf__DLBG,(&__string_119));
+        Self__UDIH=((__STRING *)buf__DLBG);
+        new_capacity__TDIH= 0;
+        if ((Self__UDIH->capacity__UCS <= Self__UDIH->count__SGC)) {
+          if ((Self__UDIH->capacity__UCS ==  0)) {
+            Self__UDIH->capacity__UCS= 32;
+            Self__UDIH->storage__3CS=create__YIEB( 32);
+          } else {
+            new_capacity__TDIH=(__INTEGER)(Self__UDIH->capacity__UCS <<  1);
+            Self__VDIH=((__CHARACTER *)Self__UDIH->storage__3CS);
+            old_nb_elts__WDIH=Self__UDIH->capacity__UCS;
+            new__XDIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__VDIH),((__UINTEGER_32 )old_nb_elts__WDIH),((__UINTEGER_32 )new_capacity__TDIH)));
+            upper__QLKH=(__INTEGER)(new_capacity__TDIH -  1);
+            Self__OLKH=old_nb_elts__WDIH;
+            while ((Self__OLKH <= upper__QLKH)) {
+              new__XDIH[Self__OLKH]='\0';
+              Self__OLKH=(__INTEGER)(Self__OLKH +  1);
+            };
+            Self__UDIH->storage__3CS=new__XDIH;
+            Self__UDIH->capacity__UCS=new_capacity__TDIH;
+          };
+        };
+        ((__CHARACTER *)Self__UDIH->storage__3CS)[Self__UDIH->count__SGC]=' ';
+        Self__UDIH->count__SGC=(__INTEGER)(Self__UDIH->count__SGC +  1);
+      };
+      put__to__like__I0FG(Self__RDIH->parent_itm_type_simple__3SN.name__GZP,buf__DLBG,(&__string_125));
     } break;
     };
-    add_last__GOT(buf__JJBG,',');
-    Self__BWDG=(__INTEGER)(Self__BWDG +  1);
-  };
-  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) {
+    Self__0DIH=((__STRING *)buf__DLBG);
+    new_capacity__ZDIH= 0;
+    if ((Self__0DIH->capacity__UCS <= Self__0DIH->count__SGC)) {
+      if ((Self__0DIH->capacity__UCS ==  0)) {
+        Self__0DIH->capacity__UCS= 32;
+        Self__0DIH->storage__3CS=create__YIEB( 32);
+      } else {
+        new_capacity__ZDIH=(__INTEGER)(Self__0DIH->capacity__UCS <<  1);
+        Self__1DIH=((__CHARACTER *)Self__0DIH->storage__3CS);
+        old_nb_elts__2DIH=Self__0DIH->capacity__UCS;
+        new__3DIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__1DIH),((__UINTEGER_32 )old_nb_elts__2DIH),((__UINTEGER_32 )new_capacity__ZDIH)));
+        upper__VLKH=(__INTEGER)(new_capacity__ZDIH -  1);
+        Self__TLKH=old_nb_elts__2DIH;
+        while ((Self__TLKH <= upper__VLKH)) {
+          new__3DIH[Self__TLKH]='\0';
+          Self__TLKH=(__INTEGER)(Self__TLKH +  1);
+        };
+        Self__0DIH->storage__3CS=new__3DIH;
+        Self__0DIH->capacity__UCS=new_capacity__ZDIH;
+      };
+    };
+    ((__CHARACTER *)Self__0DIH->storage__3CS)[Self__0DIH->count__SGC]=',';
+    Self__0DIH->count__SGC=(__INTEGER)(Self__0DIH->count__SGC +  1);
+    Self__1XDG=(__INTEGER)(Self__1XDG +  1);
+  };
+  Self__C4GH=((__FAST_ARRAYoSTRING_CONSTANTo *)Self__CLBG->name__XDQF);
+  put__to__like__NYDG(((void **)Self__C4GH->parent_arrayed_collection__MBJ.storage__SFPD)[Self__C4GH->parent_arrayed_collection__MBJ.upper__2CPD],buf__DLBG,(&__string_134));
+  Self__AEIH=((__STRING *)buf__DLBG);
+  new_capacity__5DIH= 0;
+  if ((Self__AEIH->capacity__UCS <= Self__AEIH->count__SGC)) {
+    if ((Self__AEIH->capacity__UCS ==  0)) {
+      Self__AEIH->capacity__UCS= 32;
+      Self__AEIH->storage__3CS=create__YIEB( 32);
+    } else {
+      new_capacity__5DIH=(__INTEGER)(Self__AEIH->capacity__UCS <<  1);
+      Self__BEIH=((__CHARACTER *)Self__AEIH->storage__3CS);
+      old_nb_elts__CEIH=Self__AEIH->capacity__UCS;
+      new__DEIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__BEIH),((__UINTEGER_32 )old_nb_elts__CEIH),((__UINTEGER_32 )new_capacity__5DIH)));
+      upper__0LKH=(__INTEGER)(new_capacity__5DIH -  1);
+      Self__YLKH=old_nb_elts__CEIH;
+      while ((Self__YLKH <= upper__0LKH)) {
+        new__DEIH[Self__YLKH]='\0';
+        Self__YLKH=(__INTEGER)(Self__YLKH +  1);
+      };
+      Self__AEIH->storage__3CS=new__DEIH;
+      Self__AEIH->capacity__UCS=new_capacity__5DIH;
+    };
+  };
+  ((__CHARACTER *)Self__AEIH->storage__3CS)[Self__AEIH->count__SGC]=':';
+  Self__AEIH->count__SGC=(__INTEGER)(Self__AEIH->count__SGC +  1);
+  Self__E1FH=((__FAST_ARRAYoITM_TYPE_MONOo *)((__ITM_TYPE_MULTI *)Self__CLBG->type__YDQF)->list_type__2KP);
+  __tmp__RMBG=((void **)Self__E1FH->parent_arrayed_collection__SYC.storage__FMV)[Self__E1FH->parent_arrayed_collection__SYC.upper__4HV];
+  switch (((struct ___OBJ *)__tmp__RMBG)->__id) {
   case __ITM_TYPE_PARAMETER__: {
-    shorter_in__ASDG(__tmp__XKBG,buf__JJBG);
+    shorter_in__0TDG(__tmp__RMBG,buf__DLBG);
   } break;
   case __ITM_TYPE_SIMPLE__: {
-    shorter_in__RSDG(__tmp__XKBG,buf__JJBG);
+    shorter_in__LUDG(__tmp__RMBG,buf__DLBG);
   } break;
   case __ITM_TYPE_BLOCK__: {
-    shorter_in__CTDG(__tmp__XKBG,buf__JJBG);
+    shorter_in__2UDG(__tmp__RMBG,buf__DLBG);
   } break;
   case __ITM_TYPE_GENERIC__: {
-    shorter_in__KUDG(__tmp__XKBG,buf__JJBG);
+    shorter_in__EWDG(__tmp__RMBG,buf__DLBG);
   } break;
   case __ITM_TYPE_STYLE__: {
-    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__OYFG(Self__0RGH->parent_itm_type_simple__RSN.name__0YP,buf__JJBG,(&__string_125));
+    Self__FEIH=((__ITM_TYPE_STYLE *)__tmp__RMBG);
+    if (((void *)Self__FEIH->style__PZP != (void *)NULL)) {
+      put__to__like__I0FG(Self__FEIH->style__PZP,buf__DLBG,(&__string_119));
+      Self__IEIH=((__STRING *)buf__DLBG);
+      new_capacity__HEIH= 0;
+      if ((Self__IEIH->capacity__UCS <= Self__IEIH->count__SGC)) {
+        if ((Self__IEIH->capacity__UCS ==  0)) {
+          Self__IEIH->capacity__UCS= 32;
+          Self__IEIH->storage__3CS=create__YIEB( 32);
+        } else {
+          new_capacity__HEIH=(__INTEGER)(Self__IEIH->capacity__UCS <<  1);
+          Self__JEIH=((__CHARACTER *)Self__IEIH->storage__3CS);
+          old_nb_elts__KEIH=Self__IEIH->capacity__UCS;
+          new__LEIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__JEIH),((__UINTEGER_32 )old_nb_elts__KEIH),((__UINTEGER_32 )new_capacity__HEIH)));
+          upper__5LKH=(__INTEGER)(new_capacity__HEIH -  1);
+          Self__3LKH=old_nb_elts__KEIH;
+          while ((Self__3LKH <= upper__5LKH)) {
+            new__LEIH[Self__3LKH]='\0';
+            Self__3LKH=(__INTEGER)(Self__3LKH +  1);
+          };
+          Self__IEIH->storage__3CS=new__LEIH;
+          Self__IEIH->capacity__UCS=new_capacity__HEIH;
+        };
+      };
+      ((__CHARACTER *)Self__IEIH->storage__3CS)[Self__IEIH->count__SGC]=' ';
+      Self__IEIH->count__SGC=(__INTEGER)(Self__IEIH->count__SGC +  1);
+    };
+    put__to__like__I0FG(Self__FEIH->parent_itm_type_simple__3SN.name__GZP,buf__DLBG,(&__string_125));
   } break;
   };
-  add_last__GOT(buf__JJBG,')');
+  Self__OEIH=((__STRING *)buf__DLBG);
+  new_capacity__NEIH= 0;
+  if ((Self__OEIH->capacity__UCS <= Self__OEIH->count__SGC)) {
+    if ((Self__OEIH->capacity__UCS ==  0)) {
+      Self__OEIH->capacity__UCS= 32;
+      Self__OEIH->storage__3CS=create__YIEB( 32);
+    } else {
+      new_capacity__NEIH=(__INTEGER)(Self__OEIH->capacity__UCS <<  1);
+      Self__PEIH=((__CHARACTER *)Self__OEIH->storage__3CS);
+      old_nb_elts__QEIH=Self__OEIH->capacity__UCS;
+      new__REIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__PEIH),((__UINTEGER_32 )old_nb_elts__QEIH),((__UINTEGER_32 )new_capacity__NEIH)));
+      upper__EMKH=(__INTEGER)(new_capacity__NEIH -  1);
+      Self__CMKH=old_nb_elts__QEIH;
+      while ((Self__CMKH <= upper__EMKH)) {
+        new__REIH[Self__CMKH]='\0';
+        Self__CMKH=(__INTEGER)(Self__CMKH +  1);
+      };
+      Self__OEIH->storage__3CS=new__REIH;
+      Self__OEIH->capacity__UCS=new_capacity__NEIH;
+    };
+  };
+  ((__CHARACTER *)Self__OEIH->storage__3CS)[Self__OEIH->count__SGC]=')';
+  Self__OEIH->count__SGC=(__INTEGER)(Self__OEIH->count__SGC +  1);
 }
 
-static void shorter_in__ASDG(__ITM_TYPE_PARAMETER *Self__BSDG,void *buf__CSDG)
+static void shorter_in__0TDG(__ITM_TYPE_PARAMETER *Self__1TDG,void *buf__2TDG)
 // ({ITM_TYPE_PARAMETER},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  void *tok__CQFG;
-  __INTEGER __tmp__VQFG,Self__O3HG;
-  void *lst__FQFG;
-  tok__CQFG=Self__BSDG->parent_itm_type__YEE.name__0YP;
-  lst__FQFG=NULL;
+  void *tok__2RFG;
+  __INTEGER __tmp__PSFG,Self__I5HG;
+  void *lst__5RFG;
+  tok__2RFG=Self__1TDG->parent_itm_type__VFE.name__GZP;
+  lst__5RFG=NULL;
   if (((void *)(&__string_126) != (void *)NULL)) {
-    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);
+    lst__5RFG=fast_reference_at__CMNE(short_dico__QD,(&__string_126));
+    if (((void *)lst__5RFG != (void *)NULL)) {
+      __tmp__PSFG=((__LINKED_LISToSTRING_CONSTANTo *)lst__5RFG)->parent_linked_collection__LD.upper__0ED;
+      Self__I5HG= 1;
+      while ((Self__I5HG <= __tmp__PSFG)) {
+        if (((void *)item__X3ND(lst__5RFG,Self__I5HG) == (void *)NULL)) {
+          append__3OS(buf__2TDG,tok__2RFG);
         } else {
-          append__ROS(buf__CSDG,item__Q2ND(lst__FQFG,Self__O3HG));
+          append__3OS(buf__2TDG,item__X3ND(lst__5RFG,Self__I5HG));
         };
-        Self__O3HG=(__INTEGER)(Self__O3HG +  1);
+        Self__I5HG=(__INTEGER)(Self__I5HG +  1);
       };
     };
   };
 }
 
-static void shorter_in__RSDG(__ITM_TYPE_SIMPLE *Self__SSDG,void *buf__TSDG)
+static void shorter_in__LUDG(__ITM_TYPE_SIMPLE *Self__MUDG,void *buf__NUDG)
 // ({ITM_TYPE_SIMPLE},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  void *tok__2RFG;
-  __INTEGER __tmp__PSFG,Self__53HG;
-  void *lst__5RFG;
-  tok__2RFG=Self__SSDG->name__0YP;
-  lst__5RFG=NULL;
+  void *tok__WTFG;
+  __INTEGER __tmp__JUFG,Self__Z5HG;
+  void *lst__ZTFG;
+  tok__WTFG=Self__MUDG->name__GZP;
+  lst__ZTFG=NULL;
   if (((void *)(&__string_125) != (void *)NULL)) {
-    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);
+    lst__ZTFG=fast_reference_at__CMNE(short_dico__QD,(&__string_125));
+    if (((void *)lst__ZTFG != (void *)NULL)) {
+      __tmp__JUFG=((__LINKED_LISToSTRING_CONSTANTo *)lst__ZTFG)->parent_linked_collection__LD.upper__0ED;
+      Self__Z5HG= 1;
+      while ((Self__Z5HG <= __tmp__JUFG)) {
+        if (((void *)item__X3ND(lst__ZTFG,Self__Z5HG) == (void *)NULL)) {
+          append__3OS(buf__NUDG,tok__WTFG);
         } else {
-          append__ROS(buf__TSDG,item__Q2ND(lst__5RFG,Self__53HG));
+          append__3OS(buf__NUDG,item__X3ND(lst__ZTFG,Self__Z5HG));
         };
-        Self__53HG=(__INTEGER)(Self__53HG +  1);
+        Self__Z5HG=(__INTEGER)(Self__Z5HG +  1);
       };
     };
   };
 }
 
-static void shorter_raw_in__S0FG(__ITM_TYPE_MULTI *Self__T0FG,void *buf__U0FG)
+static void shorter_raw_in__M2FG(__ITM_TYPE_MULTI *Self__N2FG,void *buf__O2FG)
 // ({ITM_TYPE_MULTI},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __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) {
+  __INTEGER __tmp__V2FG,Self__DVGG,new_capacity__VEIH,old_nb_elts__YEIH;
+  __INTEGER upper__JMKH,Self__HMKH,new_capacity__1EIH,old_nb_elts__4EIH;
+  __INTEGER upper__OMKH,Self__MMKH,new_capacity__DFIH,old_nb_elts__GFIH;
+  __INTEGER upper__TMKH,Self__RMKH;
+  void *__tmp__22FG,*__tmp__52FG;
+  __ITM_TYPE_STYLE *Self__TEIH,*Self__BFIH;
+  __STRING *Self__WEIH,*Self__2EIH,*Self__EFIH;
+  __CHARACTER *Self__XEIH,*new__ZEIH,*Self__3EIH,*new__5EIH,*Self__FFIH;
+  __CHARACTER *new__HFIH;
+  __FAST_ARRAYoITM_TYPE_MONOo *Self__J1FH;
+  __tmp__V2FG=(__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)Self__N2FG->list_type__2KP)->parent_arrayed_collection__SYC.upper__4HV -  1);
+  Self__DVGG= 0;
+  while ((Self__DVGG <= __tmp__V2FG)) {
+    __tmp__22FG=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)Self__N2FG->list_type__2KP)->parent_arrayed_collection__SYC.storage__FMV)[Self__DVGG];
+    switch (((struct ___OBJ *)__tmp__22FG)->__id) {
     case __ITM_TYPE_PARAMETER__: {
-      shorter_in__ASDG(__tmp__C1FG,buf__U0FG);
+      shorter_in__0TDG(__tmp__22FG,buf__O2FG);
     } break;
     case __ITM_TYPE_SIMPLE__: {
-      shorter_in__RSDG(__tmp__C1FG,buf__U0FG);
+      shorter_in__LUDG(__tmp__22FG,buf__O2FG);
     } break;
     case __ITM_TYPE_BLOCK__: {
-      shorter_in__CTDG(__tmp__C1FG,buf__U0FG);
+      shorter_in__2UDG(__tmp__22FG,buf__O2FG);
     } break;
     case __ITM_TYPE_GENERIC__: {
-      shorter_in__KUDG(__tmp__C1FG,buf__U0FG);
+      shorter_in__EWDG(__tmp__22FG,buf__O2FG);
     } break;
     case __ITM_TYPE_STYLE__: {
-      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__OYFG(Self__5RGH->parent_itm_type_simple__RSN.name__0YP,buf__U0FG,(&__string_125));
+      Self__TEIH=((__ITM_TYPE_STYLE *)__tmp__22FG);
+      if (((void *)Self__TEIH->style__PZP != (void *)NULL)) {
+        put__to__like__I0FG(Self__TEIH->style__PZP,buf__O2FG,(&__string_119));
+        Self__WEIH=((__STRING *)buf__O2FG);
+        new_capacity__VEIH= 0;
+        if ((Self__WEIH->capacity__UCS <= Self__WEIH->count__SGC)) {
+          if ((Self__WEIH->capacity__UCS ==  0)) {
+            Self__WEIH->capacity__UCS= 32;
+            Self__WEIH->storage__3CS=create__YIEB( 32);
+          } else {
+            new_capacity__VEIH=(__INTEGER)(Self__WEIH->capacity__UCS <<  1);
+            Self__XEIH=((__CHARACTER *)Self__WEIH->storage__3CS);
+            old_nb_elts__YEIH=Self__WEIH->capacity__UCS;
+            new__ZEIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__XEIH),((__UINTEGER_32 )old_nb_elts__YEIH),((__UINTEGER_32 )new_capacity__VEIH)));
+            upper__JMKH=(__INTEGER)(new_capacity__VEIH -  1);
+            Self__HMKH=old_nb_elts__YEIH;
+            while ((Self__HMKH <= upper__JMKH)) {
+              new__ZEIH[Self__HMKH]='\0';
+              Self__HMKH=(__INTEGER)(Self__HMKH +  1);
+            };
+            Self__WEIH->storage__3CS=new__ZEIH;
+            Self__WEIH->capacity__UCS=new_capacity__VEIH;
+          };
+        };
+        ((__CHARACTER *)Self__WEIH->storage__3CS)[Self__WEIH->count__SGC]=' ';
+        Self__WEIH->count__SGC=(__INTEGER)(Self__WEIH->count__SGC +  1);
+      };
+      put__to__like__I0FG(Self__TEIH->parent_itm_type_simple__3SN.name__GZP,buf__O2FG,(&__string_125));
     } break;
     };
-    add_last__GOT(buf__U0FG,',');
-    Self__JTGG=(__INTEGER)(Self__JTGG +  1);
-  };
-  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) {
+    Self__2EIH=((__STRING *)buf__O2FG);
+    new_capacity__1EIH= 0;
+    if ((Self__2EIH->capacity__UCS <= Self__2EIH->count__SGC)) {
+      if ((Self__2EIH->capacity__UCS ==  0)) {
+        Self__2EIH->capacity__UCS= 32;
+        Self__2EIH->storage__3CS=create__YIEB( 32);
+      } else {
+        new_capacity__1EIH=(__INTEGER)(Self__2EIH->capacity__UCS <<  1);
+        Self__3EIH=((__CHARACTER *)Self__2EIH->storage__3CS);
+        old_nb_elts__4EIH=Self__2EIH->capacity__UCS;
+        new__5EIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__3EIH),((__UINTEGER_32 )old_nb_elts__4EIH),((__UINTEGER_32 )new_capacity__1EIH)));
+        upper__OMKH=(__INTEGER)(new_capacity__1EIH -  1);
+        Self__MMKH=old_nb_elts__4EIH;
+        while ((Self__MMKH <= upper__OMKH)) {
+          new__5EIH[Self__MMKH]='\0';
+          Self__MMKH=(__INTEGER)(Self__MMKH +  1);
+        };
+        Self__2EIH->storage__3CS=new__5EIH;
+        Self__2EIH->capacity__UCS=new_capacity__1EIH;
+      };
+    };
+    ((__CHARACTER *)Self__2EIH->storage__3CS)[Self__2EIH->count__SGC]=',';
+    Self__2EIH->count__SGC=(__INTEGER)(Self__2EIH->count__SGC +  1);
+    Self__DVGG=(__INTEGER)(Self__DVGG +  1);
+  };
+  Self__J1FH=((__FAST_ARRAYoITM_TYPE_MONOo *)Self__N2FG->list_type__2KP);
+  __tmp__52FG=((void **)Self__J1FH->parent_arrayed_collection__SYC.storage__FMV)[Self__J1FH->parent_arrayed_collection__SYC.upper__4HV];
+  switch (((struct ___OBJ *)__tmp__52FG)->__id) {
   case __ITM_TYPE_PARAMETER__: {
-    shorter_in__ASDG(__tmp__F1FG,buf__U0FG);
+    shorter_in__0TDG(__tmp__52FG,buf__O2FG);
   } break;
   case __ITM_TYPE_SIMPLE__: {
-    shorter_in__RSDG(__tmp__F1FG,buf__U0FG);
+    shorter_in__LUDG(__tmp__52FG,buf__O2FG);
   } break;
   case __ITM_TYPE_BLOCK__: {
-    shorter_in__CTDG(__tmp__F1FG,buf__U0FG);
+    shorter_in__2UDG(__tmp__52FG,buf__O2FG);
   } break;
   case __ITM_TYPE_GENERIC__: {
-    shorter_in__KUDG(__tmp__F1FG,buf__U0FG);
+    shorter_in__EWDG(__tmp__52FG,buf__O2FG);
   } break;
   case __ITM_TYPE_STYLE__: {
-    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__OYFG(Self__DSGH->parent_itm_type_simple__RSN.name__0YP,buf__U0FG,(&__string_125));
+    Self__BFIH=((__ITM_TYPE_STYLE *)__tmp__52FG);
+    if (((void *)Self__BFIH->style__PZP != (void *)NULL)) {
+      put__to__like__I0FG(Self__BFIH->style__PZP,buf__O2FG,(&__string_119));
+      Self__EFIH=((__STRING *)buf__O2FG);
+      new_capacity__DFIH= 0;
+      if ((Self__EFIH->capacity__UCS <= Self__EFIH->count__SGC)) {
+        if ((Self__EFIH->capacity__UCS ==  0)) {
+          Self__EFIH->capacity__UCS= 32;
+          Self__EFIH->storage__3CS=create__YIEB( 32);
+        } else {
+          new_capacity__DFIH=(__INTEGER)(Self__EFIH->capacity__UCS <<  1);
+          Self__FFIH=((__CHARACTER *)Self__EFIH->storage__3CS);
+          old_nb_elts__GFIH=Self__EFIH->capacity__UCS;
+          new__HFIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__FFIH),((__UINTEGER_32 )old_nb_elts__GFIH),((__UINTEGER_32 )new_capacity__DFIH)));
+          upper__TMKH=(__INTEGER)(new_capacity__DFIH -  1);
+          Self__RMKH=old_nb_elts__GFIH;
+          while ((Self__RMKH <= upper__TMKH)) {
+            new__HFIH[Self__RMKH]='\0';
+            Self__RMKH=(__INTEGER)(Self__RMKH +  1);
+          };
+          Self__EFIH->storage__3CS=new__HFIH;
+          Self__EFIH->capacity__UCS=new_capacity__DFIH;
+        };
+      };
+      ((__CHARACTER *)Self__EFIH->storage__3CS)[Self__EFIH->count__SGC]=' ';
+      Self__EFIH->count__SGC=(__INTEGER)(Self__EFIH->count__SGC +  1);
+    };
+    put__to__like__I0FG(Self__BFIH->parent_itm_type_simple__3SN.name__GZP,buf__O2FG,(&__string_125));
   } break;
   };
 }
 
-static void shorter_in__CTDG(__ITM_TYPE_BLOCK *Self__DTDG,void *buf__ETDG)
+static void shorter_in__2UDG(__ITM_TYPE_BLOCK *Self__3UDG,void *buf__4UDG)
 // ({ITM_TYPE_BLOCK},{NULLxSTRING}) VoidRecursive, No inlinable.
 {
-  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) {
+  void *typ_mul__5UDG,*__tmp__TVDG;
+  void *__tmp__IVDG,*__tmp__SVDG,*__tmp__ZVDG;
+  __ITM_TYPE_MULTI *Self__OTYG,*Self__QTYG;
+  __STRING *Self__KFIH,*Self__QFIH,*Self__YFIH,*Self__4FIH,*Self__EGIH;
+  __STRING *Self__KGIH,*Self__QGIH,*Self__YGIH;
+  __INTEGER new_capacity__JFIH,old_nb_elts__MFIH,upper__YMKH,Self__WMKH;
+  __INTEGER new_capacity__PFIH,old_nb_elts__SFIH,upper__3MKH,Self__1MKH;
+  __INTEGER new_capacity__XFIH,old_nb_elts__0FIH,upper__CNKH,Self__ANKH;
+  __INTEGER new_capacity__3FIH,old_nb_elts__AGIH,upper__HNKH,Self__FNKH;
+  __INTEGER new_capacity__DGIH,old_nb_elts__GGIH,upper__MNKH,Self__KNKH;
+  __INTEGER new_capacity__JGIH,old_nb_elts__MGIH,upper__RNKH,Self__PNKH;
+  __INTEGER new_capacity__PGIH,old_nb_elts__SGIH,upper__WNKH,Self__UNKH;
+  __INTEGER new_capacity__XGIH,old_nb_elts__0GIH,upper__1NKH,Self__ZNKH;
+  __ITM_TYPE_STYLE *Self__VFIH,*Self__VGIH;
+  __CHARACTER *Self__LFIH,*new__NFIH,*Self__RFIH,*new__TFIH,*Self__ZFIH;
+  __CHARACTER *new__1FIH,*Self__5FIH,*new__BGIH,*Self__FGIH,*new__HGIH;
+  __CHARACTER *Self__LGIH,*new__NGIH,*Self__RGIH,*new__TGIH,*Self__ZGIH;
+  __CHARACTER *new__1GIH;
+  typ_mul__5UDG=NULL;
+  put__to__like__GVFG((&__string_299),buf__4UDG);
+  if (((void *)Self__3UDG->type_argument__SNN != (void *)NULL)) {
+    __tmp__IVDG=Self__3UDG->type_argument__SNN;
+    switch (((struct ___OBJ *)__tmp__IVDG)->__id) {
     case __ITM_TYPE_PARAMETER__: {
-      shorter_in__ASDG(__tmp__OTDG,buf__ETDG);
+      shorter_in__0TDG(__tmp__IVDG,buf__4UDG);
     } break;
     case __ITM_TYPE_SIMPLE__: {
-      shorter_in__RSDG(__tmp__OTDG,buf__ETDG);
+      shorter_in__LUDG(__tmp__IVDG,buf__4UDG);
     } break;
     case __ITM_TYPE_MULTI__: {
-      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,')');
+      Self__OTYG=((__ITM_TYPE_MULTI *)__tmp__IVDG);
+      Self__KFIH=((__STRING *)buf__4UDG);
+      new_capacity__JFIH= 0;
+      if ((Self__KFIH->capacity__UCS <= Self__KFIH->count__SGC)) {
+        if ((Self__KFIH->capacity__UCS ==  0)) {
+          Self__KFIH->capacity__UCS= 32;
+          Self__KFIH->storage__3CS=create__YIEB( 32);
+        } else {
+          new_capacity__JFIH=(__INTEGER)(Self__KFIH->capacity__UCS <<  1);
+          Self__LFIH=((__CHARACTER *)Self__KFIH->storage__3CS);
+          old_nb_elts__MFIH=Self__KFIH->capacity__UCS;
+          new__NFIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__LFIH),((__UINTEGER_32 )old_nb_elts__MFIH),((__UINTEGER_32 )new_capacity__JFIH)));
+          upper__YMKH=(__INTEGER)(new_capacity__JFIH -  1);
+          Self__WMKH=old_nb_elts__MFIH;
+          while ((Self__WMKH <= upper__YMKH)) {
+            new__NFIH[Self__WMKH]='\0';
+            Self__WMKH=(__INTEGER)(Self__WMKH +  1);
+          };
+          Self__KFIH->storage__3CS=new__NFIH;
+          Self__KFIH->capacity__UCS=new_capacity__JFIH;
+        };
+      };
+      ((__CHARACTER *)Self__KFIH->storage__3CS)[Self__KFIH->count__SGC]='(';
+      Self__KFIH->count__SGC=(__INTEGER)(Self__KFIH->count__SGC +  1);
+      shorter_raw_in__M2FG(Self__OTYG,buf__4UDG);
+      Self__QFIH=((__STRING *)buf__4UDG);
+      new_capacity__PFIH= 0;
+      if ((Self__QFIH->capacity__UCS <= Self__QFIH->count__SGC)) {
+        if ((Self__QFIH->capacity__UCS ==  0)) {
+          Self__QFIH->capacity__UCS= 32;
+          Self__QFIH->storage__3CS=create__YIEB( 32);
+        } else {
+          new_capacity__PFIH=(__INTEGER)(Self__QFIH->capacity__UCS <<  1);
+          Self__RFIH=((__CHARACTER *)Self__QFIH->storage__3CS);
+          old_nb_elts__SFIH=Self__QFIH->capacity__UCS;
+          new__TFIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__RFIH),((__UINTEGER_32 )old_nb_elts__SFIH),((__UINTEGER_32 )new_capacity__PFIH)));
+          upper__3MKH=(__INTEGER)(new_capacity__PFIH -  1);
+          Self__1MKH=old_nb_elts__SFIH;
+          while ((Self__1MKH <= upper__3MKH)) {
+            new__TFIH[Self__1MKH]='\0';
+            Self__1MKH=(__INTEGER)(Self__1MKH +  1);
+          };
+          Self__QFIH->storage__3CS=new__TFIH;
+          Self__QFIH->capacity__UCS=new_capacity__PFIH;
+        };
+      };
+      ((__CHARACTER *)Self__QFIH->storage__3CS)[Self__QFIH->count__SGC]=')';
+      Self__QFIH->count__SGC=(__INTEGER)(Self__QFIH->count__SGC +  1);
     } break;
     case __ITM_TYPE_BLOCK__: {
-      shorter_in__CTDG(__tmp__OTDG,buf__ETDG);
+      shorter_in__2UDG(__tmp__IVDG,buf__4UDG);
     } break;
     case __ITM_TYPE_GENERIC__: {
-      shorter_in__KUDG(__tmp__OTDG,buf__ETDG);
+      shorter_in__EWDG(__tmp__IVDG,buf__4UDG);
     } break;
     case __ITM_TYPE_STYLE__: {
-      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__OYFG(Self__FSGH->parent_itm_type_simple__RSN.name__0YP,buf__ETDG,(&__string_125));
+      Self__VFIH=((__ITM_TYPE_STYLE *)__tmp__IVDG);
+      if (((void *)Self__VFIH->style__PZP != (void *)NULL)) {
+        put__to__like__I0FG(Self__VFIH->style__PZP,buf__4UDG,(&__string_119));
+        Self__YFIH=((__STRING *)buf__4UDG);
+        new_capacity__XFIH= 0;
+        if ((Self__YFIH->capacity__UCS <= Self__YFIH->count__SGC)) {
+          if ((Self__YFIH->capacity__UCS ==  0)) {
+            Self__YFIH->capacity__UCS= 32;
+            Self__YFIH->storage__3CS=create__YIEB( 32);
+          } else {
+            new_capacity__XFIH=(__INTEGER)(Self__YFIH->capacity__UCS <<  1);
+            Self__ZFIH=((__CHARACTER *)Self__YFIH->storage__3CS);
+            old_nb_elts__0FIH=Self__YFIH->capacity__UCS;
+            new__1FIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__ZFIH),((__UINTEGER_32 )old_nb_elts__0FIH),((__UINTEGER_32 )new_capacity__XFIH)));
+            upper__CNKH=(__INTEGER)(new_capacity__XFIH -  1);
+            Self__ANKH=old_nb_elts__0FIH;
+            while ((Self__ANKH <= upper__CNKH)) {
+              new__1FIH[Self__ANKH]='\0';
+              Self__ANKH=(__INTEGER)(Self__ANKH +  1);
+            };
+            Self__YFIH->storage__3CS=new__1FIH;
+            Self__YFIH->capacity__UCS=new_capacity__XFIH;
+          };
+        };
+        ((__CHARACTER *)Self__YFIH->storage__3CS)[Self__YFIH->count__SGC]=' ';
+        Self__YFIH->count__SGC=(__INTEGER)(Self__YFIH->count__SGC +  1);
+      };
+      put__to__like__I0FG(Self__VFIH->parent_itm_type_simple__3SN.name__GZP,buf__4UDG,(&__string_125));
     } break;
     };
-    add_last__GOT(buf__ETDG,';');
-    add_last__GOT(buf__ETDG,' ');
-  };
-  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__YTDG)->__id) {
+    Self__4FIH=((__STRING *)buf__4UDG);
+    new_capacity__3FIH= 0;
+    if ((Self__4FIH->capacity__UCS <= Self__4FIH->count__SGC)) {
+      if ((Self__4FIH->capacity__UCS ==  0)) {
+        Self__4FIH->capacity__UCS= 32;
+        Self__4FIH->storage__3CS=create__YIEB( 32);
+      } else {
+        new_capacity__3FIH=(__INTEGER)(Self__4FIH->capacity__UCS <<  1);
+        Self__5FIH=((__CHARACTER *)Self__4FIH->storage__3CS);
+        old_nb_elts__AGIH=Self__4FIH->capacity__UCS;
+        new__BGIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__5FIH),((__UINTEGER_32 )old_nb_elts__AGIH),((__UINTEGER_32 )new_capacity__3FIH)));
+        upper__HNKH=(__INTEGER)(new_capacity__3FIH -  1);
+        Self__FNKH=old_nb_elts__AGIH;
+        while ((Self__FNKH <= upper__HNKH)) {
+          new__BGIH[Self__FNKH]='\0';
+          Self__FNKH=(__INTEGER)(Self__FNKH +  1);
+        };
+        Self__4FIH->storage__3CS=new__BGIH;
+        Self__4FIH->capacity__UCS=new_capacity__3FIH;
+      };
+    };
+    ((__CHARACTER *)Self__4FIH->storage__3CS)[Self__4FIH->count__SGC]=';';
+    Self__4FIH->count__SGC=(__INTEGER)(Self__4FIH->count__SGC +  1);
+    Self__EGIH=((__STRING *)buf__4UDG);
+    new_capacity__DGIH= 0;
+    if ((Self__EGIH->capacity__UCS <= Self__EGIH->count__SGC)) {
+      if ((Self__EGIH->capacity__UCS ==  0)) {
+        Self__EGIH->capacity__UCS= 32;
+        Self__EGIH->storage__3CS=create__YIEB( 32);
+      } else {
+        new_capacity__DGIH=(__INTEGER)(Self__EGIH->capacity__UCS <<  1);
+        Self__FGIH=((__CHARACTER *)Self__EGIH->storage__3CS);
+        old_nb_elts__GGIH=Self__EGIH->capacity__UCS;
+        new__HGIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__FGIH),((__UINTEGER_32 )old_nb_elts__GGIH),((__UINTEGER_32 )new_capacity__DGIH)));
+        upper__MNKH=(__INTEGER)(new_capacity__DGIH -  1);
+        Self__KNKH=old_nb_elts__GGIH;
+        while ((Self__KNKH <= upper__MNKH)) {
+          new__HGIH[Self__KNKH]='\0';
+          Self__KNKH=(__INTEGER)(Self__KNKH +  1);
+        };
+        Self__EGIH->storage__3CS=new__HGIH;
+        Self__EGIH->capacity__UCS=new_capacity__DGIH;
+      };
+    };
+    ((__CHARACTER *)Self__EGIH->storage__3CS)[Self__EGIH->count__SGC]=' ';
+    Self__EGIH->count__SGC=(__INTEGER)(Self__EGIH->count__SGC +  1);
+  };
+  if (((void *)Self__3UDG->type_result__2NN != (void *)NULL)) {
+    __tmp__SVDG=Self__3UDG->type_result__2NN;
+    if (__tmp__SVDG==NULL) {
+      __tmp__TVDG=NULL;
+    } else {
+      switch (((struct ___OBJ *)__tmp__SVDG)->__id) {
       case __ITM_TYPE_PARAMETER__: {
-        __tmp__ZTDG=NULL;
+        __tmp__TVDG=NULL;
       } break;
       case __ITM_TYPE_SIMPLE__: {
-        __tmp__ZTDG=NULL;
+        __tmp__TVDG=NULL;
       } break;
       case __ITM_TYPE_MULTI__: {
-        __tmp__ZTDG=((void *)__tmp__YTDG);
+        __tmp__TVDG=((void *)__tmp__SVDG);
       } break;
       case __ITM_TYPE_BLOCK__: {
-        __tmp__ZTDG=NULL;
+        __tmp__TVDG=NULL;
       } break;
       case __ITM_TYPE_GENERIC__: {
-        __tmp__ZTDG=NULL;
+        __tmp__TVDG=NULL;
       } break;
       case __ITM_TYPE_STYLE__: {
-        __tmp__ZTDG=NULL;
+        __tmp__TVDG=NULL;
       } break;
       }
     };
-    typ_mul__FTDG=__tmp__ZTDG;
-    if (((void *)__tmp__ZTDG == (void *)NULL)) {
-      __tmp__5TDG=Self__DTDG->type_result__QNN;
-      switch (((struct ___OBJ *)__tmp__5TDG)->__id) {
+    typ_mul__5UDG=__tmp__TVDG;
+    if (((void *)__tmp__TVDG == (void *)NULL)) {
+      __tmp__ZVDG=Self__3UDG->type_result__2NN;
+      switch (((struct ___OBJ *)__tmp__ZVDG)->__id) {
       case __ITM_TYPE_PARAMETER__: {
-        shorter_in__ASDG(__tmp__5TDG,buf__ETDG);
+        shorter_in__0TDG(__tmp__ZVDG,buf__4UDG);
       } break;
       case __ITM_TYPE_SIMPLE__: {
-        shorter_in__RSDG(__tmp__5TDG,buf__ETDG);
+        shorter_in__LUDG(__tmp__ZVDG,buf__4UDG);
       } break;
       case __ITM_TYPE_MULTI__: {
-        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,')');
+        Self__QTYG=((__ITM_TYPE_MULTI *)__tmp__ZVDG);
+        Self__KGIH=((__STRING *)buf__4UDG);
+        new_capacity__JGIH= 0;
+        if ((Self__KGIH->capacity__UCS <= Self__KGIH->count__SGC)) {
+          if ((Self__KGIH->capacity__UCS ==  0)) {
+            Self__KGIH->capacity__UCS= 32;
+            Self__KGIH->storage__3CS=create__YIEB( 32);
+          } else {
+            new_capacity__JGIH=(__INTEGER)(Self__KGIH->capacity__UCS <<  1);
+            Self__LGIH=((__CHARACTER *)Self__KGIH->storage__3CS);
+            old_nb_elts__MGIH=Self__KGIH->capacity__UCS;
+            new__NGIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__LGIH),((__UINTEGER_32 )old_nb_elts__MGIH),((__UINTEGER_32 )new_capacity__JGIH)));
+            upper__RNKH=(__INTEGER)(new_capacity__JGIH -  1);
+            Self__PNKH=old_nb_elts__MGIH;
+            while ((Self__PNKH <= upper__RNKH)) {
+              new__NGIH[Self__PNKH]='\0';
+              Self__PNKH=(__INTEGER)(Self__PNKH +  1);
+            };
+            Self__KGIH->storage__3CS=new__NGIH;
+            Self__KGIH->capacity__UCS=new_capacity__JGIH;
+          };
+        };
+        ((__CHARACTER *)Self__KGIH->storage__3CS)[Self__KGIH->count__SGC]='(';
+        Self__KGIH->count__SGC=(__INTEGER)(Self__KGIH->count__SGC +  1);
+        shorter_raw_in__M2FG(Self__QTYG,buf__4UDG);
+        Self__QGIH=((__STRING *)buf__4UDG);
+        new_capacity__PGIH= 0;
+        if ((Self__QGIH->capacity__UCS <= Self__QGIH->count__SGC)) {
+          if ((Self__QGIH->capacity__UCS ==  0)) {
+            Self__QGIH->capacity__UCS= 32;
+            Self__QGIH->storage__3CS=create__YIEB( 32);
+          } else {
+            new_capacity__PGIH=(__INTEGER)(Self__QGIH->capacity__UCS <<  1);
+            Self__RGIH=((__CHARACTER *)Self__QGIH->storage__3CS);
+            old_nb_elts__SGIH=Self__QGIH->capacity__UCS;
+            new__TGIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__RGIH),((__UINTEGER_32 )old_nb_elts__SGIH),((__UINTEGER_32 )new_capacity__PGIH)));
+            upper__WNKH=(__INTEGER)(new_capacity__PGIH -  1);
+            Self__UNKH=old_nb_elts__SGIH;
+            while ((Self__UNKH <= upper__WNKH)) {
+              new__TGIH[Self__UNKH]='\0';
+              Self__UNKH=(__INTEGER)(Self__UNKH +  1);
+            };
+            Self__QGIH->storage__3CS=new__TGIH;
+            Self__QGIH->capacity__UCS=new_capacity__PGIH;
+          };
+        };
+        ((__CHARACTER *)Self__QGIH->storage__3CS)[Self__QGIH->count__SGC]=')';
+        Self__QGIH->count__SGC=(__INTEGER)(Self__QGIH->count__SGC +  1);
       } break;
       case __ITM_TYPE_BLOCK__: {
-        shorter_in__CTDG(__tmp__5TDG,buf__ETDG);
+        shorter_in__2UDG(__tmp__ZVDG,buf__4UDG);
       } break;
       case __ITM_TYPE_GENERIC__: {
-        shorter_in__KUDG(__tmp__5TDG,buf__ETDG);
+        shorter_in__EWDG(__tmp__ZVDG,buf__4UDG);
       } break;
       case __ITM_TYPE_STYLE__: {
-        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,' ');
+        Self__VGIH=((__ITM_TYPE_STYLE *)__tmp__ZVDG);
+        if (((void *)Self__VGIH->style__PZP != (void *)NULL)) {
+          put__to__like__I0FG(Self__VGIH->style__PZP,buf__4UDG,(&__string_119));
+          Self__YGIH=((__STRING *)buf__4UDG);
+          new_capacity__XGIH= 0;
+          if ((Self__YGIH->capacity__UCS <= Self__YGIH->count__SGC)) {
+            if ((Self__YGIH->capacity__UCS ==  0)) {
+              Self__YGIH->capacity__UCS= 32;
+              Self__YGIH->storage__3CS=create__YIEB( 32);
+            } else {
+              new_capacity__XGIH=(__INTEGER)(Self__YGIH->capacity__UCS <<  1);
+              Self__ZGIH=((__CHARACTER *)Self__YGIH->storage__3CS);
+              old_nb_elts__0GIH=Self__YGIH->capacity__UCS;
+              new__1GIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__ZGIH),((__UINTEGER_32 )old_nb_elts__0GIH),((__UINTEGER_32 )new_capacity__XGIH)));
+              upper__1NKH=(__INTEGER)(new_capacity__XGIH -  1);
+              Self__ZNKH=old_nb_elts__0GIH;
+              while ((Self__ZNKH <= upper__1NKH)) {
+                new__1GIH[Self__ZNKH]='\0';
+                Self__ZNKH=(__INTEGER)(Self__ZNKH +  1);
+              };
+              Self__YGIH->storage__3CS=new__1GIH;
+              Self__YGIH->capacity__UCS=new_capacity__XGIH;
+            };
+          };
+          ((__CHARACTER *)Self__YGIH->storage__3CS)[Self__YGIH->count__SGC]=' ';
+          Self__YGIH->count__SGC=(__INTEGER)(Self__YGIH->count__SGC +  1);
         };
-        put__to__like__OYFG(Self__HSGH->parent_itm_type_simple__RSN.name__0YP,buf__ETDG,(&__string_125));
+        put__to__like__I0FG(Self__VGIH->parent_itm_type_simple__3SN.name__GZP,buf__4UDG,(&__string_125));
       } break;
       };
     } else {
-      shorter_raw_in__S0FG(__tmp__ZTDG,buf__ETDG);
+      shorter_raw_in__M2FG(__tmp__TVDG,buf__4UDG);
     };
   };
-  put__to__like__MTFG((&__string_300),buf__ETDG);
+  put__to__like__GVFG((&__string_300),buf__4UDG);
 }
 
-static void shorter_in__KUDG(__ITM_TYPE_GENERIC *Self__LUDG,void *buf__MUDG)
+static void shorter_in__EWDG(__ITM_TYPE_GENERIC *Self__FWDG,void *buf__GWDG)
 // ({ITM_TYPE_GENERIC},{NULLxSTRING}) VoidRecursive, No inlinable.
 {
-  __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) {
+  __STRING *Self__4GIH,*Self__EHIH,*Self__MHIH,*Self__SHIH,*Self__YHIH;
+  __STRING *Self__4HIH;
+  __INTEGER new_capacity__3GIH,old_nb_elts__AHIH,upper__AOKH,Self__4NKH;
+  __INTEGER new_capacity__DHIH,old_nb_elts__GHIH,upper__FOKH,Self__DOKH;
+  __INTEGER __tmp__1WDG,Self__LZFG,new_capacity__LHIH,old_nb_elts__OHIH;
+  __INTEGER upper__KOKH,Self__IOKH,new_capacity__RHIH,old_nb_elts__UHIH;
+  __INTEGER upper__POKH,Self__NOKH,new_capacity__XHIH,old_nb_elts__0HIH;
+  __INTEGER upper__UOKH,Self__SOKH,new_capacity__3HIH,old_nb_elts__AIIH;
+  __INTEGER upper__ZOKH,Self__XOKH;
+  void *__tmp__CXDG,*__tmp__FXDG;
+  __ITM_TYPE_STYLE *Self__JHIH,*Self__HXDG;
+  __CHARACTER *Self__5GIH,*new__BHIH,*Self__FHIH,*new__HHIH,*Self__NHIH;
+  __CHARACTER *new__PHIH,*Self__THIH,*new__VHIH,*Self__ZHIH,*new__1HIH;
+  __CHARACTER *Self__5HIH,*new__BIIH;
+  __FAST_ARRAYoITM_TYPE_MONOo *Self__O1FH;
+  if (((void *)Self__FWDG->parent_itm_type_style__4SN.style__PZP != (void *)NULL)) {
+    put__to__like__ZXFG(Self__FWDG->parent_itm_type_style__4SN.style__PZP,buf__GWDG,(&__string_119));
+    Self__4GIH=((__STRING *)buf__GWDG);
+    new_capacity__3GIH= 0;
+    if ((Self__4GIH->capacity__UCS <= Self__4GIH->count__SGC)) {
+      if ((Self__4GIH->capacity__UCS ==  0)) {
+        Self__4GIH->capacity__UCS= 32;
+        Self__4GIH->storage__3CS=create__YIEB( 32);
+      } else {
+        new_capacity__3GIH=(__INTEGER)(Self__4GIH->capacity__UCS <<  1);
+        Self__5GIH=((__CHARACTER *)Self__4GIH->storage__3CS);
+        old_nb_elts__AHIH=Self__4GIH->capacity__UCS;
+        new__BHIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__5GIH),((__UINTEGER_32 )old_nb_elts__AHIH),((__UINTEGER_32 )new_capacity__3GIH)));
+        upper__AOKH=(__INTEGER)(new_capacity__3GIH -  1);
+        Self__4NKH=old_nb_elts__AHIH;
+        while ((Self__4NKH <= upper__AOKH)) {
+          new__BHIH[Self__4NKH]='\0';
+          Self__4NKH=(__INTEGER)(Self__4NKH +  1);
+        };
+        Self__4GIH->storage__3CS=new__BHIH;
+        Self__4GIH->capacity__UCS=new_capacity__3GIH;
+      };
+    };
+    ((__CHARACTER *)Self__4GIH->storage__3CS)[Self__4GIH->count__SGC]=' ';
+    Self__4GIH->count__SGC=(__INTEGER)(Self__4GIH->count__SGC +  1);
+  };
+  put__to__like__ZXFG(Self__FWDG->parent_itm_type_style__4SN.parent_itm_type_simple__3SN.name__GZP,buf__GWDG,(&__string_125));
+  Self__EHIH=((__STRING *)buf__GWDG);
+  new_capacity__DHIH= 0;
+  if ((Self__EHIH->capacity__UCS <= Self__EHIH->count__SGC)) {
+    if ((Self__EHIH->capacity__UCS ==  0)) {
+      Self__EHIH->capacity__UCS= 32;
+      Self__EHIH->storage__3CS=create__YIEB( 32);
+    } else {
+      new_capacity__DHIH=(__INTEGER)(Self__EHIH->capacity__UCS <<  1);
+      Self__FHIH=((__CHARACTER *)Self__EHIH->storage__3CS);
+      old_nb_elts__GHIH=Self__EHIH->capacity__UCS;
+      new__HHIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__FHIH),((__UINTEGER_32 )old_nb_elts__GHIH),((__UINTEGER_32 )new_capacity__DHIH)));
+      upper__FOKH=(__INTEGER)(new_capacity__DHIH -  1);
+      Self__DOKH=old_nb_elts__GHIH;
+      while ((Self__DOKH <= upper__FOKH)) {
+        new__HHIH[Self__DOKH]='\0';
+        Self__DOKH=(__INTEGER)(Self__DOKH +  1);
+      };
+      Self__EHIH->storage__3CS=new__HHIH;
+      Self__EHIH->capacity__UCS=new_capacity__DHIH;
+    };
+  };
+  ((__CHARACTER *)Self__EHIH->storage__3CS)[Self__EHIH->count__SGC]='(';
+  Self__EHIH->count__SGC=(__INTEGER)(Self__EHIH->count__SGC +  1);
+  __tmp__1WDG=(__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)Self__FWDG->list_type__ZZP)->parent_arrayed_collection__SYC.upper__4HV -  1);
+  Self__LZFG= 0;
+  while ((Self__LZFG <= __tmp__1WDG)) {
+    __tmp__CXDG=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)Self__FWDG->list_type__ZZP)->parent_arrayed_collection__SYC.storage__FMV)[Self__LZFG];
+    switch (((struct ___OBJ *)__tmp__CXDG)->__id) {
     case __ITM_TYPE_PARAMETER__: {
-      shorter_in__ASDG(__tmp__IVDG,buf__MUDG);
+      shorter_in__0TDG(__tmp__CXDG,buf__GWDG);
     } break;
     case __ITM_TYPE_SIMPLE__: {
-      shorter_in__RSDG(__tmp__IVDG,buf__MUDG);
+      shorter_in__LUDG(__tmp__CXDG,buf__GWDG);
     } break;
     case __ITM_TYPE_BLOCK__: {
-      shorter_in__CTDG(__tmp__IVDG,buf__MUDG);
+      shorter_in__2UDG(__tmp__CXDG,buf__GWDG);
     } break;
     case __ITM_TYPE_GENERIC__: {
-      shorter_in__KUDG(__tmp__IVDG,buf__MUDG);
+      shorter_in__EWDG(__tmp__CXDG,buf__GWDG);
     } break;
     case __ITM_TYPE_STYLE__: {
-      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__OYFG(Self__MSGH->parent_itm_type_simple__RSN.name__0YP,buf__MUDG,(&__string_125));
+      Self__JHIH=((__ITM_TYPE_STYLE *)__tmp__CXDG);
+      if (((void *)Self__JHIH->style__PZP != (void *)NULL)) {
+        put__to__like__I0FG(Self__JHIH->style__PZP,buf__GWDG,(&__string_119));
+        Self__MHIH=((__STRING *)buf__GWDG);
+        new_capacity__LHIH= 0;
+        if ((Self__MHIH->capacity__UCS <= Self__MHIH->count__SGC)) {
+          if ((Self__MHIH->capacity__UCS ==  0)) {
+            Self__MHIH->capacity__UCS= 32;
+            Self__MHIH->storage__3CS=create__YIEB( 32);
+          } else {
+            new_capacity__LHIH=(__INTEGER)(Self__MHIH->capacity__UCS <<  1);
+            Self__NHIH=((__CHARACTER *)Self__MHIH->storage__3CS);
+            old_nb_elts__OHIH=Self__MHIH->capacity__UCS;
+            new__PHIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__NHIH),((__UINTEGER_32 )old_nb_elts__OHIH),((__UINTEGER_32 )new_capacity__LHIH)));
+            upper__KOKH=(__INTEGER)(new_capacity__LHIH -  1);
+            Self__IOKH=old_nb_elts__OHIH;
+            while ((Self__IOKH <= upper__KOKH)) {
+              new__PHIH[Self__IOKH]='\0';
+              Self__IOKH=(__INTEGER)(Self__IOKH +  1);
+            };
+            Self__MHIH->storage__3CS=new__PHIH;
+            Self__MHIH->capacity__UCS=new_capacity__LHIH;
+          };
+        };
+        ((__CHARACTER *)Self__MHIH->storage__3CS)[Self__MHIH->count__SGC]=' ';
+        Self__MHIH->count__SGC=(__INTEGER)(Self__MHIH->count__SGC +  1);
+      };
+      put__to__like__I0FG(Self__JHIH->parent_itm_type_simple__3SN.name__GZP,buf__GWDG,(&__string_125));
     } break;
     };
-    add_last__GOT(buf__MUDG,',');
-    Self__RXFG=(__INTEGER)(Self__RXFG +  1);
-  };
-  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) {
+    Self__SHIH=((__STRING *)buf__GWDG);
+    new_capacity__RHIH= 0;
+    if ((Self__SHIH->capacity__UCS <= Self__SHIH->count__SGC)) {
+      if ((Self__SHIH->capacity__UCS ==  0)) {
+        Self__SHIH->capacity__UCS= 32;
+        Self__SHIH->storage__3CS=create__YIEB( 32);
+      } else {
+        new_capacity__RHIH=(__INTEGER)(Self__SHIH->capacity__UCS <<  1);
+        Self__THIH=((__CHARACTER *)Self__SHIH->storage__3CS);
+        old_nb_elts__UHIH=Self__SHIH->capacity__UCS;
+        new__VHIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__THIH),((__UINTEGER_32 )old_nb_elts__UHIH),((__UINTEGER_32 )new_capacity__RHIH)));
+        upper__POKH=(__INTEGER)(new_capacity__RHIH -  1);
+        Self__NOKH=old_nb_elts__UHIH;
+        while ((Self__NOKH <= upper__POKH)) {
+          new__VHIH[Self__NOKH]='\0';
+          Self__NOKH=(__INTEGER)(Self__NOKH +  1);
+        };
+        Self__SHIH->storage__3CS=new__VHIH;
+        Self__SHIH->capacity__UCS=new_capacity__RHIH;
+      };
+    };
+    ((__CHARACTER *)Self__SHIH->storage__3CS)[Self__SHIH->count__SGC]=',';
+    Self__SHIH->count__SGC=(__INTEGER)(Self__SHIH->count__SGC +  1);
+    Self__LZFG=(__INTEGER)(Self__LZFG +  1);
+  };
+  Self__O1FH=((__FAST_ARRAYoITM_TYPE_MONOo *)Self__FWDG->list_type__ZZP);
+  __tmp__FXDG=((void **)Self__O1FH->parent_arrayed_collection__SYC.storage__FMV)[Self__O1FH->parent_arrayed_collection__SYC.upper__4HV];
+  switch (((struct ___OBJ *)__tmp__FXDG)->__id) {
   case __ITM_TYPE_PARAMETER__: {
-    shorter_in__ASDG(__tmp__LVDG,buf__MUDG);
+    shorter_in__0TDG(__tmp__FXDG,buf__GWDG);
   } break;
   case __ITM_TYPE_SIMPLE__: {
-    shorter_in__RSDG(__tmp__LVDG,buf__MUDG);
+    shorter_in__LUDG(__tmp__FXDG,buf__GWDG);
   } break;
   case __ITM_TYPE_BLOCK__: {
-    shorter_in__CTDG(__tmp__LVDG,buf__MUDG);
+    shorter_in__2UDG(__tmp__FXDG,buf__GWDG);
   } break;
   case __ITM_TYPE_GENERIC__: {
-    shorter_in__KUDG(__tmp__LVDG,buf__MUDG);
+    shorter_in__EWDG(__tmp__FXDG,buf__GWDG);
   } break;
   case __ITM_TYPE_STYLE__: {
-    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__OYFG(Self__NVDG->parent_itm_type_simple__RSN.name__0YP,buf__MUDG,(&__string_125));
+    Self__HXDG=((__ITM_TYPE_STYLE *)__tmp__FXDG);
+    if (((void *)Self__HXDG->style__PZP != (void *)NULL)) {
+      put__to__like__I0FG(Self__HXDG->style__PZP,buf__GWDG,(&__string_119));
+      Self__YHIH=((__STRING *)buf__GWDG);
+      new_capacity__XHIH= 0;
+      if ((Self__YHIH->capacity__UCS <= Self__YHIH->count__SGC)) {
+        if ((Self__YHIH->capacity__UCS ==  0)) {
+          Self__YHIH->capacity__UCS= 32;
+          Self__YHIH->storage__3CS=create__YIEB( 32);
+        } else {
+          new_capacity__XHIH=(__INTEGER)(Self__YHIH->capacity__UCS <<  1);
+          Self__ZHIH=((__CHARACTER *)Self__YHIH->storage__3CS);
+          old_nb_elts__0HIH=Self__YHIH->capacity__UCS;
+          new__1HIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__ZHIH),((__UINTEGER_32 )old_nb_elts__0HIH),((__UINTEGER_32 )new_capacity__XHIH)));
+          upper__UOKH=(__INTEGER)(new_capacity__XHIH -  1);
+          Self__SOKH=old_nb_elts__0HIH;
+          while ((Self__SOKH <= upper__UOKH)) {
+            new__1HIH[Self__SOKH]='\0';
+            Self__SOKH=(__INTEGER)(Self__SOKH +  1);
+          };
+          Self__YHIH->storage__3CS=new__1HIH;
+          Self__YHIH->capacity__UCS=new_capacity__XHIH;
+        };
+      };
+      ((__CHARACTER *)Self__YHIH->storage__3CS)[Self__YHIH->count__SGC]=' ';
+      Self__YHIH->count__SGC=(__INTEGER)(Self__YHIH->count__SGC +  1);
+    };
+    put__to__like__I0FG(Self__HXDG->parent_itm_type_simple__3SN.name__GZP,buf__GWDG,(&__string_125));
   } break;
   };
-  add_last__GOT(buf__MUDG,')');
+  Self__4HIH=((__STRING *)buf__GWDG);
+  new_capacity__3HIH= 0;
+  if ((Self__4HIH->capacity__UCS <= Self__4HIH->count__SGC)) {
+    if ((Self__4HIH->capacity__UCS ==  0)) {
+      Self__4HIH->capacity__UCS= 32;
+      Self__4HIH->storage__3CS=create__YIEB( 32);
+    } else {
+      new_capacity__3HIH=(__INTEGER)(Self__4HIH->capacity__UCS <<  1);
+      Self__5HIH=((__CHARACTER *)Self__4HIH->storage__3CS);
+      old_nb_elts__AIIH=Self__4HIH->capacity__UCS;
+      new__BIIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__5HIH),((__UINTEGER_32 )old_nb_elts__AIIH),((__UINTEGER_32 )new_capacity__3HIH)));
+      upper__ZOKH=(__INTEGER)(new_capacity__3HIH -  1);
+      Self__XOKH=old_nb_elts__AIIH;
+      while ((Self__XOKH <= upper__ZOKH)) {
+        new__BIIH[Self__XOKH]='\0';
+        Self__XOKH=(__INTEGER)(Self__XOKH +  1);
+      };
+      Self__4HIH->storage__3CS=new__BIIH;
+      Self__4HIH->capacity__UCS=new_capacity__3HIH;
+    };
+  };
+  ((__CHARACTER *)Self__4HIH->storage__3CS)[Self__4HIH->count__SGC]=')';
+  Self__4HIH->count__SGC=(__INTEGER)(Self__4HIH->count__SGC +  1);
 }
 
-static void put__to__like__OYFG(void *tok__QYFG,void *buf__RYFG,void *key__SYFG)
+static void put__to__like__I0FG(void *tok__K0FG,void *buf__L0FG,void *key__M0FG)
 // ({NULLxSTRING_CONSTANT},{NULLxSTRING},{STRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER __tmp__30FG,Self__MBIG;
+  void *lst__N0FG;
+  lst__N0FG=NULL;
+  if (((void *)key__M0FG != (void *)NULL)) {
+    lst__N0FG=fast_reference_at__CMNE(short_dico__QD,key__M0FG);
+    if (((void *)lst__N0FG != (void *)NULL)) {
+      __tmp__30FG=((__LINKED_LISToSTRING_CONSTANTo *)lst__N0FG)->parent_linked_collection__LD.upper__0ED;
+      Self__MBIG= 1;
+      while ((Self__MBIG <= __tmp__30FG)) {
+        if (((void *)item__X3ND(lst__N0FG,Self__MBIG) == (void *)NULL)) {
+          append__3OS(buf__L0FG,tok__K0FG);
         } else {
-          append__ROS(buf__RYFG,item__Q2ND(lst__TYFG,Self__S5HG));
+          append__3OS(buf__L0FG,item__X3ND(lst__N0FG,Self__MBIG));
         };
-        Self__S5HG=(__INTEGER)(Self__S5HG +  1);
+        Self__MBIG=(__INTEGER)(Self__MBIG +  1);
       };
     };
   };
 }
 
-static void put__to__like__YYDG(void *tok__0YDG,void *buf__1YDG,void *key__2YDG)
+static void put__to__like__S0DG(void *tok__U0DG,void *buf__V0DG,void *key__W0DG)
 // ({NULLxSTRING_CONSTANTxSTRING},{NULLxSTRING},{STRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER __tmp__H1DG,Self__T2HG;
+  void *lst__X0DG;
+  lst__X0DG=NULL;
+  if (((void *)key__W0DG != (void *)NULL)) {
+    lst__X0DG=fast_reference_at__CMNE(short_dico__QD,key__W0DG);
+    if (((void *)lst__X0DG != (void *)NULL)) {
+      __tmp__H1DG=((__LINKED_LISToSTRING_CONSTANTo *)lst__X0DG)->parent_linked_collection__LD.upper__0ED;
+      Self__T2HG= 1;
+      while ((Self__T2HG <= __tmp__H1DG)) {
+        if (((void *)item__X3ND(lst__X0DG,Self__T2HG) == (void *)NULL)) {
+          append__3OS(buf__V0DG,tok__U0DG);
         } else {
-          append__ROS(buf__1YDG,item__Q2ND(lst__3YDG,Self__Z0HG));
+          append__3OS(buf__V0DG,item__X3ND(lst__X0DG,Self__T2HG));
         };
-        Self__Z0HG=(__INTEGER)(Self__Z0HG +  1);
+        Self__T2HG=(__INTEGER)(Self__T2HG +  1);
       };
     };
   };
 }
 
-static void set_path__1PT(__DIRECTORY_UNIX *Self__2PT,void *n__3PT)
+static void set_path__HPT(__DIRECTORY_UNIX *Self__IPT,void *n__JPT)
 // ({DIRECTORY_UNIX},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __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__;
+  __STRING_CONSTANT *result__DIIH,*Self__4EHH,*Self__RKEH,*result__LIIH;
+  __STRING_CONSTANT *Self__LZSG;
+  __POINTER ptr__EIIH,ptr_table__2OKH,next__1OKH,result__3OKH;
+  __POINTER ptr_table__BPKH,next__APKH,result__CPKH,ptr__MIIH;
+  __POINTER ptr_table__LPKH,next__KPKH,result__MPKH,ptr_table__QPKH;
+  __POINTER next__PPKH,result__RPKH,ptr__MQAH;
+  __INTEGER typ_id__FIIH,c__AFHH,Self__GPKH,idx__KPT,typ_id__NIIH;
+  __INTEGER __tmp__AQT;
+  __UINTEGER_32 sz__GIIH,a__HIIH,new_size__IIIH,t__JIIH,a__KIIH;
+  __UINTEGER_32 new_size__EPKH,lab_type__DPKH,sz__OIIH,a__PIIH;
+  __UINTEGER_32 new_size__QIIH,t__RIIH,a__SIIH,new_size__TPKH;
+  __UINTEGER_32 lab_type__SPKH;
+  void *__tmp__YPT;
+  __CHARACTER *Self__HPKH,*model__IPKH,*__tmp__2PT;
+  result__DIIH=NULL;
+  ptr__EIIH=((__POINTER )(NULL));
+  typ_id__FIIH= 0;
+  sz__GIIH=((__UINTEGER_32 )sizeof(__STRING_CONSTANT));
+  if ((sz__GIIH ==  0)) {
+    result__DIIH=STRING_CONSTANT__;
   } else {
-    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__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__T0JH=new_lab__FTJ(lab_type__W0JH);
-            };
-            ((__POINTER *)next__T0JH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__U0JH)[ 0]=next__T0JH;
-          } else {
-            ((__POINTER *)result__V0JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__T0JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__V0JH=next__T0JH;
-          };
-        };
-        ptr__GJIH=result__V0JH;
-      };
-      result__FJIH=((__STRING_CONSTANT *)ptr__GJIH);
-      *(result__FJIH) = *(STRING_CONSTANT__);
-    };
-    Self__2PT->parent_entry_unix__GGD.parent_entry__FGD.name__CQT=result__FJIH;
-  };
-  __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;
+    typ_id__FIIH=-1;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__GIIH);
+    if ((typ_id__FIIH == (__INTEGER)(-  1))) {
+      a__HIIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__IIIH=(__UINTEGER_32)((__UINTEGER_32)(sz__GIIH + a__HIIH) & (__UINTEGER_32)(~ a__HIIH));
+      ptr_table__2OKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__IIIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__1OKH=((__POINTER )(NULL));
+      result__3OKH=((__POINTER *)ptr_table__2OKH)[ 0];
+      if ((result__3OKH == (void *)NULL)) {
+        result__3OKH=new_lab__RTJ(new_size__IIIH);
+        next__1OKH=(void *)((unsigned long)result__3OKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IIIH)));
+        ((__POINTER *)next__1OKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__2OKH)[ 0]=next__1OKH;
+      } else {
+        next__1OKH=((__POINTER *)result__3OKH)[ 0];
+        if ((next__1OKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__3OKH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__IIIH <<  1)) <=  4096)) {
+            next__1OKH=(void *)((unsigned long)result__3OKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IIIH)));
+          } else {
+            next__1OKH=new_lab__RTJ(new_size__IIIH);
+          };
+          ((__POINTER *)next__1OKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__2OKH)[ 0]=next__1OKH;
+        } else {
+          ((__POINTER *)result__3OKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1OKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__3OKH=next__1OKH;
+        };
+      };
+      ptr__EIIH=result__3OKH;
+    } else {
+      t__JIIH=((__UINTEGER_32 )typ_id__FIIH);
+      a__KIIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__EPKH=(__UINTEGER_32)((__UINTEGER_32)(sz__GIIH + a__KIIH) & (__UINTEGER_32)(~ a__KIIH));
+      ptr_table__BPKH=((__POINTER )(&(table_type[(t__JIIH)])));
+      lab_type__DPKH=(__UINTEGER_32)(t__JIIH |  1);
+      next__APKH=((__POINTER )(NULL));
+      result__CPKH=((__POINTER *)ptr_table__BPKH)[ 0];
+      if ((result__CPKH == (void *)NULL)) {
+        result__CPKH=new_lab__RTJ(lab_type__DPKH);
+        next__APKH=(void *)((unsigned long)result__CPKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EPKH)));
+        ((__POINTER *)next__APKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__BPKH)[ 0]=next__APKH;
+      } else {
+        next__APKH=((__POINTER *)result__CPKH)[ 0];
+        if ((next__APKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__CPKH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__EPKH <<  1)) <=  4096)) {
+            next__APKH=(void *)((unsigned long)result__CPKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EPKH)));
+          } else {
+            next__APKH=new_lab__RTJ(lab_type__DPKH);
+          };
+          ((__POINTER *)next__APKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__BPKH)[ 0]=next__APKH;
+        } else {
+          ((__POINTER *)result__CPKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__APKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__CPKH=next__APKH;
+        };
+      };
+      ptr__EIIH=result__CPKH;
+    };
+    result__DIIH=((__STRING_CONSTANT *)ptr__EIIH);
+    *(result__DIIH) = *(STRING_CONSTANT__);
+  };
+  Self__4EHH=((__STRING_CONSTANT *)result__DIIH);
+  c__AFHH=((__STRING *)n__JPT)->count__SGC;
+  if ((c__AFHH !=  0)) {
+    Self__4EHH->storage__RRO=create__YIEB((__INTEGER)(c__AFHH +  1));
+    Self__HPKH=((__CHARACTER *)Self__4EHH->storage__RRO);
+    model__IPKH=((__STRING *)n__JPT)->storage__3CS;
+    Self__GPKH=(__INTEGER)(c__AFHH -  1);
+    while ((Self__GPKH >=  0)) {
+      Self__HPKH[Self__GPKH]=((__CHARACTER *)model__IPKH)[Self__GPKH];
+      Self__GPKH=(__INTEGER)(Self__GPKH -  1);
+    };
+    ((__CHARACTER *)Self__4EHH->storage__RRO)[c__AFHH]='\0';
+    Self__4EHH->count__DD=c__AFHH;
+  };
+  Self__IPT->parent_entry_unix__RGD.parent_entry__QGD.path__BD=result__DIIH;
+  Self__RKEH=((__STRING_CONSTANT *)Self__IPT->parent_entry_unix__RGD.parent_entry__QGD.path__BD);
+  idx__KPT=(__INTEGER)( 1 + fast_reverse_index_of__from__KA3(Self__RKEH->storage__RRO,'/',(__INTEGER)(Self__RKEH->count__DD -  1)));
+  if (((void *)Self__IPT->parent_entry_unix__RGD.parent_entry__QGD.name__OPT == (void *)NULL)) {
+    result__LIIH=NULL;
+    ptr__MIIH=((__POINTER )(NULL));
+    typ_id__NIIH= 0;
+    sz__OIIH=((__UINTEGER_32 )sizeof(__STRING_CONSTANT));
+    if ((sz__OIIH ==  0)) {
+      result__LIIH=STRING_CONSTANT__;
+    } else {
+      typ_id__NIIH=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__OIIH);
+      if ((typ_id__NIIH == (__INTEGER)(-  1))) {
+        a__PIIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__QIIH=(__UINTEGER_32)((__UINTEGER_32)(sz__OIIH + a__PIIH) & (__UINTEGER_32)(~ a__PIIH));
+        ptr_table__LPKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__QIIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__KPKH=((__POINTER )(NULL));
+        result__MPKH=((__POINTER *)ptr_table__LPKH)[ 0];
+        if ((result__MPKH == (void *)NULL)) {
+          result__MPKH=new_lab__RTJ(new_size__QIIH);
+          next__KPKH=(void *)((unsigned long)result__MPKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QIIH)));
+          ((__POINTER *)next__KPKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__LPKH)[ 0]=next__KPKH;
+        } else {
+          next__KPKH=((__POINTER *)result__MPKH)[ 0];
+          if ((next__KPKH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MPKH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__QIIH <<  1)) <=  4096)) {
+              next__KPKH=(void *)((unsigned long)result__MPKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QIIH)));
+            } else {
+              next__KPKH=new_lab__RTJ(new_size__QIIH);
+            };
+            ((__POINTER *)next__KPKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__LPKH)[ 0]=next__KPKH;
+          } else {
+            ((__POINTER *)result__MPKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KPKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__MPKH=next__KPKH;
+          };
+        };
+        ptr__MIIH=result__MPKH;
+      } else {
+        t__RIIH=((__UINTEGER_32 )typ_id__NIIH);
+        a__SIIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__TPKH=(__UINTEGER_32)((__UINTEGER_32)(sz__OIIH + a__SIIH) & (__UINTEGER_32)(~ a__SIIH));
+        ptr_table__QPKH=((__POINTER )(&(table_type[(t__RIIH)])));
+        lab_type__SPKH=(__UINTEGER_32)(t__RIIH |  1);
+        next__PPKH=((__POINTER )(NULL));
+        result__RPKH=((__POINTER *)ptr_table__QPKH)[ 0];
+        if ((result__RPKH == (void *)NULL)) {
+          result__RPKH=new_lab__RTJ(lab_type__SPKH);
+          next__PPKH=(void *)((unsigned long)result__RPKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TPKH)));
+          ((__POINTER *)next__PPKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__QPKH)[ 0]=next__PPKH;
+        } else {
+          next__PPKH=((__POINTER *)result__RPKH)[ 0];
+          if ((next__PPKH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__RPKH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__TPKH <<  1)) <=  4096)) {
+              next__PPKH=(void *)((unsigned long)result__RPKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TPKH)));
+            } else {
+              next__PPKH=new_lab__RTJ(lab_type__SPKH);
+            };
+            ((__POINTER *)next__PPKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__QPKH)[ 0]=next__PPKH;
+          } else {
+            ((__POINTER *)result__RPKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PPKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__RPKH=next__PPKH;
+          };
+        };
+        ptr__MIIH=result__RPKH;
+      };
+      result__LIIH=((__STRING_CONSTANT *)ptr__MIIH);
+      *(result__LIIH) = *(STRING_CONSTANT__);
+    };
+    Self__IPT->parent_entry_unix__RGD.parent_entry__QGD.name__OPT=result__LIIH;
+  };
+  __tmp__YPT=Self__IPT->parent_entry_unix__RGD.parent_entry__QGD.name__OPT;
+  ptr__MQAH=((__POINTER )((__CHARACTER *)((__STRING_CONSTANT *)Self__IPT->parent_entry_unix__RGD.parent_entry__QGD.path__BD)->storage__RRO));
+  ptr__MQAH=(void *)((unsigned long)ptr__MQAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )idx__KPT)));
+  __tmp__2PT=((__CHARACTER *)ptr__MQAH);
+  __tmp__AQT=(__INTEGER)(((__STRING_CONSTANT *)Self__IPT->parent_entry_unix__RGD.parent_entry__QGD.path__BD)->count__DD - idx__KPT);
+  Self__LZSG=((__STRING_CONSTANT *)__tmp__YPT);
+  Self__LZSG->storage__RRO=__tmp__2PT;
+  Self__LZSG->count__DD=__tmp__AQT;
 }
 
-static void set_path__WQT(__FILE_UNIX *Self__XQT,void *n__YQT)
+static void set_path__CQT(__FILE_UNIX *Self__DQT,void *n__EQT)
 // ({FILE_UNIX},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __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__;
+  __STRING_CONSTANT *result__TIIH,*Self__CFHH,*Self__VKEH,*result__1IIH;
+  __STRING_CONSTANT *Self__QZSG;
+  __POINTER ptr__UIIH,ptr_table__VPKH,next__UPKH,result__WPKH;
+  __POINTER ptr_table__0PKH,next__ZPKH,result__1PKH,ptr__2IIH;
+  __POINTER ptr_table__EQKH,next__DQKH,result__FQKH,ptr_table__JQKH;
+  __POINTER next__IQKH,result__KQKH,ptr__DPY;
+  __INTEGER typ_id__VIIH,c__EFHH,Self__5PKH,idx__FQT,typ_id__3IIH;
+  __INTEGER __tmp__0QT;
+  __UINTEGER_32 sz__WIIH,a__XIIH,new_size__YIIH,t__ZIIH,a__0IIH;
+  __UINTEGER_32 new_size__3PKH,lab_type__2PKH,sz__4IIH,a__5IIH;
+  __UINTEGER_32 new_size__AJIH,t__BJIH,a__CJIH,new_size__MQKH;
+  __UINTEGER_32 lab_type__LQKH;
+  void *__tmp__SQT;
+  __CHARACTER *Self__AQKH,*model__BQKH,*__tmp__WQT;
+  result__TIIH=NULL;
+  ptr__UIIH=((__POINTER )(NULL));
+  typ_id__VIIH= 0;
+  sz__WIIH=((__UINTEGER_32 )sizeof(__STRING_CONSTANT));
+  if ((sz__WIIH ==  0)) {
+    result__TIIH=STRING_CONSTANT__;
   } else {
-    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__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__H1JH=new_lab__FTJ(lab_type__K1JH);
-            };
-            ((__POINTER *)next__H1JH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__I1JH)[ 0]=next__H1JH;
-          } else {
-            ((__POINTER *)result__J1JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__H1JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__J1JH=next__H1JH;
-          };
-        };
-        ptr__WJIH=result__J1JH;
-      };
-      result__VJIH=((__STRING_CONSTANT *)ptr__WJIH);
-      *(result__VJIH) = *(STRING_CONSTANT__);
-    };
-    Self__XQT->parent_entry_unix__HEF.parent_entry__FGD.name__CQT=result__VJIH;
-  };
-  __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;
+    typ_id__VIIH=-1;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__WIIH);
+    if ((typ_id__VIIH == (__INTEGER)(-  1))) {
+      a__XIIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__YIIH=(__UINTEGER_32)((__UINTEGER_32)(sz__WIIH + a__XIIH) & (__UINTEGER_32)(~ a__XIIH));
+      ptr_table__VPKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__YIIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__UPKH=((__POINTER )(NULL));
+      result__WPKH=((__POINTER *)ptr_table__VPKH)[ 0];
+      if ((result__WPKH == (void *)NULL)) {
+        result__WPKH=new_lab__RTJ(new_size__YIIH);
+        next__UPKH=(void *)((unsigned long)result__WPKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YIIH)));
+        ((__POINTER *)next__UPKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__VPKH)[ 0]=next__UPKH;
+      } else {
+        next__UPKH=((__POINTER *)result__WPKH)[ 0];
+        if ((next__UPKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__WPKH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__YIIH <<  1)) <=  4096)) {
+            next__UPKH=(void *)((unsigned long)result__WPKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YIIH)));
+          } else {
+            next__UPKH=new_lab__RTJ(new_size__YIIH);
+          };
+          ((__POINTER *)next__UPKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__VPKH)[ 0]=next__UPKH;
+        } else {
+          ((__POINTER *)result__WPKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UPKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__WPKH=next__UPKH;
+        };
+      };
+      ptr__UIIH=result__WPKH;
+    } else {
+      t__ZIIH=((__UINTEGER_32 )typ_id__VIIH);
+      a__0IIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__3PKH=(__UINTEGER_32)((__UINTEGER_32)(sz__WIIH + a__0IIH) & (__UINTEGER_32)(~ a__0IIH));
+      ptr_table__0PKH=((__POINTER )(&(table_type[(t__ZIIH)])));
+      lab_type__2PKH=(__UINTEGER_32)(t__ZIIH |  1);
+      next__ZPKH=((__POINTER )(NULL));
+      result__1PKH=((__POINTER *)ptr_table__0PKH)[ 0];
+      if ((result__1PKH == (void *)NULL)) {
+        result__1PKH=new_lab__RTJ(lab_type__2PKH);
+        next__ZPKH=(void *)((unsigned long)result__1PKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3PKH)));
+        ((__POINTER *)next__ZPKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__0PKH)[ 0]=next__ZPKH;
+      } else {
+        next__ZPKH=((__POINTER *)result__1PKH)[ 0];
+        if ((next__ZPKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1PKH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__3PKH <<  1)) <=  4096)) {
+            next__ZPKH=(void *)((unsigned long)result__1PKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3PKH)));
+          } else {
+            next__ZPKH=new_lab__RTJ(lab_type__2PKH);
+          };
+          ((__POINTER *)next__ZPKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__0PKH)[ 0]=next__ZPKH;
+        } else {
+          ((__POINTER *)result__1PKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZPKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__1PKH=next__ZPKH;
+        };
+      };
+      ptr__UIIH=result__1PKH;
+    };
+    result__TIIH=((__STRING_CONSTANT *)ptr__UIIH);
+    *(result__TIIH) = *(STRING_CONSTANT__);
+  };
+  Self__CFHH=((__STRING_CONSTANT *)result__TIIH);
+  c__EFHH=((__STRING *)n__EQT)->count__SGC;
+  if ((c__EFHH !=  0)) {
+    Self__CFHH->storage__RRO=create__YIEB((__INTEGER)(c__EFHH +  1));
+    Self__AQKH=((__CHARACTER *)Self__CFHH->storage__RRO);
+    model__BQKH=((__STRING *)n__EQT)->storage__3CS;
+    Self__5PKH=(__INTEGER)(c__EFHH -  1);
+    while ((Self__5PKH >=  0)) {
+      Self__AQKH[Self__5PKH]=((__CHARACTER *)model__BQKH)[Self__5PKH];
+      Self__5PKH=(__INTEGER)(Self__5PKH -  1);
+    };
+    ((__CHARACTER *)Self__CFHH->storage__RRO)[c__EFHH]='\0';
+    Self__CFHH->count__DD=c__EFHH;
+  };
+  Self__DQT->parent_entry_unix__EFF.parent_entry__QGD.path__BD=result__TIIH;
+  Self__VKEH=((__STRING_CONSTANT *)Self__DQT->parent_entry_unix__EFF.parent_entry__QGD.path__BD);
+  idx__FQT=(__INTEGER)( 1 + fast_reverse_index_of__from__KA3(Self__VKEH->storage__RRO,'/',(__INTEGER)(Self__VKEH->count__DD -  1)));
+  if (((void *)Self__DQT->parent_entry_unix__EFF.parent_entry__QGD.name__OPT == (void *)NULL)) {
+    result__1IIH=NULL;
+    ptr__2IIH=((__POINTER )(NULL));
+    typ_id__3IIH= 0;
+    sz__4IIH=((__UINTEGER_32 )sizeof(__STRING_CONSTANT));
+    if ((sz__4IIH ==  0)) {
+      result__1IIH=STRING_CONSTANT__;
+    } else {
+      typ_id__3IIH=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__4IIH);
+      if ((typ_id__3IIH == (__INTEGER)(-  1))) {
+        a__5IIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__AJIH=(__UINTEGER_32)((__UINTEGER_32)(sz__4IIH + a__5IIH) & (__UINTEGER_32)(~ a__5IIH));
+        ptr_table__EQKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__AJIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__DQKH=((__POINTER )(NULL));
+        result__FQKH=((__POINTER *)ptr_table__EQKH)[ 0];
+        if ((result__FQKH == (void *)NULL)) {
+          result__FQKH=new_lab__RTJ(new_size__AJIH);
+          next__DQKH=(void *)((unsigned long)result__FQKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AJIH)));
+          ((__POINTER *)next__DQKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__EQKH)[ 0]=next__DQKH;
+        } else {
+          next__DQKH=((__POINTER *)result__FQKH)[ 0];
+          if ((next__DQKH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__FQKH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__AJIH <<  1)) <=  4096)) {
+              next__DQKH=(void *)((unsigned long)result__FQKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AJIH)));
+            } else {
+              next__DQKH=new_lab__RTJ(new_size__AJIH);
+            };
+            ((__POINTER *)next__DQKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__EQKH)[ 0]=next__DQKH;
+          } else {
+            ((__POINTER *)result__FQKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DQKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__FQKH=next__DQKH;
+          };
+        };
+        ptr__2IIH=result__FQKH;
+      } else {
+        t__BJIH=((__UINTEGER_32 )typ_id__3IIH);
+        a__CJIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__MQKH=(__UINTEGER_32)((__UINTEGER_32)(sz__4IIH + a__CJIH) & (__UINTEGER_32)(~ a__CJIH));
+        ptr_table__JQKH=((__POINTER )(&(table_type[(t__BJIH)])));
+        lab_type__LQKH=(__UINTEGER_32)(t__BJIH |  1);
+        next__IQKH=((__POINTER )(NULL));
+        result__KQKH=((__POINTER *)ptr_table__JQKH)[ 0];
+        if ((result__KQKH == (void *)NULL)) {
+          result__KQKH=new_lab__RTJ(lab_type__LQKH);
+          next__IQKH=(void *)((unsigned long)result__KQKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MQKH)));
+          ((__POINTER *)next__IQKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__JQKH)[ 0]=next__IQKH;
+        } else {
+          next__IQKH=((__POINTER *)result__KQKH)[ 0];
+          if ((next__IQKH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__KQKH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__MQKH <<  1)) <=  4096)) {
+              next__IQKH=(void *)((unsigned long)result__KQKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MQKH)));
+            } else {
+              next__IQKH=new_lab__RTJ(lab_type__LQKH);
+            };
+            ((__POINTER *)next__IQKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__JQKH)[ 0]=next__IQKH;
+          } else {
+            ((__POINTER *)result__KQKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__IQKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__KQKH=next__IQKH;
+          };
+        };
+        ptr__2IIH=result__KQKH;
+      };
+      result__1IIH=((__STRING_CONSTANT *)ptr__2IIH);
+      *(result__1IIH) = *(STRING_CONSTANT__);
+    };
+    Self__DQT->parent_entry_unix__EFF.parent_entry__QGD.name__OPT=result__1IIH;
+  };
+  __tmp__SQT=Self__DQT->parent_entry_unix__EFF.parent_entry__QGD.name__OPT;
+  ptr__DPY=((__POINTER )((__CHARACTER *)((__STRING_CONSTANT *)Self__DQT->parent_entry_unix__EFF.parent_entry__QGD.path__BD)->storage__RRO));
+  ptr__DPY=(void *)((unsigned long)ptr__DPY - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )idx__FQT)));
+  __tmp__WQT=((__CHARACTER *)ptr__DPY);
+  __tmp__0QT=(__INTEGER)(((__STRING_CONSTANT *)Self__DQT->parent_entry_unix__EFF.parent_entry__QGD.path__BD)->count__DD - idx__FQT);
+  Self__QZSG=((__STRING_CONSTANT *)__tmp__SQT);
+  Self__QZSG->storage__RRO=__tmp__WQT;
+  Self__QZSG->count__DD=__tmp__0QT;
+}
+
+static __INTEGER last_index_of__since__KPGD(__STRING *Self__LPGD,__INTEGER start_index__NPGD)
+// ({STRING},{INTEGER}) With resultNo recursive, No inlinable.
+{
+  __INTEGER result__PPGD;
+  __CHARACTER *__tmp__3KEH;
+  result__PPGD=start_index__NPGD;
+  __tmp__3KEH=Self__LPGD->storage__3CS;
+  while ((! ((result__PPGD <  1) || ('/' == ((__CHARACTER *)__tmp__3KEH)[(__INTEGER)(result__PPGD -  1)])))) {
+    result__PPGD=(__INTEGER)(result__PPGD -  1);
+  };
+  return(result__PPGD);
 }
 
-static void insert_string__to__CYU(__STRING *Self__DYU,void *s__EYU,__INTEGER i__FYU)
+static void insert_string__to__OXU(__STRING *Self__PXU,void *s__QXU,__INTEGER i__RXU)
 // ({STRING},{NULLxSTRING_CONSTANTxSTRING},{INTEGER}) VoidNo recursive, No inlinable.
 {
-  __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;
+  __INTEGER j__SXU,__tmp__FYU,dest__HRKH,src_capacity__LRKH,i2__GRKH;
+  __INTEGER i1__IRKH;
+  __CHARACTER *__tmp__VYU,*__tmp__WYU,*Self__JRKH,*src__KRKH;
+  j__SXU=Self__PXU->count__SGC;
+  if (((struct ___OBJ *)s__QXU)->__id==__STRING_CONSTANT__) {
+    __tmp__FYU=((__STRING_CONSTANT *)s__QXU)->count__DD;
   } else {
-    __tmp__ZYU=((__STRING *)s__EYU)->count__EGC;
+    __tmp__FYU=((__STRING *)s__QXU)->count__SGC;
   };
-  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);
+  resize__1VZ(Self__PXU,(__INTEGER)(j__SXU + __tmp__FYU));
+  if ((i__RXU <= j__SXU)) {
+    move__to__by__LVCC(Self__PXU->storage__3CS,(__INTEGER)(i__RXU -  1),(__INTEGER)(j__SXU -  1),__tmp__FYU);
   };
-  __tmp__JZU=Self__DYU->storage__RCS;
-  if (((struct ___OBJ *)s__EYU)->__id==__STRING_CONSTANT__) {
-    __tmp__KZU=((__STRING_CONSTANT *)s__EYU)->storage__FRO;
+  __tmp__VYU=Self__PXU->storage__3CS;
+  if (((struct ___OBJ *)s__QXU)->__id==__STRING_CONSTANT__) {
+    __tmp__WYU=((__STRING_CONSTANT *)s__QXU)->storage__RRO;
   } else {
-    __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);
+    __tmp__WYU=((__STRING *)s__QXU)->storage__3CS;
+  };
+  Self__JRKH=((__CHARACTER *)__tmp__VYU);
+  src__KRKH=__tmp__WYU;
+  dest__HRKH=(__INTEGER)(i__RXU -  1);
+  src_capacity__LRKH=__tmp__FYU;
+  i2__GRKH= 0;
+  i1__IRKH=dest__HRKH;
+  while ((i2__GRKH != src_capacity__LRKH)) {
+    Self__JRKH[i1__IRKH]=((__CHARACTER *)src__KRKH)[i2__GRKH];
+    i2__GRKH=(__INTEGER)(i2__GRKH +  1);
+    i1__IRKH=(__INTEGER)(i1__IRKH +  1);
   };
 }
 
-static void read_escape_character__G4KF()
+static void read_escape_character__AALF()
 // () VoidNo recursive, No inlinable.
 {
-  __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__BRAH=((__CHARACTER )(( 0)));
+  __INTEGER val__DALF,__tmp__NLEH,__tmp__OLEH,new_capacity__DJIH;
+  __INTEGER old_nb_elts__GJIH,upper__QQKH,Self__OQKH,new_capacity__JJIH;
+  __INTEGER old_nb_elts__MJIH,upper__VQKH,Self__TQKH,new_capacity__PJIH;
+  __INTEGER old_nb_elts__SJIH,upper__0QKH,Self__YQKH,new_capacity__VJIH;
+  __INTEGER old_nb_elts__YJIH,upper__5QKH,Self__3QKH,new_capacity__1JIH;
+  __INTEGER old_nb_elts__4JIH,upper__ERKH,Self__CRKH;
+  __STRING *Self__I2FH,*Self__EJIH,*Self__KJIH,*Self__QJIH,*Self__WJIH;
+  __STRING *Self__2JIH;
+  __POSITION pos__N2YG,pos__02YG,pos__H3YG,pos__J3YG;
+  __CHARACTER result__QTAH,result__VTAH,result__5TAH,result__EUAH;
+  __CHARACTER result__JUAH,result__SUAH,result__1UAH,result__AVAH;
+  __CHARACTER result__FVAH,result__KVAH,result__PVAH,result__UVAH;
+  __CHARACTER result__ZVAH,result__4VAH,result__DWAH,result__IWAH;
+  __CHARACTER result__NWAH,result__SWAH,result__XWAH,result__2WAH;
+  __CHARACTER result__EXAH,ch__UJIH,ch__0JIH,ch__AKIH,result__JXAH;
+  __CHARACTER *__tmp__G2FH,*__tmp__H2FH,*Self__FJIH,*new__HJIH;
+  __CHARACTER *Self__LJIH,*new__NJIH,*Self__RJIH,*new__TJIH,*Self__XJIH;
+  __CHARACTER *new__ZJIH,*Self__3JIH,*new__5JIH;
+  __BOOLEAN __tmp__2ALF,__tmp__QBLF,__tmp__DCLF,__tmp__YELF,__tmp__ZELF;
+  __BOOLEAN __tmp__0ELF,__tmp__1ELF,__tmp__2ELF,__tmp__3ELF,__tmp__4ELF;
+  __BOOLEAN __tmp__5ELF,__tmp__AFLF,__tmp__BFLF,__tmp__MFLF;
+  val__DALF= 0;
+  result__QTAH='\0';
+  if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+    result__QTAH=((__CHARACTER )(( 0)));
   } else {
-    result__BRAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+    result__QTAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
   };
-  if ((((((((result__BRAH == ' ') || (result__BRAH == '\t')) || (result__BRAH == '\n')) || (result__BRAH == '\r')) || (result__BRAH == '\0')) || (result__BRAH == '\f')) || (result__BRAH == '\v'))) {
+  if ((((((((result__QTAH == ' ') || (result__QTAH == '\t')) || (result__QTAH == '\n')) || (result__QTAH == '\r')) || (result__QTAH == '\0')) || (result__QTAH == '\f')) || (result__QTAH == '\v'))) {
     position__CCC=(__INTEGER)(position__CCC +  1);
-    until_do__WLNF:
+    __tmp__NLEH=((__STRING *)source__5BC)->count__SGC;
+    __tmp__OLEH=((__STRING *)source__5BC)->count__SGC;
+    __tmp__G2FH=((__STRING *)source__5BC)->storage__3CS;
+    __tmp__H2FH=((__STRING *)source__5BC)->storage__3CS;
+    until_do__QNNF:
     {
-      result__GRAH='\0';
-      if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__GRAH=((__CHARACTER )(( 0)));
+      result__VTAH='\0';
+      if ((position__CCC > __tmp__NLEH)) {
+        result__VTAH=((__CHARACTER )(( 0)));
       } else {
-        result__GRAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+        result__VTAH=((__CHARACTER *)__tmp__G2FH)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__GRAH == ((__CHARACTER )(( 0))))) {
-        __tmp__C5KF=TRUE__;
+      if ((result__VTAH == ((__CHARACTER )(( 0))))) {
+        __tmp__2ALF=TRUE__;
       } else {
-        result__QRAH='\0';
-        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__QRAH=((__CHARACTER )(( 0)));
+        result__5TAH='\0';
+        if ((position__CCC > __tmp__OLEH)) {
+          result__5TAH=((__CHARACTER )(( 0)));
         } else {
-          result__QRAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+          result__5TAH=((__CHARACTER *)__tmp__H2FH)[(__INTEGER)(position__CCC -  1)];
         };
-        __tmp__C5KF=(! (((((((result__QRAH == ' ') || (result__QRAH == '\t')) || (result__QRAH == '\n')) || (result__QRAH == '\r')) || (result__QRAH == '\0')) || (result__QRAH == '\f')) || (result__QRAH == '\v')));
+        __tmp__2ALF=(! (((((((result__5TAH == ' ') || (result__5TAH == '\t')) || (result__5TAH == '\n')) || (result__5TAH == '\r')) || (result__5TAH == '\0')) || (result__5TAH == '\f')) || (result__5TAH == '\v')));
       };
-      if ((! __tmp__C5KF)) {
+      if ((! __tmp__2ALF)) {
         position__CCC=(__INTEGER)(position__CCC +  1);
-        goto until_do__WLNF;
+        goto until_do__QNNF;
       };
     };
-    result__VRAH='\0';
-    if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-      result__VRAH=((__CHARACTER )(( 0)));
+    result__EUAH='\0';
+    if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+      result__EUAH=((__CHARACTER )(( 0)));
     } else {
-      result__VRAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+      result__EUAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
     };
-    if ((result__VRAH == '\\')) {
-      Self__2TGH=((__STRING *)string_tmp__VH);
-      if (( 1 > Self__2TGH->count__EGC)) {
-        Self__2TGH->count__EGC= 0;
+    if ((result__EUAH == '\\')) {
+      Self__I2FH=((__STRING *)string_tmp__VH);
+      if (( 1 > Self__I2FH->count__SGC)) {
+        Self__I2FH->count__SGC= 0;
       } else {
-        Self__2TGH->count__EGC=(__INTEGER)(Self__2TGH->count__EGC -  1);
+        Self__I2FH->count__SGC=(__INTEGER)(Self__I2FH->count__SGC -  1);
       };
       position__CCC=(__INTEGER)(position__CCC +  1);
-      __tmp__W5KF=TRUE__;
+      __tmp__QBLF=TRUE__;
     } else {
-      __tmp__W5KF=FALSE__;
+      __tmp__QBLF=FALSE__;
     };
-    if ((! __tmp__W5KF)) {
-      result__0RAH='\0';
-      if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__0RAH=((__CHARACTER )(( 0)));
+    if ((! __tmp__QBLF)) {
+      result__JUAH='\0';
+      if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+        result__JUAH=((__CHARACTER )(( 0)));
       } else {
-        result__0RAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+        result__JUAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
       };
-      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)) {
+      if ((result__JUAH != ((__CHARACTER )(( 0))))) {
+        pos__N2YG=current_position__B0F();
+        put_error__text__1PG( 0,(&__string_301));
+        put_position__FRG(pos__N2YG);
+        put_string__33F(msg_err__AQG);
+        if ((type_error__5PG !=  2)) {
           exit(( 1));
         };
       };
     };
-    __tmp__JALF=TRUE__;
+    __tmp__DCLF=TRUE__;
   } else {
-    __tmp__JALF=FALSE__;
+    __tmp__DCLF=FALSE__;
   };
-  if ((! __tmp__JALF)) {
-    result__DSAH='\0';
-    if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-      result__DSAH=((__CHARACTER )(( 0)));
+  if ((! __tmp__DCLF)) {
+    result__SUAH='\0';
+    if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+      result__SUAH=((__CHARACTER )(( 0)));
     } else {
-      result__DSAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+      result__SUAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
     };
-    if ((result__DSAH != ((__CHARACTER )(( 0))))) {
-      result__MSAH='\0';
-      if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__MSAH=((__CHARACTER )(( 0)));
+    if ((result__SUAH != ((__CHARACTER )(( 0))))) {
+      result__1UAH='\0';
+      if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+        result__1UAH=((__CHARACTER )(( 0)));
       } else {
-        result__MSAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+        result__1UAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__MSAH == 'a')) {
-        __tmp__4CLF=TRUE__;
+      if ((result__1UAH == 'a')) {
+        __tmp__YELF=TRUE__;
       } else {
-        result__RSAH='\0';
-        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__RSAH=((__CHARACTER )(( 0)));
+        result__AVAH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+          result__AVAH=((__CHARACTER )(( 0)));
         } else {
-          result__RSAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+          result__AVAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
         };
-        __tmp__4CLF=(result__RSAH == 'b');
+        __tmp__YELF=(result__AVAH == 'b');
       };
-      if (__tmp__4CLF) {
-        __tmp__5CLF=TRUE__;
+      if (__tmp__YELF) {
+        __tmp__ZELF=TRUE__;
       } else {
-        result__WSAH='\0';
-        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__WSAH=((__CHARACTER )(( 0)));
+        result__FVAH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+          result__FVAH=((__CHARACTER )(( 0)));
         } else {
-          result__WSAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+          result__FVAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
         };
-        __tmp__5CLF=(result__WSAH == 'f');
+        __tmp__ZELF=(result__FVAH == 'f');
       };
-      if (__tmp__5CLF) {
-        __tmp__ADLF=TRUE__;
+      if (__tmp__ZELF) {
+        __tmp__0ELF=TRUE__;
       } else {
-        result__1SAH='\0';
-        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__1SAH=((__CHARACTER )(( 0)));
+        result__KVAH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+          result__KVAH=((__CHARACTER )(( 0)));
         } else {
-          result__1SAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+          result__KVAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
         };
-        __tmp__ADLF=(result__1SAH == 'n');
+        __tmp__0ELF=(result__KVAH == 'n');
       };
-      if (__tmp__ADLF) {
-        __tmp__BDLF=TRUE__;
+      if (__tmp__0ELF) {
+        __tmp__1ELF=TRUE__;
       } else {
-        result__ATAH='\0';
-        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__ATAH=((__CHARACTER )(( 0)));
+        result__PVAH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+          result__PVAH=((__CHARACTER )(( 0)));
         } else {
-          result__ATAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+          result__PVAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
         };
-        __tmp__BDLF=(result__ATAH == 'r');
+        __tmp__1ELF=(result__PVAH == 'r');
       };
-      if (__tmp__BDLF) {
-        __tmp__CDLF=TRUE__;
+      if (__tmp__1ELF) {
+        __tmp__2ELF=TRUE__;
       } else {
-        result__FTAH='\0';
-        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__FTAH=((__CHARACTER )(( 0)));
+        result__UVAH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+          result__UVAH=((__CHARACTER )(( 0)));
         } else {
-          result__FTAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+          result__UVAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
         };
-        __tmp__CDLF=(result__FTAH == 't');
+        __tmp__2ELF=(result__UVAH == 't');
       };
-      if (__tmp__CDLF) {
-        __tmp__DDLF=TRUE__;
+      if (__tmp__2ELF) {
+        __tmp__3ELF=TRUE__;
       } else {
-        result__KTAH='\0';
-        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__KTAH=((__CHARACTER )(( 0)));
+        result__ZVAH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+          result__ZVAH=((__CHARACTER )(( 0)));
         } else {
-          result__KTAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+          result__ZVAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
         };
-        __tmp__DDLF=(result__KTAH == 'v');
+        __tmp__3ELF=(result__ZVAH == 'v');
       };
-      if (__tmp__DDLF) {
-        __tmp__EDLF=TRUE__;
+      if (__tmp__3ELF) {
+        __tmp__4ELF=TRUE__;
       } else {
-        result__PTAH='\0';
-        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__PTAH=((__CHARACTER )(( 0)));
+        result__4VAH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+          result__4VAH=((__CHARACTER )(( 0)));
         } else {
-          result__PTAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+          result__4VAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
         };
-        __tmp__EDLF=(result__PTAH == '\\');
+        __tmp__4ELF=(result__4VAH == '\\');
       };
-      if (__tmp__EDLF) {
-        __tmp__FDLF=TRUE__;
+      if (__tmp__4ELF) {
+        __tmp__5ELF=TRUE__;
       } else {
-        result__UTAH='\0';
-        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__UTAH=((__CHARACTER )(( 0)));
+        result__DWAH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+          result__DWAH=((__CHARACTER )(( 0)));
         } else {
-          result__UTAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+          result__DWAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
         };
-        __tmp__FDLF=(result__UTAH == '?');
+        __tmp__5ELF=(result__DWAH == '?');
       };
-      if (__tmp__FDLF) {
-        __tmp__GDLF=TRUE__;
+      if (__tmp__5ELF) {
+        __tmp__AFLF=TRUE__;
       } else {
-        result__ZTAH='\0';
-        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__ZTAH=((__CHARACTER )(( 0)));
+        result__IWAH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+          result__IWAH=((__CHARACTER )(( 0)));
         } else {
-          result__ZTAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+          result__IWAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
         };
-        __tmp__GDLF=(result__ZTAH == '\'');
+        __tmp__AFLF=(result__IWAH == '\'');
       };
-      if (__tmp__GDLF) {
-        __tmp__HDLF=TRUE__;
+      if (__tmp__AFLF) {
+        __tmp__BFLF=TRUE__;
       } else {
-        result__4TAH='\0';
-        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__4TAH=((__CHARACTER )(( 0)));
+        result__NWAH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+          result__NWAH=((__CHARACTER )(( 0)));
         } else {
-          result__4TAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+          result__NWAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
         };
-        __tmp__HDLF=(result__4TAH == '\"');
+        __tmp__BFLF=(result__NWAH == '\"');
       };
-      if (__tmp__HDLF) {
-        result__DUAH='\0';
-        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__DUAH=((__CHARACTER )(( 0)));
+      if (__tmp__BFLF) {
+        result__SWAH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+          result__SWAH=((__CHARACTER )(( 0)));
         } else {
-          result__DUAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+          result__SWAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
         };
-        add_last__GOT(string_tmp__VH,result__DUAH);
+        Self__EJIH=((__STRING *)string_tmp__VH);
+        new_capacity__DJIH= 0;
+        if ((Self__EJIH->capacity__UCS <= Self__EJIH->count__SGC)) {
+          if ((Self__EJIH->capacity__UCS ==  0)) {
+            Self__EJIH->capacity__UCS= 32;
+            Self__EJIH->storage__3CS=create__YIEB( 32);
+          } else {
+            new_capacity__DJIH=(__INTEGER)(Self__EJIH->capacity__UCS <<  1);
+            Self__FJIH=((__CHARACTER *)Self__EJIH->storage__3CS);
+            old_nb_elts__GJIH=Self__EJIH->capacity__UCS;
+            new__HJIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__FJIH),((__UINTEGER_32 )old_nb_elts__GJIH),((__UINTEGER_32 )new_capacity__DJIH)));
+            upper__QQKH=(__INTEGER)(new_capacity__DJIH -  1);
+            Self__OQKH=old_nb_elts__GJIH;
+            while ((Self__OQKH <= upper__QQKH)) {
+              new__HJIH[Self__OQKH]='\0';
+              Self__OQKH=(__INTEGER)(Self__OQKH +  1);
+            };
+            Self__EJIH->storage__3CS=new__HJIH;
+            Self__EJIH->capacity__UCS=new_capacity__DJIH;
+          };
+        };
+        ((__CHARACTER *)Self__EJIH->storage__3CS)[Self__EJIH->count__SGC]=result__SWAH;
+        Self__EJIH->count__SGC=(__INTEGER)(Self__EJIH->count__SGC +  1);
         position__CCC=(__INTEGER)(position__CCC +  1);
-        __tmp__SDLF=TRUE__;
+        __tmp__MFLF=TRUE__;
       } else {
-        __tmp__SDLF=FALSE__;
+        __tmp__MFLF=FALSE__;
       };
-      if ((! __tmp__SDLF)) {
-        result__IUAH='\0';
-        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__IUAH=((__CHARACTER )(( 0)));
+      if ((! __tmp__MFLF)) {
+        result__XWAH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+          result__XWAH=((__CHARACTER )(( 0)));
         } else {
-          result__IUAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+          result__XWAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
         };
-        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__NUAH=((__CHARACTER )(( 0)));
+        if (((((__INTEGER_8 )result__XWAH) >= ((__INTEGER_8 )'0')) && (((__INTEGER_8 )result__XWAH) <= ((__INTEGER_8 )'9')))) {
+          result__2WAH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+            result__2WAH=((__CHARACTER )(( 0)));
           } else {
-            result__NUAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+            result__2WAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
           };
-          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__VUAH=((__CHARACTER )(( 0)));
+          if ((((result__2WAH == '0') && (position__CCC < ((__STRING *)source__5BC)->count__SGC)) && (! is_hexadecimal_digit__DQJE(((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)((__INTEGER)(position__CCC +  1) -  1)])))) {
+            result__EXAH='\0';
+            if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+              result__EXAH=((__CHARACTER )(( 0)));
             } else {
-              result__VUAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+              result__EXAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
+            };
+            Self__KJIH=((__STRING *)string_tmp__VH);
+            new_capacity__JJIH= 0;
+            if ((Self__KJIH->capacity__UCS <= Self__KJIH->count__SGC)) {
+              if ((Self__KJIH->capacity__UCS ==  0)) {
+                Self__KJIH->capacity__UCS= 32;
+                Self__KJIH->storage__3CS=create__YIEB( 32);
+              } else {
+                new_capacity__JJIH=(__INTEGER)(Self__KJIH->capacity__UCS <<  1);
+                Self__LJIH=((__CHARACTER *)Self__KJIH->storage__3CS);
+                old_nb_elts__MJIH=Self__KJIH->capacity__UCS;
+                new__NJIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__LJIH),((__UINTEGER_32 )old_nb_elts__MJIH),((__UINTEGER_32 )new_capacity__JJIH)));
+                upper__VQKH=(__INTEGER)(new_capacity__JJIH -  1);
+                Self__TQKH=old_nb_elts__MJIH;
+                while ((Self__TQKH <= upper__VQKH)) {
+                  new__NJIH[Self__TQKH]='\0';
+                  Self__TQKH=(__INTEGER)(Self__TQKH +  1);
+                };
+                Self__KJIH->storage__3CS=new__NJIH;
+                Self__KJIH->capacity__UCS=new_capacity__JJIH;
+              };
             };
-            add_last__GOT(string_tmp__VH,result__VUAH);
+            ((__CHARACTER *)Self__KJIH->storage__3CS)[Self__KJIH->count__SGC]=result__EXAH;
+            Self__KJIH->count__SGC=(__INTEGER)(Self__KJIH->count__SGC +  1);
             position__CCC=(__INTEGER)(position__CCC +  1);
           } else {
-            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)) {
+            copy__VDS(string_tmp2__GCJ,string_tmp__VH);
+            read_integer__22P();
+            copy__VDS(string_tmp__VH,string_tmp2__GCJ);
+            if ((last_integer__VSO >  255)) {
+              pos__02YG=current_position__B0F();
+              put_error__text__1PG( 0,(&__string_302));
+              put_position__FRG(pos__02YG);
+              put_string__33F(msg_err__AQG);
+              if ((type_error__5PG !=  2)) {
                 exit(( 1));
               };
             };
-            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__0UAH=((__CHARACTER )(( 0)));
+            val__DALF=((__INTEGER )last_integer__VSO);
+            Self__QJIH=((__STRING *)string_tmp__VH);
+            ch__UJIH=((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )(__INTEGER)(val__DALF >>  6)) + ((__INTEGER_8 )'0')))));
+            new_capacity__PJIH= 0;
+            if ((Self__QJIH->capacity__UCS <= Self__QJIH->count__SGC)) {
+              if ((Self__QJIH->capacity__UCS ==  0)) {
+                Self__QJIH->capacity__UCS= 32;
+                Self__QJIH->storage__3CS=create__YIEB( 32);
+              } else {
+                new_capacity__PJIH=(__INTEGER)(Self__QJIH->capacity__UCS <<  1);
+                Self__RJIH=((__CHARACTER *)Self__QJIH->storage__3CS);
+                old_nb_elts__SJIH=Self__QJIH->capacity__UCS;
+                new__TJIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__RJIH),((__UINTEGER_32 )old_nb_elts__SJIH),((__UINTEGER_32 )new_capacity__PJIH)));
+                upper__0QKH=(__INTEGER)(new_capacity__PJIH -  1);
+                Self__YQKH=old_nb_elts__SJIH;
+                while ((Self__YQKH <= upper__0QKH)) {
+                  new__TJIH[Self__YQKH]='\0';
+                  Self__YQKH=(__INTEGER)(Self__YQKH +  1);
+                };
+                Self__QJIH->storage__3CS=new__TJIH;
+                Self__QJIH->capacity__UCS=new_capacity__PJIH;
+              };
+            };
+            ((__CHARACTER *)Self__QJIH->storage__3CS)[Self__QJIH->count__SGC]=ch__UJIH;
+            Self__QJIH->count__SGC=(__INTEGER)(Self__QJIH->count__SGC +  1);
+            Self__WJIH=((__STRING *)string_tmp__VH);
+            ch__0JIH=((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )(__INTEGER)((__INTEGER)(val__DALF &  63) >>  3)) + ((__INTEGER_8 )'0')))));
+            new_capacity__VJIH= 0;
+            if ((Self__WJIH->capacity__UCS <= Self__WJIH->count__SGC)) {
+              if ((Self__WJIH->capacity__UCS ==  0)) {
+                Self__WJIH->capacity__UCS= 32;
+                Self__WJIH->storage__3CS=create__YIEB( 32);
+              } else {
+                new_capacity__VJIH=(__INTEGER)(Self__WJIH->capacity__UCS <<  1);
+                Self__XJIH=((__CHARACTER *)Self__WJIH->storage__3CS);
+                old_nb_elts__YJIH=Self__WJIH->capacity__UCS;
+                new__ZJIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__XJIH),((__UINTEGER_32 )old_nb_elts__YJIH),((__UINTEGER_32 )new_capacity__VJIH)));
+                upper__5QKH=(__INTEGER)(new_capacity__VJIH -  1);
+                Self__3QKH=old_nb_elts__YJIH;
+                while ((Self__3QKH <= upper__5QKH)) {
+                  new__ZJIH[Self__3QKH]='\0';
+                  Self__3QKH=(__INTEGER)(Self__3QKH +  1);
+                };
+                Self__WJIH->storage__3CS=new__ZJIH;
+                Self__WJIH->capacity__UCS=new_capacity__VJIH;
+              };
+            };
+            ((__CHARACTER *)Self__WJIH->storage__3CS)[Self__WJIH->count__SGC]=ch__0JIH;
+            Self__WJIH->count__SGC=(__INTEGER)(Self__WJIH->count__SGC +  1);
+            Self__2JIH=((__STRING *)string_tmp__VH);
+            ch__AKIH=((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )(__INTEGER)(val__DALF &  7)) + ((__INTEGER_8 )'0')))));
+            new_capacity__1JIH= 0;
+            if ((Self__2JIH->capacity__UCS <= Self__2JIH->count__SGC)) {
+              if ((Self__2JIH->capacity__UCS ==  0)) {
+                Self__2JIH->capacity__UCS= 32;
+                Self__2JIH->storage__3CS=create__YIEB( 32);
+              } else {
+                new_capacity__1JIH=(__INTEGER)(Self__2JIH->capacity__UCS <<  1);
+                Self__3JIH=((__CHARACTER *)Self__2JIH->storage__3CS);
+                old_nb_elts__4JIH=Self__2JIH->capacity__UCS;
+                new__5JIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__3JIH),((__UINTEGER_32 )old_nb_elts__4JIH),((__UINTEGER_32 )new_capacity__1JIH)));
+                upper__ERKH=(__INTEGER)(new_capacity__1JIH -  1);
+                Self__CRKH=old_nb_elts__4JIH;
+                while ((Self__CRKH <= upper__ERKH)) {
+                  new__5JIH[Self__CRKH]='\0';
+                  Self__CRKH=(__INTEGER)(Self__CRKH +  1);
+                };
+                Self__2JIH->storage__3CS=new__5JIH;
+                Self__2JIH->capacity__UCS=new_capacity__1JIH;
+              };
+            };
+            ((__CHARACTER *)Self__2JIH->storage__3CS)[Self__2JIH->count__SGC]=ch__AKIH;
+            Self__2JIH->count__SGC=(__INTEGER)(Self__2JIH->count__SGC +  1);
+            result__JXAH='\0';
+            if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+              result__JXAH=((__CHARACTER )(( 0)));
             } else {
-              result__0UAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+              result__JXAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
             };
-            if ((result__0UAH == '\\')) {
+            if ((result__JXAH == '\\')) {
               position__CCC=(__INTEGER)(position__CCC +  1);
             } else {
-              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)) {
+              pos__H3YG=current_position__B0F();
+              put_error__text__1PG( 0,(&__string_303));
+              put_position__FRG(pos__H3YG);
+              put_string__33F(msg_err__AQG);
+              if ((type_error__5PG !=  2)) {
                 exit(( 1));
               };
             };
           };
         } else {
-          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)) {
+          pos__J3YG=current_position__B0F();
+          put_error__text__1PG( 0,(&__string_301));
+          put_position__FRG(pos__J3YG);
+          put_string__33F(msg_err__AQG);
+          if ((type_error__5PG !=  2)) {
             exit(( 1));
           };
         };
@@ -27156,10056 +29111,10979 @@ static void read_escape_character__G4KF()
   };
 }
 
-static __BOOLEAN read_cap_identifier__B1J()
+static __BOOLEAN read_cap_identifier__N1J()
 // () With resultNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER posold__Q1J,idx__R1J,new_capacity__BKIH,old_nb_elts__EKIH;
+  __INTEGER upper__QRKH,Self__ORKH,new_capacity__HKIH,old_nb_elts__KKIH;
+  __INTEGER upper__VRKH,Self__TRKH;
+  __STRING *Self__CKIH,*Self__IKIH;
+  __POSITION pos__24YG;
+  __BOOLEAN result__S1J,__tmp__A2J,result__SOEH,__tmp__U3J,result__BPEH;
+  __BOOLEAN result__K2FH,__tmp__Q3J,__tmp__R3J,result__M2FH,__tmp__E4J;
+  __CHARACTER result__2XAH,result__GYAH,result__LYAH,result__UYAH;
+  __CHARACTER result__ZYAH,result__4YAH,result__DZAH;
+  __CHARACTER *Self__DKIH,*new__FKIH,*Self__JKIH,*new__LKIH;
+  posold__Q1J= 0;
+  idx__R1J= 0;
+  result__S1J=FALSE__;
+  if ((! read_space__XTD())) {
+    __tmp__A2J=TRUE__;
   } else {
-    result__2VAH='\0';
-    if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-      result__2VAH=((__CHARACTER )(( 0)));
+    result__2XAH='\0';
+    if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+      result__2XAH=((__CHARACTER )(( 0)));
     } else {
-      result__2VAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+      result__2XAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
     };
-    result__SPEH=FALSE__;
-    if ((((__INTEGER_8 )result__2VAH) >= ((__INTEGER_8 )'A'))) {
-      result__SPEH=(((__INTEGER_8 )result__2VAH) <= ((__INTEGER_8 )'Z'));
+    result__SOEH=FALSE__;
+    if ((((__INTEGER_8 )result__2XAH) >= ((__INTEGER_8 )'A'))) {
+      result__SOEH=(((__INTEGER_8 )result__2XAH) <= ((__INTEGER_8 )'Z'));
     };
-    __tmp__U1J=(! result__SPEH);
+    __tmp__A2J=(! result__SOEH);
   };
-  if (__tmp__U1J) {
-    result__G1J=FALSE__;
+  if (__tmp__A2J) {
+    result__S1J=FALSE__;
   } else {
-    posold__E1J=position__CCC;
-    ((__STRING *)string_tmp__VH)->count__EGC= 0;
-    result__GWAH='\0';
-    if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-      result__GWAH=((__CHARACTER )(( 0)));
-    } else {
-      result__GWAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
-    };
-    add_last__GOT(string_tmp__VH,result__GWAH);
+    posold__Q1J=position__CCC;
+    ((__STRING *)string_tmp__VH)->count__SGC= 0;
+    result__GYAH='\0';
+    if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+      result__GYAH=((__CHARACTER )(( 0)));
+    } else {
+      result__GYAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
+    };
+    Self__CKIH=((__STRING *)string_tmp__VH);
+    new_capacity__BKIH= 0;
+    if ((Self__CKIH->capacity__UCS <= Self__CKIH->count__SGC)) {
+      if ((Self__CKIH->capacity__UCS ==  0)) {
+        Self__CKIH->capacity__UCS= 32;
+        Self__CKIH->storage__3CS=create__YIEB( 32);
+      } else {
+        new_capacity__BKIH=(__INTEGER)(Self__CKIH->capacity__UCS <<  1);
+        Self__DKIH=((__CHARACTER *)Self__CKIH->storage__3CS);
+        old_nb_elts__EKIH=Self__CKIH->capacity__UCS;
+        new__FKIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__DKIH),((__UINTEGER_32 )old_nb_elts__EKIH),((__UINTEGER_32 )new_capacity__BKIH)));
+        upper__QRKH=(__INTEGER)(new_capacity__BKIH -  1);
+        Self__ORKH=old_nb_elts__EKIH;
+        while ((Self__ORKH <= upper__QRKH)) {
+          new__FKIH[Self__ORKH]='\0';
+          Self__ORKH=(__INTEGER)(Self__ORKH +  1);
+        };
+        Self__CKIH->storage__3CS=new__FKIH;
+        Self__CKIH->capacity__UCS=new_capacity__BKIH;
+      };
+    };
+    ((__CHARACTER *)Self__CKIH->storage__3CS)[Self__CKIH->count__SGC]=result__GYAH;
+    Self__CKIH->count__SGC=(__INTEGER)(Self__CKIH->count__SGC +  1);
     position__CCC=(__INTEGER)(position__CCC +  1);
-    is_parameter_type__DLE=TRUE__;
-    until_do__PZZE:
+    is_parameter_type__AME=TRUE__;
+    until_do__I0ZE:
     {
-      result__LWAH='\0';
-      if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__LWAH=((__CHARACTER )(( 0)));
+      result__LYAH='\0';
+      if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+        result__LYAH=((__CHARACTER )(( 0)));
       } else {
-        result__LWAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+        result__LYAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__LWAH == ((__CHARACTER )(( 0))))) {
-        __tmp__I3J=TRUE__;
+      if ((result__LYAH == ((__CHARACTER )(( 0))))) {
+        __tmp__U3J=TRUE__;
       } else {
-        result__UWAH='\0';
-        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__UWAH=((__CHARACTER )(( 0)));
+        result__UYAH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+          result__UYAH=((__CHARACTER )(( 0)));
         } else {
-          result__UWAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+          result__UYAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
         };
-        result__BQEH=FALSE__;
-        if ((((__INTEGER_8 )result__UWAH) >= ((__INTEGER_8 )'A'))) {
-          result__BQEH=(((__INTEGER_8 )result__UWAH) <= ((__INTEGER_8 )'Z'));
+        result__BPEH=FALSE__;
+        if ((((__INTEGER_8 )result__UYAH) >= ((__INTEGER_8 )'A'))) {
+          result__BPEH=(((__INTEGER_8 )result__UYAH) <= ((__INTEGER_8 )'Z'));
         };
-        if ((! result__BQEH)) {
-          result__ZWAH='\0';
-          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__ZWAH=((__CHARACTER )(( 0)));
+        if ((! result__BPEH)) {
+          result__ZYAH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+            result__ZYAH=((__CHARACTER )(( 0)));
           } else {
-            result__ZWAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+            result__ZYAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
           };
-          result__IQEH=FALSE__;
-          if ((((__INTEGER_8 )result__ZWAH) >= ((__INTEGER_8 )'0'))) {
-            result__IQEH=(((__INTEGER_8 )result__ZWAH) <= ((__INTEGER_8 )'9'));
+          result__K2FH=FALSE__;
+          if ((((__INTEGER_8 )result__ZYAH) >= ((__INTEGER_8 )'0'))) {
+            result__K2FH=(((__INTEGER_8 )result__ZYAH) <= ((__INTEGER_8 )'9'));
           };
-          __tmp__E3J=(! result__IQEH);
+          __tmp__Q3J=(! result__K2FH);
         } else {
-          __tmp__E3J=FALSE__;
+          __tmp__Q3J=FALSE__;
         };
-        if (__tmp__E3J) {
-          result__4WAH='\0';
-          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__4WAH=((__CHARACTER )(( 0)));
+        if (__tmp__Q3J) {
+          result__4YAH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+            result__4YAH=((__CHARACTER )(( 0)));
           } else {
-            result__4WAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+            result__4YAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
           };
-          __tmp__F3J=(result__4WAH != '_');
+          __tmp__R3J=(result__4YAH != '_');
         } else {
-          __tmp__F3J=FALSE__;
+          __tmp__R3J=FALSE__;
         };
-        __tmp__I3J=__tmp__F3J;
+        __tmp__U3J=__tmp__R3J;
       };
-      if ((! __tmp__I3J)) {
-        result__DXAH='\0';
-        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__DXAH=((__CHARACTER )(( 0)));
+      if ((! __tmp__U3J)) {
+        result__DZAH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+          result__DZAH=((__CHARACTER )(( 0)));
         } else {
-          result__DXAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+          result__DZAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
         };
-        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'));
+        if (is_parameter_type__AME) {
+          result__M2FH=FALSE__;
+          if ((((__INTEGER_8 )result__DZAH) >= ((__INTEGER_8 )'0'))) {
+            result__M2FH=(((__INTEGER_8 )result__DZAH) <= ((__INTEGER_8 )'9'));
           };
-          __tmp__Y3J=result__UQEH;
+          __tmp__E4J=result__M2FH;
         } else {
-          __tmp__Y3J=FALSE__;
+          __tmp__E4J=FALSE__;
         };
-        is_parameter_type__DLE=__tmp__Y3J;
-        add_last__GOT(string_tmp__VH,result__DXAH);
+        is_parameter_type__AME=__tmp__E4J;
+        Self__IKIH=((__STRING *)string_tmp__VH);
+        new_capacity__HKIH= 0;
+        if ((Self__IKIH->capacity__UCS <= Self__IKIH->count__SGC)) {
+          if ((Self__IKIH->capacity__UCS ==  0)) {
+            Self__IKIH->capacity__UCS= 32;
+            Self__IKIH->storage__3CS=create__YIEB( 32);
+          } else {
+            new_capacity__HKIH=(__INTEGER)(Self__IKIH->capacity__UCS <<  1);
+            Self__JKIH=((__CHARACTER *)Self__IKIH->storage__3CS);
+            old_nb_elts__KKIH=Self__IKIH->capacity__UCS;
+            new__LKIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__JKIH),((__UINTEGER_32 )old_nb_elts__KKIH),((__UINTEGER_32 )new_capacity__HKIH)));
+            upper__VRKH=(__INTEGER)(new_capacity__HKIH -  1);
+            Self__TRKH=old_nb_elts__KKIH;
+            while ((Self__TRKH <= upper__VRKH)) {
+              new__LKIH[Self__TRKH]='\0';
+              Self__TRKH=(__INTEGER)(Self__TRKH +  1);
+            };
+            Self__IKIH->storage__3CS=new__LKIH;
+            Self__IKIH->capacity__UCS=new_capacity__HKIH;
+          };
+        };
+        ((__CHARACTER *)Self__IKIH->storage__3CS)[Self__IKIH->count__SGC]=result__DZAH;
+        Self__IKIH->count__SGC=(__INTEGER)(Self__IKIH->count__SGC +  1);
         position__CCC=(__INTEGER)(position__CCC +  1);
-        goto until_do__PZZE;
+        goto until_do__I0ZE;
       };
     };
-    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)) {
+    idx__R1J=first_substring_index__W0ZE(string_tmp__VH);
+    if ((idx__R1J !=  0)) {
+      position__CCC=(__INTEGER)(posold__Q1J + idx__R1J);
+      pos__24YG=current_position__B0F();
+      put_error__text__1PG( 0,(&__string_207));
+      put_position__FRG(pos__24YG);
+      put_string__33F(msg_err__AQG);
+      if ((type_error__5PG !=  2)) {
         exit(( 1));
       };
     };
-    last_string__V1C=get__YWB(string_tmp__VH);
-    result__G1J=TRUE__;
+    last_string__D2C=get__YWB(string_tmp__VH);
+    result__S1J=TRUE__;
   };
-  return(result__G1J);
+  return(result__S1J);
 }
 
-static void add_last__2DBC(__FAST_ARRAYoITM_TYPE_PARAMETERo *Self__3DBC,void *element__4DBC)
+static void add_last__NABC(__FAST_ARRAYoITM_TYPE_PARAMETERo *Self__OABC,void *element__PABC)
 // ({FAST_ARRAYoITM_TYPE_PARAMETERo},{NULLxITM_TYPE_PARAMETER}) VoidNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER new_capacity__QABC,__tmp__ZBBC,__tmp__J3SD,Self__5CYE;
+  __BOOLEAN __tmp__ABBC;
+  void **__tmp__YBBC,**new__V2SD;
+  new_capacity__QABC= 0;
+  if (((__INTEGER)(Self__OABC->parent_arrayed_collection__LOE.upper__RABC +  1) <= (__INTEGER)(Self__OABC->parent_arrayed_collection__LOE.capacity__TABC -  1))) {
+    Self__OABC->parent_arrayed_collection__LOE.upper__RABC=(__INTEGER)(Self__OABC->parent_arrayed_collection__LOE.upper__RABC +  1);
+    __tmp__ABBC=TRUE__;
   } else {
-    __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;
+    __tmp__ABBC=FALSE__;
+  };
+  if ((! __tmp__ABBC)) {
+    if ((Self__OABC->parent_arrayed_collection__LOE.capacity__TABC ==  0)) {
+      Self__OABC->parent_arrayed_collection__LOE.storage__PBBC=create__G01C( 2);
+      Self__OABC->parent_arrayed_collection__LOE.capacity__TABC= 2;
+      Self__OABC->parent_arrayed_collection__LOE.upper__RABC= 0;
+    } else {
+      new_capacity__QABC=(__INTEGER)(Self__OABC->parent_arrayed_collection__LOE.capacity__TABC <<  1);
+      __tmp__YBBC=Self__OABC->parent_arrayed_collection__LOE.storage__PBBC;
+      __tmp__ZBBC=Self__OABC->parent_arrayed_collection__LOE.capacity__TABC;
+      new__V2SD=((void **)realloc_dynamic__old_size__new_size__KELC(((__POINTER )((void **)__tmp__YBBC)),((__UINTEGER_32 )(__INTEGER)(__tmp__ZBBC * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__QABC * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__J3SD=(__INTEGER)(new_capacity__QABC -  1);
+      Self__5CYE=__tmp__ZBBC;
+      while ((Self__5CYE <= __tmp__J3SD)) {
+        new__V2SD[Self__5CYE]=NULL;
+        Self__5CYE=(__INTEGER)(Self__5CYE +  1);
+      };
+      Self__OABC->parent_arrayed_collection__LOE.storage__PBBC=new__V2SD;
+      Self__OABC->parent_arrayed_collection__LOE.capacity__TABC=new_capacity__QABC;
+      Self__OABC->parent_arrayed_collection__LOE.upper__RABC=(__INTEGER)(Self__OABC->parent_arrayed_collection__LOE.upper__RABC +  1);
+    };
+  };
+  ((void **)Self__OABC->parent_arrayed_collection__LOE.storage__PBBC)[Self__OABC->parent_arrayed_collection__LOE.upper__RABC]=element__PABC;
 }
 
-static __BOOLEAN read_external__QTO()
+static __BOOLEAN read_external__2TO()
 // () With resultNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER pos_old__AUO,new_capacity__NKIH,old_nb_elts__QKIH;
+  __INTEGER upper__0RKH,Self__YRKH,new_capacity__TKIH,old_nb_elts__WKIH;
+  __INTEGER upper__5RKH,Self__3RKH;
+  __STRING *Self__OKIH,*Self__UKIH;
+  __BOOLEAN result__5TO,__tmp__LUO;
+  __CHARACTER result__Y0AH,result__C1AH,result__L1AH,result__Q1AH;
+  __CHARACTER result__V1AH,result__01AH,result__51AH,result__I2AH;
+  __CHARACTER *Self__PKIH,*new__RKIH,*Self__VKIH,*new__XKIH;
+  result__5TO=FALSE__;
+  pos_old__AUO= 0;
+  if ((! read_space__XTD())) {
+    __tmp__LUO=TRUE__;
   } else {
-    result__YYAH='\0';
-    if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-      result__YYAH=((__CHARACTER )(( 0)));
+    result__Y0AH='\0';
+    if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+      result__Y0AH=((__CHARACTER )(( 0)));
     } else {
-      result__YYAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+      result__Y0AH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
     };
-    __tmp__5TO=(result__YYAH != '`');
+    __tmp__LUO=(result__Y0AH != '`');
   };
-  if (__tmp__5TO) {
-    result__TTO=FALSE__;
+  if (__tmp__LUO) {
+    result__5TO=FALSE__;
   } else {
-    pos_old__UTO=position__CCC;
+    pos_old__AUO=position__CCC;
     position__CCC=(__INTEGER)(position__CCC +  1);
-    ((__STRING *)string_tmp__VH)->count__EGC= 0;
-    until_do__SLRC:
+    ((__STRING *)string_tmp__VH)->count__SGC= 0;
+    until_do__MIRC:
     {
-      result__CZAH='\0';
-      if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__CZAH=((__CHARACTER )(( 0)));
+      result__C1AH='\0';
+      if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+        result__C1AH=((__CHARACTER )(( 0)));
       } else {
-        result__CZAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+        result__C1AH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
       };
-      result__LZAH='\0';
-      if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__LZAH=((__CHARACTER )(( 0)));
+      result__L1AH='\0';
+      if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+        result__L1AH=((__CHARACTER )(( 0)));
       } else {
-        result__LZAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+        result__L1AH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((! ((result__CZAH == ((__CHARACTER )(( 0)))) | (result__LZAH == '`')))) {
-        result__QZAH='\0';
-        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__QZAH=((__CHARACTER )(( 0)));
+      if ((! ((result__C1AH == ((__CHARACTER )(( 0)))) | (result__L1AH == '`')))) {
+        result__Q1AH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+          result__Q1AH=((__CHARACTER )(( 0)));
         } else {
-          result__QZAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+          result__Q1AH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
         };
-        add_last__GOT(string_tmp__VH,result__QZAH);
-        result__VZAH='\0';
-        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__VZAH=((__CHARACTER )(( 0)));
+        Self__OKIH=((__STRING *)string_tmp__VH);
+        new_capacity__NKIH= 0;
+        if ((Self__OKIH->capacity__UCS <= Self__OKIH->count__SGC)) {
+          if ((Self__OKIH->capacity__UCS ==  0)) {
+            Self__OKIH->capacity__UCS= 32;
+            Self__OKIH->storage__3CS=create__YIEB( 32);
+          } else {
+            new_capacity__NKIH=(__INTEGER)(Self__OKIH->capacity__UCS <<  1);
+            Self__PKIH=((__CHARACTER *)Self__OKIH->storage__3CS);
+            old_nb_elts__QKIH=Self__OKIH->capacity__UCS;
+            new__RKIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__PKIH),((__UINTEGER_32 )old_nb_elts__QKIH),((__UINTEGER_32 )new_capacity__NKIH)));
+            upper__0RKH=(__INTEGER)(new_capacity__NKIH -  1);
+            Self__YRKH=old_nb_elts__QKIH;
+            while ((Self__YRKH <= upper__0RKH)) {
+              new__RKIH[Self__YRKH]='\0';
+              Self__YRKH=(__INTEGER)(Self__YRKH +  1);
+            };
+            Self__OKIH->storage__3CS=new__RKIH;
+            Self__OKIH->capacity__UCS=new_capacity__NKIH;
+          };
+        };
+        ((__CHARACTER *)Self__OKIH->storage__3CS)[Self__OKIH->count__SGC]=result__Q1AH;
+        Self__OKIH->count__SGC=(__INTEGER)(Self__OKIH->count__SGC +  1);
+        result__V1AH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+          result__V1AH=((__CHARACTER )(( 0)));
         } else {
-          result__VZAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+          result__V1AH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__VZAH == '\\')) {
+        if ((result__V1AH == '\\')) {
           position__CCC=(__INTEGER)(position__CCC +  1);
-          result__0ZAH='\0';
-          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__0ZAH=((__CHARACTER )(( 0)));
-          } else {
-            result__0ZAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+          result__01AH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+            result__01AH=((__CHARACTER )(( 0)));
+          } else {
+            result__01AH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
+          };
+          Self__UKIH=((__STRING *)string_tmp__VH);
+          new_capacity__TKIH= 0;
+          if ((Self__UKIH->capacity__UCS <= Self__UKIH->count__SGC)) {
+            if ((Self__UKIH->capacity__UCS ==  0)) {
+              Self__UKIH->capacity__UCS= 32;
+              Self__UKIH->storage__3CS=create__YIEB( 32);
+            } else {
+              new_capacity__TKIH=(__INTEGER)(Self__UKIH->capacity__UCS <<  1);
+              Self__VKIH=((__CHARACTER *)Self__UKIH->storage__3CS);
+              old_nb_elts__WKIH=Self__UKIH->capacity__UCS;
+              new__XKIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__VKIH),((__UINTEGER_32 )old_nb_elts__WKIH),((__UINTEGER_32 )new_capacity__TKIH)));
+              upper__5RKH=(__INTEGER)(new_capacity__TKIH -  1);
+              Self__3RKH=old_nb_elts__WKIH;
+              while ((Self__3RKH <= upper__5RKH)) {
+                new__XKIH[Self__3RKH]='\0';
+                Self__3RKH=(__INTEGER)(Self__3RKH +  1);
+              };
+              Self__UKIH->storage__3CS=new__XKIH;
+              Self__UKIH->capacity__UCS=new_capacity__TKIH;
+            };
           };
-          add_last__GOT(string_tmp__VH,result__0ZAH);
-          result__5ZAH='\0';
-          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__5ZAH=((__CHARACTER )(( 0)));
+          ((__CHARACTER *)Self__UKIH->storage__3CS)[Self__UKIH->count__SGC]=result__01AH;
+          Self__UKIH->count__SGC=(__INTEGER)(Self__UKIH->count__SGC +  1);
+          result__51AH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+            result__51AH=((__CHARACTER )(( 0)));
           } else {
-            result__5ZAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+            result__51AH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__5ZAH != ((__CHARACTER )(( 0))))) {
+          if ((result__51AH != ((__CHARACTER )(( 0))))) {
             position__CCC=(__INTEGER)(position__CCC +  1);
           };
         } else {
           position__CCC=(__INTEGER)(position__CCC +  1);
         };
-        goto until_do__SLRC;
+        goto until_do__MIRC;
       };
     };
-    result__I0AH='\0';
-    if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-      result__I0AH=((__CHARACTER )(( 0)));
+    result__I2AH='\0';
+    if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+      result__I2AH=((__CHARACTER )(( 0)));
     } else {
-      result__I0AH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+      result__I2AH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
     };
-    if ((result__I0AH != ((__CHARACTER )(( 0))))) {
+    if ((result__I2AH != ((__CHARACTER )(( 0))))) {
       position__CCC=(__INTEGER)(position__CCC +  1);
-      last_string__V1C=get__YWB(string_tmp__VH);
-      result__TTO=TRUE__;
-      short__token__to__YCD((&__string_65),pos_old__UTO,position__CCC);
+      last_string__D2C=get__YWB(string_tmp__VH);
+      result__5TO=TRUE__;
+      short__token__to__GDD((&__string_65),pos_old__AUO,position__CCC);
     } else {
-      result__TTO=FALSE__;
+      result__5TO=FALSE__;
     };
   };
-  return(result__TTO);
+  return(result__5TO);
 }
 
-static void* read_expr_primary__Y4M(__PARSER *Self__Z4M)
+static void* read_expr_primary__E5M(__PARSER *Self__F5M)
 // ({PARSER}) With resultNo recursive, No inlinable.
 {
-  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));
+  void *result__H5M;
+  void *type__I5M;
+  void *group_sav__N5M,*lst__CHHB;
+  __POSITION p__LSKH,pos__GBZG,p__UIAB,p__NLIH,p__BUKH,pos__IBZG,p__I3H;
+  __POSITION pos__KBZG,pos__SBZG,__tmp__RGN,__tmp__ZGN,pos__ACZG;
+  __POSITION pos__CCZG,pos__ECZG,pos__GCZG;
+  __ITM_READ *result__DSKH,*result__RVGB;
+  __POINTER ptr__ESKH,ptr_table__NSKH,next__MSKH,result__OSKH;
+  __POINTER ptr_table__SSKH,next__RSKH,result__TSKH,ptr__SVGB;
+  __POINTER ptr_table__DTKH,next__CTKH,result__ETKH,ptr_table__ITKH;
+  __POINTER next__HTKH,result__JTKH,ptr__GLIH,ptr_table__NTKH;
+  __POINTER next__MTKH,result__OTKH,ptr_table__STKH,next__RTKH;
+  __POINTER result__TTKH,ptr__0TKH,ptr_table__DUKH,next__CUKH;
+  __POINTER result__EUKH,ptr_table__IUKH,next__HUKH,result__JUKH;
+  __POINTER ptr__2RI,ptr_table__TUKH,next__SUKH,result__UUKH;
+  __POINTER ptr_table__YUKH,next__XUKH,result__ZUKH,ptr__0EMB;
+  __POINTER ptr_table__AVKH,next__5UKH,result__BVKH,ptr_table__FVKH;
+  __POINTER next__EVKH,result__GVKH,ptr__3TTB,ptr_table__QVKH;
+  __POINTER next__PVKH,result__RVKH,ptr_table__VVKH,next__UVKH;
+  __POINTER result__WVKH,ptr__RVTB,ptr_table__3VKH,next__2VKH;
+  __POINTER result__4VKH,ptr_table__CWKH,next__BWKH,result__DWKH;
+  __INTEGER typ_id__FSKH,new_capacity__ZKIH,old_nb_elts__2KIH;
+  __INTEGER upper__1SKH,Self__ZSKH,new_capacity__5KIH,old_nb_elts__CLIH;
+  __INTEGER upper__ATKH,Self__4SKH,typ_id__XVGB,typ_id__HLIH;
+  __INTEGER typ_id__1TKH,typ_id__BSI,typ_id__5EMB,typ_id__CUTB;
+  __INTEGER typ_id__WVTB;
+  __UINTEGER_32 sz__GSKH,a__HSKH,new_size__ISKH,t__JSKH,a__KSKH;
+  __UINTEGER_32 new_size__VSKH,lab_type__USKH,sz__UVGB,a__EFGH;
+  __UINTEGER_32 new_size__FFGH,t__JFGH,a__IFGH,new_size__LTKH;
+  __UINTEGER_32 lab_type__KTKH,sz__ILIH,a__JLIH,new_size__KLIH,t__LLIH;
+  __UINTEGER_32 a__MLIH,new_size__VTKH,lab_type__UTKH,sz__2TKH,a__3TKH;
+  __UINTEGER_32 new_size__4TKH,t__5TKH,a__AUKH,new_size__LUKH;
+  __UINTEGER_32 lab_type__KUKH,sz__4RI,a__MDGH,new_size__NDGH,t__RDGH;
+  __UINTEGER_32 a__QDGH,new_size__1UKH,lab_type__0UKH,sz__2EMB,a__Y2FH;
+  __UINTEGER_32 new_size__Z2FH,t__32FH,a__22FH,new_size__IVKH;
+  __UINTEGER_32 lab_type__HVKH,sz__5TTB,a__A3FH,new_size__B3FH,t__F3FH;
+  __UINTEGER_32 a__E3FH,new_size__YVKH,lab_type__XVKH,sz__TVTB,a__I3FH;
+  __UINTEGER_32 new_size__J3FH,t__N3FH,a__M3FH,new_size__FWKH;
+  __UINTEGER_32 lab_type__EWKH;
+  __STRING *Self__0KIH,*Self__ALIH;
+  __ITM_PROTOTYPE *result__FLIH;
+  __ITM_LIST *result__ZTKH,*result__1RI;
+  __ITM_BLOCK *result__ZEMB;
+  __ITM_EXTERNAL *result__2TTB;
+  __ITM_EXTERNAL_TYPE *result__QVTB,*Self__JZEC;
+  __BOOLEAN result__CSKH,__tmp__35M,__tmp__ACN,result__XSKH;
+  __BOOLEAN result__U2FH,__tmp__PCN,result__30N,__tmp__3CN,__tmp__0DN;
+  __BOOLEAN result__WTKH,result__MUKH,__tmp__3FN,result__PUKH;
+  __BOOLEAN result__2UKH,result__JVKH,result__MVKH,result__ZVKH;
+  __BOOLEAN result__GWKH,result__JWKH,result__MWKH,__tmp__TIN;
+  __CHARACTER result__R2AH,result__W2AH,result__12AH,result__XTKH;
+  __CHARACTER result__NUKH,result__QUKH,result__3UKH,result__KVKH;
+  __CHARACTER result__NVKH,result__0VKH,result__HWKH,result__KWKH;
+  __CHARACTER result__NWKH;
+  __CHARACTER *Self__1KIH,*new__3KIH,*Self__BLIH,*new__DLIH;
+  result__H5M=NULL;
+  type__I5M=NULL;
+  group_sav__N5M=NULL;
+  result__CSKH=read_word__ISF((&__string_58));
   if (is_shorter__LZ) {
-    if (result__N1JH) {
+    if (result__CSKH) {
       if (((void *)(&__string_58) == (void *)(&__string_4))) {
-        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)));
+        short__token__to__GDD((&__string_120),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__D2C)->count__DD),position__CCC);
+      } else {
+        short__token__to__GDD((&__string_119),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__D2C)->count__DD),position__CCC);
+      };
+    };
+  };
+  if (result__CSKH) {
+    p__LSKH=current_position__B0F();
+    result__DSKH=NULL;
+    ptr__ESKH=((__POINTER )(NULL));
+    typ_id__FSKH= 0;
+    sz__GSKH=((__UINTEGER_32 )sizeof(__ITM_READ));
+    if ((sz__GSKH ==  0)) {
+      result__DSKH=ITM_READ__;
+    } else {
+      typ_id__FSKH=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__GSKH);
+      if ((typ_id__FSKH == (__INTEGER)(-  1))) {
+        a__HSKH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__ISKH=(__UINTEGER_32)((__UINTEGER_32)(sz__GSKH + a__HSKH) & (__UINTEGER_32)(~ a__HSKH));
+        ptr_table__NSKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ISKH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__MSKH=((__POINTER )(NULL));
+        result__OSKH=((__POINTER *)ptr_table__NSKH)[ 0];
+        if ((result__OSKH == (void *)NULL)) {
+          result__OSKH=new_lab__RTJ(new_size__ISKH);
+          next__MSKH=(void *)((unsigned long)result__OSKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ISKH)));
+          ((__POINTER *)next__MSKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__NSKH)[ 0]=next__MSKH;
+        } else {
+          next__MSKH=((__POINTER *)result__OSKH)[ 0];
+          if ((next__MSKH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__OSKH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__ISKH <<  1)) <=  4096)) {
+              next__MSKH=(void *)((unsigned long)result__OSKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ISKH)));
             } else {
-              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)));
+              next__MSKH=new_lab__RTJ(new_size__ISKH);
+            };
+            ((__POINTER *)next__MSKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__NSKH)[ 0]=next__MSKH;
+          } else {
+            ((__POINTER *)result__OSKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MSKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__OSKH=next__MSKH;
+          };
+        };
+        ptr__ESKH=result__OSKH;
+      } else {
+        t__JSKH=((__UINTEGER_32 )typ_id__FSKH);
+        a__KSKH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__VSKH=(__UINTEGER_32)((__UINTEGER_32)(sz__GSKH + a__KSKH) & (__UINTEGER_32)(~ a__KSKH));
+        ptr_table__SSKH=((__POINTER )(&(table_type[(t__JSKH)])));
+        lab_type__USKH=(__UINTEGER_32)(t__JSKH |  1);
+        next__RSKH=((__POINTER )(NULL));
+        result__TSKH=((__POINTER *)ptr_table__SSKH)[ 0];
+        if ((result__TSKH == (void *)NULL)) {
+          result__TSKH=new_lab__RTJ(lab_type__USKH);
+          next__RSKH=(void *)((unsigned long)result__TSKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VSKH)));
+          ((__POINTER *)next__RSKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__SSKH)[ 0]=next__RSKH;
+        } else {
+          next__RSKH=((__POINTER *)result__TSKH)[ 0];
+          if ((next__RSKH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TSKH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__VSKH <<  1)) <=  4096)) {
+              next__RSKH=(void *)((unsigned long)result__TSKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VSKH)));
             } else {
-              next__21JH=new_lab__FTJ(lab_type__51JH);
+              next__RSKH=new_lab__RTJ(lab_type__USKH);
             };
-            ((__POINTER *)next__21JH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__31JH)[ 0]=next__21JH;
+            ((__POINTER *)next__RSKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__SSKH)[ 0]=next__RSKH;
           } else {
-            ((__POINTER *)result__41JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__21JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__41JH=next__21JH;
+            ((__POINTER *)result__TSKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RSKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__TSKH=next__RSKH;
           };
         };
-        ptr__P1JH=result__41JH;
+        ptr__ESKH=result__TSKH;
       };
-      result__O1JH=((__ITM_READ *)ptr__P1JH);
-      *(result__O1JH) = *(ITM_READ__);
+      result__DSKH=((__ITM_READ *)ptr__ESKH);
+      *(result__DSKH) = *(ITM_READ__);
     };
-    ((__ITM_READ *)result__O1JH)->parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ=p__W1JH;
-    result__14M=result__O1JH;
-    __tmp__R5M=TRUE__;
+    ((__ITM_READ *)result__DSKH)->parent_itm_code__VIJ.parent_itm_object__PFE.position__SFJ=p__LSKH;
+    result__H5M=result__DSKH;
+    __tmp__35M=TRUE__;
   } else {
-    __tmp__R5M=FALSE__;
+    __tmp__35M=FALSE__;
   };
-  if (__tmp__R5M) {
-    __tmp__UBN=TRUE__;
+  if (__tmp__35M) {
+    __tmp__ACN=TRUE__;
   } else {
-    result__C2JH=read_word__LRF((&__string_11));
+    result__XSKH=read_word__ISF((&__string_11));
     if (is_shorter__LZ) {
-      if (result__C2JH) {
+      if (result__XSKH) {
         if (((void *)(&__string_11) == (void *)(&__string_4))) {
-          short__token__to__YCD((&__string_120),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V1C)->count__DD),position__CCC);
+          short__token__to__GDD((&__string_120),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__D2C)->count__DD),position__CCC);
         } else {
-          short__token__to__YCD((&__string_119),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V1C)->count__DD),position__CCC);
+          short__token__to__GDD((&__string_119),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__D2C)->count__DD),position__CCC);
         };
       };
     };
-    if (result__C2JH) {
-      result__R0AH='\0';
-      if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__R0AH=((__CHARACTER )(( 0)));
+    if (result__XSKH) {
+      result__R2AH='\0';
+      if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+        result__R2AH=((__CHARACTER )(( 0)));
       } else {
-        result__R0AH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+        result__R2AH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__R0AH == '_')) {
+      if ((result__R2AH == '_')) {
         position__CCC=(__INTEGER)(position__CCC +  1);
-        copy__JDS(string_tmp__VH,(&__string_11));
-        add_last__GOT(string_tmp__VH,'_');
-        while_do__0XQB:
+        copy__VDS(string_tmp__VH,(&__string_11));
+        Self__0KIH=((__STRING *)string_tmp__VH);
+        new_capacity__ZKIH= 0;
+        if ((Self__0KIH->capacity__UCS <= Self__0KIH->count__SGC)) {
+          if ((Self__0KIH->capacity__UCS ==  0)) {
+            Self__0KIH->capacity__UCS= 32;
+            Self__0KIH->storage__3CS=create__YIEB( 32);
+          } else {
+            new_capacity__ZKIH=(__INTEGER)(Self__0KIH->capacity__UCS <<  1);
+            Self__1KIH=((__CHARACTER *)Self__0KIH->storage__3CS);
+            old_nb_elts__2KIH=Self__0KIH->capacity__UCS;
+            new__3KIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__1KIH),((__UINTEGER_32 )old_nb_elts__2KIH),((__UINTEGER_32 )new_capacity__ZKIH)));
+            upper__1SKH=(__INTEGER)(new_capacity__ZKIH -  1);
+            Self__ZSKH=old_nb_elts__2KIH;
+            while ((Self__ZSKH <= upper__1SKH)) {
+              new__3KIH[Self__ZSKH]='\0';
+              Self__ZSKH=(__INTEGER)(Self__ZSKH +  1);
+            };
+            Self__0KIH->storage__3CS=new__3KIH;
+            Self__0KIH->capacity__UCS=new_capacity__ZKIH;
+          };
+        };
+        ((__CHARACTER *)Self__0KIH->storage__3CS)[Self__0KIH->count__SGC]='_';
+        Self__0KIH->count__SGC=(__INTEGER)(Self__0KIH->count__SGC +  1);
+        while_do__HUQB:
         {
-          result__W0AH='\0';
-          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__W0AH=((__CHARACTER )(( 0)));
+          result__W2AH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+            result__W2AH=((__CHARACTER )(( 0)));
           } else {
-            result__W0AH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+            result__W2AH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
           };
-          result__ASEH=FALSE__;
-          if ((((__INTEGER_8 )result__W0AH) >= ((__INTEGER_8 )'0'))) {
-            result__ASEH=(((__INTEGER_8 )result__W0AH) <= ((__INTEGER_8 )'9'));
+          result__U2FH=FALSE__;
+          if ((((__INTEGER_8 )result__W2AH) >= ((__INTEGER_8 )'0'))) {
+            result__U2FH=(((__INTEGER_8 )result__W2AH) <= ((__INTEGER_8 )'9'));
           };
-          if (result__ASEH) {
-            result__10AH='\0';
-            if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-              result__10AH=((__CHARACTER )(( 0)));
+          if (result__U2FH) {
+            result__12AH='\0';
+            if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+              result__12AH=((__CHARACTER )(( 0)));
             } else {
-              result__10AH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+              result__12AH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
+            };
+            Self__ALIH=((__STRING *)string_tmp__VH);
+            new_capacity__5KIH= 0;
+            if ((Self__ALIH->capacity__UCS <= Self__ALIH->count__SGC)) {
+              if ((Self__ALIH->capacity__UCS ==  0)) {
+                Self__ALIH->capacity__UCS= 32;
+                Self__ALIH->storage__3CS=create__YIEB( 32);
+              } else {
+                new_capacity__5KIH=(__INTEGER)(Self__ALIH->capacity__UCS <<  1);
+                Self__BLIH=((__CHARACTER *)Self__ALIH->storage__3CS);
+                old_nb_elts__CLIH=Self__ALIH->capacity__UCS;
+                new__DLIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__BLIH),((__UINTEGER_32 )old_nb_elts__CLIH),((__UINTEGER_32 )new_capacity__5KIH)));
+                upper__ATKH=(__INTEGER)(new_capacity__5KIH -  1);
+                Self__4SKH=old_nb_elts__CLIH;
+                while ((Self__4SKH <= upper__ATKH)) {
+                  new__DLIH[Self__4SKH]='\0';
+                  Self__4SKH=(__INTEGER)(Self__4SKH +  1);
+                };
+                Self__ALIH->storage__3CS=new__DLIH;
+                Self__ALIH->capacity__UCS=new_capacity__5KIH;
+              };
             };
-            add_last__GOT(string_tmp__VH,result__10AH);
+            ((__CHARACTER *)Self__ALIH->storage__3CS)[Self__ALIH->count__SGC]=result__12AH;
+            Self__ALIH->count__SGC=(__INTEGER)(Self__ALIH->count__SGC +  1);
             position__CCC=(__INTEGER)(position__CCC +  1);
-            goto while_do__0XQB;
+            goto while_do__HUQB;
           };
         };
-        if ((((__STRING *)string_tmp__VH)->count__EGC ==  0)) {
-          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)) {
+        if ((((__STRING *)string_tmp__VH)->count__SGC ==  0)) {
+          pos__GBZG=current_position__B0F();
+          put_error__text__1PG( 0,(&__string_304));
+          put_position__FRG(pos__GBZG);
+          put_string__33F(msg_err__AQG);
+          if ((type_error__5PG !=  2)) {
             exit(( 1));
           };
         };
         get__YWB(string_tmp__VH);
       };
-      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)));
+      p__UIAB=current_position__B0F();
+      result__RVGB=NULL;
+      ptr__SVGB=((__POINTER )(NULL));
+      typ_id__XVGB= 0;
+      sz__UVGB=((__UINTEGER_32 )sizeof(__ITM_READ));
+      if ((sz__UVGB ==  0)) {
+        result__RVGB=ITM_READ__;
+      } else {
+        typ_id__XVGB=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__UVGB);
+        if ((typ_id__XVGB == (__INTEGER)(-  1))) {
+          a__EFGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__FFGH=(__UINTEGER_32)((__UINTEGER_32)(sz__UVGB + a__EFGH) & (__UINTEGER_32)(~ a__EFGH));
+          ptr_table__DTKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__FFGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__CTKH=((__POINTER )(NULL));
+          result__ETKH=((__POINTER *)ptr_table__DTKH)[ 0];
+          if ((result__ETKH == (void *)NULL)) {
+            result__ETKH=new_lab__RTJ(new_size__FFGH);
+            next__CTKH=(void *)((unsigned long)result__ETKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FFGH)));
+            ((__POINTER *)next__CTKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__DTKH)[ 0]=next__CTKH;
+          } else {
+            next__CTKH=((__POINTER *)result__ETKH)[ 0];
+            if ((next__CTKH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ETKH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__FFGH <<  1)) <=  4096)) {
+                next__CTKH=(void *)((unsigned long)result__ETKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FFGH)));
               } else {
-                next__D2JH=new_lab__FTJ(new_size__F2GH);
-              };
-              ((__POINTER *)next__D2JH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__E2JH)[ 0]=next__D2JH;
-            } else {
-              ((__POINTER *)result__F2JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__D2JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__F2JH=next__D2JH;
-            };
-          };
-          ptr__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)));
+                next__CTKH=new_lab__RTJ(new_size__FFGH);
+              };
+              ((__POINTER *)next__CTKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__DTKH)[ 0]=next__CTKH;
+            } else {
+              ((__POINTER *)result__ETKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CTKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__ETKH=next__CTKH;
+            };
+          };
+          ptr__SVGB=result__ETKH;
+        } else {
+          t__JFGH=((__UINTEGER_32 )typ_id__XVGB);
+          a__IFGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__LTKH=(__UINTEGER_32)((__UINTEGER_32)(sz__UVGB + a__IFGH) & (__UINTEGER_32)(~ a__IFGH));
+          ptr_table__ITKH=((__POINTER )(&(table_type[(t__JFGH)])));
+          lab_type__KTKH=(__UINTEGER_32)(t__JFGH |  1);
+          next__HTKH=((__POINTER )(NULL));
+          result__JTKH=((__POINTER *)ptr_table__ITKH)[ 0];
+          if ((result__JTKH == (void *)NULL)) {
+            result__JTKH=new_lab__RTJ(lab_type__KTKH);
+            next__HTKH=(void *)((unsigned long)result__JTKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LTKH)));
+            ((__POINTER *)next__HTKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__ITKH)[ 0]=next__HTKH;
+          } else {
+            next__HTKH=((__POINTER *)result__JTKH)[ 0];
+            if ((next__HTKH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__JTKH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__LTKH <<  1)) <=  4096)) {
+                next__HTKH=(void *)((unsigned long)result__JTKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LTKH)));
               } else {
-                next__I2JH=new_lab__FTJ(lab_type__L2JH);
+                next__HTKH=new_lab__RTJ(lab_type__KTKH);
               };
-              ((__POINTER *)next__I2JH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__J2JH)[ 0]=next__I2JH;
+              ((__POINTER *)next__HTKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__ITKH)[ 0]=next__HTKH;
             } else {
-              ((__POINTER *)result__K2JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__I2JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__K2JH=next__I2JH;
+              ((__POINTER *)result__JTKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HTKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__JTKH=next__HTKH;
             };
           };
-          ptr__DZGB=result__K2JH;
+          ptr__SVGB=result__JTKH;
         };
-        result__CZGB=((__ITM_READ *)ptr__DZGB);
-        *(result__CZGB) = *(ITM_READ__);
+        result__RVGB=((__ITM_READ *)ptr__SVGB);
+        *(result__RVGB) = *(ITM_READ__);
       };
-      ((__ITM_READ *)result__CZGB)->parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ=p__FMAB;
-      result__14M=result__CZGB;
+      ((__ITM_READ *)result__RVGB)->parent_itm_code__VIJ.parent_itm_object__PFE.position__SFJ=p__UIAB;
+      result__H5M=result__RVGB;
     };
-    __tmp__UBN=result__C2JH;
+    __tmp__ACN=result__XSKH;
   };
-  if (__tmp__UBN) {
-    __tmp__DCN=TRUE__;
+  if (__tmp__ACN) {
+    __tmp__PCN=TRUE__;
   } else {
-    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)));
+    type__I5M=read_prototype__DPN(Self__F5M,NULL);
+    result__30N=((void *)type__I5M != (void *)NULL);
+    if (result__30N) {
+      p__NLIH=current_position__B0F();
+      result__FLIH=NULL;
+      ptr__GLIH=((__POINTER )(NULL));
+      typ_id__HLIH= 0;
+      sz__ILIH=((__UINTEGER_32 )sizeof(__ITM_PROTOTYPE));
+      if ((sz__ILIH ==  0)) {
+        result__FLIH=ITM_PROTOTYPE__;
+      } else {
+        typ_id__HLIH=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__ILIH);
+        if ((typ_id__HLIH == (__INTEGER)(-  1))) {
+          a__JLIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__KLIH=(__UINTEGER_32)((__UINTEGER_32)(sz__ILIH + a__JLIH) & (__UINTEGER_32)(~ a__JLIH));
+          ptr_table__NTKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__KLIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__MTKH=((__POINTER )(NULL));
+          result__OTKH=((__POINTER *)ptr_table__NTKH)[ 0];
+          if ((result__OTKH == (void *)NULL)) {
+            result__OTKH=new_lab__RTJ(new_size__KLIH);
+            next__MTKH=(void *)((unsigned long)result__OTKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KLIH)));
+            ((__POINTER *)next__MTKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__NTKH)[ 0]=next__MTKH;
+          } else {
+            next__MTKH=((__POINTER *)result__OTKH)[ 0];
+            if ((next__MTKH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__OTKH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__KLIH <<  1)) <=  4096)) {
+                next__MTKH=(void *)((unsigned long)result__OTKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KLIH)));
               } else {
-                next__N2JH=new_lab__FTJ(new_size__CKIH);
-              };
-              ((__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__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)));
+                next__MTKH=new_lab__RTJ(new_size__KLIH);
+              };
+              ((__POINTER *)next__MTKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__NTKH)[ 0]=next__MTKH;
+            } else {
+              ((__POINTER *)result__OTKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MTKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__OTKH=next__MTKH;
+            };
+          };
+          ptr__GLIH=result__OTKH;
+        } else {
+          t__LLIH=((__UINTEGER_32 )typ_id__HLIH);
+          a__MLIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__VTKH=(__UINTEGER_32)((__UINTEGER_32)(sz__ILIH + a__MLIH) & (__UINTEGER_32)(~ a__MLIH));
+          ptr_table__STKH=((__POINTER )(&(table_type[(t__LLIH)])));
+          lab_type__UTKH=(__UINTEGER_32)(t__LLIH |  1);
+          next__RTKH=((__POINTER )(NULL));
+          result__TTKH=((__POINTER *)ptr_table__STKH)[ 0];
+          if ((result__TTKH == (void *)NULL)) {
+            result__TTKH=new_lab__RTJ(lab_type__UTKH);
+            next__RTKH=(void *)((unsigned long)result__TTKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VTKH)));
+            ((__POINTER *)next__RTKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__STKH)[ 0]=next__RTKH;
+          } else {
+            next__RTKH=((__POINTER *)result__TTKH)[ 0];
+            if ((next__RTKH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TTKH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__VTKH <<  1)) <=  4096)) {
+                next__RTKH=(void *)((unsigned long)result__TTKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VTKH)));
               } else {
-                next__S2JH=new_lab__FTJ(lab_type__V2JH);
+                next__RTKH=new_lab__RTJ(lab_type__UTKH);
               };
-              ((__POINTER *)next__S2JH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__T2JH)[ 0]=next__S2JH;
+              ((__POINTER *)next__RTKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__STKH)[ 0]=next__RTKH;
             } else {
-              ((__POINTER *)result__U2JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__S2JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__U2JH=next__S2JH;
+              ((__POINTER *)result__TTKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RTKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__TTKH=next__RTKH;
             };
           };
-          ptr__4JIH=result__U2JH;
+          ptr__GLIH=result__TTKH;
         };
-        result__3JIH=((__ITM_PROTOTYPE *)ptr__4JIH);
-        *(result__3JIH) = *(ITM_PROTOTYPE__);
+        result__FLIH=((__ITM_PROTOTYPE *)ptr__GLIH);
+        *(result__FLIH) = *(ITM_PROTOTYPE__);
       };
-      ((__ITM_PROTOTYPE *)result__3JIH)->parent_itm_constant__XXF.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ=p__FKIH;
-      result__14M=result__3JIH;
+      ((__ITM_PROTOTYPE *)result__FLIH)->parent_itm_constant__UYF.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ=p__NLIH;
+      result__H5M=result__FLIH;
     };
-    __tmp__DCN=result__R0N;
+    __tmp__PCN=result__30N;
   };
-  if (__tmp__DCN) {
-    __tmp__RCN=TRUE__;
+  if (__tmp__PCN) {
+    __tmp__3CN=TRUE__;
   } else {
-    result__14M=read_constant__LRO();
-    __tmp__RCN=((void *)result__14M != (void *)NULL);
+    result__H5M=read_constant__XRO();
+    __tmp__3CN=((void *)result__H5M != (void *)NULL);
   };
-  if (__tmp__RCN) {
-    __tmp__ODN=TRUE__;
+  if (__tmp__3CN) {
+    __tmp__0DN=TRUE__;
   } else {
-    result__X2JH=FALSE__;
-    if ((! read_space__MTD())) {
-      result__X2JH=FALSE__;
+    result__WTKH=FALSE__;
+    if ((! read_space__XTD())) {
+      result__WTKH=FALSE__;
     } else {
-      result__Y2JH='\0';
-      if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__Y2JH=((__CHARACTER )(( 0)));
+      result__XTKH='\0';
+      if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+        result__XTKH=((__CHARACTER )(( 0)));
       } else {
-        result__Y2JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+        result__XTKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__Y2JH == '(')) {
+      if ((result__XTKH == '(')) {
         position__CCC=(__INTEGER)(position__CCC +  1);
-        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)));
+        result__WTKH=TRUE__;
+      };
+    };
+    if (result__WTKH) {
+      group_sav__N5M=last_group__TWF;
+      p__BUKH=current_position__B0F();
+      result__ZTKH=NULL;
+      ptr__0TKH=((__POINTER )(NULL));
+      typ_id__1TKH= 0;
+      sz__2TKH=((__UINTEGER_32 )sizeof(__ITM_LIST));
+      if ((sz__2TKH ==  0)) {
+        result__ZTKH=ITM_LIST__;
+      } else {
+        typ_id__1TKH=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__2TKH);
+        if ((typ_id__1TKH == (__INTEGER)(-  1))) {
+          a__3TKH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__4TKH=(__UINTEGER_32)((__UINTEGER_32)(sz__2TKH + a__3TKH) & (__UINTEGER_32)(~ a__3TKH));
+          ptr_table__DUKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__4TKH / ((__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__RTJ(new_size__4TKH);
+            next__CUKH=(void *)((unsigned long)result__EUKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4TKH)));
+            ((__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__4XH)))) &  4095) + (__UINTEGER_32)(new_size__4TKH <<  1)) <=  4096)) {
+                next__CUKH=(void *)((unsigned long)result__EUKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4TKH)));
               } else {
-                next__D3JH=new_lab__FTJ(new_size__52JH);
-              };
-              ((__POINTER *)next__D3JH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__E3JH)[ 0]=next__D3JH;
-            } else {
-              ((__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)));
+                next__CUKH=new_lab__RTJ(new_size__4TKH);
+              };
+              ((__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__0TKH=result__EUKH;
+        } else {
+          t__5TKH=((__UINTEGER_32 )typ_id__1TKH);
+          a__AUKH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__LUKH=(__UINTEGER_32)((__UINTEGER_32)(sz__2TKH + a__AUKH) & (__UINTEGER_32)(~ a__AUKH));
+          ptr_table__IUKH=((__POINTER )(&(table_type[(t__5TKH)])));
+          lab_type__KUKH=(__UINTEGER_32)(t__5TKH |  1);
+          next__HUKH=((__POINTER )(NULL));
+          result__JUKH=((__POINTER *)ptr_table__IUKH)[ 0];
+          if ((result__JUKH == (void *)NULL)) {
+            result__JUKH=new_lab__RTJ(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__4XH)))) &  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__I3JH=new_lab__FTJ(lab_type__L3JH);
+                next__HUKH=new_lab__RTJ(lab_type__KUKH);
               };
-              ((__POINTER *)next__I3JH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__J3JH)[ 0]=next__I3JH;
+              ((__POINTER *)next__HUKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__IUKH)[ 0]=next__HUKH;
             } else {
-              ((__POINTER *)result__K3JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__I3JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__K3JH=next__I3JH;
+              ((__POINTER *)result__JUKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HUKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__JUKH=next__HUKH;
             };
           };
-          ptr__12JH=result__K3JH;
+          ptr__0TKH=result__JUKH;
         };
-        result__02JH=((__ITM_LIST *)ptr__12JH);
-        *(result__02JH) = *(ITM_LIST__);
+        result__ZTKH=((__ITM_LIST *)ptr__0TKH);
+        *(result__ZTKH) = *(ITM_LIST__);
       };
-      ((__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__;
+      ((__ITM_LIST *)result__ZTKH)->parent_itm_code__SBF.parent_itm_object__PFE.position__SFJ=p__BUKH;
+      last_group__TWF=result__ZTKH;
+      result__H5M=result__ZTKH;
+      read_group__C4GB(Self__F5M);
+      result__MUKH=FALSE__;
+      if ((! read_space__XTD())) {
+        result__MUKH=FALSE__;
       } else {
-        result__O3JH='\0';
-        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__O3JH=((__CHARACTER )(( 0)));
+        result__NUKH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+          result__NUKH=((__CHARACTER )(( 0)));
         } else {
-          result__O3JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+          result__NUKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__O3JH == ')')) {
+        if ((result__NUKH == ')')) {
           position__CCC=(__INTEGER)(position__CCC +  1);
-          result__N3JH=TRUE__;
+          result__MUKH=TRUE__;
         };
       };
-      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)) {
+      if ((! result__MUKH)) {
+        pos__IBZG=current_position__B0F();
+        put_error__text__1PG( 2,(&__string_262));
+        put_position__FRG(pos__IBZG);
+        put_string__33F(msg_err__AQG);
+        if ((type_error__5PG !=  2)) {
           exit(( 1));
         };
       };
-      last_group__WVF=group_sav__B5M;
+      last_group__TWF=group_sav__N5M;
     };
-    __tmp__ODN=result__X2JH;
+    __tmp__0DN=result__WTKH;
   };
-  if (__tmp__ODN) {
-    __tmp__RFN=TRUE__;
+  if (__tmp__0DN) {
+    __tmp__3FN=TRUE__;
   } else {
-    result__Q3JH=FALSE__;
-    if ((! read_space__MTD())) {
-      result__Q3JH=FALSE__;
+    result__PUKH=FALSE__;
+    if ((! read_space__XTD())) {
+      result__PUKH=FALSE__;
     } else {
-      result__R3JH='\0';
-      if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__R3JH=((__CHARACTER )(( 0)));
+      result__QUKH='\0';
+      if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+        result__QUKH=((__CHARACTER )(( 0)));
       } else {
-        result__R3JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+        result__QUKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__R3JH == '{')) {
+      if ((result__QUKH == '{')) {
         position__CCC=(__INTEGER)(position__CCC +  1);
-        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)));
+        result__PUKH=TRUE__;
+      };
+    };
+    if (result__PUKH) {
+      short__token__to__GDD((&__string_133),(__INTEGER)(position__CCC -  1),position__CCC);
+      group_sav__N5M=last_group__TWF;
+      p__I3H=current_position__B0F();
+      result__1RI=NULL;
+      ptr__2RI=((__POINTER )(NULL));
+      typ_id__BSI= 0;
+      sz__4RI=((__UINTEGER_32 )sizeof(__ITM_LIST));
+      if ((sz__4RI ==  0)) {
+        result__1RI=ITM_LIST__;
+      } else {
+        typ_id__BSI=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__4RI);
+        if ((typ_id__BSI == (__INTEGER)(-  1))) {
+          a__MDGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__NDGH=(__UINTEGER_32)((__UINTEGER_32)(sz__4RI + a__MDGH) & (__UINTEGER_32)(~ a__MDGH));
+          ptr_table__TUKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__NDGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__SUKH=((__POINTER )(NULL));
+          result__UUKH=((__POINTER *)ptr_table__TUKH)[ 0];
+          if ((result__UUKH == (void *)NULL)) {
+            result__UUKH=new_lab__RTJ(new_size__NDGH);
+            next__SUKH=(void *)((unsigned long)result__UUKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NDGH)));
+            ((__POINTER *)next__SUKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__TUKH)[ 0]=next__SUKH;
+          } else {
+            next__SUKH=((__POINTER *)result__UUKH)[ 0];
+            if ((next__SUKH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__UUKH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__NDGH <<  1)) <=  4096)) {
+                next__SUKH=(void *)((unsigned long)result__UUKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NDGH)));
               } else {
-                next__T3JH=new_lab__FTJ(new_size__N0GH);
-              };
-              ((__POINTER *)next__T3JH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__U3JH)[ 0]=next__T3JH;
-            } else {
-              ((__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)));
+                next__SUKH=new_lab__RTJ(new_size__NDGH);
+              };
+              ((__POINTER *)next__SUKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__TUKH)[ 0]=next__SUKH;
+            } else {
+              ((__POINTER *)result__UUKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__SUKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__UUKH=next__SUKH;
+            };
+          };
+          ptr__2RI=result__UUKH;
+        } else {
+          t__RDGH=((__UINTEGER_32 )typ_id__BSI);
+          a__QDGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__1UKH=(__UINTEGER_32)((__UINTEGER_32)(sz__4RI + a__QDGH) & (__UINTEGER_32)(~ a__QDGH));
+          ptr_table__YUKH=((__POINTER )(&(table_type[(t__RDGH)])));
+          lab_type__0UKH=(__UINTEGER_32)(t__RDGH |  1);
+          next__XUKH=((__POINTER )(NULL));
+          result__ZUKH=((__POINTER *)ptr_table__YUKH)[ 0];
+          if ((result__ZUKH == (void *)NULL)) {
+            result__ZUKH=new_lab__RTJ(lab_type__0UKH);
+            next__XUKH=(void *)((unsigned long)result__ZUKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1UKH)));
+            ((__POINTER *)next__XUKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__YUKH)[ 0]=next__XUKH;
+          } else {
+            next__XUKH=((__POINTER *)result__ZUKH)[ 0];
+            if ((next__XUKH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ZUKH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__1UKH <<  1)) <=  4096)) {
+                next__XUKH=(void *)((unsigned long)result__ZUKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1UKH)));
               } else {
-                next__Y3JH=new_lab__FTJ(lab_type__13JH);
+                next__XUKH=new_lab__RTJ(lab_type__0UKH);
               };
-              ((__POINTER *)next__Y3JH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__Z3JH)[ 0]=next__Y3JH;
+              ((__POINTER *)next__XUKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__YUKH)[ 0]=next__XUKH;
             } else {
-              ((__POINTER *)result__03JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__Y3JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__03JH=next__Y3JH;
+              ((__POINTER *)result__ZUKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XUKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__ZUKH=next__XUKH;
             };
           };
-          ptr__QRI=result__03JH;
+          ptr__2RI=result__ZUKH;
         };
-        result__PRI=((__ITM_LIST *)ptr__QRI);
-        *(result__PRI) = *(ITM_LIST__);
+        result__1RI=((__ITM_LIST *)ptr__2RI);
+        *(result__1RI) = *(ITM_LIST__);
       };
-      ((__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__;
+      ((__ITM_LIST *)result__1RI)->parent_itm_code__SBF.parent_itm_object__PFE.position__SFJ=p__I3H;
+      last_group__TWF=result__1RI;
+      old_position__ITI=position__CCC;
+      old_pos_cur__KTI=pos_cur__FCC;
+      old_pos_line__MTI=pos_line__GCC;
+      old_pos_col__OTI=pos_col__HCC;
+      old_short_derive__QTI=short_derive__PCC;
+      if (((void *)read_loc_arg__with_self__BBHB(Self__F5M,TRUE__,FALSE__) != (void *)NULL)) {
+        result__2UKH=FALSE__;
+        if ((! read_space__XTD())) {
+          result__2UKH=FALSE__;
         } else {
-          result__43JH='\0';
-          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__43JH=((__CHARACTER )(( 0)));
+          result__3UKH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+            result__3UKH=((__CHARACTER )(( 0)));
           } else {
-            result__43JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+            result__3UKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__43JH == ';')) {
+          if ((result__3UKH == ';')) {
             position__CCC=(__INTEGER)(position__CCC +  1);
-            result__33JH=TRUE__;
+            result__2UKH=TRUE__;
           };
         };
-        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)) {
+        if ((! result__2UKH)) {
+          pos__KBZG=current_position__B0F();
+          put_error__text__1PG( 2,(&__string_241));
+          put_position__FRG(pos__KBZG);
+          put_string__33F(msg_err__AQG);
+          if ((type_error__5PG !=  2)) {
             exit(( 1));
           };
         };
       } else {
-        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)));
+        restore_context__EFL();
+      };
+      lst__CHHB=last_group__TWF;
+      result__ZEMB=NULL;
+      ptr__0EMB=((__POINTER )(NULL));
+      typ_id__5EMB= 0;
+      sz__2EMB=((__UINTEGER_32 )sizeof(__ITM_BLOCK));
+      if ((sz__2EMB ==  0)) {
+        result__ZEMB=ITM_BLOCK__;
+      } else {
+        typ_id__5EMB=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__2EMB);
+        if ((typ_id__5EMB == (__INTEGER)(-  1))) {
+          a__Y2FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__Z2FH=(__UINTEGER_32)((__UINTEGER_32)(sz__2EMB + a__Y2FH) & (__UINTEGER_32)(~ a__Y2FH));
+          ptr_table__AVKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__Z2FH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__5UKH=((__POINTER )(NULL));
+          result__BVKH=((__POINTER *)ptr_table__AVKH)[ 0];
+          if ((result__BVKH == (void *)NULL)) {
+            result__BVKH=new_lab__RTJ(new_size__Z2FH);
+            next__5UKH=(void *)((unsigned long)result__BVKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Z2FH)));
+            ((__POINTER *)next__5UKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__AVKH)[ 0]=next__5UKH;
+          } else {
+            next__5UKH=((__POINTER *)result__BVKH)[ 0];
+            if ((next__5UKH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BVKH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__Z2FH <<  1)) <=  4096)) {
+                next__5UKH=(void *)((unsigned long)result__BVKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Z2FH)));
               } else {
-                next__A4JH=new_lab__FTJ(new_size__HUGH);
+                next__5UKH=new_lab__RTJ(new_size__Z2FH);
               };
-              ((__POINTER *)next__A4JH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__B4JH)[ 0]=next__A4JH;
+              ((__POINTER *)next__5UKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__AVKH)[ 0]=next__5UKH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__BVKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5UKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__BVKH=next__5UKH;
+            };
+          };
+          ptr__0EMB=result__BVKH;
+        } else {
+          t__32FH=((__UINTEGER_32 )typ_id__5EMB);
+          a__22FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__IVKH=(__UINTEGER_32)((__UINTEGER_32)(sz__2EMB + a__22FH) & (__UINTEGER_32)(~ a__22FH));
+          ptr_table__FVKH=((__POINTER )(&(table_type[(t__32FH)])));
+          lab_type__HVKH=(__UINTEGER_32)(t__32FH |  1);
+          next__EVKH=((__POINTER )(NULL));
+          result__GVKH=((__POINTER *)ptr_table__FVKH)[ 0];
+          if ((result__GVKH == (void *)NULL)) {
+            result__GVKH=new_lab__RTJ(lab_type__HVKH);
+            next__EVKH=(void *)((unsigned long)result__GVKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IVKH)));
+            ((__POINTER *)next__EVKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__FVKH)[ 0]=next__EVKH;
+          } else {
+            next__EVKH=((__POINTER *)result__GVKH)[ 0];
+            if ((next__EVKH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GVKH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__IVKH <<  1)) <=  4096)) {
+                next__EVKH=(void *)((unsigned long)result__GVKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IVKH)));
               } else {
-                next__F4JH=new_lab__FTJ(lab_type__I4JH);
+                next__EVKH=new_lab__RTJ(lab_type__HVKH);
               };
-              ((__POINTER *)next__F4JH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__G4JH)[ 0]=next__F4JH;
+              ((__POINTER *)next__EVKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__FVKH)[ 0]=next__EVKH;
             } else {
-              ((__POINTER *)result__H4JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__F4JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__H4JH=next__F4JH;
+              ((__POINTER *)result__GVKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EVKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__GVKH=next__EVKH;
             };
           };
-          ptr__LIMB=result__H4JH;
+          ptr__0EMB=result__GVKH;
         };
-        result__KIMB=((__ITM_BLOCK *)ptr__LIMB);
-        *(result__KIMB) = *(ITM_BLOCK__);
+        result__ZEMB=((__ITM_BLOCK *)ptr__0EMB);
+        *(result__ZEMB) = *(ITM_BLOCK__);
       };
-      ((__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__;
+      ((__ITM_BLOCK *)result__ZEMB)->list__KMDC=lst__CHHB;
+      result__H5M=result__ZEMB;
+      read_group__C4GB(Self__F5M);
+      result__JVKH=FALSE__;
+      if ((! read_space__XTD())) {
+        result__JVKH=FALSE__;
       } else {
-        result__L4JH='\0';
-        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__L4JH=((__CHARACTER )(( 0)));
+        result__KVKH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+          result__KVKH=((__CHARACTER )(( 0)));
         } else {
-          result__L4JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+          result__KVKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__L4JH == '}')) {
+        if ((result__KVKH == '}')) {
           position__CCC=(__INTEGER)(position__CCC +  1);
-          result__K4JH=TRUE__;
+          result__JVKH=TRUE__;
         };
       };
-      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)) {
+      if ((! result__JVKH)) {
+        pos__SBZG=current_position__B0F();
+        put_error__text__1PG( 2,(&__string_294));
+        put_position__FRG(pos__SBZG);
+        put_string__33F(msg_err__AQG);
+        if ((type_error__5PG !=  2)) {
           exit(( 1));
         };
       };
-      short__token__to__YCD((&__string_133),(__INTEGER)(position__CCC -  1),position__CCC);
-      last_group__WVF=group_sav__B5M;
+      short__token__to__GDD((&__string_133),(__INTEGER)(position__CCC -  1),position__CCC);
+      last_group__TWF=group_sav__N5M;
     };
-    __tmp__RFN=result__Q3JH;
+    __tmp__3FN=result__PUKH;
   };
-  if ((! __tmp__RFN)) {
-    if (read_external__QTO()) {
-      result__N4JH=FALSE__;
-      if ((! read_space__MTD())) {
-        result__N4JH=FALSE__;
+  if ((! __tmp__3FN)) {
+    if (read_external__2TO()) {
+      result__MVKH=FALSE__;
+      if ((! read_space__XTD())) {
+        result__MVKH=FALSE__;
       } else {
-        result__O4JH='\0';
-        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__O4JH=((__CHARACTER )(( 0)));
+        result__NVKH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+          result__NVKH=((__CHARACTER )(( 0)));
         } else {
-          result__O4JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+          result__NVKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__O4JH == ':')) {
+        if ((result__NVKH == ':')) {
           position__CCC=(__INTEGER)(position__CCC +  1);
-          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__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)));
+          result__MVKH=TRUE__;
+        };
+      };
+      if ((! result__MVKH)) {
+        __tmp__RGN=current_position__B0F();
+        result__2TTB=NULL;
+        ptr__3TTB=((__POINTER )(NULL));
+        typ_id__CUTB= 0;
+        sz__5TTB=((__UINTEGER_32 )sizeof(__ITM_EXTERNAL));
+        if ((sz__5TTB ==  0)) {
+          result__2TTB=ITM_EXTERNAL__;
+        } else {
+          typ_id__CUTB=-1;
+          clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__5TTB);
+          if ((typ_id__CUTB == (__INTEGER)(-  1))) {
+            a__A3FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__B3FH=(__UINTEGER_32)((__UINTEGER_32)(sz__5TTB + a__A3FH) & (__UINTEGER_32)(~ a__A3FH));
+            ptr_table__QVKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__B3FH / ((__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__RTJ(new_size__B3FH);
+              next__PVKH=(void *)((unsigned long)result__RVKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__B3FH)));
+              ((__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__4XH)))) &  4095) + (__UINTEGER_32)(new_size__B3FH <<  1)) <=  4096)) {
+                  next__PVKH=(void *)((unsigned long)result__RVKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__B3FH)));
                 } else {
-                  next__Q4JH=new_lab__FTJ(new_size__PUGH);
+                  next__PVKH=new_lab__RTJ(new_size__B3FH);
                 };
-                ((__POINTER *)next__Q4JH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__R4JH)[ 0]=next__Q4JH;
+                ((__POINTER *)next__PVKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__QVKH)[ 0]=next__PVKH;
               } else {
-                ((__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__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)));
+                ((__POINTER *)result__RVKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PVKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__RVKH=next__PVKH;
+              };
+            };
+            ptr__3TTB=result__RVKH;
+          } else {
+            t__F3FH=((__UINTEGER_32 )typ_id__CUTB);
+            a__E3FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__YVKH=(__UINTEGER_32)((__UINTEGER_32)(sz__5TTB + a__E3FH) & (__UINTEGER_32)(~ a__E3FH));
+            ptr_table__VVKH=((__POINTER )(&(table_type[(t__F3FH)])));
+            lab_type__XVKH=(__UINTEGER_32)(t__F3FH |  1);
+            next__UVKH=((__POINTER )(NULL));
+            result__WVKH=((__POINTER *)ptr_table__VVKH)[ 0];
+            if ((result__WVKH == (void *)NULL)) {
+              result__WVKH=new_lab__RTJ(lab_type__XVKH);
+              next__UVKH=(void *)((unsigned long)result__WVKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YVKH)));
+              ((__POINTER *)next__UVKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__VVKH)[ 0]=next__UVKH;
+            } else {
+              next__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__4XH)))) &  4095) + (__UINTEGER_32)(new_size__YVKH <<  1)) <=  4096)) {
+                  next__UVKH=(void *)((unsigned long)result__WVKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YVKH)));
                 } else {
-                  next__V4JH=new_lab__FTJ(lab_type__Y4JH);
+                  next__UVKH=new_lab__RTJ(lab_type__XVKH);
                 };
-                ((__POINTER *)next__V4JH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__W4JH)[ 0]=next__V4JH;
+                ((__POINTER *)next__UVKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__VVKH)[ 0]=next__UVKH;
               } else {
-                ((__POINTER *)result__X4JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__V4JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__X4JH=next__V4JH;
+                ((__POINTER *)result__WVKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UVKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__WVKH=next__UVKH;
               };
             };
-            ptr__QXTB=result__X4JH;
+            ptr__3TTB=result__WVKH;
           };
-          result__PXTB=((__ITM_EXTERNAL *)ptr__QXTB);
-          *(result__PXTB) = *(ITM_EXTERNAL__);
+          result__2TTB=((__ITM_EXTERNAL *)ptr__3TTB);
+          *(result__2TTB) = *(ITM_EXTERNAL__);
         };
-        ((__ITM_EXTERNAL *)result__PXTB)->parent_itm_extern__EGN.parent_itm_code__44M.parent_itm_object__SEE.position__GFJ=__tmp__FGN;
-        result__14M=result__PXTB;
+        ((__ITM_EXTERNAL *)result__2TTB)->parent_itm_extern__QGN.parent_itm_code__K5M.parent_itm_object__PFE.position__SFJ=__tmp__RGN;
+        result__H5M=result__2TTB;
       } else {
-        __tmp__NGN=current_position__EZF();
-        result__04JH=FALSE__;
-        if ((! read_space__MTD())) {
-          result__04JH=FALSE__;
+        __tmp__ZGN=current_position__B0F();
+        result__ZVKH=FALSE__;
+        if ((! read_space__XTD())) {
+          result__ZVKH=FALSE__;
         } else {
-          result__14JH='\0';
-          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__14JH=((__CHARACTER )(( 0)));
+          result__0VKH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+            result__0VKH=((__CHARACTER )(( 0)));
           } else {
-            result__14JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+            result__0VKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__14JH == '(')) {
+          if ((result__0VKH == '(')) {
             position__CCC=(__INTEGER)(position__CCC +  1);
-            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__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)));
+            result__ZVKH=TRUE__;
+          };
+        };
+        result__QVTB=NULL;
+        ptr__RVTB=((__POINTER )(NULL));
+        typ_id__WVTB= 0;
+        sz__TVTB=((__UINTEGER_32 )sizeof(__ITM_EXTERNAL_TYPE));
+        if ((sz__TVTB ==  0)) {
+          result__QVTB=ITM_EXTERNAL_TYPE__;
+        } else {
+          typ_id__WVTB=-1;
+          clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__TVTB);
+          if ((typ_id__WVTB == (__INTEGER)(-  1))) {
+            a__I3FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__J3FH=(__UINTEGER_32)((__UINTEGER_32)(sz__TVTB + a__I3FH) & (__UINTEGER_32)(~ a__I3FH));
+            ptr_table__3VKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__J3FH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__2VKH=((__POINTER )(NULL));
+            result__4VKH=((__POINTER *)ptr_table__3VKH)[ 0];
+            if ((result__4VKH == (void *)NULL)) {
+              result__4VKH=new_lab__RTJ(new_size__J3FH);
+              next__2VKH=(void *)((unsigned long)result__4VKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__J3FH)));
+              ((__POINTER *)next__2VKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__3VKH)[ 0]=next__2VKH;
+            } else {
+              next__2VKH=((__POINTER *)result__4VKH)[ 0];
+              if ((next__2VKH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4VKH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__J3FH <<  1)) <=  4096)) {
+                  next__2VKH=(void *)((unsigned long)result__4VKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__J3FH)));
                 } else {
-                  next__34JH=new_lab__FTJ(new_size__XUGH);
+                  next__2VKH=new_lab__RTJ(new_size__J3FH);
                 };
-                ((__POINTER *)next__34JH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__44JH)[ 0]=next__34JH;
+                ((__POINTER *)next__2VKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__3VKH)[ 0]=next__2VKH;
               } else {
-                ((__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__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)));
+                ((__POINTER *)result__4VKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2VKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__4VKH=next__2VKH;
+              };
+            };
+            ptr__RVTB=result__4VKH;
+          } else {
+            t__N3FH=((__UINTEGER_32 )typ_id__WVTB);
+            a__M3FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__FWKH=(__UINTEGER_32)((__UINTEGER_32)(sz__TVTB + a__M3FH) & (__UINTEGER_32)(~ a__M3FH));
+            ptr_table__CWKH=((__POINTER )(&(table_type[(t__N3FH)])));
+            lab_type__EWKH=(__UINTEGER_32)(t__N3FH |  1);
+            next__BWKH=((__POINTER )(NULL));
+            result__DWKH=((__POINTER *)ptr_table__CWKH)[ 0];
+            if ((result__DWKH == (void *)NULL)) {
+              result__DWKH=new_lab__RTJ(lab_type__EWKH);
+              next__BWKH=(void *)((unsigned long)result__DWKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FWKH)));
+              ((__POINTER *)next__BWKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__CWKH)[ 0]=next__BWKH;
+            } else {
+              next__BWKH=((__POINTER *)result__DWKH)[ 0];
+              if ((next__BWKH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DWKH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__FWKH <<  1)) <=  4096)) {
+                  next__BWKH=(void *)((unsigned long)result__DWKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FWKH)));
                 } else {
-                  next__C5JH=new_lab__FTJ(lab_type__F5JH);
+                  next__BWKH=new_lab__RTJ(lab_type__EWKH);
                 };
-                ((__POINTER *)next__C5JH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__D5JH)[ 0]=next__C5JH;
+                ((__POINTER *)next__BWKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__CWKH)[ 0]=next__BWKH;
               } else {
-                ((__POINTER *)result__E5JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__C5JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__E5JH=next__C5JH;
+                ((__POINTER *)result__DWKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BWKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__DWKH=next__BWKH;
               };
             };
-            ptr__EZTB=result__E5JH;
+            ptr__RVTB=result__DWKH;
           };
-          result__DZTB=((__ITM_EXTERNAL_TYPE *)ptr__EZTB);
-          *(result__DZTB) = *(ITM_EXTERNAL_TYPE__);
+          result__QVTB=((__ITM_EXTERNAL_TYPE *)ptr__RVTB);
+          *(result__QVTB) = *(ITM_EXTERNAL_TYPE__);
         };
-        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)) {
+        Self__JZEC=((__ITM_EXTERNAL_TYPE *)result__QVTB);
+        Self__JZEC->parent_itm_extern__L5M.parent_itm_code__K5M.parent_itm_object__PFE.position__SFJ=__tmp__ZGN;
+        Self__JZEC->is_persistant__IIN=result__ZVKH;
+        type__I5M=read_type__CDM(Self__F5M,FALSE__);
+        if (((void *)type__I5M == (void *)NULL)) {
+          pos__ACZG=current_position__B0F();
+          put_error__text__1PG( 0,(&__string_279));
+          put_position__FRG(pos__ACZG);
+          put_string__33F(msg_err__AQG);
+          if ((type_error__5PG !=  2)) {
             exit(( 1));
           };
         };
-        result__H5JH=FALSE__;
-        if ((! read_space__MTD())) {
-          result__H5JH=FALSE__;
+        result__GWKH=FALSE__;
+        if ((! read_space__XTD())) {
+          result__GWKH=FALSE__;
         } else {
-          result__I5JH='\0';
-          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__I5JH=((__CHARACTER )(( 0)));
+          result__HWKH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+            result__HWKH=((__CHARACTER )(( 0)));
           } else {
-            result__I5JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+            result__HWKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__I5JH == '{')) {
+          if ((result__HWKH == '{')) {
             position__CCC=(__INTEGER)(position__CCC +  1);
-            result__H5JH=TRUE__;
+            result__GWKH=TRUE__;
           };
         };
-        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)) {
+        if (result__GWKH) {
+          if (((void *)read_type_list__ENO(Self__F5M,FALSE__) == (void *)NULL)) {
+            pos__CCZG=current_position__B0F();
+            put_error__text__1PG( 0,(&__string_305));
+            put_position__FRG(pos__CCZG);
+            put_string__33F(msg_err__AQG);
+            if ((type_error__5PG !=  2)) {
               exit(( 1));
             };
           };
-          result__K5JH=FALSE__;
-          if ((! read_space__MTD())) {
-            result__K5JH=FALSE__;
+          result__JWKH=FALSE__;
+          if ((! read_space__XTD())) {
+            result__JWKH=FALSE__;
           } else {
-            result__L5JH='\0';
-            if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-              result__L5JH=((__CHARACTER )(( 0)));
+            result__KWKH='\0';
+            if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+              result__KWKH=((__CHARACTER )(( 0)));
             } else {
-              result__L5JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+              result__KWKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
             };
-            if ((result__L5JH == '}')) {
+            if ((result__KWKH == '}')) {
               position__CCC=(__INTEGER)(position__CCC +  1);
-              result__K5JH=TRUE__;
+              result__JWKH=TRUE__;
             };
           };
-          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)) {
+          if ((! result__JWKH)) {
+            pos__ECZG=current_position__B0F();
+            put_error__text__1PG( 2,(&__string_294));
+            put_position__FRG(pos__ECZG);
+            put_string__33F(msg_err__AQG);
+            if ((type_error__5PG !=  2)) {
               exit(( 1));
             };
           };
         };
-        if (result__DZTB->is_persistant__2HN) {
-          result__N5JH=FALSE__;
-          if ((! read_space__MTD())) {
-            result__N5JH=FALSE__;
+        if (result__QVTB->is_persistant__IIN) {
+          result__MWKH=FALSE__;
+          if ((! read_space__XTD())) {
+            result__MWKH=FALSE__;
           } else {
-            result__O5JH='\0';
-            if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-              result__O5JH=((__CHARACTER )(( 0)));
+            result__NWKH='\0';
+            if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+              result__NWKH=((__CHARACTER )(( 0)));
             } else {
-              result__O5JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+              result__NWKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
             };
-            if ((result__O5JH == ')')) {
+            if ((result__NWKH == ')')) {
               position__CCC=(__INTEGER)(position__CCC +  1);
-              result__N5JH=TRUE__;
+              result__MWKH=TRUE__;
             };
           };
-          __tmp__HIN=(! result__N5JH);
+          __tmp__TIN=(! result__MWKH);
         } else {
-          __tmp__HIN=FALSE__;
+          __tmp__TIN=FALSE__;
         };
-        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)) {
+        if (__tmp__TIN) {
+          pos__GCZG=current_position__B0F();
+          put_error__text__1PG( 2,(&__string_262));
+          put_position__FRG(pos__GCZG);
+          put_string__33F(msg_err__AQG);
+          if ((type_error__5PG !=  2)) {
             exit(( 1));
           };
         };
-        result__14M=result__DZTB;
+        result__H5M=result__QVTB;
       };
     };
   };
-  return(result__14M);
+  return(result__H5M);
 }
 
-static __BOOLEAN read_integer__Q2P()
+static __BOOLEAN read_integer__22P()
 // () With resultNo recursive, No inlinable.
 {
-  __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__A1AH=((__CHARACTER )(( 0)));
-    } else {
-      result__A1AH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
-    };
-    result__MSEH=FALSE__;
-    if ((((__INTEGER_8 )result__A1AH) >= ((__INTEGER_8 )'0'))) {
-      result__MSEH=(((__INTEGER_8 )result__A1AH) <= ((__INTEGER_8 )'9'));
-    };
-    __tmp__52P=result__MSEH;
+  __INTEGER_64 result__FSJE,__tmp__XSJE,result__SXPE,result__ZRRE;
+  __INTEGER pos_old__A3P,new_capacity__OLIH,old_nb_elts__RLIH;
+  __INTEGER upper__SWKH,Self__QWKH,new_capacity__ULIH,old_nb_elts__XLIH;
+  __INTEGER upper__XWKH,Self__VWKH,__tmp__QSJE,Self__JLOE,result__NQSE;
+  __INTEGER j__DWPE,__tmp__TYEH,__tmp__3XPE,Self__EUQE,i__DQRE;
+  __INTEGER __tmp__ESRE,Self__JVSE,state__GTRE,value__HTRE,i__FTRE;
+  __INTEGER __tmp__L4GH,state__B1RE,result__E1RE,i__A1RE,__tmp__Q4GH;
+  __INTEGER __tmp__S4GH;
+  __STRING *Self__PLIH,*Self__VLIH,*Self__DSJE,*Self__3REH,*Self__Q3FH;
+  __STRING *Self__AWPE,*Self__QXPE,*Self__BQRE,*Self__XRRE,*Self__DTRE;
+  __STRING *Self__40RE;
+  __POSITION pos__NDZG,pos__AEZG,pos__PEZG;
+  __BOOLEAN result__52P,result__O3FH,__tmp__L3P,__tmp__F4P,__tmp__ERSE;
+  __BOOLEAN result__CWPE,__tmp__1WPE,result__22TE,__tmp__NAQ;
+  __BOOLEAN result__EQRE,negative__ITRE,result__JTRE,__tmp__XURE;
+  __BOOLEAN result__4CQG,__tmp__DVRE,result__LDQG,result__S3FH;
+  __BOOLEAN __tmp__XVRE,__tmp__WWRE,result__3DGF,result__U3FH;
+  __BOOLEAN __tmp__KZRE,result__PEGF,result__W3FH,__tmp__XYRE;
+  __BOOLEAN negative__D1RE,__tmp__Q2RE,result__NEQG,__tmp__D3RE;
+  __BOOLEAN __tmp__Y3RE,result__3FGF,__tmp__54RE,result__PGGF;
+  __BOOLEAN result__Y3FH;
+  __CHARACTER result__A3AH,result__K3AH,result__P3AH,result__U3AH;
+  __CHARACTER result__Z3AH,result__43AH,result__D4AH,Self__LQSE;
+  __CHARACTER result__G5AH,Self__02TE,result__BABH,Self__NCGF;
+  __CHARACTER result__LABH,cc__KTRE,cc__C1RE;
+  __CHARACTER *Self__QLIH,*new__SLIH,*Self__WLIH,*new__YLIH,*__tmp__2REH;
+  __CHARACTER *__tmp__UYEH,*__tmp__JSEH,*__tmp__ZYEH,*__tmp__SSEH;
+  __CHARACTER *__tmp__M4GH,*__tmp__R4GH;
+  result__52P=FALSE__;
+  pos_old__A3P= 0;
+  if (read_space__XTD()) {
+    result__A3AH='\0';
+    if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+      result__A3AH=((__CHARACTER )(( 0)));
+    } else {
+      result__A3AH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
+    };
+    result__O3FH=FALSE__;
+    if ((((__INTEGER_8 )result__A3AH) >= ((__INTEGER_8 )'0'))) {
+      result__O3FH=(((__INTEGER_8 )result__A3AH) <= ((__INTEGER_8 )'9'));
+    };
+    __tmp__L3P=result__O3FH;
   } else {
-    __tmp__52P=FALSE__;
-  };
-  if (__tmp__52P) {
-    result__T2P=TRUE__;
-    ((__STRING *)string_tmp__VH)->count__EGC= 0;
-    result__K1AH='\0';
-    if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-      result__K1AH=((__CHARACTER )(( 0)));
-    } else {
-      result__K1AH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
-    };
-    add_last__GOT(string_tmp__VH,result__K1AH);
-    pos_old__U2P=position__CCC;
+    __tmp__L3P=FALSE__;
+  };
+  if (__tmp__L3P) {
+    result__52P=TRUE__;
+    ((__STRING *)string_tmp__VH)->count__SGC= 0;
+    result__K3AH='\0';
+    if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+      result__K3AH=((__CHARACTER )(( 0)));
+    } else {
+      result__K3AH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
+    };
+    Self__PLIH=((__STRING *)string_tmp__VH);
+    new_capacity__OLIH= 0;
+    if ((Self__PLIH->capacity__UCS <= Self__PLIH->count__SGC)) {
+      if ((Self__PLIH->capacity__UCS ==  0)) {
+        Self__PLIH->capacity__UCS= 32;
+        Self__PLIH->storage__3CS=create__YIEB( 32);
+      } else {
+        new_capacity__OLIH=(__INTEGER)(Self__PLIH->capacity__UCS <<  1);
+        Self__QLIH=((__CHARACTER *)Self__PLIH->storage__3CS);
+        old_nb_elts__RLIH=Self__PLIH->capacity__UCS;
+        new__SLIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__QLIH),((__UINTEGER_32 )old_nb_elts__RLIH),((__UINTEGER_32 )new_capacity__OLIH)));
+        upper__SWKH=(__INTEGER)(new_capacity__OLIH -  1);
+        Self__QWKH=old_nb_elts__RLIH;
+        while ((Self__QWKH <= upper__SWKH)) {
+          new__SLIH[Self__QWKH]='\0';
+          Self__QWKH=(__INTEGER)(Self__QWKH +  1);
+        };
+        Self__PLIH->storage__3CS=new__SLIH;
+        Self__PLIH->capacity__UCS=new_capacity__OLIH;
+      };
+    };
+    ((__CHARACTER *)Self__PLIH->storage__3CS)[Self__PLIH->count__SGC]=result__K3AH;
+    Self__PLIH->count__SGC=(__INTEGER)(Self__PLIH->count__SGC +  1);
+    pos_old__A3P=position__CCC;
     position__CCC=(__INTEGER)(position__CCC +  1);
-    while_do__CE0D:
+    while_do__JF0D:
     {
-      result__P1AH='\0';
-      if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__P1AH=((__CHARACTER )(( 0)));
+      result__P3AH='\0';
+      if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+        result__P3AH=((__CHARACTER )(( 0)));
       } else {
-        result__P1AH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+        result__P3AH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
       };
-      if (is_hexadecimal_digit__UPJE(result__P1AH)) {
-        __tmp__Z3P=TRUE__;
+      if (is_hexadecimal_digit__DQJE(result__P3AH)) {
+        __tmp__F4P=TRUE__;
       } else {
-        result__U1AH='\0';
-        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__U1AH=((__CHARACTER )(( 0)));
+        result__U3AH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+          result__U3AH=((__CHARACTER )(( 0)));
         } else {
-          result__U1AH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+          result__U3AH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
         };
-        __tmp__Z3P=(result__U1AH == '_');
+        __tmp__F4P=(result__U3AH == '_');
       };
-      if (__tmp__Z3P) {
-        result__Z1AH='\0';
-        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__Z1AH=((__CHARACTER )(( 0)));
+      if (__tmp__F4P) {
+        result__Z3AH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+          result__Z3AH=((__CHARACTER )(( 0)));
         } else {
-          result__Z1AH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+          result__Z3AH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__Z1AH != '_')) {
-          result__41AH='\0';
-          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__41AH=((__CHARACTER )(( 0)));
+        if ((result__Z3AH != '_')) {
+          result__43AH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+            result__43AH=((__CHARACTER )(( 0)));
           } else {
-            result__41AH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+            result__43AH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
           };
-          add_last__GOT(string_tmp__VH,result__41AH);
+          Self__VLIH=((__STRING *)string_tmp__VH);
+          new_capacity__ULIH= 0;
+          if ((Self__VLIH->capacity__UCS <= Self__VLIH->count__SGC)) {
+            if ((Self__VLIH->capacity__UCS ==  0)) {
+              Self__VLIH->capacity__UCS= 32;
+              Self__VLIH->storage__3CS=create__YIEB( 32);
+            } else {
+              new_capacity__ULIH=(__INTEGER)(Self__VLIH->capacity__UCS <<  1);
+              Self__WLIH=((__CHARACTER *)Self__VLIH->storage__3CS);
+              old_nb_elts__XLIH=Self__VLIH->capacity__UCS;
+              new__YLIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__WLIH),((__UINTEGER_32 )old_nb_elts__XLIH),((__UINTEGER_32 )new_capacity__ULIH)));
+              upper__XWKH=(__INTEGER)(new_capacity__ULIH -  1);
+              Self__VWKH=old_nb_elts__XLIH;
+              while ((Self__VWKH <= upper__XWKH)) {
+                new__YLIH[Self__VWKH]='\0';
+                Self__VWKH=(__INTEGER)(Self__VWKH +  1);
+              };
+              Self__VLIH->storage__3CS=new__YLIH;
+              Self__VLIH->capacity__UCS=new_capacity__ULIH;
+            };
+          };
+          ((__CHARACTER *)Self__VLIH->storage__3CS)[Self__VLIH->count__SGC]=result__43AH;
+          Self__VLIH->count__SGC=(__INTEGER)(Self__VLIH->count__SGC +  1);
         };
         position__CCC=(__INTEGER)(position__CCC +  1);
-        goto while_do__CE0D;
+        goto while_do__JF0D;
       };
     };
-    result__D2AH='\0';
-    if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-      result__D2AH=((__CHARACTER )(( 0)));
+    result__D4AH='\0';
+    if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+      result__D4AH=((__CHARACTER )(( 0)));
     } else {
-      result__D2AH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+      result__D4AH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
     };
-    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__;
+    if ((result__D4AH == 'h')) {
+      Self__DSJE=((__STRING *)string_tmp__VH);
+      result__FSJE= 0;
+      __tmp__QSJE=Self__DSJE->count__SGC;
+      Self__JLOE= 1;
+      __tmp__2REH=Self__DSJE->storage__3CS;
+      while ((Self__JLOE <= __tmp__QSJE)) {
+        __tmp__XSJE=(__INTEGER_64)(result__FSJE <<  4);
+        Self__LQSE=((__CHARACTER *)__tmp__2REH)[(__INTEGER)(Self__JLOE -  1)];
+        result__NQSE= 0;
+        if ((((__INTEGER_8 )Self__LQSE) < ((__INTEGER_8 )'A'))) {
+          result__NQSE=((__INTEGER )(__INTEGER_8)(((__INTEGER_8 )Self__LQSE) -  48));
+          __tmp__ERSE=TRUE__;
         } else {
-          __tmp__PQSE=FALSE__;
+          __tmp__ERSE=FALSE__;
         };
-        if ((! __tmp__PQSE)) {
-          if ((((__INTEGER_8 )Self__WPSE) < ((__INTEGER_8 )'a'))) {
-            result__YPSE=((__INTEGER )(__INTEGER_8)(((__INTEGER_8 )Self__WPSE) -  55));
+        if ((! __tmp__ERSE)) {
+          if ((((__INTEGER_8 )Self__LQSE) < ((__INTEGER_8 )'a'))) {
+            result__NQSE=((__INTEGER )(__INTEGER_8)(((__INTEGER_8 )Self__LQSE) -  55));
           } else {
-            result__YPSE=((__INTEGER )(__INTEGER_8)(((__INTEGER_8 )Self__WPSE) -  87));
+            result__NQSE=((__INTEGER )(__INTEGER_8)(((__INTEGER_8 )Self__LQSE) -  87));
           };
         };
-        result__WRJE=(__INTEGER_64)(__tmp__ISJE | ((__INTEGER_64 )result__YPSE));
-        Self__0KOE=(__INTEGER)(Self__0KOE +  1);
+        result__FSJE=(__INTEGER_64)(__tmp__XSJE | ((__INTEGER_64 )result__NQSE));
+        Self__JLOE=(__INTEGER)(Self__JLOE +  1);
       };
-      last_integer__JSO=result__WRJE;
+      last_integer__VSO=result__FSJE;
       position__CCC=(__INTEGER)(position__CCC +  1);
     } else {
-      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;
+      Self__3REH=((__STRING *)string_tmp__VH);
+      if ((((__INTEGER_8 )((__CHARACTER *)Self__3REH->storage__3CS)[(__INTEGER)(Self__3REH->count__SGC -  1)]) > ((__INTEGER_8 )'9'))) {
+        Self__Q3FH=((__STRING *)string_tmp__VH);
+        if (( 1 > Self__Q3FH->count__SGC)) {
+          Self__Q3FH->count__SGC= 0;
         } else {
-          Self__2UGH->count__EGC=(__INTEGER)(Self__2UGH->count__EGC -  1);
+          Self__Q3FH->count__SGC=(__INTEGER)(Self__Q3FH->count__SGC -  1);
         };
         position__CCC=(__INTEGER)(position__CCC -  1);
       };
-      result__G3AH='\0';
-      if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__G3AH=((__CHARACTER )(( 0)));
-      } else {
-        result__G3AH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
-      };
-      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:
+      result__G5AH='\0';
+      if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+        result__G5AH=((__CHARACTER )(( 0)));
+      } else {
+        result__G5AH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
+      };
+      if ((result__G5AH == 'o')) {
+        Self__AWPE=((__STRING *)string_tmp__VH);
+        result__CWPE=FALSE__;
+        j__DWPE= 0;
+        if ((Self__AWPE->count__SGC !=  0)) {
+          j__DWPE= 1;
+          __tmp__TYEH=Self__AWPE->count__SGC;
+          __tmp__UYEH=Self__AWPE->storage__3CS;
+          until_do__YSSE:
           {
-            if ((j__UVPE > Self__RVPE->count__EGC)) {
-              __tmp__MWPE=TRUE__;
+            if ((j__DWPE > __tmp__TYEH)) {
+              __tmp__1WPE=TRUE__;
             } else {
-              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'));
+              Self__02TE=((__CHARACTER *)__tmp__UYEH)[(__INTEGER)(j__DWPE -  1)];
+              result__22TE=FALSE__;
+              if ((((__INTEGER_8 )Self__02TE) >= ((__INTEGER_8 )'0'))) {
+                result__22TE=(((__INTEGER_8 )Self__02TE) <= ((__INTEGER_8 )'7'));
               };
-              __tmp__MWPE=(! result__H2TE);
+              __tmp__1WPE=(! result__22TE);
             };
-            if ((! __tmp__MWPE)) {
-              j__UVPE=(__INTEGER)(j__UVPE +  1);
-              goto until_do__DSSE;
+            if ((! __tmp__1WPE)) {
+              j__DWPE=(__INTEGER)(j__DWPE +  1);
+              goto until_do__YSSE;
             };
           };
-          result__TVPE=(j__UVPE > Self__RVPE->count__EGC);
+          result__CWPE=(j__DWPE > Self__AWPE->count__SGC);
         };
-        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)) {
+        if ((! result__CWPE)) {
+          pos__NDZG=current_position__B0F();
+          put_error__text__1PG( 0,(&__string_306));
+          put_position__FRG(pos__NDZG);
+          put_string__33F(msg_err__AQG);
+          if ((type_error__5PG !=  2)) {
             exit(( 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);
+        Self__QXPE=((__STRING *)string_tmp__VH);
+        result__SXPE= 0;
+        __tmp__3XPE=Self__QXPE->count__SGC;
+        Self__EUQE= 1;
+        __tmp__JSEH=Self__QXPE->storage__3CS;
+        while ((Self__EUQE <= __tmp__3XPE)) {
+          result__SXPE=(__INTEGER_64)((__INTEGER_64)(result__SXPE <<  3) | ((__INTEGER_64 )((__INTEGER )(__INTEGER_8)(((__INTEGER_8 )((__CHARACTER *)__tmp__JSEH)[(__INTEGER)(Self__EUQE -  1)]) -  48))));
+          Self__EUQE=(__INTEGER)(Self__EUQE +  1);
         };
-        last_integer__JSO=result__DXPE;
+        last_integer__VSO=result__SXPE;
         position__CCC=(__INTEGER)(position__CCC +  1);
-        __tmp__BAQ=TRUE__;
-      } else {
-        __tmp__BAQ=FALSE__;
-      };
-      if ((! __tmp__BAQ)) {
-        result__B4AH='\0';
-        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          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)) {
+        __tmp__NAQ=TRUE__;
+      } else {
+        __tmp__NAQ=FALSE__;
+      };
+      if ((! __tmp__NAQ)) {
+        result__BABH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+          result__BABH=((__CHARACTER )(( 0)));
+        } else {
+          result__BABH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
+        };
+        if ((result__BABH == 'b')) {
+          Self__BQRE=((__STRING *)string_tmp__VH);
+          i__DQRE=Self__BQRE->count__SGC;
+          result__EQRE=TRUE__;
+          __tmp__ZYEH=Self__BQRE->storage__3CS;
+          while ((! ((! result__EQRE) || (i__DQRE ==  0)))) {
+            Self__NCGF=((__CHARACTER *)__tmp__ZYEH)[(__INTEGER)(i__DQRE -  1)];
+            result__EQRE=((Self__NCGF == '0') || (Self__NCGF == '1'));
+            i__DQRE=(__INTEGER)(i__DQRE -  1);
+          };
+          if ((! result__EQRE)) {
+            pos__AEZG=current_position__B0F();
+            put_error__text__1PG( 0,(&__string_307));
+            put_position__FRG(pos__AEZG);
+            put_string__33F(msg_err__AQG);
+            if ((type_error__5PG !=  2)) {
               exit(( 1));
             };
           };
-          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__XRRE=((__STRING *)string_tmp__VH);
+          result__ZRRE= 0;
+          __tmp__ESRE=Self__XRRE->count__SGC;
+          Self__JVSE= 1;
+          __tmp__SSEH=Self__XRRE->storage__3CS;
+          while ((Self__JVSE <= __tmp__ESRE)) {
+            result__ZRRE=(__INTEGER_64)(result__ZRRE <<  1);
+            if ((((__CHARACTER *)__tmp__SSEH)[(__INTEGER)(Self__JVSE -  1)] == '1')) {
+              result__ZRRE=(__INTEGER_64)(~ (__INTEGER_64)((__INTEGER_64)(~ result__ZRRE) &  -2));
             };
-            Self__UUSE=(__INTEGER)(Self__UUSE +  1);
+            Self__JVSE=(__INTEGER)(Self__JVSE +  1);
           };
-          last_integer__JSO=result__ERRE;
+          last_integer__VSO=result__ZRRE;
           position__CCC=(__INTEGER)(position__CCC +  1);
         } else {
-          result__L4AH='\0';
-          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__L4AH=((__CHARACTER )(( 0)));
+          result__LABH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+            result__LABH=((__CHARACTER )(( 0)));
           } else {
-            result__L4AH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+            result__LABH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__L4AH == 'd')) {
+          if ((result__LABH == 'd')) {
             position__CCC=(__INTEGER)(position__CCC +  1);
           };
-          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__;
+          Self__DTRE=((__STRING *)string_tmp__VH);
+          state__GTRE= 0;
+          value__HTRE= 0;
+          negative__ITRE=FALSE__;
+          result__JTRE=FALSE__;
+          cc__KTRE='\0';
+          i__FTRE= 1;
+          __tmp__L4GH=Self__DTRE->count__SGC;
+          __tmp__M4GH=Self__DTRE->storage__3CS;
+          while ((! ((state__GTRE ==  4) || (i__FTRE > __tmp__L4GH)))) {
+            cc__KTRE=((__CHARACTER *)__tmp__M4GH)[(__INTEGER)(i__FTRE -  1)];
+            if ((state__GTRE ==  0)) {
+              if ((((((((cc__KTRE == ' ') || (cc__KTRE == '\t')) || (cc__KTRE == '\n')) || (cc__KTRE == '\r')) || (cc__KTRE == '\0')) || (cc__KTRE == '\f')) || (cc__KTRE == '\v'))) {
+                __tmp__XURE=TRUE__;
               } else {
-                result__EBQG=(cc__VSRE == '+');
-                if (result__EBQG) {
-                  state__RSRE= 1;
+                result__4CQG=(cc__KTRE == '+');
+                if (result__4CQG) {
+                  state__GTRE= 1;
                 };
-                __tmp__CURE=result__EBQG;
+                __tmp__XURE=result__4CQG;
               };
-              if (__tmp__CURE) {
-                __tmp__OURE=TRUE__;
+              if (__tmp__XURE) {
+                __tmp__DVRE=TRUE__;
               } else {
-                result__RBQG=(cc__VSRE == '-');
-                if (result__RBQG) {
-                  negative__TSRE=TRUE__;
-                  state__RSRE= 1;
+                result__LDQG=(cc__KTRE == '-');
+                if (result__LDQG) {
+                  negative__ITRE=TRUE__;
+                  state__GTRE= 1;
                 };
-                __tmp__OURE=result__RBQG;
+                __tmp__DVRE=result__LDQG;
               };
-              if ((! __tmp__OURE)) {
-                result__U1EH=FALSE__;
-                if ((((__INTEGER_8 )cc__VSRE) >= ((__INTEGER_8 )'0'))) {
-                  result__U1EH=(((__INTEGER_8 )cc__VSRE) <= ((__INTEGER_8 )'9'));
+              if ((! __tmp__DVRE)) {
+                result__S3FH=FALSE__;
+                if ((((__INTEGER_8 )cc__KTRE) >= ((__INTEGER_8 )'0'))) {
+                  result__S3FH=(((__INTEGER_8 )cc__KTRE) <= ((__INTEGER_8 )'9'));
                 };
-                if (result__U1EH) {
-                  value__SSRE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__VSRE)) -  48);
-                  state__RSRE= 2;
+                if (result__S3FH) {
+                  value__HTRE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__KTRE)) -  48);
+                  state__GTRE= 2;
                 } else {
-                  state__RSRE= 4;
+                  state__GTRE= 4;
                 };
               };
-              __tmp__CVRE=TRUE__;
+              __tmp__XVRE=TRUE__;
             } else {
-              __tmp__CVRE=FALSE__;
+              __tmp__XVRE=FALSE__;
             };
-            if (__tmp__CVRE) {
-              __tmp__BWRE=TRUE__;
+            if (__tmp__XVRE) {
+              __tmp__WWRE=TRUE__;
             } else {
-              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'));
+              result__3DGF=(state__GTRE ==  1);
+              if (result__3DGF) {
+                result__U3FH=FALSE__;
+                if ((((__INTEGER_8 )cc__KTRE) >= ((__INTEGER_8 )'0'))) {
+                  result__U3FH=(((__INTEGER_8 )cc__KTRE) <= ((__INTEGER_8 )'9'));
                 };
-                if (result__Y1EH) {
-                  value__SSRE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__VSRE)) -  48);
-                  if (negative__TSRE) {
-                    value__SSRE=(__INTEGER)(- value__SSRE);
+                if (result__U3FH) {
+                  value__HTRE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__KTRE)) -  48);
+                  if (negative__ITRE) {
+                    value__HTRE=(__INTEGER)(- value__HTRE);
                   };
-                  state__RSRE= 2;
+                  state__GTRE= 2;
                 } else {
-                  state__RSRE= 4;
+                  state__GTRE= 4;
                 };
               };
-              __tmp__BWRE=result__MCGF;
+              __tmp__WWRE=result__3DGF;
             };
-            if (__tmp__BWRE) {
-              __tmp__VYRE=TRUE__;
+            if (__tmp__WWRE) {
+              __tmp__KZRE=TRUE__;
             } else {
-              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'));
+              result__PEGF=(state__GTRE ==  2);
+              if (result__PEGF) {
+                result__W3FH=FALSE__;
+                if ((((__INTEGER_8 )cc__KTRE) >= ((__INTEGER_8 )'0'))) {
+                  result__W3FH=(((__INTEGER_8 )cc__KTRE) <= ((__INTEGER_8 )'9'));
                 };
-                if (result__21EH) {
-                  if (negative__TSRE) {
-                    value__SSRE=(__INTEGER)((__INTEGER)( 10 * value__SSRE) - (__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__VSRE)) -  48));
+                if (result__W3FH) {
+                  if (negative__ITRE) {
+                    value__HTRE=(__INTEGER)((__INTEGER)( 10 * value__HTRE) - (__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__KTRE)) -  48));
                   } else {
-                    value__SSRE=(__INTEGER)((__INTEGER)( 10 * value__SSRE) + (__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__VSRE)) -  48));
+                    value__HTRE=(__INTEGER)((__INTEGER)( 10 * value__HTRE) + (__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__KTRE)) -  48));
                   };
-                  if (((negative__TSRE && (value__SSRE >  0)) || ((! negative__TSRE) && (value__SSRE <  0)))) {
-                    state__RSRE= 4;
+                  if (((negative__ITRE && (value__HTRE >  0)) || ((! negative__ITRE) && (value__HTRE <  0)))) {
+                    state__GTRE= 4;
                   };
-                  __tmp__CYRE=TRUE__;
+                  __tmp__XYRE=TRUE__;
                 } else {
-                  __tmp__CYRE=FALSE__;
+                  __tmp__XYRE=FALSE__;
                 };
-                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;
+                if ((! __tmp__XYRE)) {
+                  if ((((((((cc__KTRE == ' ') || (cc__KTRE == '\t')) || (cc__KTRE == '\n')) || (cc__KTRE == '\r')) || (cc__KTRE == '\0')) || (cc__KTRE == '\f')) || (cc__KTRE == '\v'))) {
+                    state__GTRE= 3;
                   } else {
-                    state__RSRE= 4;
+                    state__GTRE= 4;
                   };
                 };
               };
-              __tmp__VYRE=result__4CGF;
+              __tmp__KZRE=result__PEGF;
             };
-            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;
+            if ((! __tmp__KZRE)) {
+              if ((state__GTRE ==  3)) {
+                if ((! (((((((cc__KTRE == ' ') || (cc__KTRE == '\t')) || (cc__KTRE == '\n')) || (cc__KTRE == '\r')) || (cc__KTRE == '\0')) || (cc__KTRE == '\f')) || (cc__KTRE == '\v')))) {
+                  state__GTRE= 4;
                 };
               };
             };
-            i__QSRE=(__INTEGER)(i__QSRE +  1);
+            i__FTRE=(__INTEGER)(i__FTRE +  1);
           };
-          if (((state__RSRE !=  0) && (state__RSRE !=  4))) {
-            result__USRE=TRUE__;
+          if (((state__GTRE !=  0) && (state__GTRE !=  4))) {
+            result__JTRE=TRUE__;
           };
-          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)) {
+          if ((! result__JTRE)) {
+            pos__PEZG=current_position__B0F();
+            put_error__text__1PG( 0,(&__string_308));
+            put_position__FRG(pos__PEZG);
+            put_string__33F(msg_err__AQG);
+            if ((type_error__5PG !=  2)) {
               exit(( 1));
             };
           };
-          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__;
+          Self__40RE=((__STRING *)string_tmp__VH);
+          state__B1RE= 0;
+          cc__C1RE='\0';
+          negative__D1RE=FALSE__;
+          result__E1RE= 0;
+          i__A1RE= 1;
+          __tmp__Q4GH=Self__40RE->count__SGC;
+          __tmp__R4GH=Self__40RE->storage__3CS;
+          __tmp__S4GH=Self__40RE->count__SGC;
+          while ((i__A1RE <= __tmp__Q4GH)) {
+            cc__C1RE=((__CHARACTER *)__tmp__R4GH)[(__INTEGER)(i__A1RE -  1)];
+            if ((state__B1RE ==  0)) {
+              if ((((((((cc__C1RE == ' ') || (cc__C1RE == '\t')) || (cc__C1RE == '\n')) || (cc__C1RE == '\r')) || (cc__C1RE == '\0')) || (cc__C1RE == '\f')) || (cc__C1RE == '\v'))) {
+                __tmp__Q2RE=TRUE__;
               } else {
-                result__TCQG=(cc__N0RE == '+');
-                if (result__TCQG) {
-                  state__M0RE= 1;
+                result__NEQG=(cc__C1RE == '+');
+                if (result__NEQG) {
+                  state__B1RE= 1;
                 };
-                __tmp__11RE=result__TCQG;
+                __tmp__Q2RE=result__NEQG;
               };
-              if ((! __tmp__11RE)) {
-                if ((cc__N0RE == '-')) {
-                  negative__O0RE=TRUE__;
-                  state__M0RE= 1;
+              if ((! __tmp__Q2RE)) {
+                if ((cc__C1RE == '-')) {
+                  negative__D1RE=TRUE__;
+                  state__B1RE= 1;
                 } else {
-                  result__P0RE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__N0RE)) -  48);
-                  state__M0RE= 2;
+                  result__E1RE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__C1RE)) -  48);
+                  state__B1RE= 2;
                 };
               };
-              __tmp__O2RE=TRUE__;
+              __tmp__D3RE=TRUE__;
             } else {
-              __tmp__O2RE=FALSE__;
+              __tmp__D3RE=FALSE__;
             };
-            if (__tmp__O2RE) {
-              __tmp__D3RE=TRUE__;
+            if (__tmp__D3RE) {
+              __tmp__Y3RE=TRUE__;
             } else {
-              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);
+              result__3FGF=(state__B1RE ==  1);
+              if (result__3FGF) {
+                result__E1RE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__C1RE)) -  48);
+                if (negative__D1RE) {
+                  result__E1RE=(__INTEGER)(- result__E1RE);
                 };
-                state__M0RE= 2;
+                state__B1RE= 2;
               };
-              __tmp__D3RE=result__MEGF;
+              __tmp__Y3RE=result__3FGF;
             };
-            if (__tmp__D3RE) {
-              __tmp__K4RE=TRUE__;
+            if (__tmp__Y3RE) {
+              __tmp__54RE=TRUE__;
             } else {
-              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'));
+              result__PGGF=(state__B1RE ==  2);
+              if (result__PGGF) {
+                result__Y3FH=FALSE__;
+                if ((((__INTEGER_8 )cc__C1RE) >= ((__INTEGER_8 )'0'))) {
+                  result__Y3FH=(((__INTEGER_8 )cc__C1RE) <= ((__INTEGER_8 )'9'));
                 };
-                if (result__IUEH) {
-                  if (negative__O0RE) {
-                    result__P0RE=(__INTEGER)((__INTEGER)( 10 * result__P0RE) - (__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__N0RE)) -  48));
+                if (result__Y3FH) {
+                  if (negative__D1RE) {
+                    result__E1RE=(__INTEGER)((__INTEGER)( 10 * result__E1RE) - (__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__C1RE)) -  48));
                   } else {
-                    result__P0RE=(__INTEGER)((__INTEGER)( 10 * result__P0RE) + (__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__N0RE)) -  48));
+                    result__E1RE=(__INTEGER)((__INTEGER)( 10 * result__E1RE) + (__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__C1RE)) -  48));
                   };
                 } else {
-                  state__M0RE= 3;
+                  state__B1RE= 3;
                 };
               };
-              __tmp__K4RE=result__4EGF;
+              __tmp__54RE=result__PGGF;
             };
-            if ((! __tmp__K4RE)) {
-              if ((state__M0RE ==  3)) {
-                i__L0RE=Self__J0RE->count__EGC;
+            if ((! __tmp__54RE)) {
+              if ((state__B1RE ==  3)) {
+                i__A1RE=__tmp__S4GH;
               };
             };
-            i__L0RE=(__INTEGER)(i__L0RE +  1);
+            i__A1RE=(__INTEGER)(i__A1RE +  1);
           };
-          last_integer__JSO=((__INTEGER_64 )result__P0RE);
+          last_integer__VSO=((__INTEGER_64 )result__E1RE);
         };
       };
     };
   };
-  if (result__T2P) {
-    short__token__to__YCD((&__string_121),pos_old__U2P,position__CCC);
+  if (result__52P) {
+    short__token__to__GDD((&__string_121),pos_old__A3P,position__CCC);
   };
-  return(result__T2P);
+  return(result__52P);
 }
 
-static void* readlip_expr__LVPB()
+static void* readlip_expr__YRPB()
 // () With resultRecursive, No inlinable.
 {
-  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)) {
+  void *result__1RPB,*val__2RPB,*result__ZMYC,*val__BNYC;
+  void *nam__3RPB;
+  __POSITION pos__0EZG,p__RL3B,pos__CFZG,pos__EFZG,pos__GFZG,pos__IFZG;
+  __POSITION pos__KFZG,pos__MFZG,p__LQID,p__UZHE,pos__0FZG;
+  __LIP_AFFECT *result__OW4B,*Self__THHC;
+  __POINTER ptr__PW4B,ptr_table__0WKH,next__ZWKH,result__1WKH;
+  __POINTER ptr_table__5WKH,next__4WKH,result__AXKH,ptr__XWKD;
+  __POINTER ptr_table__ZXKH,next__YXKH,result__0XKH,ptr_table__4XKH;
+  __POINTER next__3XKH,result__5XKH,ptr__OGNE,ptr_table__DYKH;
+  __POINTER next__CYKH,result__EYKH,ptr_table__IYKH,next__HYKH;
+  __POINTER result__JYKH;
+  __INTEGER typ_id__UW4B,typ_id__2WKD,typ_id__TGNE;
+  __UINTEGER_32 sz__RW4B,a__23FH,new_size__33FH,t__B4FH,a__A4FH;
+  __UINTEGER_32 new_size__CXKH,lab_type__BXKH,sz__ZWKD,a__E4FH;
+  __UINTEGER_32 new_size__F4FH,t__J4FH,a__I4FH,new_size__BYKH;
+  __UINTEGER_32 lab_type__AYKH,sz__QGNE,a__M4FH,new_size__N4FH,t__R4FH;
+  __UINTEGER_32 a__Q4FH,new_size__LYKH,lab_type__KYKH;
+  __LIP_IF *result__WWKD,*Self__PVTD;
+  __LIP_PRINT *result__NGNE,*Self__OTWE;
+  __BOOLEAN result__DXKH,__tmp__RTPB,result__GXKH,result__JXKH;
+  __BOOLEAN result__MXKH,result__PXKH,result__SXKH,result__VXKH;
+  __BOOLEAN __tmp__TQYC;
+  __CHARACTER result__EXKH,result__HXKH,result__KXKH,result__NXKH;
+  __CHARACTER result__QXKH,result__TXKH,result__WXKH;
+  void *the__5MYC,*els__ANYC,*result__FFHH,*result__ROID;
+  __FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *Self__GFHH,*Self__HFHH,*Self__QL5D;
+  __FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *Self__GM5D;
+  result__1RPB=NULL;
+  val__2RPB=NULL;
+  nam__3RPB=NULL;
+  old_position__ITI=position__CCC;
+  old_pos_cur__KTI=pos_cur__FCC;
+  old_pos_line__MTI=pos_line__GCC;
+  old_pos_col__OTI=pos_col__HCC;
+  old_short_derive__QTI=short_derive__PCC;
+  if (read_identifier__2BL()) {
+    nam__3RPB=last_string__D2C;
+    if (read_symbol__4YJ((&__string_12))) {
+      val__2RPB=readlip_expr_operator__GMZB(PARSER__);
+      if (((void *)val__2RPB == (void *)NULL)) {
+        pos__0EZG=current_position__B0F();
+        put_error__text__1PG( 0,(&__string_239));
+        put_position__FRG(pos__0EZG);
+        put_string__33F(msg_err__AQG);
+        if ((type_error__5PG !=  2)) {
           exit(( 1));
         };
       };
-      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)));
+      p__RL3B=current_position__B0F();
+      result__OW4B=NULL;
+      ptr__PW4B=((__POINTER )(NULL));
+      typ_id__UW4B= 0;
+      sz__RW4B=((__UINTEGER_32 )sizeof(__LIP_AFFECT));
+      if ((sz__RW4B ==  0)) {
+        result__OW4B=LIP_AFFECT__;
+      } else {
+        typ_id__UW4B=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__RW4B);
+        if ((typ_id__UW4B == (__INTEGER)(-  1))) {
+          a__23FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__33FH=(__UINTEGER_32)((__UINTEGER_32)(sz__RW4B + a__23FH) & (__UINTEGER_32)(~ a__23FH));
+          ptr_table__0WKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__33FH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__ZWKH=((__POINTER )(NULL));
+          result__1WKH=((__POINTER *)ptr_table__0WKH)[ 0];
+          if ((result__1WKH == (void *)NULL)) {
+            result__1WKH=new_lab__RTJ(new_size__33FH);
+            next__ZWKH=(void *)((unsigned long)result__1WKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__33FH)));
+            ((__POINTER *)next__ZWKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__0WKH)[ 0]=next__ZWKH;
+          } else {
+            next__ZWKH=((__POINTER *)result__1WKH)[ 0];
+            if ((next__ZWKH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1WKH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__33FH <<  1)) <=  4096)) {
+                next__ZWKH=(void *)((unsigned long)result__1WKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__33FH)));
               } else {
-                next__Q5JH=new_lab__FTJ(new_size__BVGH);
-              };
-              ((__POINTER *)next__Q5JH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__R5JH)[ 0]=next__Q5JH;
-            } else {
-              ((__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)));
+                next__ZWKH=new_lab__RTJ(new_size__33FH);
+              };
+              ((__POINTER *)next__ZWKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__0WKH)[ 0]=next__ZWKH;
+            } else {
+              ((__POINTER *)result__1WKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZWKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__1WKH=next__ZWKH;
+            };
+          };
+          ptr__PW4B=result__1WKH;
+        } else {
+          t__B4FH=((__UINTEGER_32 )typ_id__UW4B);
+          a__A4FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__CXKH=(__UINTEGER_32)((__UINTEGER_32)(sz__RW4B + a__A4FH) & (__UINTEGER_32)(~ a__A4FH));
+          ptr_table__5WKH=((__POINTER )(&(table_type[(t__B4FH)])));
+          lab_type__BXKH=(__UINTEGER_32)(t__B4FH |  1);
+          next__4WKH=((__POINTER )(NULL));
+          result__AXKH=((__POINTER *)ptr_table__5WKH)[ 0];
+          if ((result__AXKH == (void *)NULL)) {
+            result__AXKH=new_lab__RTJ(lab_type__BXKH);
+            next__4WKH=(void *)((unsigned long)result__AXKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CXKH)));
+            ((__POINTER *)next__4WKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__5WKH)[ 0]=next__4WKH;
+          } else {
+            next__4WKH=((__POINTER *)result__AXKH)[ 0];
+            if ((next__4WKH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__AXKH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__CXKH <<  1)) <=  4096)) {
+                next__4WKH=(void *)((unsigned long)result__AXKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CXKH)));
               } else {
-                next__V5JH=new_lab__FTJ(lab_type__Y5JH);
+                next__4WKH=new_lab__RTJ(lab_type__BXKH);
               };
-              ((__POINTER *)next__V5JH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__W5JH)[ 0]=next__V5JH;
+              ((__POINTER *)next__4WKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__5WKH)[ 0]=next__4WKH;
             } else {
-              ((__POINTER *)result__X5JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__V5JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__X5JH=next__V5JH;
+              ((__POINTER *)result__AXKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4WKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__AXKH=next__4WKH;
             };
           };
-          ptr__C04B=result__X5JH;
+          ptr__PW4B=result__AXKH;
         };
-        result__B04B=((__LIP_AFFECT *)ptr__C04B);
-        *(result__B04B) = *(LIP_AFFECT__);
+        result__OW4B=((__LIP_AFFECT *)ptr__PW4B);
+        *(result__OW4B) = *(LIP_AFFECT__);
       };
-      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;
+      Self__THHC=((__LIP_AFFECT *)result__OW4B);
+      Self__THHC->parent_lip_code__YSPB.parent_itm_object__XFE.position__SFJ=p__RL3B;
+      Self__THHC->name__AGFC=nam__3RPB;
+      Self__THHC->value__SGFC=val__2RPB;
+      result__1RPB=result__OW4B;
     } else {
-      restore_context__YEL();
+      restore_context__EFL();
     };
   };
-  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__;
+  if (((void *)result__1RPB == (void *)NULL)) {
+    result__1RPB=readlip_expr_operator__GMZB(PARSER__);
+    if (((void *)result__1RPB != (void *)NULL)) {
+      result__DXKH=FALSE__;
+      if ((! read_space__XTD())) {
+        result__DXKH=FALSE__;
       } else {
-        result__15JH='\0';
-        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__15JH=((__CHARACTER )(( 0)));
+        result__EXKH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+          result__EXKH=((__CHARACTER )(( 0)));
         } else {
-          result__15JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+          result__EXKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__15JH == '.')) {
+        if ((result__EXKH == '.')) {
           position__CCC=(__INTEGER)(position__CCC +  1);
-          result__05JH=TRUE__;
+          result__DXKH=TRUE__;
         };
       };
-      __tmp__EXPB=result__05JH;
+      __tmp__RTPB=result__DXKH;
     } else {
-      __tmp__EXPB=FALSE__;
+      __tmp__RTPB=FALSE__;
     };
-    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);
+    if (__tmp__RTPB) {
+      result__ZMYC=NULL;
+      the__5MYC=NULL;
+      els__ANYC=NULL;
+      val__BNYC=NULL;
+      if (read_word__ISF((&__string_89))) {
+        result__FFHH=NULL;
+        if ((((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)free_list__XOID)->parent_arrayed_collection__WOID.upper__PTTD <  0)) {
+          result__FFHH=create_with_capacity__DWKD( 16);
         } else {
-          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);
+          Self__GFHH=((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)free_list__XOID);
+          result__FFHH=((void **)Self__GFHH->parent_arrayed_collection__WOID.storage__MGUD)[Self__GFHH->parent_arrayed_collection__WOID.upper__PTTD];
+          Self__HFHH=((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)free_list__XOID);
+          Self__HFHH->parent_arrayed_collection__WOID.upper__PTTD=(__INTEGER)(Self__HFHH->parent_arrayed_collection__WOID.upper__PTTD -  1);
         };
-        the__FQYC=result__GKIH;
-        result__35JH=FALSE__;
-        if ((! read_space__MTD())) {
-          result__35JH=FALSE__;
+        the__5MYC=result__FFHH;
+        result__GXKH=FALSE__;
+        if ((! read_space__XTD())) {
+          result__GXKH=FALSE__;
         } else {
-          result__45JH='\0';
-          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__45JH=((__CHARACTER )(( 0)));
+          result__HXKH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+            result__HXKH=((__CHARACTER )(( 0)));
           } else {
-            result__45JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+            result__HXKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__45JH == '{')) {
+          if ((result__HXKH == '{')) {
             position__CCC=(__INTEGER)(position__CCC +  1);
-            result__35JH=TRUE__;
+            result__GXKH=TRUE__;
           };
         };
-        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)) {
+        if ((! result__GXKH)) {
+          pos__CFZG=current_position__B0F();
+          put_error__text__1PG( 2,(&__string_273));
+          put_position__FRG(pos__CFZG);
+          put_string__33F(msg_err__AQG);
+          if ((type_error__5PG !=  2)) {
             exit(( 1));
           };
         };
-        while_do__WPID:
+        while_do__MPID:
         {
-          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__BAKH='\0';
-              if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                result__BAKH=((__CHARACTER )(( 0)));
+          val__BNYC=readlip_expr__YRPB();
+          if (((void *)val__BNYC != (void *)NULL)) {
+            add_last__JOUD(the__5MYC,val__BNYC);
+            result__JXKH=FALSE__;
+            if ((! read_space__XTD())) {
+              result__JXKH=FALSE__;
+            } else {
+              result__KXKH='\0';
+              if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+                result__KXKH=((__CHARACTER )(( 0)));
               } else {
-                result__BAKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+                result__KXKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
               };
-              if ((result__BAKH == ';')) {
+              if ((result__KXKH == ';')) {
                 position__CCC=(__INTEGER)(position__CCC +  1);
-                result__AAKH=TRUE__;
+                result__JXKH=TRUE__;
               };
             };
-            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)) {
+            if ((! result__JXKH)) {
+              pos__EFZG=current_position__B0F();
+              put_error__text__1PG( 2,(&__string_167));
+              put_position__FRG(pos__EFZG);
+              put_string__33F(msg_err__AQG);
+              if ((type_error__5PG !=  2)) {
                 exit(( 1));
               };
             };
-            goto while_do__WPID;
+            goto while_do__MPID;
           };
         };
-        result__DAKH=FALSE__;
-        if ((! read_space__MTD())) {
-          result__DAKH=FALSE__;
+        result__MXKH=FALSE__;
+        if ((! read_space__XTD())) {
+          result__MXKH=FALSE__;
         } else {
-          result__EAKH='\0';
-          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__EAKH=((__CHARACTER )(( 0)));
+          result__NXKH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+            result__NXKH=((__CHARACTER )(( 0)));
           } else {
-            result__EAKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+            result__NXKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__EAKH == '}')) {
+          if ((result__NXKH == '}')) {
             position__CCC=(__INTEGER)(position__CCC +  1);
-            result__DAKH=TRUE__;
+            result__MXKH=TRUE__;
           };
         };
-        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)) {
+        if ((! result__MXKH)) {
+          pos__GFZG=current_position__B0F();
+          put_error__text__1PG( 2,(&__string_273));
+          put_position__FRG(pos__GFZG);
+          put_string__33F(msg_err__AQG);
+          if ((type_error__5PG !=  2)) {
             exit(( 1));
           };
         };
-        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);
+        the__5MYC=copy__ZPID(result__FFHH);
+        if (read_word__ISF((&__string_90))) {
+          result__ROID=NULL;
+          if ((((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)free_list__XOID)->parent_arrayed_collection__WOID.upper__PTTD <  0)) {
+            result__ROID=create_with_capacity__DWKD( 16);
           } else {
-            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);
+            Self__QL5D=((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)free_list__XOID);
+            result__ROID=((void **)Self__QL5D->parent_arrayed_collection__WOID.storage__MGUD)[Self__QL5D->parent_arrayed_collection__WOID.upper__PTTD];
+            Self__GM5D=((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)free_list__XOID);
+            Self__GM5D->parent_arrayed_collection__WOID.upper__PTTD=(__INTEGER)(Self__GM5D->parent_arrayed_collection__WOID.upper__PTTD -  1);
           };
-          els__GQYC=result__1OID;
-          result__GAKH=FALSE__;
-          if ((! read_space__MTD())) {
-            result__GAKH=FALSE__;
+          els__ANYC=result__ROID;
+          result__PXKH=FALSE__;
+          if ((! read_space__XTD())) {
+            result__PXKH=FALSE__;
           } else {
-            result__HAKH='\0';
-            if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-              result__HAKH=((__CHARACTER )(( 0)));
+            result__QXKH='\0';
+            if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+              result__QXKH=((__CHARACTER )(( 0)));
             } else {
-              result__HAKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+              result__QXKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
             };
-            if ((result__HAKH == '{')) {
+            if ((result__QXKH == '{')) {
               position__CCC=(__INTEGER)(position__CCC +  1);
-              result__GAKH=TRUE__;
+              result__PXKH=TRUE__;
             };
           };
-          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)) {
+          if ((! result__PXKH)) {
+            pos__IFZG=current_position__B0F();
+            put_error__text__1PG( 2,(&__string_273));
+            put_position__FRG(pos__IFZG);
+            put_string__33F(msg_err__AQG);
+            if ((type_error__5PG !=  2)) {
               exit(( 1));
             };
           };
-          while_do__5AMD:
+          while_do__ECMD:
           {
-            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__;
+            val__BNYC=readlip_expr__YRPB();
+            if (((void *)val__BNYC != (void *)NULL)) {
+              add_last__JOUD(els__ANYC,val__BNYC);
+              result__SXKH=FALSE__;
+              if ((! read_space__XTD())) {
+                result__SXKH=FALSE__;
               } else {
-                result__KAKH='\0';
-                if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                  result__KAKH=((__CHARACTER )(( 0)));
+                result__TXKH='\0';
+                if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+                  result__TXKH=((__CHARACTER )(( 0)));
                 } else {
-                  result__KAKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+                  result__TXKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
                 };
-                if ((result__KAKH == ';')) {
+                if ((result__TXKH == ';')) {
                   position__CCC=(__INTEGER)(position__CCC +  1);
-                  result__JAKH=TRUE__;
+                  result__SXKH=TRUE__;
                 };
               };
-              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)) {
+              if ((! result__SXKH)) {
+                pos__KFZG=current_position__B0F();
+                put_error__text__1PG( 2,(&__string_167));
+                put_position__FRG(pos__KFZG);
+                put_string__33F(msg_err__AQG);
+                if ((type_error__5PG !=  2)) {
                   exit(( 1));
                 };
               };
-              goto while_do__5AMD;
+              goto while_do__ECMD;
             };
           };
-          result__MAKH=FALSE__;
-          if ((! read_space__MTD())) {
-            result__MAKH=FALSE__;
+          result__VXKH=FALSE__;
+          if ((! read_space__XTD())) {
+            result__VXKH=FALSE__;
           } else {
-            result__NAKH='\0';
-            if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-              result__NAKH=((__CHARACTER )(( 0)));
+            result__WXKH='\0';
+            if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+              result__WXKH=((__CHARACTER )(( 0)));
             } else {
-              result__NAKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+              result__WXKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
             };
-            if ((result__NAKH == '}')) {
+            if ((result__WXKH == '}')) {
               position__CCC=(__INTEGER)(position__CCC +  1);
-              result__MAKH=TRUE__;
+              result__VXKH=TRUE__;
             };
           };
-          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)) {
+          if ((! result__VXKH)) {
+            pos__MFZG=current_position__B0F();
+            put_error__text__1PG( 2,(&__string_273));
+            put_position__FRG(pos__MFZG);
+            put_string__33F(msg_err__AQG);
+            if ((type_error__5PG !=  2)) {
               exit(( 1));
             };
           };
-          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__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)));
+          els__ANYC=copy__ZPID(result__ROID);
+        };
+        p__LQID=current_position__B0F();
+        result__WWKD=NULL;
+        ptr__XWKD=((__POINTER )(NULL));
+        typ_id__2WKD= 0;
+        sz__ZWKD=((__UINTEGER_32 )sizeof(__LIP_IF));
+        if ((sz__ZWKD ==  0)) {
+          result__WWKD=LIP_IF__;
+        } else {
+          typ_id__2WKD=-1;
+          clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__ZWKD);
+          if ((typ_id__2WKD == (__INTEGER)(-  1))) {
+            a__E4FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__F4FH=(__UINTEGER_32)((__UINTEGER_32)(sz__ZWKD + a__E4FH) & (__UINTEGER_32)(~ a__E4FH));
+            ptr_table__ZXKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__F4FH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__YXKH=((__POINTER )(NULL));
+            result__0XKH=((__POINTER *)ptr_table__ZXKH)[ 0];
+            if ((result__0XKH == (void *)NULL)) {
+              result__0XKH=new_lab__RTJ(new_size__F4FH);
+              next__YXKH=(void *)((unsigned long)result__0XKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__F4FH)));
+              ((__POINTER *)next__YXKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__ZXKH)[ 0]=next__YXKH;
+            } else {
+              next__YXKH=((__POINTER *)result__0XKH)[ 0];
+              if ((next__YXKH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__0XKH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__F4FH <<  1)) <=  4096)) {
+                  next__YXKH=(void *)((unsigned long)result__0XKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__F4FH)));
                 } else {
-                  next__PAKH=new_lab__FTJ(new_size__JVGH);
+                  next__YXKH=new_lab__RTJ(new_size__F4FH);
                 };
-                ((__POINTER *)next__PAKH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__QAKH)[ 0]=next__PAKH;
+                ((__POINTER *)next__YXKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__ZXKH)[ 0]=next__YXKH;
               } else {
-                ((__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__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)));
+                ((__POINTER *)result__0XKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YXKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__0XKH=next__YXKH;
+              };
+            };
+            ptr__XWKD=result__0XKH;
+          } else {
+            t__J4FH=((__UINTEGER_32 )typ_id__2WKD);
+            a__I4FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__BYKH=(__UINTEGER_32)((__UINTEGER_32)(sz__ZWKD + a__I4FH) & (__UINTEGER_32)(~ a__I4FH));
+            ptr_table__4XKH=((__POINTER )(&(table_type[(t__J4FH)])));
+            lab_type__AYKH=(__UINTEGER_32)(t__J4FH |  1);
+            next__3XKH=((__POINTER )(NULL));
+            result__5XKH=((__POINTER *)ptr_table__4XKH)[ 0];
+            if ((result__5XKH == (void *)NULL)) {
+              result__5XKH=new_lab__RTJ(lab_type__AYKH);
+              next__3XKH=(void *)((unsigned long)result__5XKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BYKH)));
+              ((__POINTER *)next__3XKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__4XKH)[ 0]=next__3XKH;
+            } else {
+              next__3XKH=((__POINTER *)result__5XKH)[ 0];
+              if ((next__3XKH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__5XKH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__BYKH <<  1)) <=  4096)) {
+                  next__3XKH=(void *)((unsigned long)result__5XKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BYKH)));
                 } else {
-                  next__UAKH=new_lab__FTJ(lab_type__XAKH);
+                  next__3XKH=new_lab__RTJ(lab_type__AYKH);
                 };
-                ((__POINTER *)next__UAKH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__VAKH)[ 0]=next__UAKH;
+                ((__POINTER *)next__3XKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__4XKH)[ 0]=next__3XKH;
               } else {
-                ((__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;
+                ((__POINTER *)result__5XKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3XKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__5XKH=next__3XKH;
+              };
+            };
+            ptr__XWKD=result__5XKH;
+          };
+          result__WWKD=((__LIP_IF *)ptr__XWKD);
+          *(result__WWKD) = *(LIP_IF__);
+        };
+        Self__PVTD=((__LIP_IF *)result__WWKD);
+        Self__PVTD->parent_lip_code__PQYC.parent_itm_object__XFE.position__SFJ=p__LQID;
+        Self__PVTD->condition__3FQD=result__1RPB;
+        Self__PVTD->then__TGQD=the__5MYC;
+        Self__PVTD->else__KHQD=els__ANYC;
+        result__ZMYC=result__WWKD;
+        __tmp__TQYC=TRUE__;
+      } else {
+        __tmp__TQYC=FALSE__;
+      };
+      if ((! __tmp__TQYC)) {
+        if (read_word__ISF((&__string_91))) {
+          p__UZHE=current_position__B0F();
+          result__NGNE=NULL;
+          ptr__OGNE=((__POINTER )(NULL));
+          typ_id__TGNE= 0;
+          sz__QGNE=((__UINTEGER_32 )sizeof(__LIP_PRINT));
+          if ((sz__QGNE ==  0)) {
+            result__NGNE=LIP_PRINT__;
+          } else {
+            typ_id__TGNE=-1;
+            clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__QGNE);
+            if ((typ_id__TGNE == (__INTEGER)(-  1))) {
+              a__M4FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__N4FH=(__UINTEGER_32)((__UINTEGER_32)(sz__QGNE + a__M4FH) & (__UINTEGER_32)(~ a__M4FH));
+              ptr_table__DYKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__N4FH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__CYKH=((__POINTER )(NULL));
+              result__EYKH=((__POINTER *)ptr_table__DYKH)[ 0];
+              if ((result__EYKH == (void *)NULL)) {
+                result__EYKH=new_lab__RTJ(new_size__N4FH);
+                next__CYKH=(void *)((unsigned long)result__EYKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__N4FH)));
+                ((__POINTER *)next__CYKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__DYKH)[ 0]=next__CYKH;
               } else {
-                next__ZAKH=((__POINTER *)result__1AKH)[ 0];
-                if ((next__ZAKH == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1AKH - (unsigned long)begin_memory__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)));
+                next__CYKH=((__POINTER *)result__EYKH)[ 0];
+                if ((next__CYKH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__EYKH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__N4FH <<  1)) <=  4096)) {
+                    next__CYKH=(void *)((unsigned long)result__EYKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__N4FH)));
                   } else {
-                    next__ZAKH=new_lab__FTJ(new_size__RVGH);
+                    next__CYKH=new_lab__RTJ(new_size__N4FH);
                   };
-                  ((__POINTER *)next__ZAKH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__0AKH)[ 0]=next__ZAKH;
+                  ((__POINTER *)next__CYKH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__DYKH)[ 0]=next__CYKH;
                 } else {
-                  ((__POINTER *)result__1AKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZAKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__1AKH=next__ZAKH;
+                  ((__POINTER *)result__EYKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CYKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__EYKH=next__CYKH;
                 };
               };
-              ptr__5FNE=result__1AKH;
-            } else {
-              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;
+              ptr__OGNE=result__EYKH;
+            } else {
+              t__R4FH=((__UINTEGER_32 )typ_id__TGNE);
+              a__Q4FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__LYKH=(__UINTEGER_32)((__UINTEGER_32)(sz__QGNE + a__Q4FH) & (__UINTEGER_32)(~ a__Q4FH));
+              ptr_table__IYKH=((__POINTER )(&(table_type[(t__R4FH)])));
+              lab_type__KYKH=(__UINTEGER_32)(t__R4FH |  1);
+              next__HYKH=((__POINTER )(NULL));
+              result__JYKH=((__POINTER *)ptr_table__IYKH)[ 0];
+              if ((result__JYKH == (void *)NULL)) {
+                result__JYKH=new_lab__RTJ(lab_type__KYKH);
+                next__HYKH=(void *)((unsigned long)result__JYKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LYKH)));
+                ((__POINTER *)next__HYKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__IYKH)[ 0]=next__HYKH;
               } else {
-                next__4AKH=((__POINTER *)result__ABKH)[ 0];
-                if ((next__4AKH == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ABKH - (unsigned long)begin_memory__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)));
+                next__HYKH=((__POINTER *)result__JYKH)[ 0];
+                if ((next__HYKH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__JYKH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__LYKH <<  1)) <=  4096)) {
+                    next__HYKH=(void *)((unsigned long)result__JYKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LYKH)));
                   } else {
-                    next__4AKH=new_lab__FTJ(lab_type__BBKH);
+                    next__HYKH=new_lab__RTJ(lab_type__KYKH);
                   };
-                  ((__POINTER *)next__4AKH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__5AKH)[ 0]=next__4AKH;
+                  ((__POINTER *)next__HYKH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__IYKH)[ 0]=next__HYKH;
                 } else {
-                  ((__POINTER *)result__ABKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4AKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__ABKH=next__4AKH;
+                  ((__POINTER *)result__JYKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HYKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__JYKH=next__HYKH;
                 };
               };
-              ptr__5FNE=result__ABKH;
+              ptr__OGNE=result__JYKH;
             };
-            result__4FNE=((__LIP_PRINT *)ptr__5FNE);
-            *(result__4FNE) = *(LIP_PRINT__);
+            result__NGNE=((__LIP_PRINT *)ptr__OGNE);
+            *(result__NGNE) = *(LIP_PRINT__);
           };
-          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;
+          Self__OTWE=((__LIP_PRINT *)result__NGNE);
+          Self__OTWE->parent_lip_code__BRYC.parent_itm_object__XFE.position__SFJ=p__UZHE;
+          Self__OTWE->message__NVUE=result__1RPB;
+          result__ZMYC=result__NGNE;
         };
       };
-      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)) {
+      result__1RPB=result__ZMYC;
+      if (((void *)result__ZMYC == (void *)NULL)) {
+        pos__0FZG=current_position__B0F();
+        put_error__text__1PG( 0,(&__string_276));
+        put_position__FRG(pos__0FZG);
+        put_string__33F(msg_err__AQG);
+        if ((type_error__5PG !=  2)) {
           exit(( 1));
         };
       };
     };
   };
-  return(result__OVPB);
+  return(result__1RPB);
 }
 
-static void run__JJFC(__LIP_AFFECT *Self__KJFC)
+static void run__0FFC(__LIP_AFFECT *Self__1FFC)
 // ({LIP_AFFECT}) VoidNo recursive, No inlinable.
 {
-  __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)) {
+  __POSITION pos__1H2G,pos__OK5C;
+  void *__tmp__TGFC;
+  void *__tmp__UGFC,*__tmp__NYKH,*__tmp__OYKH;
+  __LIP_INTEGER *Self__PYKH;
+  __LIP_STRING *Self__QYKH;
+  if (((void *)fast_reference_at__PXRD(list_data__HONC,Self__1FFC->name__AGFC) == (void *)NULL)) {
+    copy__VDS(string_tmp__VH,(&__string_309));
+    append__3OS(string_tmp__VH,Self__1FFC->name__AGFC);
+    append__3OS(string_tmp__VH,(&__string_310));
+    pos__1H2G=Self__1FFC->parent_lip_code__YSPB.parent_itm_object__XFE.position__SFJ;
+    put_error__text__1PG( 1,string_tmp__VH);
+    put_position__FRG(pos__1H2G);
+    put_string__33F(msg_err__AQG);
+    if ((type_error__5PG !=  2)) {
       exit(( 1));
     };
   };
-  __tmp__CKFC=Self__KJFC->value__BKFC;
-  switch (((struct ___OBJ *)__tmp__CKFC)->__id) {
+  __tmp__TGFC=Self__1FFC->value__SGFC;
+  switch (((struct ___OBJ *)__tmp__TGFC)->__id) {
   case __LIP_BINARY__: {
-    __tmp__DKFC=run_expr__A1QD(__tmp__CKFC);
+    __tmp__UGFC=run_expr__D2QD(__tmp__TGFC);
   } break;
   case __LIP_UNARY__: {
-    __tmp__DKFC=run_expr__53QD(__tmp__CKFC);
+    __tmp__UGFC=run_expr__C5QD(__tmp__TGFC);
   } break;
   case __LIP_CALL__: {
-    __tmp__DKFC=run_expr__XWUE(__tmp__CKFC);
+    __tmp__UGFC=run_expr__IXUE(__tmp__TGFC);
   } break;
   case __LIP_VALUE__: {
-    __tmp__EBKH=((__LIP_VALUE *)__tmp__CKFC)->value__X0UE;
-    switch (((struct ___OBJ *)__tmp__EBKH)->__id) {
+    __tmp__NYKH=((__LIP_VALUE *)__tmp__TGFC)->value__I1UE;
+    switch (((struct ___OBJ *)__tmp__NYKH)->__id) {
     case __LIP_BOOLEAN__: {
-      __tmp__FBKH=((__LIP_BOOLEAN *)__tmp__EBKH);
+      __tmp__OYKH=((__LIP_BOOLEAN *)__tmp__NYKH);
     } break;
     case __LIP_INTEGER__: {
-      Self__GBKH=((__LIP_INTEGER *)__tmp__EBKH);
-      __tmp__FBKH=get__5XSE(Self__GBKH,Self__GBKH->value__LN4F);
+      Self__PYKH=((__LIP_INTEGER *)__tmp__NYKH);
+      __tmp__OYKH=get__UYSE(Self__PYKH,Self__PYKH->value__FP4F);
     } break;
     case __LIP_STRING__: {
-      Self__HBKH=((__LIP_STRING *)__tmp__EBKH);
-      __tmp__FBKH=get__M3FF(Self__HBKH,Self__HBKH->value__FSUE);
+      Self__QYKH=((__LIP_STRING *)__tmp__NYKH);
+      __tmp__OYKH=get__34FF(Self__QYKH,Self__QYKH->value__WSUE);
     } break;
     };
-    __tmp__DKFC=__tmp__FBKH;
+    __tmp__UGFC=__tmp__OYKH;
   } break;
   };
   print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
-  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)) {
+  pos__OK5C=Self__1FFC->parent_lip_code__YSPB.parent_itm_object__XFE.position__SFJ;
+  put_error__text__1PG( 1,(&__string_279));
+  put_position__FRG(pos__OK5C);
+  put_string__33F(msg_err__AQG);
+  if ((type_error__5PG !=  2)) {
     exit(( 1));
   };
-  switch (((struct ___OBJ *)__tmp__DKFC)->__id) {
+  switch (((struct ___OBJ *)__tmp__UGFC)->__id) {
   case __LIP_BOOLEAN__: {
   } break;
   case __LIP_INTEGER__: {
-    free__DC4F(__tmp__DKFC);
+    free__3D4F(__tmp__UGFC);
   } break;
   case __LIP_STRING__: {
-    free__RGIG(__tmp__DKFC);
+    free__LIIG(__tmp__UGFC);
   } break;
   };
 }
 
-static void run__FQUE(__LIP_CALL *Self__GQUE)
+static void run__WQUE(__LIP_CALL *Self__XQUE)
 // ({LIP_CALL}) VoidNo recursive, No inlinable.
 {
-  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) {
+  void *val__0QUE,*__tmp__GRUE,*__tmp__SYKH,*__tmp__TYKH;
+  void *str__1QUE,*__tmp__LSUE,*__tmp__TTUE;
+  void *path__2QUE,*n__01KF;
+  void *__tmp__FRUE;
+  __LIP_INTEGER *Self__UYKH;
+  __LIP_STRING *Self__VYKH;
+  __POSITION pos__B1KF,pos__4H2G,pos__BI2G,pos__EI2G,pos__HI2G;
+  __STRING_CONSTANT *Self__S4FH;
+  __STRING *Self__T4FH,*Self__T4GH;
+  __INTEGER new_capacity__0LIH,old_nb_elts__3LIH,upper__ZYKH,Self__XYKH;
+  __INTEGER j__21KF,__tmp__04FH;
+  void *result__31KF;
+  __BOOLEAN is_rec__3QUE,__tmp__3RUE,__tmp__FTUE,result__IVXE;
+  __BOOLEAN __tmp__02KF;
+  __CHARACTER *Self__2LIH,*new__4LIH;
+  val__0QUE=NULL;
+  str__1QUE=NULL;
+  path__2QUE=NULL;
+  is_rec__3QUE=FALSE__;
+  if (((void *)Self__XQUE->argument__4QUE != (void *)NULL)) {
+    __tmp__FRUE=Self__XQUE->argument__4QUE;
+    switch (((struct ___OBJ *)__tmp__FRUE)->__id) {
     case __LIP_BINARY__: {
-      __tmp__VQUE=run_expr__A1QD(__tmp__UQUE);
+      __tmp__GRUE=run_expr__D2QD(__tmp__FRUE);
     } break;
     case __LIP_UNARY__: {
-      __tmp__VQUE=run_expr__53QD(__tmp__UQUE);
+      __tmp__GRUE=run_expr__C5QD(__tmp__FRUE);
     } break;
     case __LIP_CALL__: {
-      __tmp__VQUE=run_expr__XWUE(__tmp__UQUE);
+      __tmp__GRUE=run_expr__IXUE(__tmp__FRUE);
     } break;
     case __LIP_VALUE__: {
-      __tmp__JBKH=((__LIP_VALUE *)__tmp__UQUE)->value__X0UE;
-      switch (((struct ___OBJ *)__tmp__JBKH)->__id) {
+      __tmp__SYKH=((__LIP_VALUE *)__tmp__FRUE)->value__I1UE;
+      switch (((struct ___OBJ *)__tmp__SYKH)->__id) {
       case __LIP_BOOLEAN__: {
-        __tmp__KBKH=((__LIP_BOOLEAN *)__tmp__JBKH);
+        __tmp__TYKH=((__LIP_BOOLEAN *)__tmp__SYKH);
       } break;
       case __LIP_INTEGER__: {
-        Self__LBKH=((__LIP_INTEGER *)__tmp__JBKH);
-        __tmp__KBKH=get__5XSE(Self__LBKH,Self__LBKH->value__LN4F);
+        Self__UYKH=((__LIP_INTEGER *)__tmp__SYKH);
+        __tmp__TYKH=get__UYSE(Self__UYKH,Self__UYKH->value__FP4F);
       } break;
       case __LIP_STRING__: {
-        Self__MBKH=((__LIP_STRING *)__tmp__JBKH);
-        __tmp__KBKH=get__M3FF(Self__MBKH,Self__MBKH->value__FSUE);
+        Self__VYKH=((__LIP_STRING *)__tmp__SYKH);
+        __tmp__TYKH=get__34FF(Self__VYKH,Self__VYKH->value__WSUE);
       } break;
       };
-      __tmp__VQUE=__tmp__KBKH;
+      __tmp__GRUE=__tmp__TYKH;
     } break;
     };
-    val__JQUE=__tmp__VQUE;
+    val__0QUE=__tmp__GRUE;
   };
-  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)) {
+  if (((void *)Self__XQUE->name__JRUE == (void *)(&__string_92))) {
+    if (((void *)val__0QUE != (void *)NULL)) {
+      pos__B1KF=Self__XQUE->parent_lip_code__XZ4B.parent_itm_object__XFE.position__SFJ;
+      put_error__text__1PG( 2,(&__string_311));
+      put_position__FRG(pos__B1KF);
+      put_string__33F(msg_err__AQG);
+      if ((type_error__5PG !=  2)) {
         exit(( 1));
       };
     };
     exit(( 1));
-    __tmp__MRUE=TRUE__;
+    __tmp__3RUE=TRUE__;
   } else {
-    __tmp__MRUE=FALSE__;
+    __tmp__3RUE=FALSE__;
   };
-  if (__tmp__MRUE) {
-    __tmp__USUE=TRUE__;
+  if (__tmp__3RUE) {
+    __tmp__FTUE=TRUE__;
   } else {
-    result__PUXE=((void *)Self__GQUE->name__YQUE == (void *)(&__string_94));
-    if (result__PUXE) {
-      if (val__JQUE==NULL) {
-        __tmp__0RUE=NULL;
+    result__IVXE=((void *)Self__XQUE->name__JRUE == (void *)(&__string_94));
+    if (result__IVXE) {
+      if (val__0QUE==NULL) {
+        __tmp__LSUE=NULL;
       } else {
-        switch (((struct ___OBJ *)val__JQUE)->__id) {
+        switch (((struct ___OBJ *)val__0QUE)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__0RUE=NULL;
+          __tmp__LSUE=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__0RUE=NULL;
+          __tmp__LSUE=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__0RUE=((void *)val__JQUE);
+          __tmp__LSUE=((void *)val__0QUE);
         } break;
         }
       };
-      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)) {
+      str__1QUE=__tmp__LSUE;
+      if (((void *)__tmp__LSUE == (void *)NULL)) {
+        pos__4H2G=Self__XQUE->parent_lip_code__XZ4B.parent_itm_object__XFE.position__SFJ;
+        put_error__text__1PG( 1,(&__string_312));
+        put_position__FRG(pos__4H2G);
+        put_string__33F(msg_err__AQG);
+        if ((type_error__5PG !=  2)) {
           exit(( 1));
         };
       };
-      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;
+      path__2QUE=((__LIP_STRING *)__tmp__LSUE)->value__WSUE;
+      Self__S4FH=((__STRING_CONSTANT *)path__2QUE);
+      if ((((__CHARACTER *)Self__S4FH->storage__RRO)[(__INTEGER)(Self__S4FH->count__DD -  1)] == '*')) {
+        copy__VDS(string_tmp__VH,path__2QUE);
+        Self__T4FH=((__STRING *)string_tmp__VH);
+        if (( 1 > Self__T4FH->count__SGC)) {
+          Self__T4FH->count__SGC= 0;
         } else {
-          Self__XVGH->count__EGC=(__INTEGER)(Self__XVGH->count__EGC -  1);
+          Self__T4FH->count__SGC=(__INTEGER)(Self__T4FH->count__SGC -  1);
         };
-        path__LQUE=get__YWB(string_tmp__VH);
-        is_rec__MQUE=TRUE__;
+        path__2QUE=get__YWB(string_tmp__VH);
+        is_rec__3QUE=TRUE__;
       };
-      load_directory__is_recursive__RCXF(Self__GQUE,path__LQUE,is_rec__MQUE);
+      load_directory__is_recursive__LEXF(Self__XQUE,path__2QUE,is_rec__3QUE);
     };
-    __tmp__USUE=result__PUXE;
+    __tmp__FTUE=result__IVXE;
   };
-  if ((! __tmp__USUE)) {
-    if (((void *)Self__GQUE->name__YQUE == (void *)(&__string_93))) {
-      if (val__JQUE==NULL) {
-        __tmp__CTUE=NULL;
+  if ((! __tmp__FTUE)) {
+    if (((void *)Self__XQUE->name__JRUE == (void *)(&__string_93))) {
+      if (val__0QUE==NULL) {
+        __tmp__TTUE=NULL;
       } else {
-        switch (((struct ___OBJ *)val__JQUE)->__id) {
+        switch (((struct ___OBJ *)val__0QUE)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__CTUE=NULL;
+          __tmp__TTUE=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__CTUE=NULL;
+          __tmp__TTUE=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__CTUE=((void *)val__JQUE);
+          __tmp__TTUE=((void *)val__0QUE);
         } break;
         }
       };
-      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)) {
+      str__1QUE=__tmp__TTUE;
+      if (((void *)__tmp__TTUE == (void *)NULL)) {
+        pos__BI2G=Self__XQUE->parent_lip_code__XZ4B.parent_itm_object__XFE.position__SFJ;
+        put_error__text__1PG( 1,(&__string_312));
+        put_position__FRG(pos__BI2G);
+        put_string__33F(msg_err__AQG);
+        if ((type_error__5PG !=  2)) {
           exit(( 1));
         };
       };
-      ((__STRING *)string_tmp__VH)->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';
+      ((__STRING *)string_tmp__VH)->count__SGC= 0;
+      append_in__FPIG(__tmp__TTUE,string_tmp__VH);
+      Self__T4GH=((__STRING *)string_tmp__VH);
+      if ((Self__T4GH->capacity__UCS > Self__T4GH->count__SGC)) {
+        ((__CHARACTER *)Self__T4GH->storage__3CS)[Self__T4GH->count__SGC]='\0';
       } else {
-        add_last__GOT(Self__ZVGH,'\0');
-        Self__ZVGH->count__EGC=(__INTEGER)(Self__ZVGH->count__EGC -  1);
+        new_capacity__0LIH= 0;
+        if ((Self__T4GH->capacity__UCS <= Self__T4GH->count__SGC)) {
+          if ((Self__T4GH->capacity__UCS ==  0)) {
+            Self__T4GH->capacity__UCS= 32;
+            Self__T4GH->storage__3CS=create__YIEB( 32);
+          } else {
+            new_capacity__0LIH=(__INTEGER)(Self__T4GH->capacity__UCS <<  1);
+            Self__2LIH=((__CHARACTER *)Self__T4GH->storage__3CS);
+            old_nb_elts__3LIH=Self__T4GH->capacity__UCS;
+            new__4LIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__2LIH),((__UINTEGER_32 )old_nb_elts__3LIH),((__UINTEGER_32 )new_capacity__0LIH)));
+            upper__ZYKH=(__INTEGER)(new_capacity__0LIH -  1);
+            Self__XYKH=old_nb_elts__3LIH;
+            while ((Self__XYKH <= upper__ZYKH)) {
+              new__4LIH[Self__XYKH]='\0';
+              Self__XYKH=(__INTEGER)(Self__XYKH +  1);
+            };
+            Self__T4GH->storage__3CS=new__4LIH;
+            Self__T4GH->capacity__UCS=new_capacity__0LIH;
+          };
+        };
+        ((__CHARACTER *)Self__T4GH->storage__3CS)[Self__T4GH->count__SGC]='\0';
+        Self__T4GH->count__SGC=(__INTEGER)(Self__T4GH->count__SGC +  1);
+        Self__T4GH->count__SGC=(__INTEGER)(Self__T4GH->count__SGC -  1);
       };
-      system(((char*)((Self__ZVGH->storage__RCS))));
+      system(((char*)((Self__T4GH->storage__3CS))));
     } else {
-      n__A0KF=Self__GQUE->name__YQUE;
-      result__D0KF=NULL;
-      j__C0KF= 0;
-      while_do__VCMF:
+      n__01KF=Self__XQUE->name__JRUE;
+      result__31KF=NULL;
+      j__21KF= 0;
+      __tmp__04FH=((__FAST_ARRAYoLIP_SLOT_CODEo *)list_method__D2KF)->parent_arrayed_collection__C2KF.upper__M2KF;
+      while_do__PEMF:
       {
-        if ((j__C0KF <= ((__FAST_ARRAYoLIP_SLOT_CODEo *)list_method__J0KF)->parent_arrayed_collection__I0KF.upper__S0KF)) {
+        if ((j__21KF <= __tmp__04FH)) {
           print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
-          __tmp__A1KF=((void *)NULL != (void *)n__A0KF);
+          __tmp__02KF=((void *)NULL != (void *)n__01KF);
         } else {
-          __tmp__A1KF=FALSE__;
+          __tmp__02KF=FALSE__;
         };
-        if (__tmp__A1KF) {
-          j__C0KF=(__INTEGER)(j__C0KF +  1);
-          goto while_do__VCMF;
+        if (__tmp__02KF) {
+          j__21KF=(__INTEGER)(j__21KF +  1);
+          goto while_do__PEMF;
         };
       };
-      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 ((j__21KF <= ((__FAST_ARRAYoLIP_SLOT_CODEo *)list_method__D2KF)->parent_arrayed_collection__C2KF.upper__M2KF)) {
+        result__31KF=((void **)((__FAST_ARRAYoLIP_SLOT_CODEo *)list_method__D2KF)->parent_arrayed_collection__C2KF.storage__TEQF)[j__21KF];
       };
-      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)) {
+      if (((void *)result__31KF == (void *)NULL)) {
+        copy__VDS(string_tmp__VH,(&__string_309));
+        append__3OS(string_tmp__VH,Self__XQUE->name__JRUE);
+        append__3OS(string_tmp__VH,(&__string_310));
+        pos__EI2G=Self__XQUE->parent_lip_code__XZ4B.parent_itm_object__XFE.position__SFJ;
+        put_error__text__1PG( 1,string_tmp__VH);
+        put_position__FRG(pos__EI2G);
+        put_string__33F(msg_err__AQG);
+        if ((type_error__5PG !=  2)) {
           exit(( 1));
         };
       };
       print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
-      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)) {
+      pos__HI2G=Self__XQUE->parent_lip_code__XZ4B.parent_itm_object__XFE.position__SFJ;
+      put_error__text__1PG( 1,(&__string_313));
+      put_position__FRG(pos__HI2G);
+      put_string__33F(msg_err__AQG);
+      if ((type_error__5PG !=  2)) {
         exit(( 1));
       };
     };
   };
-  if (((void *)val__JQUE != (void *)NULL)) {
-    switch (((struct ___OBJ *)val__JQUE)->__id) {
+  if (((void *)val__0QUE != (void *)NULL)) {
+    switch (((struct ___OBJ *)val__0QUE)->__id) {
     case __LIP_BOOLEAN__: {
     } break;
     case __LIP_INTEGER__: {
-      free__DC4F(val__JQUE);
+      free__3D4F(val__0QUE);
     } break;
     case __LIP_STRING__: {
-      free__RGIG(val__JQUE);
+      free__LIIG(val__0QUE);
     } break;
     };
   };
 }
 
-static void run__WEQD(__LIP_IF *Self__XEQD)
+static void run__ZFQD(__LIP_IF *Self__0FQD)
 // ({LIP_IF}) VoidRecursive, No inlinable.
 {
-  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) {
+  void *__tmp__4FQD,*__tmp__CHQD,*__tmp__4HQD;
+  __POSITION __tmp__0ABH,pos__LI2G,pos__PI2G,pos__SI2G,__tmp__GGZG;
+  __POSITION __tmp__IGZG,__tmp__VI2G,__tmp__PGZG,__tmp__RGZG;
+  __POSITION __tmp__3VUE;
+  void *__tmp__5FQD,*__tmp__2YKH,*__tmp__3YKH;
+  __LIP_INTEGER *Self__4YKH;
+  __LIP_STRING *Self__5YKH;
+  void *__tmp__BGQD,*val__2FQD;
+  __INTEGER __tmp__1GQD,Self__G4AG,__tmp__XHQD,Self__BLEF;
+  __BOOLEAN __tmp__FHQD;
+  __tmp__4FQD=Self__0FQD->condition__3FQD;
+  switch (((struct ___OBJ *)__tmp__4FQD)->__id) {
   case __LIP_AFFECT__: {
-    __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)) {
+    __tmp__0ABH=((__LIP_AFFECT *)__tmp__4FQD)->parent_lip_code__YSPB.parent_itm_object__XFE.position__SFJ;
+    put_error__text__1PG( 1,(&__string_314));
+    put_position__FRG(__tmp__0ABH);
+    put_string__33F(msg_err__AQG);
+    if ((type_error__5PG !=  2)) {
       exit(( 1));
     };
-    __tmp__2EQD=NULL;
+    __tmp__5FQD=NULL;
   } break;
   case __LIP_BINARY__: {
-    __tmp__2EQD=run_expr__A1QD(__tmp__1EQD);
+    __tmp__5FQD=run_expr__D2QD(__tmp__4FQD);
   } break;
   case __LIP_UNARY__: {
-    __tmp__2EQD=run_expr__53QD(__tmp__1EQD);
+    __tmp__5FQD=run_expr__C5QD(__tmp__4FQD);
   } break;
   case __LIP_CALL__: {
-    __tmp__2EQD=run_expr__XWUE(__tmp__1EQD);
+    __tmp__5FQD=run_expr__IXUE(__tmp__4FQD);
   } break;
   case __LIP_IF__: {
-    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)) {
+    pos__LI2G=((__LIP_IF *)__tmp__4FQD)->parent_lip_code__PQYC.parent_itm_object__XFE.position__SFJ;
+    put_error__text__1PG( 1,(&__string_314));
+    put_position__FRG(pos__LI2G);
+    put_string__33F(msg_err__AQG);
+    if ((type_error__5PG !=  2)) {
       exit(( 1));
     };
-    __tmp__2EQD=NULL;
+    __tmp__5FQD=NULL;
   } break;
   case __LIP_PRINT__: {
-    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)) {
+    pos__PI2G=((__LIP_PRINT *)__tmp__4FQD)->parent_lip_code__BRYC.parent_itm_object__XFE.position__SFJ;
+    put_error__text__1PG( 1,(&__string_314));
+    put_position__FRG(pos__PI2G);
+    put_string__33F(msg_err__AQG);
+    if ((type_error__5PG !=  2)) {
       exit(( 1));
     };
-    __tmp__2EQD=NULL;
+    __tmp__5FQD=NULL;
   } break;
   case __LIP_VALUE__: {
-    __tmp__OBKH=((__LIP_VALUE *)__tmp__1EQD)->value__X0UE;
-    switch (((struct ___OBJ *)__tmp__OBKH)->__id) {
+    __tmp__2YKH=((__LIP_VALUE *)__tmp__4FQD)->value__I1UE;
+    switch (((struct ___OBJ *)__tmp__2YKH)->__id) {
     case __LIP_BOOLEAN__: {
-      __tmp__PBKH=((__LIP_BOOLEAN *)__tmp__OBKH);
+      __tmp__3YKH=((__LIP_BOOLEAN *)__tmp__2YKH);
     } break;
     case __LIP_INTEGER__: {
-      Self__QBKH=((__LIP_INTEGER *)__tmp__OBKH);
-      __tmp__PBKH=get__5XSE(Self__QBKH,Self__QBKH->value__LN4F);
+      Self__4YKH=((__LIP_INTEGER *)__tmp__2YKH);
+      __tmp__3YKH=get__UYSE(Self__4YKH,Self__4YKH->value__FP4F);
     } break;
     case __LIP_STRING__: {
-      Self__RBKH=((__LIP_STRING *)__tmp__OBKH);
-      __tmp__PBKH=get__M3FF(Self__RBKH,Self__RBKH->value__FSUE);
+      Self__5YKH=((__LIP_STRING *)__tmp__2YKH);
+      __tmp__3YKH=get__34FF(Self__5YKH,Self__5YKH->value__WSUE);
     } break;
     };
-    __tmp__2EQD=__tmp__PBKH;
+    __tmp__5FQD=__tmp__3YKH;
   } break;
   };
-  if (__tmp__2EQD==NULL) {
-    __tmp__4EQD=NULL;
+  if (__tmp__5FQD==NULL) {
+    __tmp__BGQD=NULL;
   } else {
-    switch (((struct ___OBJ *)__tmp__2EQD)->__id) {
+    switch (((struct ___OBJ *)__tmp__5FQD)->__id) {
     case __LIP_BOOLEAN__: {
-      __tmp__4EQD=((void *)__tmp__2EQD);
+      __tmp__BGQD=((void *)__tmp__5FQD);
     } break;
     case __LIP_INTEGER__: {
-      __tmp__4EQD=NULL;
+      __tmp__BGQD=NULL;
     } break;
     case __LIP_STRING__: {
-      __tmp__4EQD=NULL;
+      __tmp__BGQD=NULL;
     } break;
     }
   };
-  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)) {
+  val__2FQD=__tmp__BGQD;
+  if (((void *)__tmp__BGQD == (void *)NULL)) {
+    pos__SI2G=Self__0FQD->parent_lip_code__PQYC.parent_itm_object__XFE.position__SFJ;
+    put_error__text__1PG( 1,(&__string_315));
+    put_position__FRG(pos__SI2G);
+    put_string__33F(msg_err__AQG);
+    if ((type_error__5PG !=  2)) {
       exit(( 1));
     };
   };
-  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) {
+  if (((__LIP_BOOLEAN *)__tmp__BGQD)->value__MGQD) {
+    __tmp__1GQD=((__FAST_ARRAYoLIP_CODEo *)Self__0FQD->then__TGQD)->parent_arrayed_collection__4MYC.upper__ZGQD;
+    Self__G4AG= 0;
+    while ((Self__G4AG <= __tmp__1GQD)) {
+      __tmp__CHQD=((void **)((__FAST_ARRAYoLIP_CODEo *)Self__0FQD->then__TGQD)->parent_arrayed_collection__4MYC.storage__GVTD)[Self__G4AG];
+      switch (((struct ___OBJ *)__tmp__CHQD)->__id) {
       case __LIP_AFFECT__: {
-        run__JJFC(__tmp__5FQD);
+        run__0FFC(__tmp__CHQD);
       } break;
       case __LIP_BINARY__: {
-        __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)) {
+        __tmp__GGZG=((__LIP_BINARY *)__tmp__CHQD)->parent_lip_code__WNZB.parent_itm_object__XFE.position__SFJ;
+        put_error__text__1PG( 2,(&__string_274));
+        put_position__FRG(__tmp__GGZG);
+        put_string__33F(msg_err__AQG);
+        if ((type_error__5PG !=  2)) {
           exit(( 1));
         };
       } break;
       case __LIP_UNARY__: {
-        __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)) {
+        __tmp__IGZG=((__LIP_UNARY *)__tmp__CHQD)->parent_lip_code__FZ4B.parent_itm_object__XFE.position__SFJ;
+        put_error__text__1PG( 2,(&__string_274));
+        put_position__FRG(__tmp__IGZG);
+        put_string__33F(msg_err__AQG);
+        if ((type_error__5PG !=  2)) {
           exit(( 1));
         };
       } break;
       case __LIP_CALL__: {
-        run__FQUE(__tmp__5FQD);
+        run__WQUE(__tmp__CHQD);
       } break;
       case __LIP_IF__: {
-        run__WEQD(__tmp__5FQD);
+        run__ZFQD(__tmp__CHQD);
       } break;
       case __LIP_PRINT__: {
-        run__ZUUE(__tmp__5FQD);
+        run__KVUE(__tmp__CHQD);
       } break;
       case __LIP_VALUE__: {
-        __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)) {
+        __tmp__VI2G=((__LIP_VALUE *)__tmp__CHQD)->parent_lip_code__1IFE.parent_itm_object__XFE.position__SFJ;
+        put_error__text__1PG( 2,(&__string_274));
+        put_position__FRG(__tmp__VI2G);
+        put_string__33F(msg_err__AQG);
+        if ((type_error__5PG !=  2)) {
           exit(( 1));
         };
       } break;
       };
-      Self__M2AG=(__INTEGER)(Self__M2AG +  1);
+      Self__G4AG=(__INTEGER)(Self__G4AG +  1);
     };
-    __tmp__CGQD=TRUE__;
+    __tmp__FHQD=TRUE__;
   } else {
-    __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) {
+    __tmp__FHQD=FALSE__;
+  };
+  if ((! __tmp__FHQD)) {
+    if (((void *)Self__0FQD->else__KHQD != (void *)NULL)) {
+      __tmp__XHQD=((__FAST_ARRAYoLIP_CODEo *)Self__0FQD->else__KHQD)->parent_arrayed_collection__4MYC.upper__ZGQD;
+      Self__BLEF= 0;
+      while ((Self__BLEF <= __tmp__XHQD)) {
+        __tmp__4HQD=((void **)((__FAST_ARRAYoLIP_CODEo *)Self__0FQD->else__KHQD)->parent_arrayed_collection__4MYC.storage__GVTD)[Self__BLEF];
+        switch (((struct ___OBJ *)__tmp__4HQD)->__id) {
         case __LIP_AFFECT__: {
-          run__JJFC(__tmp__1GQD);
+          run__0FFC(__tmp__4HQD);
         } break;
         case __LIP_BINARY__: {
-          __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)) {
+          __tmp__PGZG=((__LIP_BINARY *)__tmp__4HQD)->parent_lip_code__WNZB.parent_itm_object__XFE.position__SFJ;
+          put_error__text__1PG( 2,(&__string_274));
+          put_position__FRG(__tmp__PGZG);
+          put_string__33F(msg_err__AQG);
+          if ((type_error__5PG !=  2)) {
             exit(( 1));
           };
         } break;
         case __LIP_UNARY__: {
-          __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)) {
+          __tmp__RGZG=((__LIP_UNARY *)__tmp__4HQD)->parent_lip_code__FZ4B.parent_itm_object__XFE.position__SFJ;
+          put_error__text__1PG( 2,(&__string_274));
+          put_position__FRG(__tmp__RGZG);
+          put_string__33F(msg_err__AQG);
+          if ((type_error__5PG !=  2)) {
             exit(( 1));
           };
         } break;
         case __LIP_CALL__: {
-          run__FQUE(__tmp__1GQD);
+          run__WQUE(__tmp__4HQD);
         } break;
         case __LIP_IF__: {
-          run__WEQD(__tmp__1GQD);
+          run__ZFQD(__tmp__4HQD);
         } break;
         case __LIP_PRINT__: {
-          run__ZUUE(__tmp__1GQD);
+          run__KVUE(__tmp__4HQD);
         } break;
         case __LIP_VALUE__: {
-          __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)) {
+          __tmp__3VUE=((__LIP_VALUE *)__tmp__4HQD)->parent_lip_code__1IFE.parent_itm_object__XFE.position__SFJ;
+          put_error__text__1PG( 2,(&__string_274));
+          put_position__FRG(__tmp__3VUE);
+          put_string__33F(msg_err__AQG);
+          if ((type_error__5PG !=  2)) {
             exit(( 1));
           };
         } break;
         };
-        Self__QJEF=(__INTEGER)(Self__QJEF +  1);
+        Self__BLEF=(__INTEGER)(Self__BLEF +  1);
       };
     };
   };
 }
 
-static void run__ZUUE(__LIP_PRINT *Self__0UUE)
+static void run__KVUE(__LIP_PRINT *Self__LVUE)
 // ({LIP_PRINT}) VoidNo recursive, No inlinable.
 {
-  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) {
+  void *__tmp__OVUE;
+  __POSITION __tmp__44VE,pos__T1DE,pos__XI2G,pos__QAYE;
+  void *__tmp__PVUE,*__tmp__BZKH,*__tmp__CZKH;
+  __LIP_INTEGER *Self__DZKH;
+  __LIP_STRING *Self__EZKH,*Self__2OIG;
+  __INTEGER Self__U25F;
+  __BOOLEAN __tmp__125F;
+  __tmp__OVUE=Self__LVUE->message__NVUE;
+  switch (((struct ___OBJ *)__tmp__OVUE)->__id) {
   case __LIP_AFFECT__: {
-    __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)) {
+    __tmp__44VE=((__LIP_AFFECT *)__tmp__OVUE)->parent_lip_code__YSPB.parent_itm_object__XFE.position__SFJ;
+    put_error__text__1PG( 1,(&__string_314));
+    put_position__FRG(__tmp__44VE);
+    put_string__33F(msg_err__AQG);
+    if ((type_error__5PG !=  2)) {
       exit(( 1));
     };
-    __tmp__4UUE=NULL;
+    __tmp__PVUE=NULL;
   } break;
   case __LIP_BINARY__: {
-    __tmp__4UUE=run_expr__A1QD(__tmp__3UUE);
+    __tmp__PVUE=run_expr__D2QD(__tmp__OVUE);
   } break;
   case __LIP_UNARY__: {
-    __tmp__4UUE=run_expr__53QD(__tmp__3UUE);
+    __tmp__PVUE=run_expr__C5QD(__tmp__OVUE);
   } break;
   case __LIP_CALL__: {
-    __tmp__4UUE=run_expr__XWUE(__tmp__3UUE);
+    __tmp__PVUE=run_expr__IXUE(__tmp__OVUE);
   } break;
   case __LIP_IF__: {
-    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)) {
+    pos__T1DE=((__LIP_IF *)__tmp__OVUE)->parent_lip_code__PQYC.parent_itm_object__XFE.position__SFJ;
+    put_error__text__1PG( 1,(&__string_314));
+    put_position__FRG(pos__T1DE);
+    put_string__33F(msg_err__AQG);
+    if ((type_error__5PG !=  2)) {
       exit(( 1));
     };
-    __tmp__4UUE=NULL;
+    __tmp__PVUE=NULL;
   } break;
   case __LIP_PRINT__: {
-    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)) {
+    pos__XI2G=((__LIP_PRINT *)__tmp__OVUE)->parent_lip_code__BRYC.parent_itm_object__XFE.position__SFJ;
+    put_error__text__1PG( 1,(&__string_314));
+    put_position__FRG(pos__XI2G);
+    put_string__33F(msg_err__AQG);
+    if ((type_error__5PG !=  2)) {
       exit(( 1));
     };
-    __tmp__4UUE=NULL;
+    __tmp__PVUE=NULL;
   } break;
   case __LIP_VALUE__: {
-    __tmp__TBKH=((__LIP_VALUE *)__tmp__3UUE)->value__X0UE;
-    switch (((struct ___OBJ *)__tmp__TBKH)->__id) {
+    __tmp__BZKH=((__LIP_VALUE *)__tmp__OVUE)->value__I1UE;
+    switch (((struct ___OBJ *)__tmp__BZKH)->__id) {
     case __LIP_BOOLEAN__: {
-      __tmp__UBKH=((__LIP_BOOLEAN *)__tmp__TBKH);
+      __tmp__CZKH=((__LIP_BOOLEAN *)__tmp__BZKH);
     } break;
     case __LIP_INTEGER__: {
-      Self__VBKH=((__LIP_INTEGER *)__tmp__TBKH);
-      __tmp__UBKH=get__5XSE(Self__VBKH,Self__VBKH->value__LN4F);
+      Self__DZKH=((__LIP_INTEGER *)__tmp__BZKH);
+      __tmp__CZKH=get__UYSE(Self__DZKH,Self__DZKH->value__FP4F);
     } break;
     case __LIP_STRING__: {
-      Self__WBKH=((__LIP_STRING *)__tmp__TBKH);
-      __tmp__UBKH=get__M3FF(Self__WBKH,Self__WBKH->value__FSUE);
+      Self__EZKH=((__LIP_STRING *)__tmp__BZKH);
+      __tmp__CZKH=get__34FF(Self__EZKH,Self__EZKH->value__WSUE);
     } break;
     };
-    __tmp__4UUE=__tmp__UBKH;
+    __tmp__PVUE=__tmp__CZKH;
   } break;
   };
-  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)) {
+  if (((void *)__tmp__PVUE == (void *)NULL)) {
+    pos__QAYE=Self__LVUE->parent_lip_code__BRYC.parent_itm_object__XFE.position__SFJ;
+    put_error__text__1PG( 1,(&__string_279));
+    put_position__FRG(pos__QAYE);
+    put_string__33F(msg_err__AQG);
+    if ((type_error__5PG !=  2)) {
       exit(( 1));
     };
   };
-  switch (((struct ___OBJ *)__tmp__4UUE)->__id) {
+  switch (((struct ___OBJ *)__tmp__PVUE)->__id) {
   case __LIP_BOOLEAN__: {
-    if (((__LIP_BOOLEAN *)__tmp__4UUE)->value__JFQD) {
-      print__DJD((&__string_42));
+    if (((__LIP_BOOLEAN *)__tmp__PVUE)->value__MGQD) {
+      print__OJD((&__string_42));
     } else {
-      print__DJD((&__string_43));
+      print__OJD((&__string_43));
     };
   } break;
   case __LIP_INTEGER__: {
-    Self__005F=((__LIP_INTEGER *)__tmp__4UUE)->value__LN4F;
-    if ((Self__005F ==  0)) {
+    Self__U25F=((__LIP_INTEGER *)__tmp__PVUE)->value__FP4F;
+    if ((Self__U25F ==  0)) {
       fputc((int)('0'),stdout);
-      __tmp__B15F=TRUE__;
+      __tmp__125F=TRUE__;
     } else {
-      __tmp__B15F=FALSE__;
+      __tmp__125F=FALSE__;
     };
-    if ((! __tmp__B15F)) {
-      if ((Self__005F <  0)) {
+    if ((! __tmp__125F)) {
+      if ((Self__U25F <  0)) {
         fputc((int)('-'),stdout);
-        print_positif__1FLG((__INTEGER)(- Self__005F));
+        print_positif__VHLG((__INTEGER)(- Self__U25F));
       } else {
-        print_positif__1FLG(Self__005F);
+        print_positif__VHLG(Self__U25F);
       };
     };
   } break;
   case __LIP_STRING__: {
-    Self__CNIG=((__LIP_STRING *)__tmp__4UUE);
-    ((__STRING *)string_tmp__VH)->count__EGC= 0;
-    append_in__LNIG(Self__CNIG,string_tmp__VH);
-    put_string__DJF(((__STRING *)string_tmp__VH));
+    Self__2OIG=((__LIP_STRING *)__tmp__PVUE);
+    ((__STRING *)string_tmp__VH)->count__SGC= 0;
+    append_in__FPIG(Self__2OIG,string_tmp__VH);
+    put_string__AKF(((__STRING *)string_tmp__VH));
   } break;
   };
-  switch (((struct ___OBJ *)__tmp__4UUE)->__id) {
+  switch (((struct ___OBJ *)__tmp__PVUE)->__id) {
   case __LIP_BOOLEAN__: {
   } break;
   case __LIP_INTEGER__: {
-    free__DC4F(__tmp__4UUE);
+    free__3D4F(__tmp__PVUE);
   } break;
   case __LIP_STRING__: {
-    free__RGIG(__tmp__4UUE);
+    free__LIIG(__tmp__PVUE);
   } break;
   };
 }
 
-static void add_last__COV(__FAST_ARRAYoITM_TYPE_MONOo *Self__DOV,void *element__EOV)
+static void add_last__ONV(__FAST_ARRAYoITM_TYPE_MONOo *Self__PNV,void *element__QNV)
 // ({FAST_ARRAYoITM_TYPE_MONOo},{NULLxITM_TYPE_PARAMETERxITM_TYPE_SIMPLExITM_TYPE_BLOCKxITM_TYPE_GENERICxITM_TYPE_STYLE}) VoidNo recursive, No inlinable.
 {
-  __INTEGER new_capacity__FOV,__tmp__KPV,__tmp__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__;
+  __INTEGER new_capacity__RNV,__tmp__WOV,__tmp__5FEC,Self__IOVD;
+  __BOOLEAN __tmp__AOV;
+  void **__tmp__VOV,**new__LFEC;
+  new_capacity__RNV= 0;
+  if (((__INTEGER)(Self__PNV->parent_arrayed_collection__SYC.upper__4HV +  1) <= (__INTEGER)(Self__PNV->parent_arrayed_collection__SYC.capacity__TNV -  1))) {
+    Self__PNV->parent_arrayed_collection__SYC.upper__4HV=(__INTEGER)(Self__PNV->parent_arrayed_collection__SYC.upper__4HV +  1);
+    __tmp__AOV=TRUE__;
   } else {
-    __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;
+    __tmp__AOV=FALSE__;
+  };
+  if ((! __tmp__AOV)) {
+    if ((Self__PNV->parent_arrayed_collection__SYC.capacity__TNV ==  0)) {
+      Self__PNV->parent_arrayed_collection__SYC.storage__FMV=create__W5QB( 2);
+      Self__PNV->parent_arrayed_collection__SYC.capacity__TNV= 2;
+      Self__PNV->parent_arrayed_collection__SYC.upper__4HV= 0;
+    } else {
+      new_capacity__RNV=(__INTEGER)(Self__PNV->parent_arrayed_collection__SYC.capacity__TNV <<  1);
+      __tmp__VOV=Self__PNV->parent_arrayed_collection__SYC.storage__FMV;
+      __tmp__WOV=Self__PNV->parent_arrayed_collection__SYC.capacity__TNV;
+      new__LFEC=((void **)realloc_dynamic__old_size__new_size__KELC(((__POINTER )((void **)__tmp__VOV)),((__UINTEGER_32 )(__INTEGER)(__tmp__WOV * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__RNV * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__5FEC=(__INTEGER)(new_capacity__RNV -  1);
+      Self__IOVD=__tmp__WOV;
+      while ((Self__IOVD <= __tmp__5FEC)) {
+        new__LFEC[Self__IOVD]=NULL;
+        Self__IOVD=(__INTEGER)(Self__IOVD +  1);
+      };
+      Self__PNV->parent_arrayed_collection__SYC.storage__FMV=new__LFEC;
+      Self__PNV->parent_arrayed_collection__SYC.capacity__TNV=new_capacity__RNV;
+      Self__PNV->parent_arrayed_collection__SYC.upper__4HV=(__INTEGER)(Self__PNV->parent_arrayed_collection__SYC.upper__4HV +  1);
+    };
+  };
+  ((void **)Self__PNV->parent_arrayed_collection__SYC.storage__FMV)[Self__PNV->parent_arrayed_collection__SYC.upper__4HV]=element__QNV;
 }
 
-static void* alias__WVP(void *tmp__YVP)
+static void* alias__CWP(void *tmp__EWP)
 // ({NULLxFAST_ARRAYoITM_TYPE_MONOo}) With resultNo recursive, No inlinable.
 {
-  __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;
+  __INTEGER __tmp__RBQD,i__NT2E,new_capacity__TFW,other_upper__SFW;
+  __INTEGER Self__ENKC,h__UGW,idx__VGW,idx__2SRB,new_capacity__3SRB;
+  __INTEGER i__1SRB,typ_id__0INB;
+  __POINTER ptr__VINB,ptr_table__GZKH,next__FZKH,result__HZKH;
+  __POINTER ptr_table__LZKH,next__KZKH,result__MZKH;
+  __UINTEGER_32 sz__XINB,a__HAGH,new_size__IAGH,t__MAGH,a__LAGH;
+  __UINTEGER_32 new_size__OZKH,lab_type__NZKH;
+  void *result__GWP,*result__D5V,*e__NGW;
+  __HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo *Self__P4V,*Self__MGW;
+  void *node__C5V,*node__WGW,*node1__5SRB,*node2__ATRB,*__tmp__GIW;
+  __BOOLEAN __tmp__15V,result__PAQD;
+  __FAST_ARRAYoITM_TYPE_MONOo *Self__MAQD,*o__QAQD,*__tmp__2AQD;
+  __FAST_ARRAYoITM_TYPE_MONOo *Self__QFW;
+  void **__tmp__MBQD,**__tmp__OBQD,**Self__ZS2E,**__tmp__GGW,**__tmp__IGW;
+  void **Self__C3CC;
+  void **old_buckets__4SRB;
+  __HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *result__UINB,*Self__3RDC;
+  result__GWP=NULL;
+  if ((((__FAST_ARRAYoITM_TYPE_MONOo *)tmp__EWP)->parent_arrayed_collection__SYC.upper__4HV <  0)) {
+    result__GWP=empty_list__NWP;
   } else {
-    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:
+    Self__P4V=((__HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo *)bucket__YWP);
+    result__D5V=NULL;
+    node__C5V=((void **)Self__P4V->buckets__K5V)[(__INTEGER)(hash_code__S30(tmp__EWP) % Self__P4V->capacity__F5V)];
+    until_do__040:
     {
-      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__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)));
+      if (((void *)node__C5V == (void *)NULL)) {
+        __tmp__15V=TRUE__;
+      } else {
+        Self__MAQD=((__FAST_ARRAYoITM_TYPE_MONOo *)((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__C5V)->item__W5V);
+        result__PAQD=FALSE__;
+        o__QAQD=NULL;
+        if (((void *)Self__MAQD == (void *)tmp__EWP)) {
+          result__PAQD=TRUE__;
+        } else {
+          if (tmp__EWP==NULL) {
+            __tmp__2AQD=NULL;
+          } else {
+            __tmp__2AQD=((__FAST_ARRAYoITM_TYPE_MONOo *)tmp__EWP);
+          };
+          o__QAQD=__tmp__2AQD;
+          if ((((void *)__tmp__2AQD != (void *)NULL) && (Self__MAQD->parent_arrayed_collection__SYC.upper__4HV == __tmp__2AQD->parent_arrayed_collection__SYC.upper__4HV))) {
+            __tmp__MBQD=Self__MAQD->parent_arrayed_collection__SYC.storage__FMV;
+            __tmp__OBQD=__tmp__2AQD->parent_arrayed_collection__SYC.storage__FMV;
+            __tmp__RBQD=(__INTEGER)(Self__MAQD->parent_arrayed_collection__SYC.upper__4HV +  1);
+            Self__ZS2E=((void **)__tmp__MBQD);
+            i__NT2E=(__INTEGER)(__tmp__RBQD -  1);
+            while (((i__NT2E >=  0) && ((void *)Self__ZS2E[i__NT2E] == (void *)((void **)__tmp__OBQD)[i__NT2E]))) {
+              i__NT2E=(__INTEGER)(i__NT2E -  1);
+            };
+            result__PAQD=(i__NT2E <  0);
+          };
+        };
+        __tmp__15V=result__PAQD;
+      };
+      if ((! __tmp__15V)) {
+        node__C5V=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__C5V)->next__CAW;
+        goto until_do__040;
+      };
+    };
+    if (((void *)node__C5V != (void *)NULL)) {
+      result__D5V=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__C5V)->item__W5V;
+    };
+    result__GWP=result__D5V;
+    if (((void *)result__D5V == (void *)NULL)) {
+      result__GWP=create_with_capacity__EGR((__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)tmp__EWP)->parent_arrayed_collection__SYC.upper__4HV +  1));
+      Self__QFW=((__FAST_ARRAYoITM_TYPE_MONOo *)result__GWP);
+      new_capacity__TFW= 0;
+      other_upper__SFW=((__FAST_ARRAYoITM_TYPE_MONOo *)tmp__EWP)->parent_arrayed_collection__SYC.upper__4HV;
+      if ((other_upper__SFW >=  0)) {
+        new_capacity__TFW=(__INTEGER)(other_upper__SFW +  1);
+        if ((Self__QFW->parent_arrayed_collection__SYC.capacity__TNV < new_capacity__TFW)) {
+          Self__QFW->parent_arrayed_collection__SYC.storage__FMV=create__W5QB(new_capacity__TFW);
+          Self__QFW->parent_arrayed_collection__SYC.capacity__TNV=new_capacity__TFW;
+        };
+        __tmp__GGW=Self__QFW->parent_arrayed_collection__SYC.storage__FMV;
+        __tmp__IGW=((__FAST_ARRAYoITM_TYPE_MONOo *)tmp__EWP)->parent_arrayed_collection__SYC.storage__FMV;
+        Self__C3CC=((void **)__tmp__GGW);
+        Self__ENKC=other_upper__SFW;
+        while ((Self__ENKC >=  0)) {
+          Self__C3CC[Self__ENKC]=((void **)__tmp__IGW)[Self__ENKC];
+          Self__ENKC=(__INTEGER)(Self__ENKC -  1);
+        };
+      };
+      Self__QFW->parent_arrayed_collection__SYC.upper__4HV=other_upper__SFW;
+      Self__MGW=((__HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo *)bucket__YWP);
+      e__NGW=result__GWP;
+      fast_has__1K1(Self__MGW,result__GWP);
+      fast_has__1K1(Self__MGW,result__GWP);
+      h__UGW=hash_code__S30(result__GWP);
+      idx__VGW=(__INTEGER)(h__UGW % Self__MGW->capacity__F5V);
+      node__WGW=((void **)Self__MGW->buckets__K5V)[idx__VGW];
+      while ((! (((void *)node__WGW == (void *)NULL) || ((void *)((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__WGW)->item__W5V == (void *)e__NGW)))) {
+        node__WGW=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__WGW)->next__CAW;
+      };
+      if (((void *)node__WGW == (void *)NULL)) {
+        if ((Self__MGW->capacity__F5V == Self__MGW->count__ZHW)) {
+          idx__2SRB= 0;
+          node1__5SRB=NULL;
+          node2__ATRB=NULL;
+          new_capacity__3SRB=prime_number_ceiling__021((__INTEGER)(Self__MGW->capacity__F5V +  1));
+          old_buckets__4SRB=Self__MGW->buckets__K5V;
+          Self__MGW->buckets__K5V=create__SWBB(new_capacity__3SRB);
+          i__1SRB=(__INTEGER)(Self__MGW->capacity__F5V -  1);
+          Self__MGW->capacity__F5V=new_capacity__3SRB;
+          while ((i__1SRB >=  0)) {
+            node1__5SRB=((void **)old_buckets__4SRB)[i__1SRB];
+            while (((void *)node1__5SRB != (void *)NULL)) {
+              node2__ATRB=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node1__5SRB)->next__CAW;
+              idx__2SRB=(__INTEGER)(hash_code__S30(((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node1__5SRB)->item__W5V) % Self__MGW->capacity__F5V);
+              ((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node1__5SRB)->next__CAW=((void **)Self__MGW->buckets__K5V)[idx__2SRB];
+              ((void **)Self__MGW->buckets__K5V)[idx__2SRB]=node1__5SRB;
+              node1__5SRB=node2__ATRB;
+            };
+            i__1SRB=(__INTEGER)(i__1SRB -  1);
+          };
+          idx__VGW=(__INTEGER)(h__UGW % Self__MGW->capacity__F5V);
+        };
+        __tmp__GIW=((void **)Self__MGW->buckets__K5V)[idx__VGW];
+        result__UINB=NULL;
+        ptr__VINB=((__POINTER )(NULL));
+        typ_id__0INB= 0;
+        sz__XINB=((__UINTEGER_32 )sizeof(__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo));
+        if ((sz__XINB ==  0)) {
+          result__UINB=HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo__;
+        } else {
+          typ_id__0INB=__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo__;
+          clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__XINB);
+          if ((typ_id__0INB == (__INTEGER)(-  1))) {
+            a__HAGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__IAGH=(__UINTEGER_32)((__UINTEGER_32)(sz__XINB + a__HAGH) & (__UINTEGER_32)(~ a__HAGH));
+            ptr_table__GZKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__IAGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__FZKH=((__POINTER )(NULL));
+            result__HZKH=((__POINTER *)ptr_table__GZKH)[ 0];
+            if ((result__HZKH == (void *)NULL)) {
+              result__HZKH=new_lab__RTJ(new_size__IAGH);
+              next__FZKH=(void *)((unsigned long)result__HZKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IAGH)));
+              ((__POINTER *)next__FZKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__GZKH)[ 0]=next__FZKH;
+            } else {
+              next__FZKH=((__POINTER *)result__HZKH)[ 0];
+              if ((next__FZKH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HZKH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__IAGH <<  1)) <=  4096)) {
+                  next__FZKH=(void *)((unsigned long)result__HZKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IAGH)));
                 } else {
-                  next__1BKH=new_lab__FTJ(new_size__LXGH);
+                  next__FZKH=new_lab__RTJ(new_size__IAGH);
                 };
-                ((__POINTER *)next__1BKH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__2BKH)[ 0]=next__1BKH;
+                ((__POINTER *)next__FZKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__GZKH)[ 0]=next__FZKH;
               } else {
-                ((__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__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)));
+                ((__POINTER *)result__HZKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FZKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__HZKH=next__FZKH;
+              };
+            };
+            ptr__VINB=result__HZKH;
+          } else {
+            t__MAGH=((__UINTEGER_32 )typ_id__0INB);
+            a__LAGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__OZKH=(__UINTEGER_32)((__UINTEGER_32)(sz__XINB + a__LAGH) & (__UINTEGER_32)(~ a__LAGH));
+            ptr_table__LZKH=((__POINTER )(&(table_type[(t__MAGH)])));
+            lab_type__NZKH=(__UINTEGER_32)(t__MAGH |  1);
+            next__KZKH=((__POINTER )(NULL));
+            result__MZKH=((__POINTER *)ptr_table__LZKH)[ 0];
+            if ((result__MZKH == (void *)NULL)) {
+              result__MZKH=new_lab__RTJ(lab_type__NZKH);
+              next__KZKH=(void *)((unsigned long)result__MZKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OZKH)));
+              ((__POINTER *)next__KZKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__LZKH)[ 0]=next__KZKH;
+            } else {
+              next__KZKH=((__POINTER *)result__MZKH)[ 0];
+              if ((next__KZKH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MZKH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__OZKH <<  1)) <=  4096)) {
+                  next__KZKH=(void *)((unsigned long)result__MZKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OZKH)));
                 } else {
-                  next__ACKH=new_lab__FTJ(lab_type__DCKH);
+                  next__KZKH=new_lab__RTJ(lab_type__NZKH);
                 };
-                ((__POINTER *)next__ACKH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__BCKH)[ 0]=next__ACKH;
+                ((__POINTER *)next__KZKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__LZKH)[ 0]=next__KZKH;
               } else {
-                ((__POINTER *)result__CCKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ACKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__CCKH=next__ACKH;
+                ((__POINTER *)result__MZKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KZKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__MZKH=next__KZKH;
               };
             };
-            ptr__GMNB=result__CCKH;
+            ptr__VINB=result__MZKH;
           };
-          result__FMNB=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)ptr__GMNB);
-          *(result__FMNB) = *(HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo__);
+          result__UINB=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)ptr__VINB);
+          *(result__UINB) = *(HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo__);
         };
-        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);
+        Self__3RDC=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)result__UINB);
+        Self__3RDC->item__W5V=result__GWP;
+        Self__3RDC->next__CAW=__tmp__GIW;
+        node__WGW=result__UINB;
+        ((void **)Self__MGW->buckets__K5V)[idx__VGW]=result__UINB;
+        Self__MGW->count__ZHW=(__INTEGER)(Self__MGW->count__ZHW +  1);
       };
     };
   };
-  free__MNQ(tmp__YVP);
-  return(result__0VP);
+  free__YNQ(tmp__EWP);
+  return(result__GWP);
 }
 
-static void add__MMHB(__HASHED_SEToSTRING_CONSTANTo *Self__NMHB,void *e__OMHB)
+static void add__1IHB(__HASHED_SEToSTRING_CONSTANTo *Self__2IHB,void *e__3IHB)
 // ({HASHED_SEToSTRING_CONSTANTo},{NULLxSTRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __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__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__KCKH=new_lab__FTJ(lab_type__NCKH);
-            };
-            ((__POINTER *)next__KCKH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__LCKH)[ 0]=next__KCKH;
-          } else {
-            ((__POINTER *)result__MCKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KCKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__MCKH=next__KCKH;
-          };
-        };
-        ptr__44WB=result__MCKH;
-      };
-      result__34WB=((__HASHED_SET_NODEoSTRING_CONSTANTo *)ptr__44WB);
-      *(result__34WB) = *(HASHED_SET_NODEoSTRING_CONSTANTo__);
-    };
-    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);
+  __INTEGER h__EJHB,idx__FJHB,idx__5N0B,new_capacity__AO0B,i__4N0B;
+  __INTEGER typ_id__Q1WB;
+  __POINTER ptr__L1WB,ptr_table__QZKH,next__PZKH,result__RZKH;
+  __POINTER ptr_table__VZKH,next__UZKH,result__WZKH;
+  __UINTEGER_32 sz__N1WB,a__BBGH,new_size__CBGH,t__GBGH,a__FBGH;
+  __UINTEGER_32 new_size__YZKH,lab_type__XZKH;
+  void *node__GJHB,*node1__CO0B,*node2__DO0B,*__tmp__VKHB;
+  void **old_buckets__BO0B;
+  __HASHED_SET_NODEoSTRING_CONSTANTo *result__K1WB,*Self__2KFC;
+  has__MIMB(Self__2IHB,e__3IHB);
+  has__MIMB(Self__2IHB,e__3IHB);
+  h__EJHB=hash_code__RNW(e__3IHB);
+  idx__FJHB=(__INTEGER)(h__EJHB % Self__2IHB->capacity__HIT);
+  node__GJHB=((void **)Self__2IHB->buckets__DEV)[idx__FJHB];
+  while ((! (((void *)node__GJHB == (void *)NULL) || __infix_equal_equal__V2DB(((__HASHED_SET_NODEoSTRING_CONSTANTo *)node__GJHB)->item__PEV,e__3IHB)))) {
+    node__GJHB=((__HASHED_SET_NODEoSTRING_CONSTANTo *)node__GJHB)->next__0EV;
+  };
+  if (((void *)node__GJHB == (void *)NULL)) {
+    if ((Self__2IHB->capacity__HIT == Self__2IHB->count__1FY)) {
+      idx__5N0B= 0;
+      node1__CO0B=NULL;
+      node2__DO0B=NULL;
+      new_capacity__AO0B=prime_number_ceiling__021((__INTEGER)(Self__2IHB->capacity__HIT +  1));
+      old_buckets__BO0B=Self__2IHB->buckets__DEV;
+      Self__2IHB->buckets__DEV=create__KZ3(new_capacity__AO0B);
+      i__4N0B=(__INTEGER)(Self__2IHB->capacity__HIT -  1);
+      Self__2IHB->capacity__HIT=new_capacity__AO0B;
+      while ((i__4N0B >=  0)) {
+        node1__CO0B=((void **)old_buckets__BO0B)[i__4N0B];
+        while (((void *)node1__CO0B != (void *)NULL)) {
+          node2__DO0B=((__HASHED_SET_NODEoSTRING_CONSTANTo *)node1__CO0B)->next__0EV;
+          idx__5N0B=(__INTEGER)(hash_code__RNW(((__HASHED_SET_NODEoSTRING_CONSTANTo *)node1__CO0B)->item__PEV) % Self__2IHB->capacity__HIT);
+          ((__HASHED_SET_NODEoSTRING_CONSTANTo *)node1__CO0B)->next__0EV=((void **)Self__2IHB->buckets__DEV)[idx__5N0B];
+          ((void **)Self__2IHB->buckets__DEV)[idx__5N0B]=node1__CO0B;
+          node1__CO0B=node2__DO0B;
+        };
+        i__4N0B=(__INTEGER)(i__4N0B -  1);
+      };
+      idx__FJHB=(__INTEGER)(h__EJHB % Self__2IHB->capacity__HIT);
+    };
+    __tmp__VKHB=((void **)Self__2IHB->buckets__DEV)[idx__FJHB];
+    result__K1WB=NULL;
+    ptr__L1WB=((__POINTER )(NULL));
+    typ_id__Q1WB= 0;
+    sz__N1WB=((__UINTEGER_32 )sizeof(__HASHED_SET_NODEoSTRING_CONSTANTo));
+    if ((sz__N1WB ==  0)) {
+      result__K1WB=HASHED_SET_NODEoSTRING_CONSTANTo__;
+    } else {
+      typ_id__Q1WB=__HASHED_SET_NODEoSTRING_CONSTANTo__;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__N1WB);
+      if ((typ_id__Q1WB == (__INTEGER)(-  1))) {
+        a__BBGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__CBGH=(__UINTEGER_32)((__UINTEGER_32)(sz__N1WB + a__BBGH) & (__UINTEGER_32)(~ a__BBGH));
+        ptr_table__QZKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__CBGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__PZKH=((__POINTER )(NULL));
+        result__RZKH=((__POINTER *)ptr_table__QZKH)[ 0];
+        if ((result__RZKH == (void *)NULL)) {
+          result__RZKH=new_lab__RTJ(new_size__CBGH);
+          next__PZKH=(void *)((unsigned long)result__RZKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CBGH)));
+          ((__POINTER *)next__PZKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__QZKH)[ 0]=next__PZKH;
+        } else {
+          next__PZKH=((__POINTER *)result__RZKH)[ 0];
+          if ((next__PZKH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__RZKH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__CBGH <<  1)) <=  4096)) {
+              next__PZKH=(void *)((unsigned long)result__RZKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CBGH)));
+            } else {
+              next__PZKH=new_lab__RTJ(new_size__CBGH);
+            };
+            ((__POINTER *)next__PZKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__QZKH)[ 0]=next__PZKH;
+          } else {
+            ((__POINTER *)result__RZKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PZKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__RZKH=next__PZKH;
+          };
+        };
+        ptr__L1WB=result__RZKH;
+      } else {
+        t__GBGH=((__UINTEGER_32 )typ_id__Q1WB);
+        a__FBGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__YZKH=(__UINTEGER_32)((__UINTEGER_32)(sz__N1WB + a__FBGH) & (__UINTEGER_32)(~ a__FBGH));
+        ptr_table__VZKH=((__POINTER )(&(table_type[(t__GBGH)])));
+        lab_type__XZKH=(__UINTEGER_32)(t__GBGH |  1);
+        next__UZKH=((__POINTER )(NULL));
+        result__WZKH=((__POINTER *)ptr_table__VZKH)[ 0];
+        if ((result__WZKH == (void *)NULL)) {
+          result__WZKH=new_lab__RTJ(lab_type__XZKH);
+          next__UZKH=(void *)((unsigned long)result__WZKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YZKH)));
+          ((__POINTER *)next__UZKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__VZKH)[ 0]=next__UZKH;
+        } else {
+          next__UZKH=((__POINTER *)result__WZKH)[ 0];
+          if ((next__UZKH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__WZKH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__YZKH <<  1)) <=  4096)) {
+              next__UZKH=(void *)((unsigned long)result__WZKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YZKH)));
+            } else {
+              next__UZKH=new_lab__RTJ(lab_type__XZKH);
+            };
+            ((__POINTER *)next__UZKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__VZKH)[ 0]=next__UZKH;
+          } else {
+            ((__POINTER *)result__WZKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UZKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__WZKH=next__UZKH;
+          };
+        };
+        ptr__L1WB=result__WZKH;
+      };
+      result__K1WB=((__HASHED_SET_NODEoSTRING_CONSTANTo *)ptr__L1WB);
+      *(result__K1WB) = *(HASHED_SET_NODEoSTRING_CONSTANTo__);
+    };
+    Self__2KFC=((__HASHED_SET_NODEoSTRING_CONSTANTo *)result__K1WB);
+    Self__2KFC->item__PEV=e__3IHB;
+    Self__2KFC->next__0EV=__tmp__VKHB;
+    node__GJHB=result__K1WB;
+    ((void **)Self__2IHB->buckets__DEV)[idx__FJHB]=result__K1WB;
+    Self__2IHB->count__1FY=(__INTEGER)(Self__2IHB->count__1FY +  1);
   };
 }
 
-static void add_last__LDPD(__FAST_ARRAYoSTRING_CONSTANTo *Self__MDPD,void *element__NDPD)
+static void add_last__SEPD(__FAST_ARRAYoSTRING_CONSTANTo *Self__TEPD,void *element__UEPD)
 // ({FAST_ARRAYoSTRING_CONSTANTo},{NULLxSTRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER new_capacity__VEPD,__tmp__2FPD,__tmp__ZWWE,Self__HYQF;
+  __BOOLEAN __tmp__EFPD;
+  void **__tmp__1FPD,**new__FWWE;
+  new_capacity__VEPD= 0;
+  if (((__INTEGER)(Self__TEPD->parent_arrayed_collection__MBJ.upper__2CPD +  1) <= (__INTEGER)(Self__TEPD->parent_arrayed_collection__MBJ.capacity__XEPD -  1))) {
+    Self__TEPD->parent_arrayed_collection__MBJ.upper__2CPD=(__INTEGER)(Self__TEPD->parent_arrayed_collection__MBJ.upper__2CPD +  1);
+    __tmp__EFPD=TRUE__;
   } else {
-    __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;
+    __tmp__EFPD=FALSE__;
+  };
+  if ((! __tmp__EFPD)) {
+    if ((Self__TEPD->parent_arrayed_collection__MBJ.capacity__XEPD ==  0)) {
+      Self__TEPD->parent_arrayed_collection__MBJ.storage__SFPD=create__QMHE( 2);
+      Self__TEPD->parent_arrayed_collection__MBJ.capacity__XEPD= 2;
+      Self__TEPD->parent_arrayed_collection__MBJ.upper__2CPD= 0;
+    } else {
+      new_capacity__VEPD=(__INTEGER)(Self__TEPD->parent_arrayed_collection__MBJ.capacity__XEPD <<  1);
+      __tmp__1FPD=Self__TEPD->parent_arrayed_collection__MBJ.storage__SFPD;
+      __tmp__2FPD=Self__TEPD->parent_arrayed_collection__MBJ.capacity__XEPD;
+      new__FWWE=((void **)realloc_dynamic__old_size__new_size__KELC(((__POINTER )((void **)__tmp__1FPD)),((__UINTEGER_32 )(__INTEGER)(__tmp__2FPD * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__VEPD * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__ZWWE=(__INTEGER)(new_capacity__VEPD -  1);
+      Self__HYQF=__tmp__2FPD;
+      while ((Self__HYQF <= __tmp__ZWWE)) {
+        new__FWWE[Self__HYQF]=NULL;
+        Self__HYQF=(__INTEGER)(Self__HYQF +  1);
+      };
+      Self__TEPD->parent_arrayed_collection__MBJ.storage__SFPD=new__FWWE;
+      Self__TEPD->parent_arrayed_collection__MBJ.capacity__XEPD=new_capacity__VEPD;
+      Self__TEPD->parent_arrayed_collection__MBJ.upper__2CPD=(__INTEGER)(Self__TEPD->parent_arrayed_collection__MBJ.upper__2CPD +  1);
+    };
+  };
+  ((void **)Self__TEPD->parent_arrayed_collection__MBJ.storage__SFPD)[Self__TEPD->parent_arrayed_collection__MBJ.upper__2CPD]=element__UEPD;
 }
 
-static void free__EV5(void *tmp__GV5)
+static void free__TR5(void *tmp__VR5)
 // ({NULLxFAST_ARRAYoSTRING_CONSTANTo}) VoidNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER new_capacity__4DGB,__tmp__CFGB,__tmp__TGGC,Self__RDWD;
+  __FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *Self__2DGB;
+  __BOOLEAN __tmp__MEGB;
+  void **__tmp__BFGB,**new__5FGC;
+  ((__FAST_ARRAYoSTRING_CONSTANTo *)tmp__VR5)->parent_arrayed_collection__MBJ.upper__2CPD=(__INTEGER)(-  1);
+  Self__2DGB=((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)free_list__1AL);
+  new_capacity__4DGB= 0;
+  if (((__INTEGER)(Self__2DGB->parent_arrayed_collection__0AL.upper__LUU +  1) <= (__INTEGER)(Self__2DGB->parent_arrayed_collection__0AL.capacity__QWU -  1))) {
+    Self__2DGB->parent_arrayed_collection__0AL.upper__LUU=(__INTEGER)(Self__2DGB->parent_arrayed_collection__0AL.upper__LUU +  1);
+    __tmp__MEGB=TRUE__;
   } else {
-    __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;
+    __tmp__MEGB=FALSE__;
+  };
+  if ((! __tmp__MEGB)) {
+    if ((Self__2DGB->parent_arrayed_collection__0AL.capacity__QWU ==  0)) {
+      Self__2DGB->parent_arrayed_collection__0AL.storage__1WU=create__Z1ZB( 2);
+      Self__2DGB->parent_arrayed_collection__0AL.capacity__QWU= 2;
+      Self__2DGB->parent_arrayed_collection__0AL.upper__LUU= 0;
+    } else {
+      new_capacity__4DGB=(__INTEGER)(Self__2DGB->parent_arrayed_collection__0AL.capacity__QWU <<  1);
+      __tmp__BFGB=Self__2DGB->parent_arrayed_collection__0AL.storage__1WU;
+      __tmp__CFGB=Self__2DGB->parent_arrayed_collection__0AL.capacity__QWU;
+      new__5FGC=((void **)realloc_dynamic__old_size__new_size__KELC(((__POINTER )((void **)__tmp__BFGB)),((__UINTEGER_32 )(__INTEGER)(__tmp__CFGB * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__4DGB * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__TGGC=(__INTEGER)(new_capacity__4DGB -  1);
+      Self__RDWD=__tmp__CFGB;
+      while ((Self__RDWD <= __tmp__TGGC)) {
+        new__5FGC[Self__RDWD]=NULL;
+        Self__RDWD=(__INTEGER)(Self__RDWD +  1);
+      };
+      Self__2DGB->parent_arrayed_collection__0AL.storage__1WU=new__5FGC;
+      Self__2DGB->parent_arrayed_collection__0AL.capacity__QWU=new_capacity__4DGB;
+      Self__2DGB->parent_arrayed_collection__0AL.upper__LUU=(__INTEGER)(Self__2DGB->parent_arrayed_collection__0AL.upper__LUU +  1);
+    };
+  };
+  ((void **)Self__2DGB->parent_arrayed_collection__0AL.storage__1WU)[Self__2DGB->parent_arrayed_collection__0AL.upper__LUU]=tmp__VR5;
 }
 
-static void free__MNQ(void *tmp__ONQ)
+static void free__YNQ(void *tmp__0NQ)
 // ({NULLxFAST_ARRAYoITM_TYPE_MONOo}) VoidNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER new_capacity__SYV,__tmp__ZZV,__tmp__PJEC,Self__GSVD;
+  __FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *Self__QYV;
+  __BOOLEAN __tmp__BZV;
+  void **__tmp__YZV,**new__1IEC;
+  ((__FAST_ARRAYoITM_TYPE_MONOo *)tmp__0NQ)->parent_arrayed_collection__SYC.upper__4HV=(__INTEGER)(-  1);
+  Self__QYV=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__GVP);
+  new_capacity__SYV= 0;
+  if (((__INTEGER)(Self__QYV->parent_arrayed_collection__FVP.upper__ZUV +  1) <= (__INTEGER)(Self__QYV->parent_arrayed_collection__FVP.capacity__UYV -  1))) {
+    Self__QYV->parent_arrayed_collection__FVP.upper__ZUV=(__INTEGER)(Self__QYV->parent_arrayed_collection__FVP.upper__ZUV +  1);
+    __tmp__BZV=TRUE__;
   } else {
-    __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;
+    __tmp__BZV=FALSE__;
+  };
+  if ((! __tmp__BZV)) {
+    if ((Self__QYV->parent_arrayed_collection__FVP.capacity__UYV ==  0)) {
+      Self__QYV->parent_arrayed_collection__FVP.storage__PZV=create__PHRB( 2);
+      Self__QYV->parent_arrayed_collection__FVP.capacity__UYV= 2;
+      Self__QYV->parent_arrayed_collection__FVP.upper__ZUV= 0;
+    } else {
+      new_capacity__SYV=(__INTEGER)(Self__QYV->parent_arrayed_collection__FVP.capacity__UYV <<  1);
+      __tmp__YZV=Self__QYV->parent_arrayed_collection__FVP.storage__PZV;
+      __tmp__ZZV=Self__QYV->parent_arrayed_collection__FVP.capacity__UYV;
+      new__1IEC=((void **)realloc_dynamic__old_size__new_size__KELC(((__POINTER )((void **)__tmp__YZV)),((__UINTEGER_32 )(__INTEGER)(__tmp__ZZV * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__SYV * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__PJEC=(__INTEGER)(new_capacity__SYV -  1);
+      Self__GSVD=__tmp__ZZV;
+      while ((Self__GSVD <= __tmp__PJEC)) {
+        new__1IEC[Self__GSVD]=NULL;
+        Self__GSVD=(__INTEGER)(Self__GSVD +  1);
+      };
+      Self__QYV->parent_arrayed_collection__FVP.storage__PZV=new__1IEC;
+      Self__QYV->parent_arrayed_collection__FVP.capacity__UYV=new_capacity__SYV;
+      Self__QYV->parent_arrayed_collection__FVP.upper__ZUV=(__INTEGER)(Self__QYV->parent_arrayed_collection__FVP.upper__ZUV +  1);
+    };
+  };
+  ((void **)Self__QYV->parent_arrayed_collection__FVP.storage__PZV)[Self__QYV->parent_arrayed_collection__FVP.upper__ZUV]=tmp__0NQ;
 }
 
-static __INTEGER hash_code__TTRF(__FAST_ARRAYoSTRING_CONSTANTo *Self__UTRF)
+static __INTEGER hash_code__NVRF(__FAST_ARRAYoSTRING_CONSTANTo *Self__OVRF)
 // ({FAST_ARRAYoSTRING_CONSTANTo}) With resultNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER result__QVRF;
+  __BOOLEAN __tmp__BWRF;
+  result__QVRF= 0;
+  if ((! (Self__OVRF->parent_arrayed_collection__MBJ.upper__2CPD <  0))) {
+    if (((void *)((void **)Self__OVRF->parent_arrayed_collection__MBJ.storage__SFPD)[Self__OVRF->parent_arrayed_collection__MBJ.upper__2CPD] != (void *)NULL)) {
+      result__QVRF=hash_code__RNW(((void **)Self__OVRF->parent_arrayed_collection__MBJ.storage__SFPD)[Self__OVRF->parent_arrayed_collection__MBJ.upper__2CPD]);
+      __tmp__BWRF=TRUE__;
+    } else {
+      __tmp__BWRF=FALSE__;
+    };
+    if ((! __tmp__BWRF)) {
+      if (((void *)((void **)Self__OVRF->parent_arrayed_collection__MBJ.storage__SFPD)[ 0] != (void *)NULL)) {
+        result__QVRF=hash_code__RNW(((void **)Self__OVRF->parent_arrayed_collection__MBJ.storage__SFPD)[ 0]);
+      };
+    };
+  };
+  return(result__QVRF);
 }
 
-static void copy__44RD(__FAST_ARRAYoSTRING_CONSTANTo *Self__54RD,void *other__A5RD)
+static void copy__BASD(__FAST_ARRAYoSTRING_CONSTANTo *Self__CASD,void *other__DASD)
 // ({FAST_ARRAYoSTRING_CONSTANTo},{NULLxFAST_ARRAYoSTRING_CONSTANTo}) VoidNo recursive, No inlinable.
 {
-  __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;
+  __INTEGER new_capacity__FASD,other_upper__EASD,Self__3NYE;
+  void **__tmp__YASD,**__tmp__0ASD,**Self__1NWE;
+  new_capacity__FASD= 0;
+  other_upper__EASD=((__FAST_ARRAYoSTRING_CONSTANTo *)other__DASD)->parent_arrayed_collection__MBJ.upper__2CPD;
+  if ((other_upper__EASD >=  0)) {
+    new_capacity__FASD=(__INTEGER)(other_upper__EASD +  1);
+    if ((Self__CASD->parent_arrayed_collection__MBJ.capacity__XEPD < new_capacity__FASD)) {
+      Self__CASD->parent_arrayed_collection__MBJ.storage__SFPD=create__QMHE(new_capacity__FASD);
+      Self__CASD->parent_arrayed_collection__MBJ.capacity__XEPD=new_capacity__FASD;
+    };
+    __tmp__YASD=Self__CASD->parent_arrayed_collection__MBJ.storage__SFPD;
+    __tmp__0ASD=((__FAST_ARRAYoSTRING_CONSTANTo *)other__DASD)->parent_arrayed_collection__MBJ.storage__SFPD;
+    Self__1NWE=((void **)__tmp__YASD);
+    Self__3NYE=other_upper__EASD;
+    while ((Self__3NYE >=  0)) {
+      Self__1NWE[Self__3NYE]=((void **)__tmp__0ASD)[Self__3NYE];
+      Self__3NYE=(__INTEGER)(Self__3NYE -  1);
+    };
+  };
+  Self__CASD->parent_arrayed_collection__MBJ.upper__2CPD=other_upper__EASD;
+}
+
+static __BOOLEAN fast_has__H4RF(__HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo *Self__I4RF,void *e__J4RF)
+// ({HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo},{NULLxFAST_ARRAYoSTRING_CONSTANTo}) With resultNo recursive, No inlinable.
+{
+  void *node__S4RF;
+  node__S4RF=((void **)Self__I4RF->buckets__RLQF)[(__INTEGER)(hash_code__NVRF(e__J4RF) % Self__I4RF->capacity__MLQF)];
+  while ((! (((void *)node__S4RF == (void *)NULL) || ((void *)((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__S4RF)->item__3LQF == (void *)e__J4RF)))) {
+    node__S4RF=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__S4RF)->next__JMQF;
+  };
+  return(((void *)node__S4RF != (void *)NULL));
 }
 
-static __BOOLEAN read_operator__0NM()
+static __BOOLEAN read_operator__GOM()
 // () With resultNo recursive, No inlinable.
 {
-  __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__LZM:
+  __INTEGER old_pos__KOM,__tmp__VRO,i__P5O,new_capacity__AMIH;
+  __INTEGER old_nb_elts__DMIH,upper__2ZKH,Self__0ZKH;
+  __STRING *Self__BMIH;
+  __POSITION pos__3SZG;
+  __BOOLEAN result__JOM,__tmp__FPM;
+  __CHARACTER result__PLBH,result__YLBH,ch__PRO,result__3LBH;
+  __CHARACTER *__tmp__SRO,*Self__D5O,*Self__CMIH,*new__EMIH;
+  result__JOM=FALSE__;
+  read_space__XTD();
+  old_pos__KOM=position__CCC;
+  ((__STRING *)string_tmp__VH)->count__SGC= 0;
+  until_do__XZM:
   {
-    result__VJBH='\0';
-    if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-      result__VJBH=((__CHARACTER )(( 0)));
+    result__PLBH='\0';
+    if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+      result__PLBH=((__CHARACTER )(( 0)));
     } else {
-      result__VJBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+      result__PLBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
     };
-    if ((result__VJBH == ((__CHARACTER )(( 0))))) {
-      __tmp__ZOM=TRUE__;
+    if ((result__PLBH == ((__CHARACTER )(( 0))))) {
+      __tmp__FPM=TRUE__;
     } else {
-      result__4JBH='\0';
-      if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__4JBH=((__CHARACTER )(( 0)));
+      result__YLBH='\0';
+      if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+        result__YLBH=((__CHARACTER )(( 0)));
       } else {
-        result__4JBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+        result__YLBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  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);
+      ch__PRO=result__YLBH;
+      __tmp__SRO=((__STRING_CONSTANT *)(&__string_316))->storage__RRO;
+      __tmp__VRO=(__INTEGER)(((__STRING_CONSTANT *)(&__string_316))->count__DD -  1);
+      Self__D5O=((__CHARACTER *)__tmp__SRO);
+      i__P5O=__tmp__VRO;
+      while ((! ((i__P5O <  0) || (ch__PRO == Self__D5O[i__P5O])))) {
+        i__P5O=(__INTEGER)(i__P5O -  1);
       };
-      __tmp__ZOM=(i__D5O <  0);
+      __tmp__FPM=(i__P5O <  0);
     };
-    if ((! __tmp__ZOM)) {
-      result__DKBH='\0';
-      if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__DKBH=((__CHARACTER )(( 0)));
+    if ((! __tmp__FPM)) {
+      result__3LBH='\0';
+      if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+        result__3LBH=((__CHARACTER )(( 0)));
       } else {
-        result__DKBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+        result__3LBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
       };
-      add_last__GOT(string_tmp__VH,result__DKBH);
+      Self__BMIH=((__STRING *)string_tmp__VH);
+      new_capacity__AMIH= 0;
+      if ((Self__BMIH->capacity__UCS <= Self__BMIH->count__SGC)) {
+        if ((Self__BMIH->capacity__UCS ==  0)) {
+          Self__BMIH->capacity__UCS= 32;
+          Self__BMIH->storage__3CS=create__YIEB( 32);
+        } else {
+          new_capacity__AMIH=(__INTEGER)(Self__BMIH->capacity__UCS <<  1);
+          Self__CMIH=((__CHARACTER *)Self__BMIH->storage__3CS);
+          old_nb_elts__DMIH=Self__BMIH->capacity__UCS;
+          new__EMIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__CMIH),((__UINTEGER_32 )old_nb_elts__DMIH),((__UINTEGER_32 )new_capacity__AMIH)));
+          upper__2ZKH=(__INTEGER)(new_capacity__AMIH -  1);
+          Self__0ZKH=old_nb_elts__DMIH;
+          while ((Self__0ZKH <= upper__2ZKH)) {
+            new__EMIH[Self__0ZKH]='\0';
+            Self__0ZKH=(__INTEGER)(Self__0ZKH +  1);
+          };
+          Self__BMIH->storage__3CS=new__EMIH;
+          Self__BMIH->capacity__UCS=new_capacity__AMIH;
+        };
+      };
+      ((__CHARACTER *)Self__BMIH->storage__3CS)[Self__BMIH->count__SGC]=result__3LBH;
+      Self__BMIH->count__SGC=(__INTEGER)(Self__BMIH->count__SGC +  1);
       position__CCC=(__INTEGER)(position__CCC +  1);
-      goto until_do__LZM;
+      goto until_do__XZM;
     };
   };
-  if ((((__STRING *)string_tmp__VH)->count__EGC !=  0)) {
-    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)) {
+  if ((((__STRING *)string_tmp__VH)->count__SGC !=  0)) {
+    last_string__D2C=get__YWB(string_tmp__VH);
+    if (((((void *)last_string__D2C == (void *)(&__string_12)) || ((void *)last_string__D2C == (void *)(&__string_14))) || ((void *)last_string__D2C == (void *)(&__string_13)))) {
+      pos__3SZG=current_position__B0F();
+      put_error__text__1PG( 0,(&__string_286));
+      put_position__FRG(pos__3SZG);
+      put_string__33F(msg_err__AQG);
+      if ((type_error__5PG !=  2)) {
         exit(( 1));
       };
     };
-    short__token__to__YCD((&__string_124),old_pos__4NM,position__CCC);
-    result__3NM=TRUE__;
+    short__token__to__GDD((&__string_124),old_pos__KOM,position__CCC);
+    result__JOM=TRUE__;
   };
-  return(result__3NM);
+  return(result__JOM);
 }
 
-static void* operator__name__NEO(void *typ__PEO,void *op__QEO)
+static void* operator__name__ZEO(void *typ__1EO,void *op__2EO)
 // ({STRING_CONSTANT},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER __tmp__DFO,Self__KXO;
+  __CHARACTER c__4EO;
+  __BOOLEAN __tmp__RFO,__tmp__4FO,result__2MHB,__tmp__LGO,result__ONHB;
+  __BOOLEAN __tmp__YGO,result__AOHB,__tmp__FHO,result__SOHB,__tmp__SHO;
+  __BOOLEAN result__EPHB,__tmp__5HO,result__WPHB,__tmp__MIO;
+  __BOOLEAN result__IQHB,__tmp__ZIO,result__0QHB,__tmp__GJO;
+  __BOOLEAN result__MRHB,__tmp__TJO,result__4RHB,__tmp__AKO;
+  __BOOLEAN result__QSHB,__tmp__NKO,result__CTHB,__tmp__0KO;
+  __BOOLEAN result__UTHB,__tmp__HLO,result__GUHB,__tmp__ULO;
+  __BOOLEAN result__YUHB,__tmp__BMO,result__KVHB;
+  c__4EO='\0';
+  copy__VDS(string_tmp__VH,typ__1EO);
+  __tmp__DFO=((__STRING_CONSTANT *)op__2EO)->count__DD;
+  Self__KXO= 1;
+  while ((Self__KXO <= __tmp__DFO)) {
+    c__4EO=((__CHARACTER *)((__STRING_CONSTANT *)op__2EO)->storage__RRO)[(__INTEGER)(Self__KXO -  1)];
+    if ((c__4EO == '+')) {
+      append__3OS(string_tmp__VH,(&__string_188));
+      __tmp__RFO=TRUE__;
     } else {
-      __tmp__FFO=FALSE__;
+      __tmp__RFO=FALSE__;
     };
-    if (__tmp__FFO) {
-      __tmp__SFO=TRUE__;
+    if (__tmp__RFO) {
+      __tmp__4FO=TRUE__;
     } else {
-      result__NQHB=(c__SEO == '-');
-      if (result__NQHB) {
-        append__ROS(string_tmp__VH,(&__string_189));
+      result__2MHB=(c__4EO == '-');
+      if (result__2MHB) {
+        append__3OS(string_tmp__VH,(&__string_189));
       };
-      __tmp__SFO=result__NQHB;
+      __tmp__4FO=result__2MHB;
     };
-    if (__tmp__SFO) {
-      __tmp__5FO=TRUE__;
+    if (__tmp__4FO) {
+      __tmp__LGO=TRUE__;
     } else {
-      result__5QHB=(c__SEO == '~');
-      if (result__5QHB) {
-        append__ROS(string_tmp__VH,(&__string_190));
+      result__ONHB=(c__4EO == '~');
+      if (result__ONHB) {
+        append__3OS(string_tmp__VH,(&__string_190));
       };
-      __tmp__5FO=result__5QHB;
+      __tmp__LGO=result__ONHB;
     };
-    if (__tmp__5FO) {
-      __tmp__MGO=TRUE__;
+    if (__tmp__LGO) {
+      __tmp__YGO=TRUE__;
     } else {
-      result__RRHB=(c__SEO == '!');
-      if (result__RRHB) {
-        append__ROS(string_tmp__VH,(&__string_191));
+      result__AOHB=(c__4EO == '!');
+      if (result__AOHB) {
+        append__3OS(string_tmp__VH,(&__string_191));
       };
-      __tmp__MGO=result__RRHB;
+      __tmp__YGO=result__AOHB;
     };
-    if (__tmp__MGO) {
-      __tmp__ZGO=TRUE__;
+    if (__tmp__YGO) {
+      __tmp__FHO=TRUE__;
     } else {
-      result__DSHB=(c__SEO == '/');
-      if (result__DSHB) {
-        append__ROS(string_tmp__VH,(&__string_192));
+      result__SOHB=(c__4EO == '/');
+      if (result__SOHB) {
+        append__3OS(string_tmp__VH,(&__string_192));
       };
-      __tmp__ZGO=result__DSHB;
+      __tmp__FHO=result__SOHB;
     };
-    if (__tmp__ZGO) {
-      __tmp__GHO=TRUE__;
+    if (__tmp__FHO) {
+      __tmp__SHO=TRUE__;
     } else {
-      result__VSHB=(c__SEO == '*');
-      if (result__VSHB) {
-        append__ROS(string_tmp__VH,(&__string_193));
+      result__EPHB=(c__4EO == '*');
+      if (result__EPHB) {
+        append__3OS(string_tmp__VH,(&__string_193));
       };
-      __tmp__GHO=result__VSHB;
+      __tmp__SHO=result__EPHB;
     };
-    if (__tmp__GHO) {
-      __tmp__THO=TRUE__;
+    if (__tmp__SHO) {
+      __tmp__5HO=TRUE__;
     } else {
-      result__HTHB=(c__SEO == '^');
-      if (result__HTHB) {
-        append__ROS(string_tmp__VH,(&__string_194));
+      result__WPHB=(c__4EO == '^');
+      if (result__WPHB) {
+        append__3OS(string_tmp__VH,(&__string_194));
       };
-      __tmp__THO=result__HTHB;
+      __tmp__5HO=result__WPHB;
     };
-    if (__tmp__THO) {
-      __tmp__AIO=TRUE__;
+    if (__tmp__5HO) {
+      __tmp__MIO=TRUE__;
     } else {
-      result__ZTHB=(c__SEO == '%');
-      if (result__ZTHB) {
-        append__ROS(string_tmp__VH,(&__string_195));
+      result__IQHB=(c__4EO == '%');
+      if (result__IQHB) {
+        append__3OS(string_tmp__VH,(&__string_195));
       };
-      __tmp__AIO=result__ZTHB;
+      __tmp__MIO=result__IQHB;
     };
-    if (__tmp__AIO) {
-      __tmp__NIO=TRUE__;
+    if (__tmp__MIO) {
+      __tmp__ZIO=TRUE__;
     } else {
-      result__LUHB=(c__SEO == '>');
-      if (result__LUHB) {
-        append__ROS(string_tmp__VH,(&__string_196));
+      result__0QHB=(c__4EO == '>');
+      if (result__0QHB) {
+        append__3OS(string_tmp__VH,(&__string_196));
       };
-      __tmp__NIO=result__LUHB;
+      __tmp__ZIO=result__0QHB;
     };
-    if (__tmp__NIO) {
-      __tmp__0IO=TRUE__;
+    if (__tmp__ZIO) {
+      __tmp__GJO=TRUE__;
     } else {
-      result__3UHB=(c__SEO == '<');
-      if (result__3UHB) {
-        append__ROS(string_tmp__VH,(&__string_197));
+      result__MRHB=(c__4EO == '<');
+      if (result__MRHB) {
+        append__3OS(string_tmp__VH,(&__string_197));
       };
-      __tmp__0IO=result__3UHB;
+      __tmp__GJO=result__MRHB;
     };
-    if (__tmp__0IO) {
-      __tmp__HJO=TRUE__;
+    if (__tmp__GJO) {
+      __tmp__TJO=TRUE__;
     } else {
-      result__PVHB=(c__SEO == '=');
-      if (result__PVHB) {
-        append__ROS(string_tmp__VH,(&__string_198));
+      result__4RHB=(c__4EO == '=');
+      if (result__4RHB) {
+        append__3OS(string_tmp__VH,(&__string_198));
       };
-      __tmp__HJO=result__PVHB;
+      __tmp__TJO=result__4RHB;
     };
-    if (__tmp__HJO) {
-      __tmp__UJO=TRUE__;
+    if (__tmp__TJO) {
+      __tmp__AKO=TRUE__;
     } else {
-      result__BWHB=(c__SEO == '\\');
-      if (result__BWHB) {
-        append__ROS(string_tmp__VH,(&__string_199));
+      result__QSHB=(c__4EO == '\\');
+      if (result__QSHB) {
+        append__3OS(string_tmp__VH,(&__string_199));
       };
-      __tmp__UJO=result__BWHB;
+      __tmp__AKO=result__QSHB;
     };
-    if (__tmp__UJO) {
-      __tmp__BKO=TRUE__;
+    if (__tmp__AKO) {
+      __tmp__NKO=TRUE__;
     } else {
-      result__TWHB=(c__SEO == '|');
-      if (result__TWHB) {
-        append__ROS(string_tmp__VH,(&__string_200));
+      result__CTHB=(c__4EO == '|');
+      if (result__CTHB) {
+        append__3OS(string_tmp__VH,(&__string_200));
       };
-      __tmp__BKO=result__TWHB;
+      __tmp__NKO=result__CTHB;
     };
-    if (__tmp__BKO) {
-      __tmp__OKO=TRUE__;
+    if (__tmp__NKO) {
+      __tmp__0KO=TRUE__;
     } else {
-      result__FXHB=(c__SEO == '&');
-      if (result__FXHB) {
-        append__ROS(string_tmp__VH,(&__string_201));
+      result__UTHB=(c__4EO == '&');
+      if (result__UTHB) {
+        append__3OS(string_tmp__VH,(&__string_201));
       };
-      __tmp__OKO=result__FXHB;
+      __tmp__0KO=result__UTHB;
     };
-    if (__tmp__OKO) {
-      __tmp__1KO=TRUE__;
+    if (__tmp__0KO) {
+      __tmp__HLO=TRUE__;
     } else {
-      result__XXHB=(c__SEO == '$');
-      if (result__XXHB) {
-        append__ROS(string_tmp__VH,(&__string_202));
+      result__GUHB=(c__4EO == '$');
+      if (result__GUHB) {
+        append__3OS(string_tmp__VH,(&__string_202));
       };
-      __tmp__1KO=result__XXHB;
+      __tmp__HLO=result__GUHB;
     };
-    if (__tmp__1KO) {
-      __tmp__ILO=TRUE__;
+    if (__tmp__HLO) {
+      __tmp__ULO=TRUE__;
     } else {
-      result__JYHB=(c__SEO == '#');
-      if (result__JYHB) {
-        append__ROS(string_tmp__VH,(&__string_203));
+      result__YUHB=(c__4EO == '#');
+      if (result__YUHB) {
+        append__3OS(string_tmp__VH,(&__string_203));
       };
-      __tmp__ILO=result__JYHB;
+      __tmp__ULO=result__YUHB;
     };
-    if (__tmp__ILO) {
-      __tmp__VLO=TRUE__;
+    if (__tmp__ULO) {
+      __tmp__BMO=TRUE__;
     } else {
-      result__1YHB=(c__SEO == '@');
-      if (result__1YHB) {
-        append__ROS(string_tmp__VH,(&__string_204));
+      result__KVHB=(c__4EO == '@');
+      if (result__KVHB) {
+        append__3OS(string_tmp__VH,(&__string_204));
       };
-      __tmp__VLO=result__1YHB;
+      __tmp__BMO=result__KVHB;
     };
-    if ((! __tmp__VLO)) {
-      if ((c__SEO == '?')) {
-        append__ROS(string_tmp__VH,(&__string_205));
+    if ((! __tmp__BMO)) {
+      if ((c__4EO == '?')) {
+        append__3OS(string_tmp__VH,(&__string_205));
       };
     };
-    Self__4WO=(__INTEGER)(Self__4WO +  1);
+    Self__KXO=(__INTEGER)(Self__KXO +  1);
   };
   return(get__YWB(string_tmp__VH));
 }
 
-static void append_in__1KBC(__ITM_TYPE_MULTI *Self__2KBC,void *buffer__3KBC)
+static void append_in__MHBC(__ITM_TYPE_MULTI *Self__NHBC,void *buffer__OHBC)
 // ({ITM_TYPE_MULTI},{NULLxSTRING}) VoidRecursive, No inlinable.
 {
-  add_last__GOT(buffer__3KBC,'(');
-  display_raw__1OIC(Self__2KBC,buffer__3KBC);
-  add_last__GOT(buffer__3KBC,')');
+  __STRING *Self__HMIH,*Self__NMIH;
+  __INTEGER new_capacity__GMIH,old_nb_elts__JMIH,upper__B0KH,Self__5ZKH;
+  __INTEGER new_capacity__MMIH,old_nb_elts__PMIH,upper__G0KH,Self__E0KH;
+  __CHARACTER *Self__IMIH,*new__KMIH,*Self__OMIH,*new__QMIH;
+  Self__HMIH=((__STRING *)buffer__OHBC);
+  new_capacity__GMIH= 0;
+  if ((Self__HMIH->capacity__UCS <= Self__HMIH->count__SGC)) {
+    if ((Self__HMIH->capacity__UCS ==  0)) {
+      Self__HMIH->capacity__UCS= 32;
+      Self__HMIH->storage__3CS=create__YIEB( 32);
+    } else {
+      new_capacity__GMIH=(__INTEGER)(Self__HMIH->capacity__UCS <<  1);
+      Self__IMIH=((__CHARACTER *)Self__HMIH->storage__3CS);
+      old_nb_elts__JMIH=Self__HMIH->capacity__UCS;
+      new__KMIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__IMIH),((__UINTEGER_32 )old_nb_elts__JMIH),((__UINTEGER_32 )new_capacity__GMIH)));
+      upper__B0KH=(__INTEGER)(new_capacity__GMIH -  1);
+      Self__5ZKH=old_nb_elts__JMIH;
+      while ((Self__5ZKH <= upper__B0KH)) {
+        new__KMIH[Self__5ZKH]='\0';
+        Self__5ZKH=(__INTEGER)(Self__5ZKH +  1);
+      };
+      Self__HMIH->storage__3CS=new__KMIH;
+      Self__HMIH->capacity__UCS=new_capacity__GMIH;
+    };
+  };
+  ((__CHARACTER *)Self__HMIH->storage__3CS)[Self__HMIH->count__SGC]='(';
+  Self__HMIH->count__SGC=(__INTEGER)(Self__HMIH->count__SGC +  1);
+  display_raw__MLIC(Self__NHBC,buffer__OHBC);
+  Self__NMIH=((__STRING *)buffer__OHBC);
+  new_capacity__MMIH= 0;
+  if ((Self__NMIH->capacity__UCS <= Self__NMIH->count__SGC)) {
+    if ((Self__NMIH->capacity__UCS ==  0)) {
+      Self__NMIH->capacity__UCS= 32;
+      Self__NMIH->storage__3CS=create__YIEB( 32);
+    } else {
+      new_capacity__MMIH=(__INTEGER)(Self__NMIH->capacity__UCS <<  1);
+      Self__OMIH=((__CHARACTER *)Self__NMIH->storage__3CS);
+      old_nb_elts__PMIH=Self__NMIH->capacity__UCS;
+      new__QMIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__OMIH),((__UINTEGER_32 )old_nb_elts__PMIH),((__UINTEGER_32 )new_capacity__MMIH)));
+      upper__G0KH=(__INTEGER)(new_capacity__MMIH -  1);
+      Self__E0KH=old_nb_elts__PMIH;
+      while ((Self__E0KH <= upper__G0KH)) {
+        new__QMIH[Self__E0KH]='\0';
+        Self__E0KH=(__INTEGER)(Self__E0KH +  1);
+      };
+      Self__NMIH->storage__3CS=new__QMIH;
+      Self__NMIH->capacity__UCS=new_capacity__MMIH;
+    };
+  };
+  ((__CHARACTER *)Self__NMIH->storage__3CS)[Self__NMIH->count__SGC]=')';
+  Self__NMIH->count__SGC=(__INTEGER)(Self__NMIH->count__SGC +  1);
 }
 
-static void* read_prototype__XON(__PARSER *Self__YON,void *styl__ZON)
+static void* read_prototype__DPN(__PARSER *Self__EPN,void *styl__FPN)
 // ({PARSER},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  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);
+  void *nam__HPN,*n__IYP,*n__YOR;
+  void *result__JPN,*result__KVQ;
+  __INTEGER old_pos__LPN,old_derive__MPN,sav_derive__NPN;
+  __INTEGER pos_before__OPN,new_capacity__SMIH,old_nb_elts__VMIH;
+  __INTEGER upper__O0KH,Self__M0KH,idx__NYP,__tmp__54GH,typ_id__TLIB;
+  __INTEGER new_capacity__4CBB,__tmp__CEBB,__tmp__OOFC,Self__14VD;
+  __INTEGER typ_id__0MIH,idx__2OR,__tmp__E5GH,typ_id__42IB;
+  __INTEGER new_capacity__FBCB,__tmp__JCCB,__tmp__KSFC,Self__0AWD;
+  __POSITION pos__CUZG,pos__EUZG,pos__GUZG,pos__IUZG,pos__HWZG;
+  __POSITION __tmp__4TN,__tmp__AVN;
+  __STRING *Self__TMIH;
+  __ITM_TYPE_GENERIC *result__MYP,*__tmp__V0P,*result__NLIB,*Self__N1CC;
+  void *__tmp__U0P;
+  __POINTER ptr__OLIB,ptr_table__X0KH,next__W0KH,result__Y0KH;
+  __POINTER ptr_table__20KH,next__10KH,result__30KH,ptr__ZMIH;
+  __POINTER ptr_table__E1KH,next__D1KH,result__F1KH,ptr_table__J1KH;
+  __POINTER next__I1KH,result__K1KH,ptr__Z2IB,ptr_table__O1KH;
+  __POINTER next__N1KH,result__P1KH,ptr_table__T1KH,next__S1KH;
+  __POINTER result__U1KH;
+  __UINTEGER_32 sz__QLIB,a__QCGH,new_size__RCGH,t__VCGH,a__UCGH;
+  __UINTEGER_32 new_size__50KH,lab_type__40KH,sz__1MIH,a__2MIH;
+  __UINTEGER_32 new_size__3MIH,t__4MIH,a__5MIH,new_size__M1KH;
+  __UINTEGER_32 lab_type__L1KH,sz__12IB,a__4CGH,new_size__5CGH,t__DDGH;
+  __UINTEGER_32 a__CDGH,new_size__W1KH,lab_type__V1KH;
+  void *result__MUEH;
+  __ITM_TYPE_PARAMETER *result__YMIH,*Self__ANIH;
+  __ITM_TYPE_STYLE *result__1OR,*__tmp__XQR,*result__Y2IB,*Self__54CC;
+  void *__tmp__WQR;
+  void *genericity__IPN,*result__W4GH,*lt__KYP;
+  __BOOLEAN continue__PPN,result__I0KH,result__Q0KH,__tmp__2VQ;
+  __BOOLEAN result__T0KH,__tmp__MDBB,result__A1KH,__tmp__FUN;
+  __BOOLEAN __tmp__TBCB;
+  __CHARACTER result__J0KH,result__R0KH,result__U0KH,result__B1KH;
+  __CHARACTER *Self__UMIH,*new__WMIH;
+  __FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *Self__X4GH,*Self__Y4GH;
+  void **__tmp__IFHH,**__tmp__JFHH,**__tmp__KFHH,**__tmp__BEBB;
+  void **new__0NFC;
+  __FAST_ARRAYoITM_TYPE_GENERICo *Self__2CBB;
+  void **__tmp__LFHH,**__tmp__MFHH,**__tmp__ICCB,**new__WRFC;
+  __FAST_ARRAYoITM_TYPE_STYLEo *Self__DBCB;
+  nam__HPN=NULL;
+  genericity__IPN=NULL;
+  result__JPN=NULL;
+  old_pos__LPN= 0;
+  old_derive__MPN= 0;
+  sav_derive__NPN= 0;
+  pos_before__OPN= 0;
+  continue__PPN=FALSE__;
+  if (read_cap_identifier__N1J()) {
+    old_pos__LPN=position__CCC;
+    old_derive__MPN=short_derive__PCC;
+    copy__VDS(string_tmp2__GCJ,last_string__D2C);
     do {
-      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)) {
+      continue__PPN=read_word__ISF((&__string_7));
+      if (continue__PPN) {
+        if ((! read_cap_identifier__N1J())) {
+          pos__CUZG=current_position__B0F();
+          put_error__text__1PG( 0,(&__string_317));
+          put_position__FRG(pos__CUZG);
+          put_string__33F(msg_err__AQG);
+          if ((type_error__5PG !=  2)) {
             exit(( 1));
           };
         };
-        append__ROS(string_tmp2__0BJ,(&__string_7));
-        append__ROS(string_tmp2__0BJ,last_string__V1C);
+        append__3OS(string_tmp2__GCJ,(&__string_7));
+        append__3OS(string_tmp2__GCJ,last_string__D2C);
       } else {
-        pos_before__CPN=position__CCC;
-        result__PCKH=FALSE__;
-        if ((! read_space__MTD())) {
-          result__PCKH=FALSE__;
+        pos_before__OPN=position__CCC;
+        result__I0KH=FALSE__;
+        if ((! read_space__XTD())) {
+          result__I0KH=FALSE__;
         } else {
-          result__QCKH='\0';
-          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__QCKH=((__CHARACTER )(( 0)));
+          result__J0KH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+            result__J0KH=((__CHARACTER )(( 0)));
           } else {
-            result__QCKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+            result__J0KH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__QCKH == '.')) {
+          if ((result__J0KH == '.')) {
             position__CCC=(__INTEGER)(position__CCC +  1);
-            result__PCKH=TRUE__;
+            result__I0KH=TRUE__;
           };
         };
-        if ((result__PCKH && read_cap_identifier__B1J())) {
-          continue__DPN=TRUE__;
-          add_last__GOT(string_tmp2__0BJ,'.');
-          append__ROS(string_tmp2__0BJ,last_string__V1C);
+        if ((result__I0KH && read_cap_identifier__N1J())) {
+          continue__PPN=TRUE__;
+          Self__TMIH=((__STRING *)string_tmp2__GCJ);
+          new_capacity__SMIH= 0;
+          if ((Self__TMIH->capacity__UCS <= Self__TMIH->count__SGC)) {
+            if ((Self__TMIH->capacity__UCS ==  0)) {
+              Self__TMIH->capacity__UCS= 32;
+              Self__TMIH->storage__3CS=create__YIEB( 32);
+            } else {
+              new_capacity__SMIH=(__INTEGER)(Self__TMIH->capacity__UCS <<  1);
+              Self__UMIH=((__CHARACTER *)Self__TMIH->storage__3CS);
+              old_nb_elts__VMIH=Self__TMIH->capacity__UCS;
+              new__WMIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__UMIH),((__UINTEGER_32 )old_nb_elts__VMIH),((__UINTEGER_32 )new_capacity__SMIH)));
+              upper__O0KH=(__INTEGER)(new_capacity__SMIH -  1);
+              Self__M0KH=old_nb_elts__VMIH;
+              while ((Self__M0KH <= upper__O0KH)) {
+                new__WMIH[Self__M0KH]='\0';
+                Self__M0KH=(__INTEGER)(Self__M0KH +  1);
+              };
+              Self__TMIH->storage__3CS=new__WMIH;
+              Self__TMIH->capacity__UCS=new_capacity__SMIH;
+            };
+          };
+          ((__CHARACTER *)Self__TMIH->storage__3CS)[Self__TMIH->count__SGC]='.';
+          Self__TMIH->count__SGC=(__INTEGER)(Self__TMIH->count__SGC +  1);
+          append__3OS(string_tmp2__GCJ,last_string__D2C);
         } else {
-          position__CCC=pos_before__CPN;
+          position__CCC=pos_before__OPN;
         };
       };
-    } while (continue__DPN);
-    nam__1ON=get__YWB(string_tmp2__0BJ);
-    result__SCKH=FALSE__;
-    if ((! read_space__MTD())) {
-      result__SCKH=FALSE__;
+    } while (continue__PPN);
+    nam__HPN=get__YWB(string_tmp2__GCJ);
+    result__Q0KH=FALSE__;
+    if ((! read_space__XTD())) {
+      result__Q0KH=FALSE__;
     } else {
-      result__TCKH='\0';
-      if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__TCKH=((__CHARACTER )(( 0)));
+      result__R0KH='\0';
+      if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+        result__R0KH=((__CHARACTER )(( 0)));
       } else {
-        result__TCKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+        result__R0KH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__TCKH == '(')) {
+      if ((result__R0KH == '(')) {
         position__CCC=(__INTEGER)(position__CCC +  1);
-        result__SCKH=TRUE__;
+        result__Q0KH=TRUE__;
       };
     };
-    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);
+    if (result__Q0KH) {
+      result__W4GH=NULL;
+      if ((((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__GVP)->parent_arrayed_collection__FVP.upper__ZUV <  0)) {
+        result__W4GH=create_with_capacity__EGR( 16);
       } else {
-        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);
+        Self__X4GH=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__GVP);
+        result__W4GH=((void **)Self__X4GH->parent_arrayed_collection__FVP.storage__PZV)[Self__X4GH->parent_arrayed_collection__FVP.upper__ZUV];
+        Self__Y4GH=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__GVP);
+        Self__Y4GH->parent_arrayed_collection__FVP.upper__ZUV=(__INTEGER)(Self__Y4GH->parent_arrayed_collection__FVP.upper__ZUV -  1);
       };
-      genericity__2ON=result__WYHH;
+      genericity__IPN=result__W4GH;
       do {
-        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)) {
+        result__KVQ=read_type__CDM(Self__EPN,FALSE__);
+        if (((void *)result__KVQ == (void *)NULL)) {
+          if (((void *)read_constant__XRO() != (void *)NULL)) {
+            pos__EUZG=current_position__B0F();
+            put_error__text__1PG( 0,(&__string_318));
+            put_position__FRG(pos__EUZG);
+            put_string__33F(msg_err__AQG);
+            if ((type_error__5PG !=  2)) {
               exit(( 1));
             };
-            __tmp__QVQ=TRUE__;
+            __tmp__2VQ=TRUE__;
           } else {
-            __tmp__QVQ=FALSE__;
+            __tmp__2VQ=FALSE__;
           };
-          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)) {
+          if ((! __tmp__2VQ)) {
+            if (read_identifier__2BL()) {
+              pos__GUZG=current_position__B0F();
+              put_error__text__1PG( 0,(&__string_319));
+              put_position__FRG(pos__GUZG);
+              put_string__33F(msg_err__AQG);
+              if ((type_error__5PG !=  2)) {
                 exit(( 1));
               };
             };
           };
         };
-        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)) {
+        if (((void *)result__KVQ == (void *)NULL)) {
+          pos__IUZG=current_position__B0F();
+          put_error__text__1PG( 0,(&__string_259));
+          put_position__FRG(pos__IUZG);
+          put_string__33F(msg_err__AQG);
+          if ((type_error__5PG !=  2)) {
             exit(( 1));
           };
         };
-        add_last__COV(genericity__2ON,result__4UQ);
-        result__VCKH=FALSE__;
-        if ((! read_space__MTD())) {
-          result__VCKH=FALSE__;
+        add_last__ONV(genericity__IPN,result__KVQ);
+        result__T0KH=FALSE__;
+        if ((! read_space__XTD())) {
+          result__T0KH=FALSE__;
         } else {
-          result__WCKH='\0';
-          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__WCKH=((__CHARACTER )(( 0)));
+          result__U0KH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+            result__U0KH=((__CHARACTER )(( 0)));
           } else {
-            result__WCKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+            result__U0KH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__WCKH == ',')) {
+          if ((result__U0KH == ',')) {
             position__CCC=(__INTEGER)(position__CCC +  1);
-            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__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)));
+            result__T0KH=TRUE__;
+          };
+        };
+      } while (result__T0KH);
+      genericity__IPN=alias__CWP(result__W4GH);
+      n__IYP=nam__HPN;
+      lt__KYP=genericity__IPN;
+      result__MYP=NULL;
+      idx__NYP= 0;
+      __tmp__54GH=((__FAST_ARRAYoITM_TYPE_GENERICo *)dico__TYP)->parent_arrayed_collection__SYP.upper__2YP;
+      __tmp__IFHH=((__FAST_ARRAYoITM_TYPE_GENERICo *)dico__TYP)->parent_arrayed_collection__SYP.storage__SBW;
+      __tmp__JFHH=((__FAST_ARRAYoITM_TYPE_GENERICo *)dico__TYP)->parent_arrayed_collection__SYP.storage__SBW;
+      __tmp__KFHH=((__FAST_ARRAYoITM_TYPE_GENERICo *)dico__TYP)->parent_arrayed_collection__SYP.storage__SBW;
+      while (((idx__NYP <= __tmp__54GH) && ((((void *)((__ITM_TYPE_GENERIC *)((void **)__tmp__IFHH)[idx__NYP])->parent_itm_type_style__4SN.parent_itm_type_simple__3SN.name__GZP != (void *)n__IYP) || ((void *)((__ITM_TYPE_GENERIC *)((void **)__tmp__JFHH)[idx__NYP])->parent_itm_type_style__4SN.style__PZP != (void *)styl__FPN)) || ((void *)((__ITM_TYPE_GENERIC *)((void **)__tmp__KFHH)[idx__NYP])->list_type__ZZP != (void *)lt__KYP)))) {
+        idx__NYP=(__INTEGER)(idx__NYP +  1);
+      };
+      if ((idx__NYP <= ((__FAST_ARRAYoITM_TYPE_GENERICo *)dico__TYP)->parent_arrayed_collection__SYP.upper__2YP)) {
+        __tmp__U0P=((void **)((__FAST_ARRAYoITM_TYPE_GENERICo *)dico__TYP)->parent_arrayed_collection__SYP.storage__SBW)[idx__NYP];
+        if (__tmp__U0P==NULL) {
+          __tmp__V0P=NULL;
+        } else {
+          __tmp__V0P=((__ITM_TYPE_GENERIC *)__tmp__U0P);
+        };
+        result__MYP=__tmp__V0P;
+      } else {
+        result__NLIB=NULL;
+        ptr__OLIB=((__POINTER )(NULL));
+        typ_id__TLIB= 0;
+        sz__QLIB=((__UINTEGER_32 )sizeof(__ITM_TYPE_GENERIC));
+        if ((sz__QLIB ==  0)) {
+          result__NLIB=ITM_TYPE_GENERIC__;
+        } else {
+          typ_id__TLIB=-1;
+          clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__QLIB);
+          if ((typ_id__TLIB == (__INTEGER)(-  1))) {
+            a__QCGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__RCGH=(__UINTEGER_32)((__UINTEGER_32)(sz__QLIB + a__QCGH) & (__UINTEGER_32)(~ a__QCGH));
+            ptr_table__X0KH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__RCGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__W0KH=((__POINTER )(NULL));
+            result__Y0KH=((__POINTER *)ptr_table__X0KH)[ 0];
+            if ((result__Y0KH == (void *)NULL)) {
+              result__Y0KH=new_lab__RTJ(new_size__RCGH);
+              next__W0KH=(void *)((unsigned long)result__Y0KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RCGH)));
+              ((__POINTER *)next__W0KH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__X0KH)[ 0]=next__W0KH;
+            } else {
+              next__W0KH=((__POINTER *)result__Y0KH)[ 0];
+              if ((next__W0KH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__Y0KH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__RCGH <<  1)) <=  4096)) {
+                  next__W0KH=(void *)((unsigned long)result__Y0KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RCGH)));
                 } else {
-                  next__YCKH=new_lab__FTJ(new_size__RZGH);
+                  next__W0KH=new_lab__RTJ(new_size__RCGH);
                 };
-                ((__POINTER *)next__YCKH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__ZCKH)[ 0]=next__YCKH;
+                ((__POINTER *)next__W0KH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__X0KH)[ 0]=next__W0KH;
               } else {
-                ((__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__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)));
+                ((__POINTER *)result__Y0KH)[ 0]=(void *)((unsigned long)((__POINTER *)next__W0KH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__Y0KH=next__W0KH;
+              };
+            };
+            ptr__OLIB=result__Y0KH;
+          } else {
+            t__VCGH=((__UINTEGER_32 )typ_id__TLIB);
+            a__UCGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__50KH=(__UINTEGER_32)((__UINTEGER_32)(sz__QLIB + a__UCGH) & (__UINTEGER_32)(~ a__UCGH));
+            ptr_table__20KH=((__POINTER )(&(table_type[(t__VCGH)])));
+            lab_type__40KH=(__UINTEGER_32)(t__VCGH |  1);
+            next__10KH=((__POINTER )(NULL));
+            result__30KH=((__POINTER *)ptr_table__20KH)[ 0];
+            if ((result__30KH == (void *)NULL)) {
+              result__30KH=new_lab__RTJ(lab_type__40KH);
+              next__10KH=(void *)((unsigned long)result__30KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__50KH)));
+              ((__POINTER *)next__10KH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__20KH)[ 0]=next__10KH;
+            } else {
+              next__10KH=((__POINTER *)result__30KH)[ 0];
+              if ((next__10KH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__30KH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__50KH <<  1)) <=  4096)) {
+                  next__10KH=(void *)((unsigned long)result__30KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__50KH)));
                 } else {
-                  next__3CKH=new_lab__FTJ(lab_type__ADKH);
+                  next__10KH=new_lab__RTJ(lab_type__40KH);
                 };
-                ((__POINTER *)next__3CKH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__4CKH)[ 0]=next__3CKH;
+                ((__POINTER *)next__10KH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__20KH)[ 0]=next__10KH;
               } else {
-                ((__POINTER *)result__5CKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3CKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__5CKH=next__3CKH;
+                ((__POINTER *)result__30KH)[ 0]=(void *)((unsigned long)((__POINTER *)next__10KH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__30KH=next__10KH;
               };
             };
-            ptr__5OIB=result__5CKH;
+            ptr__OLIB=result__30KH;
           };
-          result__4OIB=((__ITM_TYPE_GENERIC *)ptr__5OIB);
-          *(result__4OIB) = *(ITM_TYPE_GENERIC__);
+          result__NLIB=((__ITM_TYPE_GENERIC *)ptr__OLIB);
+          *(result__NLIB) = *(ITM_TYPE_GENERIC__);
         };
-        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__;
+        Self__N1CC=((__ITM_TYPE_GENERIC *)result__NLIB);
+        Self__N1CC->parent_itm_type_style__4SN.parent_itm_type_simple__3SN.name__GZP=nam__HPN;
+        Self__N1CC->parent_itm_type_style__4SN.style__PZP=styl__FPN;
+        Self__N1CC->list_type__ZZP=genericity__IPN;
+        result__MYP=result__NLIB;
+        Self__2CBB=((__FAST_ARRAYoITM_TYPE_GENERICo *)dico__TYP);
+        new_capacity__4CBB= 0;
+        if (((__INTEGER)(Self__2CBB->parent_arrayed_collection__SYP.upper__2YP +  1) <= (__INTEGER)(Self__2CBB->parent_arrayed_collection__SYP.capacity__HBW -  1))) {
+          Self__2CBB->parent_arrayed_collection__SYP.upper__2YP=(__INTEGER)(Self__2CBB->parent_arrayed_collection__SYP.upper__2YP +  1);
+          __tmp__MDBB=TRUE__;
         } else {
-          __tmp__3GBB=FALSE__;
+          __tmp__MDBB=FALSE__;
         };
-        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;
+        if ((! __tmp__MDBB)) {
+          if ((Self__2CBB->parent_arrayed_collection__SYP.capacity__HBW ==  0)) {
+            Self__2CBB->parent_arrayed_collection__SYP.storage__SBW=create__JQXB( 2);
+            Self__2CBB->parent_arrayed_collection__SYP.capacity__HBW= 2;
+            Self__2CBB->parent_arrayed_collection__SYP.upper__2YP= 0;
           } else {
-            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);
+            new_capacity__4CBB=(__INTEGER)(Self__2CBB->parent_arrayed_collection__SYP.capacity__HBW <<  1);
+            __tmp__BEBB=Self__2CBB->parent_arrayed_collection__SYP.storage__SBW;
+            __tmp__CEBB=Self__2CBB->parent_arrayed_collection__SYP.capacity__HBW;
+            new__0NFC=((void **)realloc_dynamic__old_size__new_size__KELC(((__POINTER )((void **)__tmp__BEBB)),((__UINTEGER_32 )(__INTEGER)(__tmp__CEBB * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__4CBB * ((__INTEGER )(sizeof(void *)))))));
+            __tmp__OOFC=(__INTEGER)(new_capacity__4CBB -  1);
+            Self__14VD=__tmp__CEBB;
+            while ((Self__14VD <= __tmp__OOFC)) {
+              new__0NFC[Self__14VD]=NULL;
+              Self__14VD=(__INTEGER)(Self__14VD +  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);
+            Self__2CBB->parent_arrayed_collection__SYP.storage__SBW=new__0NFC;
+            Self__2CBB->parent_arrayed_collection__SYP.capacity__HBW=new_capacity__4CBB;
+            Self__2CBB->parent_arrayed_collection__SYP.upper__2YP=(__INTEGER)(Self__2CBB->parent_arrayed_collection__SYP.upper__2YP +  1);
           };
         };
-        ((void **)Self__NGBB->parent_arrayed_collection__GYP.storage__GCW)[Self__NGBB->parent_arrayed_collection__GYP.upper__QYP]=result__4OIB;
+        ((void **)Self__2CBB->parent_arrayed_collection__SYP.storage__SBW)[Self__2CBB->parent_arrayed_collection__SYP.upper__2YP]=result__NLIB;
       };
-      result__3ON=result__AYP;
-      result__CDKH=FALSE__;
-      if ((! read_space__MTD())) {
-        result__CDKH=FALSE__;
+      result__JPN=result__MYP;
+      result__A1KH=FALSE__;
+      if ((! read_space__XTD())) {
+        result__A1KH=FALSE__;
       } else {
-        result__DDKH='\0';
-        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__DDKH=((__CHARACTER )(( 0)));
+        result__B1KH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+          result__B1KH=((__CHARACTER )(( 0)));
         } else {
-          result__DDKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+          result__B1KH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__DDKH == ')')) {
+        if ((result__B1KH == ')')) {
           position__CCC=(__INTEGER)(position__CCC +  1);
-          result__CDKH=TRUE__;
+          result__A1KH=TRUE__;
         };
       };
-      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)) {
+      if ((! result__A1KH)) {
+        pos__HWZG=current_position__B0F();
+        put_error__text__1PG( 2,(&__string_262));
+        put_position__FRG(pos__HWZG);
+        put_string__33F(msg_err__AQG);
+        if ((type_error__5PG !=  2)) {
           exit(( 1));
         };
       };
     } else {
-      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)) {
+      if (is_parameter_type__AME) {
+        if (((void *)styl__FPN != (void *)NULL)) {
+          copy__VDS(string_tmp__VH,(&__string_320));
+          append__3OS(string_tmp__VH,styl__FPN);
+          append__3OS(string_tmp__VH,(&__string_321));
+          __tmp__4TN=current_position__B0F();
+          put_error__text__1PG( 2,string_tmp__VH);
+          put_position__FRG(__tmp__4TN);
+          put_string__33F(msg_err__AQG);
+          if ((type_error__5PG !=  2)) {
             exit(( 1));
           };
         };
-        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;
+        result__MUEH=fast_reference_at__R3T(dico__XVI,nam__HPN);
+        if (((void *)result__MUEH == (void *)NULL)) {
+          result__YMIH=NULL;
+          ptr__ZMIH=((__POINTER )(NULL));
+          typ_id__0MIH= 0;
+          sz__1MIH=((__UINTEGER_32 )sizeof(__ITM_TYPE_PARAMETER));
+          if ((sz__1MIH ==  0)) {
+            result__YMIH=ITM_TYPE_PARAMETER__;
+          } else {
+            typ_id__0MIH=-1;
+            clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__1MIH);
+            if ((typ_id__0MIH == (__INTEGER)(-  1))) {
+              a__2MIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__3MIH=(__UINTEGER_32)((__UINTEGER_32)(sz__1MIH + a__2MIH) & (__UINTEGER_32)(~ a__2MIH));
+              ptr_table__E1KH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__3MIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__D1KH=((__POINTER )(NULL));
+              result__F1KH=((__POINTER *)ptr_table__E1KH)[ 0];
+              if ((result__F1KH == (void *)NULL)) {
+                result__F1KH=new_lab__RTJ(new_size__3MIH);
+                next__D1KH=(void *)((unsigned long)result__F1KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3MIH)));
+                ((__POINTER *)next__D1KH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__E1KH)[ 0]=next__D1KH;
               } else {
-                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)));
+                next__D1KH=((__POINTER *)result__F1KH)[ 0];
+                if ((next__D1KH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__F1KH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__3MIH <<  1)) <=  4096)) {
+                    next__D1KH=(void *)((unsigned long)result__F1KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3MIH)));
                   } else {
-                    next__FDKH=new_lab__FTJ(new_size__CLIH);
+                    next__D1KH=new_lab__RTJ(new_size__3MIH);
                   };
-                  ((__POINTER *)next__FDKH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__GDKH)[ 0]=next__FDKH;
+                  ((__POINTER *)next__D1KH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__E1KH)[ 0]=next__D1KH;
                 } else {
-                  ((__POINTER *)result__HDKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FDKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__HDKH=next__FDKH;
+                  ((__POINTER *)result__F1KH)[ 0]=(void *)((unsigned long)((__POINTER *)next__D1KH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__F1KH=next__D1KH;
                 };
               };
-              ptr__4KIH=result__HDKH;
-            } else {
-              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;
+              ptr__ZMIH=result__F1KH;
+            } else {
+              t__4MIH=((__UINTEGER_32 )typ_id__0MIH);
+              a__5MIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__M1KH=(__UINTEGER_32)((__UINTEGER_32)(sz__1MIH + a__5MIH) & (__UINTEGER_32)(~ a__5MIH));
+              ptr_table__J1KH=((__POINTER )(&(table_type[(t__4MIH)])));
+              lab_type__L1KH=(__UINTEGER_32)(t__4MIH |  1);
+              next__I1KH=((__POINTER )(NULL));
+              result__K1KH=((__POINTER *)ptr_table__J1KH)[ 0];
+              if ((result__K1KH == (void *)NULL)) {
+                result__K1KH=new_lab__RTJ(lab_type__L1KH);
+                next__I1KH=(void *)((unsigned long)result__K1KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__M1KH)));
+                ((__POINTER *)next__I1KH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__J1KH)[ 0]=next__I1KH;
               } else {
-                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)));
+                next__I1KH=((__POINTER *)result__K1KH)[ 0];
+                if ((next__I1KH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__K1KH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__M1KH <<  1)) <=  4096)) {
+                    next__I1KH=(void *)((unsigned long)result__K1KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__M1KH)));
                   } else {
-                    next__KDKH=new_lab__FTJ(lab_type__NDKH);
+                    next__I1KH=new_lab__RTJ(lab_type__L1KH);
                   };
-                  ((__POINTER *)next__KDKH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__LDKH)[ 0]=next__KDKH;
+                  ((__POINTER *)next__I1KH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__J1KH)[ 0]=next__I1KH;
                 } else {
-                  ((__POINTER *)result__MDKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KDKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__MDKH=next__KDKH;
+                  ((__POINTER *)result__K1KH)[ 0]=(void *)((unsigned long)((__POINTER *)next__I1KH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__K1KH=next__I1KH;
                 };
               };
-              ptr__4KIH=result__MDKH;
+              ptr__ZMIH=result__K1KH;
             };
-            result__3KIH=((__ITM_TYPE_PARAMETER *)ptr__4KIH);
-            *(result__3KIH) = *(ITM_TYPE_PARAMETER__);
+            result__YMIH=((__ITM_TYPE_PARAMETER *)ptr__ZMIH);
+            *(result__YMIH) = *(ITM_TYPE_PARAMETER__);
           };
-          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;
+          Self__ANIH=((__ITM_TYPE_PARAMETER *)result__YMIH);
+          Self__ANIH->parent_itm_type__VFE.name__GZP=nam__HPN;
+          fast_put__to__JPZ(dico__XVI,Self__ANIH,nam__HPN);
+          result__MUEH=result__YMIH;
         };
-        result__3ON=result__FWEH;
-        __tmp__ZTN=TRUE__;
+        result__JPN=result__MUEH;
+        __tmp__FUN=TRUE__;
       } else {
-        __tmp__ZTN=FALSE__;
+        __tmp__FUN=FALSE__;
       };
-      if ((! __tmp__ZTN)) {
-        if (((void *)styl__ZON == (void *)NULL)) {
-          result__3ON=get__2UI(nam__1ON);
+      if ((! __tmp__FUN)) {
+        if (((void *)styl__FPN == (void *)NULL)) {
+          result__JPN=get__IVI(nam__HPN);
         } else {
-          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)) {
+          if (((void *)nam__HPN == (void *)(&__string_1))) {
+            copy__VDS(string_tmp__VH,(&__string_320));
+            append__3OS(string_tmp__VH,styl__FPN);
+            append__3OS(string_tmp__VH,(&__string_322));
+            __tmp__AVN=current_position__B0F();
+            put_error__text__1PG( 2,string_tmp__VH);
+            put_position__FRG(__tmp__AVN);
+            put_string__33F(msg_err__AQG);
+            if ((type_error__5PG !=  2)) {
               exit(( 1));
             };
-            result__3ON=type_self__XUN;
-          } else {
-            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__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;
+            result__JPN=type_self__DVN;
+          } else {
+            n__YOR=nam__HPN;
+            result__1OR=NULL;
+            idx__2OR= 0;
+            __tmp__E5GH=((__FAST_ARRAYoITM_TYPE_STYLEo *)dico__CPR)->parent_arrayed_collection__BPR.upper__LPR;
+            __tmp__LFHH=((__FAST_ARRAYoITM_TYPE_STYLEo *)dico__CPR)->parent_arrayed_collection__BPR.storage__0LW;
+            __tmp__MFHH=((__FAST_ARRAYoITM_TYPE_STYLEo *)dico__CPR)->parent_arrayed_collection__BPR.storage__0LW;
+            while (((idx__2OR <= __tmp__E5GH) && (((void *)((__ITM_TYPE_STYLE *)((void **)__tmp__LFHH)[idx__2OR])->parent_itm_type_simple__3SN.name__GZP != (void *)n__YOR) || ((void *)((__ITM_TYPE_STYLE *)((void **)__tmp__MFHH)[idx__2OR])->style__PZP != (void *)styl__FPN)))) {
+              idx__2OR=(__INTEGER)(idx__2OR +  1);
+            };
+            if ((idx__2OR <= ((__FAST_ARRAYoITM_TYPE_STYLEo *)dico__CPR)->parent_arrayed_collection__BPR.upper__LPR)) {
+              __tmp__WQR=((void **)((__FAST_ARRAYoITM_TYPE_STYLEo *)dico__CPR)->parent_arrayed_collection__BPR.storage__0LW)[idx__2OR];
+              if (__tmp__WQR==NULL) {
+                __tmp__XQR=NULL;
               } else {
-                __tmp__LQR=((__ITM_TYPE_STYLE *)__tmp__KQR);
+                __tmp__XQR=((__ITM_TYPE_STYLE *)__tmp__WQR);
               };
-              result__POR=__tmp__LQR;
+              result__1OR=__tmp__XQR;
             } else {
-              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__;
+              result__Y2IB=NULL;
+              ptr__Z2IB=((__POINTER )(NULL));
+              typ_id__42IB= 0;
+              sz__12IB=((__UINTEGER_32 )sizeof(__ITM_TYPE_STYLE));
+              if ((sz__12IB ==  0)) {
+                result__Y2IB=ITM_TYPE_STYLE__;
               } else {
-                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;
+                typ_id__42IB=-1;
+                clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__12IB);
+                if ((typ_id__42IB == (__INTEGER)(-  1))) {
+                  a__4CGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                  new_size__5CGH=(__UINTEGER_32)((__UINTEGER_32)(sz__12IB + a__4CGH) & (__UINTEGER_32)(~ a__4CGH));
+                  ptr_table__O1KH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__5CGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                  next__N1KH=((__POINTER )(NULL));
+                  result__P1KH=((__POINTER *)ptr_table__O1KH)[ 0];
+                  if ((result__P1KH == (void *)NULL)) {
+                    result__P1KH=new_lab__RTJ(new_size__5CGH);
+                    next__N1KH=(void *)((unsigned long)result__P1KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5CGH)));
+                    ((__POINTER *)next__N1KH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__O1KH)[ 0]=next__N1KH;
                   } 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__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)));
+                    next__N1KH=((__POINTER *)result__P1KH)[ 0];
+                    if ((next__N1KH == (void *)NULL)) {
+                      if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__P1KH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__5CGH <<  1)) <=  4096)) {
+                        next__N1KH=(void *)((unsigned long)result__P1KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5CGH)));
                       } else {
-                        next__PDKH=new_lab__FTJ(new_size__5ZGH);
+                        next__N1KH=new_lab__RTJ(new_size__5CGH);
                       };
-                      ((__POINTER *)next__PDKH)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__QDKH)[ 0]=next__PDKH;
+                      ((__POINTER *)next__N1KH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__O1KH)[ 0]=next__N1KH;
                     } else {
-                      ((__POINTER *)result__RDKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PDKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                      result__RDKH=next__PDKH;
+                      ((__POINTER *)result__P1KH)[ 0]=(void *)((unsigned long)((__POINTER *)next__N1KH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                      result__P1KH=next__N1KH;
                     };
                   };
-                  ptr__KAJB=result__RDKH;
+                  ptr__Z2IB=result__P1KH;
                 } else {
-                  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;
+                  t__DDGH=((__UINTEGER_32 )typ_id__42IB);
+                  a__CDGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                  new_size__W1KH=(__UINTEGER_32)((__UINTEGER_32)(sz__12IB + a__CDGH) & (__UINTEGER_32)(~ a__CDGH));
+                  ptr_table__T1KH=((__POINTER )(&(table_type[(t__DDGH)])));
+                  lab_type__V1KH=(__UINTEGER_32)(t__DDGH |  1);
+                  next__S1KH=((__POINTER )(NULL));
+                  result__U1KH=((__POINTER *)ptr_table__T1KH)[ 0];
+                  if ((result__U1KH == (void *)NULL)) {
+                    result__U1KH=new_lab__RTJ(lab_type__V1KH);
+                    next__S1KH=(void *)((unsigned long)result__U1KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__W1KH)));
+                    ((__POINTER *)next__S1KH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__T1KH)[ 0]=next__S1KH;
                   } 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__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)));
+                    next__S1KH=((__POINTER *)result__U1KH)[ 0];
+                    if ((next__S1KH == (void *)NULL)) {
+                      if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__U1KH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__W1KH <<  1)) <=  4096)) {
+                        next__S1KH=(void *)((unsigned long)result__U1KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__W1KH)));
                       } else {
-                        next__UDKH=new_lab__FTJ(lab_type__XDKH);
+                        next__S1KH=new_lab__RTJ(lab_type__V1KH);
                       };
-                      ((__POINTER *)next__UDKH)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__VDKH)[ 0]=next__UDKH;
+                      ((__POINTER *)next__S1KH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__T1KH)[ 0]=next__S1KH;
                     } else {
-                      ((__POINTER *)result__WDKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UDKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                      result__WDKH=next__UDKH;
+                      ((__POINTER *)result__U1KH)[ 0]=(void *)((unsigned long)((__POINTER *)next__S1KH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                      result__U1KH=next__S1KH;
                     };
                   };
-                  ptr__KAJB=result__WDKH;
+                  ptr__Z2IB=result__U1KH;
                 };
-                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__;
+                result__Y2IB=((__ITM_TYPE_STYLE *)ptr__Z2IB);
+                *(result__Y2IB) = *(ITM_TYPE_STYLE__);
+              };
+              Self__54CC=((__ITM_TYPE_STYLE *)result__Y2IB);
+              Self__54CC->parent_itm_type_simple__3SN.name__GZP=nam__HPN;
+              Self__54CC->style__PZP=styl__FPN;
+              result__1OR=result__Y2IB;
+              Self__DBCB=((__FAST_ARRAYoITM_TYPE_STYLEo *)dico__CPR);
+              new_capacity__FBCB= 0;
+              if (((__INTEGER)(Self__DBCB->parent_arrayed_collection__BPR.upper__LPR +  1) <= (__INTEGER)(Self__DBCB->parent_arrayed_collection__BPR.capacity__PLW -  1))) {
+                Self__DBCB->parent_arrayed_collection__BPR.upper__LPR=(__INTEGER)(Self__DBCB->parent_arrayed_collection__BPR.upper__LPR +  1);
+                __tmp__TBCB=TRUE__;
               } else {
-                __tmp__EFCB=FALSE__;
+                __tmp__TBCB=FALSE__;
               };
-              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;
+              if ((! __tmp__TBCB)) {
+                if ((Self__DBCB->parent_arrayed_collection__BPR.capacity__PLW ==  0)) {
+                  Self__DBCB->parent_arrayed_collection__BPR.storage__0LW=create__VFYB( 2);
+                  Self__DBCB->parent_arrayed_collection__BPR.capacity__PLW= 2;
+                  Self__DBCB->parent_arrayed_collection__BPR.upper__LPR= 0;
                 } else {
-                  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);
+                  new_capacity__FBCB=(__INTEGER)(Self__DBCB->parent_arrayed_collection__BPR.capacity__PLW <<  1);
+                  __tmp__ICCB=Self__DBCB->parent_arrayed_collection__BPR.storage__0LW;
+                  __tmp__JCCB=Self__DBCB->parent_arrayed_collection__BPR.capacity__PLW;
+                  new__WRFC=((void **)realloc_dynamic__old_size__new_size__KELC(((__POINTER )((void **)__tmp__ICCB)),((__UINTEGER_32 )(__INTEGER)(__tmp__JCCB * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__FBCB * ((__INTEGER )(sizeof(void *)))))));
+                  __tmp__KSFC=(__INTEGER)(new_capacity__FBCB -  1);
+                  Self__0AWD=__tmp__JCCB;
+                  while ((Self__0AWD <= __tmp__KSFC)) {
+                    new__WRFC[Self__0AWD]=NULL;
+                    Self__0AWD=(__INTEGER)(Self__0AWD +  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);
+                  Self__DBCB->parent_arrayed_collection__BPR.storage__0LW=new__WRFC;
+                  Self__DBCB->parent_arrayed_collection__BPR.capacity__PLW=new_capacity__FBCB;
+                  Self__DBCB->parent_arrayed_collection__BPR.upper__LPR=(__INTEGER)(Self__DBCB->parent_arrayed_collection__BPR.upper__LPR +  1);
                 };
               };
-              ((void **)Self__UECB->parent_arrayed_collection__VOR.storage__OMW)[Self__UECB->parent_arrayed_collection__VOR.upper__5OR]=result__JAJB;
+              ((void **)Self__DBCB->parent_arrayed_collection__BPR.storage__0LW)[Self__DBCB->parent_arrayed_collection__BPR.upper__LPR]=result__Y2IB;
             };
-            result__3ON=result__POR;
+            result__JPN=result__1OR;
           };
         };
       };
     };
     if (is_shorter__LZ) {
-      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);
+      sav_derive__NPN=short_derive__PCC;
+      short_derive__PCC=old_derive__MPN;
+      if ((((void *)result__JPN == (void *)type_self__DVN) || ((void *)result__JPN == (void *)type_null__1VN))) {
+        short__token__to__GDD((&__string_126),(__INTEGER)(old_pos__LPN - ((__STRING_CONSTANT *)nam__HPN)->count__DD),old_pos__LPN);
       } else {
-        short__token__to__YCD((&__string_125),(__INTEGER)(old_pos__5ON - ((__STRING_CONSTANT *)nam__1ON)->count__DD),old_pos__5ON);
+        short__token__to__GDD((&__string_125),(__INTEGER)(old_pos__LPN - ((__STRING_CONSTANT *)nam__HPN)->count__DD),old_pos__LPN);
       };
-      short_derive__PCC=(__INTEGER)(sav_derive__BPN + (__INTEGER)(short_derive__PCC - old_derive__APN));
+      short_derive__PCC=(__INTEGER)(sav_derive__NPN + (__INTEGER)(short_derive__PCC - old_derive__MPN));
     };
   };
-  return(result__3ON);
+  return(result__JPN);
 }
 
-static void read_def_local__A3H(__PARSER *Self__B3H)
+static void read_def_local__M3H(__PARSER *Self__N3H)
 // ({PARSER}) VoidNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER beg__D0K,typ_id__TXN,Self__RCAB,limit_up__SCAB,__tmp__H4K;
+  __INTEGER Self__D4N;
+  __POSITION pos__TYZG,__tmp__P1K,pos__1YZG,pos__IZZG,pos__PZZG;
+  void *__tmp__Q1K;
+  __ITM_LOCAL *result__NXN,*Self__ODV;
+  __POINTER ptr__OXN,ptr_table__Y1KH,next__X1KH,result__Z1KH;
+  __POINTER ptr_table__31KH,next__21KH,result__41KH;
+  __UINTEGER_32 sz__QXN,a__UDGH,new_size__VDGH,t__ZDGH,a__YDGH;
+  __UINTEGER_32 new_size__A2KH,lab_type__51KH;
+  __CHARACTER styl__X3H,result__C2KH,result__RPBH,result__F2KH;
+  __CHARACTER result__I2KH;
+  void *result__NFHH,*local_list__V3H,*result__QFHH,*static_list__W3H;
+  void *result__C0K,*result__UTI;
+  __FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *Self__OFHH,*Self__PFHH;
+  __FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *Self__RFHH,*Self__SFHH,*Self__3P4;
+  __FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *Self__TQ4;
+  __BOOLEAN mute__E0K,result__B2KH,__tmp__11K,result__E2KH,result__H2KH;
+  old_position__ITI=position__CCC;
+  old_pos_cur__KTI=pos_cur__FCC;
+  old_pos_line__MTI=pos_line__GCC;
+  old_pos_col__OTI=pos_col__HCC;
+  old_short_derive__QTI=short_derive__PCC;
+  styl__X3H=read_style__PUF();
+  result__NFHH=NULL;
+  if ((((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__0TI)->parent_arrayed_collection__ZTI.upper__C3T <  0)) {
+    result__NFHH=create_with_capacity__LLK( 16);
   } else {
-    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);
+    Self__OFHH=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__0TI);
+    result__NFHH=((void **)Self__OFHH->parent_arrayed_collection__ZTI.storage__YKU)[Self__OFHH->parent_arrayed_collection__ZTI.upper__C3T];
+    Self__PFHH=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__0TI);
+    Self__PFHH->parent_arrayed_collection__ZTI.upper__C3T=(__INTEGER)(Self__PFHH->parent_arrayed_collection__ZTI.upper__C3T -  1);
+  };
+  local_list__V3H=result__NFHH;
+  result__QFHH=NULL;
+  if ((((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__0TI)->parent_arrayed_collection__ZTI.upper__C3T <  0)) {
+    result__QFHH=create_with_capacity__LLK( 16);
   } else {
-    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;
+    Self__RFHH=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__0TI);
+    result__QFHH=((void **)Self__RFHH->parent_arrayed_collection__ZTI.storage__YKU)[Self__RFHH->parent_arrayed_collection__ZTI.upper__C3T];
+    Self__SFHH=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__0TI);
+    Self__SFHH->parent_arrayed_collection__ZTI.upper__C3T=(__INTEGER)(Self__SFHH->parent_arrayed_collection__ZTI.upper__C3T -  1);
+  };
+  static_list__W3H=result__QFHH;
+  while ((styl__X3H != ' ')) {
+    result__C0K=NULL;
+    beg__D0K= 0;
+    mute__E0K=TRUE__;
+    if (read_identifier__2BL()) {
+      result__UTI=NULL;
+      if ((((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__0TI)->parent_arrayed_collection__ZTI.upper__C3T <  0)) {
+        result__UTI=create_with_capacity__LLK( 16);
+      } else {
+        Self__3P4=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__0TI);
+        result__UTI=((void **)Self__3P4->parent_arrayed_collection__ZTI.storage__YKU)[Self__3P4->parent_arrayed_collection__ZTI.upper__C3T];
+        Self__TQ4=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__0TI);
+        Self__TQ4->parent_arrayed_collection__ZTI.upper__C3T=(__INTEGER)(Self__TQ4->parent_arrayed_collection__ZTI.upper__C3T -  1);
+      };
+      result__C0K=result__UTI;
+      beg__D0K= 0;
       do {
-        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)) {
+        if (((((__INTEGER)(((__FAST_ARRAYoITM_LOCALo *)result__C0K)->parent_arrayed_collection__T3H.upper__M2K +  1) !=  0) && (! read_identifier__2BL())) && (! mute__E0K))) {
+          pos__TYZG=current_position__B0F();
+          put_error__text__1PG( 0,(&__string_323));
+          put_position__FRG(pos__TYZG);
+          put_string__33F(msg_err__AQG);
+          if ((type_error__5PG !=  2)) {
             exit(( 1));
           };
         };
-        __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__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)));
+        __tmp__P1K=current_position__B0F();
+        __tmp__Q1K=last_string__D2C;
+        result__NXN=NULL;
+        ptr__OXN=((__POINTER )(NULL));
+        typ_id__TXN= 0;
+        sz__QXN=((__UINTEGER_32 )sizeof(__ITM_LOCAL));
+        if ((sz__QXN ==  0)) {
+          result__NXN=ITM_LOCAL__;
+        } else {
+          typ_id__TXN=__ITM_LOCAL__;
+          clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__QXN);
+          if ((typ_id__TXN == (__INTEGER)(-  1))) {
+            a__UDGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__VDGH=(__UINTEGER_32)((__UINTEGER_32)(sz__QXN + a__UDGH) & (__UINTEGER_32)(~ a__UDGH));
+            ptr_table__Y1KH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__VDGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__X1KH=((__POINTER )(NULL));
+            result__Z1KH=((__POINTER *)ptr_table__Y1KH)[ 0];
+            if ((result__Z1KH == (void *)NULL)) {
+              result__Z1KH=new_lab__RTJ(new_size__VDGH);
+              next__X1KH=(void *)((unsigned long)result__Z1KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VDGH)));
+              ((__POINTER *)next__X1KH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__Y1KH)[ 0]=next__X1KH;
+            } else {
+              next__X1KH=((__POINTER *)result__Z1KH)[ 0];
+              if ((next__X1KH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__Z1KH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__VDGH <<  1)) <=  4096)) {
+                  next__X1KH=(void *)((unsigned long)result__Z1KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VDGH)));
                 } else {
-                  next__ZDKH=new_lab__FTJ(new_size__V0GH);
+                  next__X1KH=new_lab__RTJ(new_size__VDGH);
                 };
-                ((__POINTER *)next__ZDKH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__0DKH)[ 0]=next__ZDKH;
+                ((__POINTER *)next__X1KH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__Y1KH)[ 0]=next__X1KH;
               } else {
-                ((__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__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)));
+                ((__POINTER *)result__Z1KH)[ 0]=(void *)((unsigned long)((__POINTER *)next__X1KH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__Z1KH=next__X1KH;
+              };
+            };
+            ptr__OXN=result__Z1KH;
+          } else {
+            t__ZDGH=((__UINTEGER_32 )typ_id__TXN);
+            a__YDGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__A2KH=(__UINTEGER_32)((__UINTEGER_32)(sz__QXN + a__YDGH) & (__UINTEGER_32)(~ a__YDGH));
+            ptr_table__31KH=((__POINTER )(&(table_type[(t__ZDGH)])));
+            lab_type__51KH=(__UINTEGER_32)(t__ZDGH |  1);
+            next__21KH=((__POINTER )(NULL));
+            result__41KH=((__POINTER *)ptr_table__31KH)[ 0];
+            if ((result__41KH == (void *)NULL)) {
+              result__41KH=new_lab__RTJ(lab_type__51KH);
+              next__21KH=(void *)((unsigned long)result__41KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__A2KH)));
+              ((__POINTER *)next__21KH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__31KH)[ 0]=next__21KH;
+            } else {
+              next__21KH=((__POINTER *)result__41KH)[ 0];
+              if ((next__21KH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__41KH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__A2KH <<  1)) <=  4096)) {
+                  next__21KH=(void *)((unsigned long)result__41KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__A2KH)));
                 } else {
-                  next__4DKH=new_lab__FTJ(lab_type__BEKH);
+                  next__21KH=new_lab__RTJ(lab_type__51KH);
                 };
-                ((__POINTER *)next__4DKH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__5DKH)[ 0]=next__4DKH;
+                ((__POINTER *)next__21KH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__31KH)[ 0]=next__21KH;
               } else {
-                ((__POINTER *)result__AEKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4DKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__AEKH=next__4DKH;
+                ((__POINTER *)result__41KH)[ 0]=(void *)((unsigned long)((__POINTER *)next__21KH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__41KH=next__21KH;
               };
             };
-            ptr__CXN=result__AEKH;
+            ptr__OXN=result__41KH;
           };
-          result__BXN=((__ITM_LOCAL *)ptr__CXN);
-          *(result__BXN) = *(ITM_LOCAL__);
+          result__NXN=((__ITM_LOCAL *)ptr__OXN);
+          *(result__NXN) = *(ITM_LOCAL__);
         };
-        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__;
+        Self__ODV=((__ITM_LOCAL *)result__NXN);
+        Self__ODV->name__P4K=__tmp__Q1K;
+        Self__ODV->parent_itm_object__O3H.position__SFJ=__tmp__P1K;
+        add_last__Z1U(result__C0K,result__NXN);
+        result__B2KH=FALSE__;
+        if ((! read_space__XTD())) {
+          result__B2KH=FALSE__;
         } else {
-          result__EEKH='\0';
-          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__EEKH=((__CHARACTER )(( 0)));
+          result__C2KH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+            result__C2KH=((__CHARACTER )(( 0)));
           } else {
-            result__EEKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+            result__C2KH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__EEKH == ':')) {
+          if ((result__C2KH == ':')) {
             position__CCC=(__INTEGER)(position__CCC +  1);
-            result__DEKH=TRUE__;
+            result__B2KH=TRUE__;
           };
         };
-        if (result__DEKH) {
-          result__XNBH='\0';
-          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__XNBH=((__CHARACTER )(( 0)));
+        if (result__B2KH) {
+          result__RPBH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+            result__RPBH=((__CHARACTER )(( 0)));
           } else {
-            result__XNBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+            result__RPBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
           };
-          __tmp__P1K=(result__XNBH != '=');
+          __tmp__11K=(result__RPBH != '=');
         } else {
-          __tmp__P1K=FALSE__;
+          __tmp__11K=FALSE__;
         };
-        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)) {
+        if (__tmp__11K) {
+          mute__E0K=FALSE__;
+          if (((void *)read_type__CDM(Self__N3H,TRUE__) == (void *)NULL)) {
+            pos__1YZG=current_position__B0F();
+            put_error__text__1PG( 0,(&__string_324));
+            put_position__FRG(pos__1YZG);
+            put_string__33F(msg_err__AQG);
+            if ((type_error__5PG !=  2)) {
               exit(( 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);
+          Self__RCAB=beg__D0K;
+          limit_up__SCAB=((__FAST_ARRAYoITM_LOCALo *)result__C0K)->parent_arrayed_collection__T3H.upper__M2K;
+          while ((Self__RCAB <= limit_up__SCAB)) {
+            Self__RCAB=(__INTEGER)(Self__RCAB +  1);
           };
-          beg__XZK=(__INTEGER)(((__FAST_ARRAYoITM_LOCALo *)result__WZK)->parent_arrayed_collection__H3H.upper__A2K +  1);
+          beg__D0K=(__INTEGER)(((__FAST_ARRAYoITM_LOCALo *)result__C0K)->parent_arrayed_collection__T3H.upper__M2K +  1);
         };
-        result__GEKH=FALSE__;
-        if ((! read_space__MTD())) {
-          result__GEKH=FALSE__;
+        result__E2KH=FALSE__;
+        if ((! read_space__XTD())) {
+          result__E2KH=FALSE__;
         } else {
-          result__HEKH='\0';
-          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__HEKH=((__CHARACTER )(( 0)));
+          result__F2KH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+            result__F2KH=((__CHARACTER )(( 0)));
           } else {
-            result__HEKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+            result__F2KH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__HEKH == ',')) {
+          if ((result__F2KH == ',')) {
             position__CCC=(__INTEGER)(position__CCC +  1);
-            result__GEKH=TRUE__;
+            result__E2KH=TRUE__;
           };
         };
-      } 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;
+      } while (result__E2KH);
+      if ((beg__D0K != (__INTEGER)(((__FAST_ARRAYoITM_LOCALo *)result__UTI)->parent_arrayed_collection__T3H.upper__M2K +  1))) {
+        if (mute__E0K) {
+          free__RLK(result__UTI);
+          result__C0K=NULL;
         } else {
-          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)) {
+          pos__IZZG=current_position__B0F();
+          put_error__text__1PG( 0,(&__string_324));
+          put_position__FRG(pos__IZZG);
+          put_string__33F(msg_err__AQG);
+          if ((type_error__5PG !=  2)) {
             exit(( 1));
           };
         };
       } else {
-        result__WZK=copy__O5J(result__WZK);
+        result__C0K=copy__05J(result__C0K);
         if (is_shorter__LZ) {
-          __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);
+          __tmp__H4K=((__FAST_ARRAYoITM_LOCALo *)result__C0K)->parent_arrayed_collection__T3H.upper__M2K;
+          Self__D4N= 0;
+          while ((Self__D4N <= __tmp__H4K)) {
+            add__1IHB(short_local__XCC,((__ITM_LOCAL *)((void **)((__FAST_ARRAYoITM_LOCALo *)result__C0K)->parent_arrayed_collection__T3H.storage__TMU)[Self__D4N])->name__P4K);
+            Self__D4N=(__INTEGER)(Self__D4N +  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);
-        };
+    if (((void *)result__C0K != (void *)NULL)) {
+      if ((styl__X3H == '+')) {
+        append_collection__RDPD(local_list__V3H,result__C0K);
       } else {
-        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);
-        };
+        append_collection__RDPD(static_list__W3H,result__C0K);
       };
-      result__JEKH=FALSE__;
-      if ((! read_space__MTD())) {
-        result__JEKH=FALSE__;
+      result__H2KH=FALSE__;
+      if ((! read_space__XTD())) {
+        result__H2KH=FALSE__;
       } else {
-        result__KEKH='\0';
-        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__KEKH=((__CHARACTER )(( 0)));
+        result__I2KH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+          result__I2KH=((__CHARACTER )(( 0)));
         } else {
-          result__KEKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+          result__I2KH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__KEKH == ';')) {
+        if ((result__I2KH == ';')) {
           position__CCC=(__INTEGER)(position__CCC +  1);
-          result__JEKH=TRUE__;
+          result__H2KH=TRUE__;
         };
       };
-      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)) {
+      if ((! result__H2KH)) {
+        pos__PZZG=current_position__B0F();
+        put_error__text__1PG( 2,(&__string_241));
+        put_position__FRG(pos__PZZG);
+        put_string__33F(msg_err__AQG);
+        if ((type_error__5PG !=  2)) {
           exit(( 1));
         };
       };
-      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();
+      old_position__ITI=position__CCC;
+      old_pos_cur__KTI=pos_cur__FCC;
+      old_pos_line__MTI=pos_line__GCC;
+      old_pos_col__OTI=pos_col__HCC;
+      old_short_derive__QTI=short_derive__PCC;
+      styl__X3H=read_style__PUF();
     } else {
-      restore_context__YEL();
-      styl__L3H=' ';
+      restore_context__EFL();
+      styl__X3H=' ';
     };
   };
-  if ((((__FAST_ARRAYoITM_LOCALo *)result__HLIH)->parent_arrayed_collection__H3H.upper__A2K <  0)) {
-    free__FLK(result__HLIH);
+  if ((((__FAST_ARRAYoITM_LOCALo *)result__NFHH)->parent_arrayed_collection__T3H.upper__M2K <  0)) {
+    free__RLK(result__NFHH);
   } else {
-    copy__O5J(result__HLIH);
+    copy__05J(result__NFHH);
   };
-  if ((((__FAST_ARRAYoITM_LOCALo *)result__KLIH)->parent_arrayed_collection__H3H.upper__A2K <  0)) {
-    free__FLK(result__KLIH);
+  if ((((__FAST_ARRAYoITM_LOCALo *)result__QFHH)->parent_arrayed_collection__T3H.upper__M2K <  0)) {
+    free__RLK(result__QFHH);
   } else {
-    copy__O5J(result__KLIH);
+    copy__05J(result__QFHH);
   };
 }
 
-static __FAST_ARRAYoITM_CODEo* create_with_capacity__LXI(__INTEGER new_count__NXI)
+static __FAST_ARRAYoITM_CODEo* create_with_capacity__XXI(__INTEGER new_count__ZXI)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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__;
+  __POINTER ptr__VMJ,ptr_table__L2KH,next__K2KH,result__M2KH;
+  __POINTER ptr_table__Q2KH,next__P2KH,result__R2KH;
+  __INTEGER typ_id__0MJ;
+  __UINTEGER_32 sz__XMJ,a__RJGH,new_size__SJGH,t__WJGH,a__VJGH;
+  __UINTEGER_32 new_size__T2KH,lab_type__S2KH;
+  __FAST_ARRAYoITM_CODEo *result__UMJ,*Self__Y5T;
+  result__UMJ=NULL;
+  ptr__VMJ=((__POINTER )(NULL));
+  typ_id__0MJ= 0;
+  sz__XMJ=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_CODEo));
+  if ((sz__XMJ ==  0)) {
+    result__UMJ=FAST_ARRAYoITM_CODEo__;
   } else {
-    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);
+    typ_id__0MJ=__FAST_ARRAYoITM_CODEo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__XMJ);
+    if ((typ_id__0MJ == (__INTEGER)(-  1))) {
+      a__RJGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__SJGH=(__UINTEGER_32)((__UINTEGER_32)(sz__XMJ + a__RJGH) & (__UINTEGER_32)(~ a__RJGH));
+      ptr_table__L2KH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__SJGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__K2KH=((__POINTER )(NULL));
+      result__M2KH=((__POINTER *)ptr_table__L2KH)[ 0];
+      if ((result__M2KH == (void *)NULL)) {
+        result__M2KH=new_lab__RTJ(new_size__SJGH);
+        next__K2KH=(void *)((unsigned long)result__M2KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SJGH)));
+        ((__POINTER *)next__K2KH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__L2KH)[ 0]=next__K2KH;
+      } else {
+        next__K2KH=((__POINTER *)result__M2KH)[ 0];
+        if ((next__K2KH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__M2KH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__SJGH <<  1)) <=  4096)) {
+            next__K2KH=(void *)((unsigned long)result__M2KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SJGH)));
+          } else {
+            next__K2KH=new_lab__RTJ(new_size__SJGH);
+          };
+          ((__POINTER *)next__K2KH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__L2KH)[ 0]=next__K2KH;
+        } else {
+          ((__POINTER *)result__M2KH)[ 0]=(void *)((unsigned long)((__POINTER *)next__K2KH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__M2KH=next__K2KH;
+        };
+      };
+      ptr__VMJ=result__M2KH;
+    } else {
+      t__WJGH=((__UINTEGER_32 )typ_id__0MJ);
+      a__VJGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__T2KH=(__UINTEGER_32)((__UINTEGER_32)(sz__XMJ + a__VJGH) & (__UINTEGER_32)(~ a__VJGH));
+      ptr_table__Q2KH=((__POINTER )(&(table_type[(t__WJGH)])));
+      lab_type__S2KH=(__UINTEGER_32)(t__WJGH |  1);
+      next__P2KH=((__POINTER )(NULL));
+      result__R2KH=((__POINTER *)ptr_table__Q2KH)[ 0];
+      if ((result__R2KH == (void *)NULL)) {
+        result__R2KH=new_lab__RTJ(lab_type__S2KH);
+        next__P2KH=(void *)((unsigned long)result__R2KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__T2KH)));
+        ((__POINTER *)next__P2KH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__Q2KH)[ 0]=next__P2KH;
+      } else {
+        next__P2KH=((__POINTER *)result__R2KH)[ 0];
+        if ((next__P2KH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__R2KH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__T2KH <<  1)) <=  4096)) {
+            next__P2KH=(void *)((unsigned long)result__R2KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__T2KH)));
+          } else {
+            next__P2KH=new_lab__RTJ(lab_type__S2KH);
+          };
+          ((__POINTER *)next__P2KH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__Q2KH)[ 0]=next__P2KH;
+        } else {
+          ((__POINTER *)result__R2KH)[ 0]=(void *)((unsigned long)((__POINTER *)next__P2KH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__R2KH=next__P2KH;
+        };
+      };
+      ptr__VMJ=result__R2KH;
+    };
+    result__UMJ=((__FAST_ARRAYoITM_CODEo *)ptr__VMJ);
+    *(result__UMJ) = *(FAST_ARRAYoITM_CODEo__);
+  };
+  Self__Y5T=((__FAST_ARRAYoITM_CODEo *)result__UMJ);
+  if ((Self__Y5T->parent_arrayed_collection__JWF.capacity__TZT < new_count__ZXI)) {
+    Self__Y5T->parent_arrayed_collection__JWF.storage__4ZT=create__KRQB(new_count__ZXI);
+    Self__Y5T->parent_arrayed_collection__JWF.capacity__TZT=new_count__ZXI;
+  };
+  Self__Y5T->parent_arrayed_collection__JWF.upper__NJL=(__INTEGER)(-  1);
+  return(result__UMJ);
 }
 
-static void add_last__25U(__FAST_ARRAYoITM_CODEo *Self__35U,void *element__45U)
+static void add_last__I5U(__FAST_ARRAYoITM_CODEo *Self__J5U,void *element__K5U)
 // ({FAST_ARRAYoITM_CODEo},{NULLxITM_LISTxITM_LDOTSxITM_PROTOTYPExITM_LIST_IDFxITM_WRITE_VALUExITM_WRITE_CASTxITM_READxITM_WRITE_CODExITM_OPERATORxITM_READ_ARG1xITM_READ_ARG2xITM_EXPRESSIONxITM_OLDxITM_EXTERNAL_TYPExITM_BLOCKxITM_EXTERNALxITM_READ_ARGSxITM_REALxITM_NUMBERxITM_CHARACTERxITM_STRINGxITM_RESULT}) VoidNo recursive, No inlinable.
 {
-  __INTEGER new_capacity__55U,__tmp__DBV,__tmp__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__;
+  __INTEGER new_capacity__L5U,__tmp__PAV,__tmp__ODEC,Self__JMVD;
+  __BOOLEAN __tmp__Z5U;
+  void **__tmp__OAV,**new__0CEC;
+  new_capacity__L5U= 0;
+  if (((__INTEGER)(Self__J5U->parent_arrayed_collection__JWF.upper__NJL +  1) <= (__INTEGER)(Self__J5U->parent_arrayed_collection__JWF.capacity__TZT -  1))) {
+    Self__J5U->parent_arrayed_collection__JWF.upper__NJL=(__INTEGER)(Self__J5U->parent_arrayed_collection__JWF.upper__NJL +  1);
+    __tmp__Z5U=TRUE__;
   } else {
-    __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;
+    __tmp__Z5U=FALSE__;
+  };
+  if ((! __tmp__Z5U)) {
+    if ((Self__J5U->parent_arrayed_collection__JWF.capacity__TZT ==  0)) {
+      Self__J5U->parent_arrayed_collection__JWF.storage__4ZT=create__KRQB( 2);
+      Self__J5U->parent_arrayed_collection__JWF.capacity__TZT= 2;
+      Self__J5U->parent_arrayed_collection__JWF.upper__NJL= 0;
+    } else {
+      new_capacity__L5U=(__INTEGER)(Self__J5U->parent_arrayed_collection__JWF.capacity__TZT <<  1);
+      __tmp__OAV=Self__J5U->parent_arrayed_collection__JWF.storage__4ZT;
+      __tmp__PAV=Self__J5U->parent_arrayed_collection__JWF.capacity__TZT;
+      new__0CEC=((void **)realloc_dynamic__old_size__new_size__KELC(((__POINTER )((void **)__tmp__OAV)),((__UINTEGER_32 )(__INTEGER)(__tmp__PAV * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__L5U * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__ODEC=(__INTEGER)(new_capacity__L5U -  1);
+      Self__JMVD=__tmp__PAV;
+      while ((Self__JMVD <= __tmp__ODEC)) {
+        new__0CEC[Self__JMVD]=NULL;
+        Self__JMVD=(__INTEGER)(Self__JMVD +  1);
+      };
+      Self__J5U->parent_arrayed_collection__JWF.storage__4ZT=new__0CEC;
+      Self__J5U->parent_arrayed_collection__JWF.capacity__TZT=new_capacity__L5U;
+      Self__J5U->parent_arrayed_collection__JWF.upper__NJL=(__INTEGER)(Self__J5U->parent_arrayed_collection__JWF.upper__NJL +  1);
+    };
+  };
+  ((void **)Self__J5U->parent_arrayed_collection__JWF.storage__4ZT)[Self__J5U->parent_arrayed_collection__JWF.upper__NJL]=element__K5U;
 }
 
-static void* copy__TBI(void *tmp__VBI)
+static void* copy__5BI(void *tmp__BCI)
 // ({NULLxFAST_ARRAYoITM_CODEo}) With resultNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER new_capacity__KZT,other_upper__JZT,Self__Q3JC;
+  void *result__DCI;
+  __FAST_ARRAYoITM_CODEo *Self__HZT;
+  void **__tmp__B0T,**__tmp__D0T,**Self__CQCC;
+  result__DCI=create_with_capacity__XXI((__INTEGER)(((__FAST_ARRAYoITM_CODEo *)tmp__BCI)->parent_arrayed_collection__JWF.upper__NJL +  1));
+  Self__HZT=((__FAST_ARRAYoITM_CODEo *)result__DCI);
+  new_capacity__KZT= 0;
+  other_upper__JZT=((__FAST_ARRAYoITM_CODEo *)tmp__BCI)->parent_arrayed_collection__JWF.upper__NJL;
+  if ((other_upper__JZT >=  0)) {
+    new_capacity__KZT=(__INTEGER)(other_upper__JZT +  1);
+    if ((Self__HZT->parent_arrayed_collection__JWF.capacity__TZT < new_capacity__KZT)) {
+      Self__HZT->parent_arrayed_collection__JWF.storage__4ZT=create__KRQB(new_capacity__KZT);
+      Self__HZT->parent_arrayed_collection__JWF.capacity__TZT=new_capacity__KZT;
+    };
+    __tmp__B0T=Self__HZT->parent_arrayed_collection__JWF.storage__4ZT;
+    __tmp__D0T=((__FAST_ARRAYoITM_CODEo *)tmp__BCI)->parent_arrayed_collection__JWF.storage__4ZT;
+    Self__CQCC=((void **)__tmp__B0T);
+    Self__Q3JC=other_upper__JZT;
+    while ((Self__Q3JC >=  0)) {
+      Self__CQCC[Self__Q3JC]=((void **)__tmp__D0T)[Self__Q3JC];
+      Self__Q3JC=(__INTEGER)(Self__Q3JC -  1);
+    };
+  };
+  Self__HZT->parent_arrayed_collection__JWF.upper__NJL=other_upper__JZT;
+  free__3XI(tmp__BCI);
+  return(result__DCI);
 }
 
-static __BOOLEAN fast_has__FEV(__HASHED_SEToSTRING_CONSTANTo *Self__GEV,void *e__HEV)
+static __BOOLEAN fast_has__RDV(__HASHED_SEToSTRING_CONSTANTo *Self__SDV,void *e__TDV)
 // ({HASHED_SEToSTRING_CONSTANTo},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __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));
+  void *node__3DV;
+  node__3DV=((void **)Self__SDV->buckets__DEV)[(__INTEGER)(hash_code__RNW(e__TDV) % Self__SDV->capacity__HIT)];
+  while ((! (((void *)node__3DV == (void *)NULL) || ((void *)((__HASHED_SET_NODEoSTRING_CONSTANTo *)node__3DV)->item__PEV == (void *)e__TDV)))) {
+    node__3DV=((__HASHED_SET_NODEoSTRING_CONSTANTo *)node__3DV)->next__0EV;
+  };
+  return(((void *)node__3DV != (void *)NULL));
 }
 
-static void restore_context__YEL()
+static void restore_context__EFL()
 // () VoidNo recursive, No inlinable.
 {
-  __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;
+  __INTEGER beg__GFL,__tmp__YFL,__tmp__1FL,Self__YNM,new_capacity__CNIH;
+  __INTEGER old_nb_elts__FNIH,upper__X2KH,Self__V2KH;
+  __STRING *Self__DNIH;
+  __CHARACTER ch__HNIH;
+  __CHARACTER *Self__ENIH,*new__GNIH;
+  beg__GFL= 0;
   if (is_shorter__LZ) {
-    ((__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;
+    ((__STRING *)token__BED)->count__SGC= 0;
+    beg__GFL=(__INTEGER)(old_position__ITI + old_short_derive__QTI);
+    remove_between__to__MIT(output_code__SI,beg__GFL,(__INTEGER)((__INTEGER)(position__CCC + short_derive__PCC) -  1));
+    __tmp__YFL=old_position__ITI;
+    __tmp__1FL=(__INTEGER)(position__CCC -  1);
+    Self__YNM=__tmp__YFL;
+    while ((Self__YNM <= __tmp__1FL)) {
+      Self__DNIH=((__STRING *)token__BED);
+      ch__HNIH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(Self__YNM -  1)];
+      new_capacity__CNIH= 0;
+      if ((Self__DNIH->capacity__UCS <= Self__DNIH->count__SGC)) {
+        if ((Self__DNIH->capacity__UCS ==  0)) {
+          Self__DNIH->capacity__UCS= 32;
+          Self__DNIH->storage__3CS=create__YIEB( 32);
+        } else {
+          new_capacity__CNIH=(__INTEGER)(Self__DNIH->capacity__UCS <<  1);
+          Self__ENIH=((__CHARACTER *)Self__DNIH->storage__3CS);
+          old_nb_elts__FNIH=Self__DNIH->capacity__UCS;
+          new__GNIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__ENIH),((__UINTEGER_32 )old_nb_elts__FNIH),((__UINTEGER_32 )new_capacity__CNIH)));
+          upper__X2KH=(__INTEGER)(new_capacity__CNIH -  1);
+          Self__V2KH=old_nb_elts__FNIH;
+          while ((Self__V2KH <= upper__X2KH)) {
+            new__GNIH[Self__V2KH]='\0';
+            Self__V2KH=(__INTEGER)(Self__V2KH +  1);
+          };
+          Self__DNIH->storage__3CS=new__GNIH;
+          Self__DNIH->capacity__UCS=new_capacity__CNIH;
+        };
+      };
+      ((__CHARACTER *)Self__DNIH->storage__3CS)[Self__DNIH->count__SGC]=ch__HNIH;
+      Self__DNIH->count__SGC=(__INTEGER)(Self__DNIH->count__SGC +  1);
+      Self__YNM=(__INTEGER)(Self__YNM +  1);
+    };
+    insert_string__to__OXU(output_code__SI,token__BED,beg__GFL);
+    short_derive__PCC=old_short_derive__QTI;
+  };
+  position__CCC=old_position__ITI;
+  pos_cur__FCC=old_pos_cur__KTI;
+  pos_line__GCC=old_pos_line__MTI;
+  pos_col__HCC=old_pos_col__OTI;
 }
 
-static void* read_expr_message__5WL(__PARSER *Self__AXL)
+static void* read_expr_message__LXL(__PARSER *Self__MXL)
 // ({PARSER}) With resultNo recursive, No inlinable.
 {
-  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));
+  void *result__B3L,*result__OXL;
+  __POSITION pos__52ZG,p__U35,pos__H3ZG;
+  __ITM_OLD *result__KQGB;
+  __POINTER ptr__LQGB,ptr_table__22KH,next__12KH,result__32KH;
+  __POINTER ptr_table__B3KH,next__A3KH,result__C3KH;
+  __INTEGER typ_id__QQGB;
+  __UINTEGER_32 sz__NQGB,a__UFGH,new_size__VFGH,t__ZFGH,a__YFGH;
+  __UINTEGER_32 new_size__E3KH,lab_type__D3KH;
+  __BOOLEAN result__02KH,result__F3KH;
+  __CHARACTER result__G3KH;
+  result__B3L=NULL;
+  result__02KH=read_word__ISF((&__string_8));
   if (is_shorter__LZ) {
-    if (result__XEKH) {
+    if (result__02KH) {
       if (((void *)(&__string_8) == (void *)(&__string_4))) {
-        short__token__to__YCD((&__string_120),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V1C)->count__DD),position__CCC);
+        short__token__to__GDD((&__string_120),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__D2C)->count__DD),position__CCC);
       } else {
-        short__token__to__YCD((&__string_119),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V1C)->count__DD),position__CCC);
+        short__token__to__GDD((&__string_119),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__D2C)->count__DD),position__CCC);
       };
     };
   };
-  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)) {
+  if (result__02KH) {
+    if (((void *)read_expr__DBJ(Self__MXL) == (void *)NULL)) {
+      pos__52ZG=current_position__B0F();
+      put_error__text__1PG( 0,(&__string_325));
+      put_position__FRG(pos__52ZG);
+      put_string__33F(msg_err__AQG);
+      if ((type_error__5PG !=  2)) {
         exit(( 1));
       };
     };
-    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__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__3EKH=new_lab__FTJ(lab_type__AFKH);
+    p__U35=current_position__B0F();
+    result__KQGB=NULL;
+    ptr__LQGB=((__POINTER )(NULL));
+    typ_id__QQGB= 0;
+    sz__NQGB=((__UINTEGER_32 )sizeof(__ITM_OLD));
+    if ((sz__NQGB ==  0)) {
+      result__KQGB=ITM_OLD__;
+    } else {
+      typ_id__QQGB=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__NQGB);
+      if ((typ_id__QQGB == (__INTEGER)(-  1))) {
+        a__UFGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__VFGH=(__UINTEGER_32)((__UINTEGER_32)(sz__NQGB + a__UFGH) & (__UINTEGER_32)(~ a__UFGH));
+        ptr_table__22KH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__VFGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__12KH=((__POINTER )(NULL));
+        result__32KH=((__POINTER *)ptr_table__22KH)[ 0];
+        if ((result__32KH == (void *)NULL)) {
+          result__32KH=new_lab__RTJ(new_size__VFGH);
+          next__12KH=(void *)((unsigned long)result__32KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VFGH)));
+          ((__POINTER *)next__12KH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__22KH)[ 0]=next__12KH;
+        } else {
+          next__12KH=((__POINTER *)result__32KH)[ 0];
+          if ((next__12KH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__32KH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__VFGH <<  1)) <=  4096)) {
+              next__12KH=(void *)((unsigned long)result__32KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VFGH)));
+            } else {
+              next__12KH=new_lab__RTJ(new_size__VFGH);
+            };
+            ((__POINTER *)next__12KH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__22KH)[ 0]=next__12KH;
+          } else {
+            ((__POINTER *)result__32KH)[ 0]=(void *)((unsigned long)((__POINTER *)next__12KH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__32KH=next__12KH;
+          };
+        };
+        ptr__LQGB=result__32KH;
+      } else {
+        t__ZFGH=((__UINTEGER_32 )typ_id__QQGB);
+        a__YFGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__E3KH=(__UINTEGER_32)((__UINTEGER_32)(sz__NQGB + a__YFGH) & (__UINTEGER_32)(~ a__YFGH));
+        ptr_table__B3KH=((__POINTER )(&(table_type[(t__ZFGH)])));
+        lab_type__D3KH=(__UINTEGER_32)(t__ZFGH |  1);
+        next__A3KH=((__POINTER )(NULL));
+        result__C3KH=((__POINTER *)ptr_table__B3KH)[ 0];
+        if ((result__C3KH == (void *)NULL)) {
+          result__C3KH=new_lab__RTJ(lab_type__D3KH);
+          next__A3KH=(void *)((unsigned long)result__C3KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__E3KH)));
+          ((__POINTER *)next__A3KH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__B3KH)[ 0]=next__A3KH;
+        } else {
+          next__A3KH=((__POINTER *)result__C3KH)[ 0];
+          if ((next__A3KH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__C3KH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__E3KH <<  1)) <=  4096)) {
+              next__A3KH=(void *)((unsigned long)result__C3KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__E3KH)));
+            } else {
+              next__A3KH=new_lab__RTJ(lab_type__D3KH);
             };
-            ((__POINTER *)next__3EKH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__4EKH)[ 0]=next__3EKH;
+            ((__POINTER *)next__A3KH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__B3KH)[ 0]=next__A3KH;
           } else {
-            ((__POINTER *)result__5EKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3EKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__5EKH=next__3EKH;
+            ((__POINTER *)result__C3KH)[ 0]=(void *)((unsigned long)((__POINTER *)next__A3KH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__C3KH=next__A3KH;
           };
         };
-        ptr__2TGB=result__5EKH;
+        ptr__LQGB=result__C3KH;
       };
-      result__1TGB=((__ITM_OLD *)ptr__2TGB);
-      *(result__1TGB) = *(ITM_OLD__);
+      result__KQGB=((__ITM_OLD *)ptr__LQGB);
+      *(result__KQGB) = *(ITM_OLD__);
     };
-    ((__ITM_OLD *)result__1TGB)->parent_itm_code__K3L.parent_itm_object__SEE.position__GFJ=p__FBAB;
-    result__V2L=result__1TGB;
+    ((__ITM_OLD *)result__KQGB)->parent_itm_code__W3L.parent_itm_object__PFE.position__SFJ=p__U35;
+    result__B3L=result__KQGB;
   } else {
-    result__V2L=read_expr_primary__Y4M(Self__AXL);
-    if (((void *)result__V2L == (void *)NULL)) {
-      result__V2L=read_send_msg__24N(Self__AXL,NULL);
+    result__B3L=read_expr_primary__E5M(Self__MXL);
+    if (((void *)result__B3L == (void *)NULL)) {
+      result__B3L=read_send_msg__I5N(Self__MXL,NULL);
     };
   };
-  result__CXL=result__V2L;
-  if (((void *)result__V2L != (void *)NULL)) {
-    while_do__YZM:
+  result__OXL=result__B3L;
+  if (((void *)result__B3L != (void *)NULL)) {
+    while_do__E0M:
     {
-      result__CFKH=FALSE__;
-      if ((! read_space__MTD())) {
-        result__CFKH=FALSE__;
+      result__F3KH=FALSE__;
+      if ((! read_space__XTD())) {
+        result__F3KH=FALSE__;
       } else {
-        result__DFKH='\0';
-        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__DFKH=((__CHARACTER )(( 0)));
+        result__G3KH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+          result__G3KH=((__CHARACTER )(( 0)));
         } else {
-          result__DFKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+          result__G3KH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__DFKH == '.')) {
+        if ((result__G3KH == '.')) {
           position__CCC=(__INTEGER)(position__CCC +  1);
-          result__CFKH=TRUE__;
+          result__F3KH=TRUE__;
         };
       };
-      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)) {
+      if (result__F3KH) {
+        result__OXL=read_send_msg__I5N(Self__MXL,result__OXL);
+        if (((void *)result__OXL == (void *)NULL)) {
+          pos__H3ZG=current_position__B0F();
+          put_error__text__1PG( 0,(&__string_326));
+          put_position__FRG(pos__H3ZG);
+          put_string__33F(msg_err__AQG);
+          if ((type_error__5PG !=  2)) {
             exit(( 1));
           };
         };
-        goto while_do__YZM;
+        goto while_do__E0M;
       };
     };
   };
-  return(result__CXL);
+  return(result__OXL);
 }
 
-static void free__RXI(void *tmp__TXI)
+static void free__3XI(void *tmp__5XI)
 // ({NULLxFAST_ARRAYoITM_CODEo}) VoidNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER new_capacity__RBU,__tmp__ZCU,__tmp__O3DC,Self__MGVD;
+  __FAST_ARRAYoFAST_ARRAYoITM_CODEoo *Self__PBU;
+  __BOOLEAN __tmp__ACU;
+  void **__tmp__YCU,**new__02DC;
+  ((__FAST_ARRAYoITM_CODEo *)tmp__5XI)->parent_arrayed_collection__JWF.upper__NJL=(__INTEGER)(-  1);
+  Self__PBU=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__QAI);
+  new_capacity__RBU= 0;
+  if (((__INTEGER)(Self__PBU->parent_arrayed_collection__PAI.upper__BYT +  1) <= (__INTEGER)(Self__PBU->parent_arrayed_collection__PAI.capacity__TBU -  1))) {
+    Self__PBU->parent_arrayed_collection__PAI.upper__BYT=(__INTEGER)(Self__PBU->parent_arrayed_collection__PAI.upper__BYT +  1);
+    __tmp__ACU=TRUE__;
   } else {
-    __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;
+    __tmp__ACU=FALSE__;
+  };
+  if ((! __tmp__ACU)) {
+    if ((Self__PBU->parent_arrayed_collection__PAI.capacity__TBU ==  0)) {
+      Self__PBU->parent_arrayed_collection__PAI.storage__PCU=create__3ZPB( 2);
+      Self__PBU->parent_arrayed_collection__PAI.capacity__TBU= 2;
+      Self__PBU->parent_arrayed_collection__PAI.upper__BYT= 0;
+    } else {
+      new_capacity__RBU=(__INTEGER)(Self__PBU->parent_arrayed_collection__PAI.capacity__TBU <<  1);
+      __tmp__YCU=Self__PBU->parent_arrayed_collection__PAI.storage__PCU;
+      __tmp__ZCU=Self__PBU->parent_arrayed_collection__PAI.capacity__TBU;
+      new__02DC=((void **)realloc_dynamic__old_size__new_size__KELC(((__POINTER )((void **)__tmp__YCU)),((__UINTEGER_32 )(__INTEGER)(__tmp__ZCU * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__RBU * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__O3DC=(__INTEGER)(new_capacity__RBU -  1);
+      Self__MGVD=__tmp__ZCU;
+      while ((Self__MGVD <= __tmp__O3DC)) {
+        new__02DC[Self__MGVD]=NULL;
+        Self__MGVD=(__INTEGER)(Self__MGVD +  1);
+      };
+      Self__PBU->parent_arrayed_collection__PAI.storage__PCU=new__02DC;
+      Self__PBU->parent_arrayed_collection__PAI.capacity__TBU=new_capacity__RBU;
+      Self__PBU->parent_arrayed_collection__PAI.upper__BYT=(__INTEGER)(Self__PBU->parent_arrayed_collection__PAI.upper__BYT +  1);
+    };
+  };
+  ((void **)Self__PBU->parent_arrayed_collection__PAI.storage__PCU)[Self__PBU->parent_arrayed_collection__PAI.upper__BYT]=tmp__5XI;
 }
 
-static void display_raw__1OIC(__ITM_TYPE_MULTI *Self__2OIC,void *buffer__3OIC)
+static void display_raw__MLIC(__ITM_TYPE_MULTI *Self__NLIC,void *buffer__OLIC)
 // ({ITM_TYPE_MULTI},{NULLxSTRING}) VoidRecursive, No inlinable.
 {
-  __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) {
+  __INTEGER __tmp__VLIC,Self__JLRC,new_capacity__INIH,old_nb_elts__LNIH;
+  __INTEGER upper__L3KH,Self__J3KH,new_capacity__ONIH,old_nb_elts__RNIH;
+  __INTEGER upper__Q3KH,Self__O3KH,new_capacity__UNIH,old_nb_elts__XNIH;
+  __INTEGER upper__V3KH,Self__T3KH;
+  void *__tmp__2LIC,*__tmp__5LIC;
+  __ITM_TYPE_STYLE *Self__UFHH,*Self__WFHH;
+  __STRING *Self__JNIH,*Self__PNIH,*Self__VNIH;
+  __CHARACTER *Self__KNIH,*new__MNIH,*Self__QNIH,*new__SNIH,*Self__WNIH;
+  __CHARACTER *new__YNIH;
+  __FAST_ARRAYoITM_TYPE_MONOo *Self__LGGH;
+  __tmp__VLIC=(__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)Self__NLIC->list_type__2KP)->parent_arrayed_collection__SYC.upper__4HV -  1);
+  Self__JLRC= 0;
+  while ((Self__JLRC <= __tmp__VLIC)) {
+    __tmp__2LIC=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)Self__NLIC->list_type__2KP)->parent_arrayed_collection__SYC.storage__FMV)[Self__JLRC];
+    switch (((struct ___OBJ *)__tmp__2LIC)->__id) {
     case __ITM_TYPE_PARAMETER__: {
-      append__ROS(buffer__3OIC,((__ITM_TYPE_PARAMETER *)__tmp__LPIC)->parent_itm_type__YEE.name__0YP);
+      append__3OS(buffer__OLIC,((__ITM_TYPE_PARAMETER *)__tmp__2LIC)->parent_itm_type__VFE.name__GZP);
     } break;
     case __ITM_TYPE_SIMPLE__: {
-      append__ROS(buffer__3OIC,((__ITM_TYPE_SIMPLE *)__tmp__LPIC)->name__0YP);
+      append__3OS(buffer__OLIC,((__ITM_TYPE_SIMPLE *)__tmp__2LIC)->name__GZP);
     } break;
     case __ITM_TYPE_BLOCK__: {
-      append_in__IIPD(__tmp__LPIC,buffer__3OIC);
+      append_in__PJPD(__tmp__2LIC,buffer__OLIC);
     } break;
     case __ITM_TYPE_GENERIC__: {
-      append_in__MJPD(__tmp__LPIC,buffer__3OIC);
+      append_in__TKPD(__tmp__2LIC,buffer__OLIC);
     } break;
     case __ITM_TYPE_STYLE__: {
-      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__ROS(buffer__3OIC,Self__4WEH->parent_itm_type_simple__RSN.name__0YP);
+      Self__UFHH=((__ITM_TYPE_STYLE *)__tmp__2LIC);
+      if (((void *)Self__UFHH->style__PZP != (void *)NULL)) {
+        append__3OS(buffer__OLIC,Self__UFHH->style__PZP);
+        Self__JNIH=((__STRING *)buffer__OLIC);
+        new_capacity__INIH= 0;
+        if ((Self__JNIH->capacity__UCS <= Self__JNIH->count__SGC)) {
+          if ((Self__JNIH->capacity__UCS ==  0)) {
+            Self__JNIH->capacity__UCS= 32;
+            Self__JNIH->storage__3CS=create__YIEB( 32);
+          } else {
+            new_capacity__INIH=(__INTEGER)(Self__JNIH->capacity__UCS <<  1);
+            Self__KNIH=((__CHARACTER *)Self__JNIH->storage__3CS);
+            old_nb_elts__LNIH=Self__JNIH->capacity__UCS;
+            new__MNIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__KNIH),((__UINTEGER_32 )old_nb_elts__LNIH),((__UINTEGER_32 )new_capacity__INIH)));
+            upper__L3KH=(__INTEGER)(new_capacity__INIH -  1);
+            Self__J3KH=old_nb_elts__LNIH;
+            while ((Self__J3KH <= upper__L3KH)) {
+              new__MNIH[Self__J3KH]='\0';
+              Self__J3KH=(__INTEGER)(Self__J3KH +  1);
+            };
+            Self__JNIH->storage__3CS=new__MNIH;
+            Self__JNIH->capacity__UCS=new_capacity__INIH;
+          };
+        };
+        ((__CHARACTER *)Self__JNIH->storage__3CS)[Self__JNIH->count__SGC]=' ';
+        Self__JNIH->count__SGC=(__INTEGER)(Self__JNIH->count__SGC +  1);
+      };
+      append__3OS(buffer__OLIC,Self__UFHH->parent_itm_type_simple__3SN.name__GZP);
     } break;
     };
-    add_last__GOT(buffer__3OIC,',');
-    Self__PORC=(__INTEGER)(Self__PORC +  1);
-  };
-  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) {
+    Self__PNIH=((__STRING *)buffer__OLIC);
+    new_capacity__ONIH= 0;
+    if ((Self__PNIH->capacity__UCS <= Self__PNIH->count__SGC)) {
+      if ((Self__PNIH->capacity__UCS ==  0)) {
+        Self__PNIH->capacity__UCS= 32;
+        Self__PNIH->storage__3CS=create__YIEB( 32);
+      } else {
+        new_capacity__ONIH=(__INTEGER)(Self__PNIH->capacity__UCS <<  1);
+        Self__QNIH=((__CHARACTER *)Self__PNIH->storage__3CS);
+        old_nb_elts__RNIH=Self__PNIH->capacity__UCS;
+        new__SNIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__QNIH),((__UINTEGER_32 )old_nb_elts__RNIH),((__UINTEGER_32 )new_capacity__ONIH)));
+        upper__Q3KH=(__INTEGER)(new_capacity__ONIH -  1);
+        Self__O3KH=old_nb_elts__RNIH;
+        while ((Self__O3KH <= upper__Q3KH)) {
+          new__SNIH[Self__O3KH]='\0';
+          Self__O3KH=(__INTEGER)(Self__O3KH +  1);
+        };
+        Self__PNIH->storage__3CS=new__SNIH;
+        Self__PNIH->capacity__UCS=new_capacity__ONIH;
+      };
+    };
+    ((__CHARACTER *)Self__PNIH->storage__3CS)[Self__PNIH->count__SGC]=',';
+    Self__PNIH->count__SGC=(__INTEGER)(Self__PNIH->count__SGC +  1);
+    Self__JLRC=(__INTEGER)(Self__JLRC +  1);
+  };
+  Self__LGGH=((__FAST_ARRAYoITM_TYPE_MONOo *)Self__NLIC->list_type__2KP);
+  __tmp__5LIC=((void **)Self__LGGH->parent_arrayed_collection__SYC.storage__FMV)[Self__LGGH->parent_arrayed_collection__SYC.upper__4HV];
+  switch (((struct ___OBJ *)__tmp__5LIC)->__id) {
   case __ITM_TYPE_PARAMETER__: {
-    append__ROS(buffer__3OIC,((__ITM_TYPE_PARAMETER *)__tmp__OPIC)->parent_itm_type__YEE.name__0YP);
+    append__3OS(buffer__OLIC,((__ITM_TYPE_PARAMETER *)__tmp__5LIC)->parent_itm_type__VFE.name__GZP);
   } break;
   case __ITM_TYPE_SIMPLE__: {
-    append__ROS(buffer__3OIC,((__ITM_TYPE_SIMPLE *)__tmp__OPIC)->name__0YP);
+    append__3OS(buffer__OLIC,((__ITM_TYPE_SIMPLE *)__tmp__5LIC)->name__GZP);
   } break;
   case __ITM_TYPE_BLOCK__: {
-    append_in__IIPD(__tmp__OPIC,buffer__3OIC);
+    append_in__PJPD(__tmp__5LIC,buffer__OLIC);
   } break;
   case __ITM_TYPE_GENERIC__: {
-    append_in__MJPD(__tmp__OPIC,buffer__3OIC);
+    append_in__TKPD(__tmp__5LIC,buffer__OLIC);
   } break;
   case __ITM_TYPE_STYLE__: {
-    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__ROS(buffer__3OIC,Self__AXEH->parent_itm_type_simple__RSN.name__0YP);
+    Self__WFHH=((__ITM_TYPE_STYLE *)__tmp__5LIC);
+    if (((void *)Self__WFHH->style__PZP != (void *)NULL)) {
+      append__3OS(buffer__OLIC,Self__WFHH->style__PZP);
+      Self__VNIH=((__STRING *)buffer__OLIC);
+      new_capacity__UNIH= 0;
+      if ((Self__VNIH->capacity__UCS <= Self__VNIH->count__SGC)) {
+        if ((Self__VNIH->capacity__UCS ==  0)) {
+          Self__VNIH->capacity__UCS= 32;
+          Self__VNIH->storage__3CS=create__YIEB( 32);
+        } else {
+          new_capacity__UNIH=(__INTEGER)(Self__VNIH->capacity__UCS <<  1);
+          Self__WNIH=((__CHARACTER *)Self__VNIH->storage__3CS);
+          old_nb_elts__XNIH=Self__VNIH->capacity__UCS;
+          new__YNIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__WNIH),((__UINTEGER_32 )old_nb_elts__XNIH),((__UINTEGER_32 )new_capacity__UNIH)));
+          upper__V3KH=(__INTEGER)(new_capacity__UNIH -  1);
+          Self__T3KH=old_nb_elts__XNIH;
+          while ((Self__T3KH <= upper__V3KH)) {
+            new__YNIH[Self__T3KH]='\0';
+            Self__T3KH=(__INTEGER)(Self__T3KH +  1);
+          };
+          Self__VNIH->storage__3CS=new__YNIH;
+          Self__VNIH->capacity__UCS=new_capacity__UNIH;
+        };
+      };
+      ((__CHARACTER *)Self__VNIH->storage__3CS)[Self__VNIH->count__SGC]=' ';
+      Self__VNIH->count__SGC=(__INTEGER)(Self__VNIH->count__SGC +  1);
+    };
+    append__3OS(buffer__OLIC,Self__WFHH->parent_itm_type_simple__3SN.name__GZP);
   } break;
   };
 }
 
-static void put__to__like__0PGG(void *tok__2PGG,void *buf__3PGG,void *key__4PGG)
+static void put__to__like__URGG(void *tok__WRGG,void *buf__XRGG,void *key__YRGG)
 // ({NULLxSTRING_CONSTANT},{NULLxSTRING},{STRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER __tmp__JSGG,Self__5CIG;
+  void *lst__ZRGG;
+  lst__ZRGG=NULL;
+  if (((void *)key__YRGG != (void *)NULL)) {
+    lst__ZRGG=fast_reference_at__CMNE(short_dico__QD,key__YRGG);
+    if (((void *)lst__ZRGG != (void *)NULL)) {
+      __tmp__JSGG=((__LINKED_LISToSTRING_CONSTANTo *)lst__ZRGG)->parent_linked_collection__LD.upper__0ED;
+      Self__5CIG= 1;
+      while ((Self__5CIG <= __tmp__JSGG)) {
+        if (((void *)item__X3ND(lst__ZRGG,Self__5CIG) == (void *)NULL)) {
+          append__3OS(buf__XRGG,tok__WRGG);
         } else {
-          append__ROS(buf__3PGG,item__Q2ND(lst__5PGG,Self__FBIG));
+          append__3OS(buf__XRGG,item__X3ND(lst__ZRGG,Self__5CIG));
         };
-        Self__FBIG=(__INTEGER)(Self__FBIG +  1);
+        Self__5CIG=(__INTEGER)(Self__5CIG +  1);
       };
     };
   };
 }
 
-static void put__to__like__TWDG(void *tok__VWDG,void *buf__WWDG,void *key__XWDG)
+static void put__to__like__NYDG(void *tok__PYDG,void *buf__QYDG,void *key__RYDG)
 // ({NULLxSTRING_CONSTANT},{NULLxSTRING},{STRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER __tmp__CZDG,Self__X1HG;
+  void *lst__SYDG;
+  lst__SYDG=NULL;
+  if (((void *)key__RYDG != (void *)NULL)) {
+    lst__SYDG=fast_reference_at__CMNE(short_dico__QD,key__RYDG);
+    if (((void *)lst__SYDG != (void *)NULL)) {
+      __tmp__CZDG=((__LINKED_LISToSTRING_CONSTANTo *)lst__SYDG)->parent_linked_collection__LD.upper__0ED;
+      Self__X1HG= 1;
+      while ((Self__X1HG <= __tmp__CZDG)) {
+        if (((void *)item__X3ND(lst__SYDG,Self__X1HG) == (void *)NULL)) {
+          append__3OS(buf__QYDG,tok__PYDG);
         } else {
-          append__ROS(buf__WWDG,item__Q2ND(lst__YWDG,Self__3ZHG));
+          append__3OS(buf__QYDG,item__X3ND(lst__SYDG,Self__X1HG));
         };
-        Self__3ZHG=(__INTEGER)(Self__3ZHG +  1);
+        Self__X1HG=(__INTEGER)(Self__X1HG +  1);
       };
     };
   };
 }
 
-static void put__to__like__MTFG(void *tok__OTFG,void *buf__PTFG)
+static void put__to__like__GVFG(void *tok__IVFG,void *buf__JVFG)
 // ({STRING_CONSTANT},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __INTEGER __tmp__BUFG,Self__Q4HG;
-  void *lst__RTFG;
-  lst__RTFG=NULL;
+  __INTEGER __tmp__1VFG,Self__KAIG;
+  void *lst__LVFG;
+  lst__LVFG=NULL;
   if (((void *)(&__string_133) != (void *)NULL)) {
-    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);
+    lst__LVFG=fast_reference_at__CMNE(short_dico__QD,(&__string_133));
+    if (((void *)lst__LVFG != (void *)NULL)) {
+      __tmp__1VFG=((__LINKED_LISToSTRING_CONSTANTo *)lst__LVFG)->parent_linked_collection__LD.upper__0ED;
+      Self__KAIG= 1;
+      while ((Self__KAIG <= __tmp__1VFG)) {
+        if (((void *)item__X3ND(lst__LVFG,Self__KAIG) == (void *)NULL)) {
+          append__3OS(buf__JVFG,tok__IVFG);
         } else {
-          append__ROS(buf__PTFG,item__Q2ND(lst__RTFG,Self__Q4HG));
+          append__3OS(buf__JVFG,item__X3ND(lst__LVFG,Self__KAIG));
         };
-        Self__Q4HG=(__INTEGER)(Self__Q4HG +  1);
+        Self__KAIG=(__INTEGER)(Self__KAIG +  1);
       };
     };
   };
 }
 
-static void put__to__like__5VFG(void *tok__BWFG,void *buf__CWFG,void *key__DWFG)
+static void put__to__like__ZXFG(void *tok__1XFG,void *buf__2XFG,void *key__3XFG)
 // ({NULLxSTRING_CONSTANT},{NULLxSTRING},{STRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER __tmp__OYFG,Self__1AIG;
+  void *lst__4XFG;
+  lst__4XFG=NULL;
+  if (((void *)key__3XFG != (void *)NULL)) {
+    lst__4XFG=fast_reference_at__CMNE(short_dico__QD,key__3XFG);
+    if (((void *)lst__4XFG != (void *)NULL)) {
+      __tmp__OYFG=((__LINKED_LISToSTRING_CONSTANTo *)lst__4XFG)->parent_linked_collection__LD.upper__0ED;
+      Self__1AIG= 1;
+      while ((Self__1AIG <= __tmp__OYFG)) {
+        if (((void *)item__X3ND(lst__4XFG,Self__1AIG) == (void *)NULL)) {
+          append__3OS(buf__2XFG,tok__1XFG);
         } else {
-          append__ROS(buf__CWFG,item__Q2ND(lst__EWFG,Self__B5HG));
+          append__3OS(buf__2XFG,item__X3ND(lst__4XFG,Self__1AIG));
         };
-        Self__B5HG=(__INTEGER)(Self__B5HG +  1);
+        Self__1AIG=(__INTEGER)(Self__1AIG +  1);
       };
     };
   };
 }
 
-static __BOOLEAN is_hexadecimal_digit__UPJE(__CHARACTER Self__VPJE)
+static __BOOLEAN is_hexadecimal_digit__DQJE(__CHARACTER Self__EQJE)
 // ({CHARACTER}) With resultNo recursive, No inlinable.
 {
-  __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__;
+  __BOOLEAN result__GQJE,result__NGGH,__tmp__OQJE,__tmp__3QJE;
+  __BOOLEAN result__ZIOE;
+  result__GQJE=FALSE__;
+  result__NGGH=FALSE__;
+  if ((((__INTEGER_8 )Self__EQJE) >= ((__INTEGER_8 )'0'))) {
+    result__NGGH=(((__INTEGER_8 )Self__EQJE) <= ((__INTEGER_8 )'9'));
+  };
+  if (result__NGGH) {
+    result__GQJE=TRUE__;
+    __tmp__OQJE=TRUE__;
   } else {
-    __tmp__5PJE=FALSE__;
+    __tmp__OQJE=FALSE__;
   };
-  if (__tmp__5PJE) {
-    __tmp__OQJE=TRUE__;
+  if (__tmp__OQJE) {
+    __tmp__3QJE=TRUE__;
   } else {
-    result__KIOE=(((__INTEGER_8 )Self__VPJE) >= ((__INTEGER_8 )'a'));
-    if (result__KIOE) {
-      result__XPJE=(((__INTEGER_8 )Self__VPJE) <= ((__INTEGER_8 )'f'));
+    result__ZIOE=(((__INTEGER_8 )Self__EQJE) >= ((__INTEGER_8 )'a'));
+    if (result__ZIOE) {
+      result__GQJE=(((__INTEGER_8 )Self__EQJE) <= ((__INTEGER_8 )'f'));
     };
-    __tmp__OQJE=result__KIOE;
+    __tmp__3QJE=result__ZIOE;
   };
-  if ((! __tmp__OQJE)) {
-    if ((((__INTEGER_8 )Self__VPJE) >= ((__INTEGER_8 )'A'))) {
-      result__XPJE=(((__INTEGER_8 )Self__VPJE) <= ((__INTEGER_8 )'F'));
+  if ((! __tmp__3QJE)) {
+    if ((((__INTEGER_8 )Self__EQJE) >= ((__INTEGER_8 )'A'))) {
+      result__GQJE=(((__INTEGER_8 )Self__EQJE) <= ((__INTEGER_8 )'F'));
     };
   };
-  return(result__XPJE);
+  return(result__GQJE);
 }
 
-static void* read_constant__LRO()
+static void* read_constant__XRO()
 // () With resultNo recursive, No inlinable.
 {
-  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__4UBH=((__CHARACTER )(( 0)));
-    } else {
-      result__4UBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
-    };
-    result__MXEH=FALSE__;
-    if ((((__INTEGER_8 )result__4UBH) >= ((__INTEGER_8 )'0'))) {
-      result__MXEH=(((__INTEGER_8 )result__4UBH) <= ((__INTEGER_8 )'9'));
-    };
-    __tmp__KAP=result__MXEH;
+  void *result__0RO;
+  __INTEGER pos_old__LAP,new_capacity__0NIH,old_nb_elts__3NIH;
+  __INTEGER upper__03KH,Self__Y3KH,new_capacity__AOIH,old_nb_elts__DOIH;
+  __INTEGER upper__53KH,Self__33KH,new_capacity__GOIH,old_nb_elts__JOIH;
+  __INTEGER upper__E4KH,Self__C4KH,new_capacity__MOIH,old_nb_elts__POIH;
+  __INTEGER upper__J4KH,Self__H4KH,new_capacity__SOIH,old_nb_elts__VOIH;
+  __INTEGER upper__O4KH,Self__M4KH,new_capacity__YOIH,old_nb_elts__1OIH;
+  __INTEGER upper__T4KH,Self__R4KH,new_capacity__4OIH,old_nb_elts__BPIH;
+  __INTEGER upper__Y4KH,Self__W4KH,new_capacity__EPIH,old_nb_elts__HPIH;
+  __INTEGER upper__34KH,Self__14KH,new_capacity__KPIH,old_nb_elts__NPIH;
+  __INTEGER upper__C5KH,Self__A5KH,typ_id__0QQ,typ_id__PNMB;
+  __INTEGER old_pos__2CQ,count__3CQ,new_capacity__QPIH;
+  __INTEGER old_nb_elts__TPIH,upper__15KH,Self__Z5KH,typ_id__DPMB;
+  __INTEGER typ_id__XQMB;
+  __STRING *Self__1NIH,*Self__BOIH,*Self__HOIH,*Self__NOIH,*Self__TOIH;
+  __STRING *Self__ZOIH,*Self__5OIH,*Self__FPIH,*Self__LPIH,*Self__RPIH;
+  __POSITION pos__EE0G,__tmp__CSO,__tmp__USO,pos__EF0G,pos__GF0G;
+  __POSITION __tmp__GTO,__tmp__XTO;
+  __ITM_REAL *result__UQQ;
+  __POINTER ptr__VQQ,ptr_table__F5KH,next__E5KH,result__G5KH;
+  __POINTER ptr_table__K5KH,next__J5KH,result__L5KH,ptr__KNMB;
+  __POINTER ptr_table__P5KH,next__O5KH,result__Q5KH,ptr_table__U5KH;
+  __POINTER next__T5KH,result__V5KH,ptr__4OMB,ptr_table__45KH;
+  __POINTER next__35KH,result__55KH,ptr_table__DALH,next__CALH;
+  __POINTER result__EALH,ptr__SQMB,ptr_table__IALH,next__HALH;
+  __POINTER result__JALH,ptr_table__NALH,next__MALH,result__OALH;
+  __UINTEGER_32 sz__XQQ,a__3GGH,new_size__4GGH,t__CHGH,a__BHGH;
+  __UINTEGER_32 new_size__N5KH,lab_type__M5KH,sz__MNMB,a__FHGH;
+  __UINTEGER_32 new_size__GHGH,t__KHGH,a__JHGH,new_size__X5KH;
+  __UINTEGER_32 lab_type__W5KH,sz__APMB,a__NHGH,new_size__OHGH,t__SHGH;
+  __UINTEGER_32 a__RHGH,new_size__GALH,lab_type__FALH,sz__UQMB,a__VHGH;
+  __UINTEGER_32 new_size__WHGH,t__0HGH,a__ZHGH,new_size__QALH;
+  __UINTEGER_32 lab_type__PALH;
+  __ITM_NUMBER *result__JNMB;
+  __ITM_CHARACTER *result__3OMB;
+  __ITM_STRING *result__RQMB;
+  __BOOLEAN result__KAP,result__PGGH,__tmp__WAP,result__RGGH,__tmp__QBP;
+  __BOOLEAN result__TGGH,result__VGGH,__tmp__3DP,result__XGGH;
+  __BOOLEAN result__ZGGH,__tmp__HSO,__tmp__ZSO,result__3GP,__tmp__KTO;
+  __BOOLEAN result__1CQ,__tmp__HDQ,__tmp__GEQ,__tmp__HEQ;
+  __CHARACTER result__YWBH,result__CXBH,result__HXBH,result__MXBH;
+  __CHARACTER result__RXBH,result__WXBH,result__1XBH,result__AYBH;
+  __CHARACTER result__FYBH,result__KYBH,result__PYBH,result__UYBH;
+  __CHARACTER result__ZYBH,result__4YBH,result__DZBH,result__IZBH;
+  __CHARACTER result__NZBH,result__SZBH,result__XZBH,result__2ZBH;
+  __CHARACTER result__G0BH,result__P0BH,result__U0BH,result__Z0BH;
+  __CHARACTER result__40BH,result__D1BH;
+  __CHARACTER *Self__2NIH,*new__4NIH,*Self__COIH,*new__EOIH,*Self__IOIH;
+  __CHARACTER *new__KOIH,*Self__OOIH,*new__QOIH,*Self__UOIH,*new__WOIH;
+  __CHARACTER *Self__0OIH,*new__2OIH,*Self__APIH,*new__CPIH,*Self__GPIH;
+  __CHARACTER *new__IPIH,*Self__MPIH,*new__OPIH,*Self__SPIH,*new__UPIH;
+  result__0RO=NULL;
+  result__KAP=FALSE__;
+  pos_old__LAP= 0;
+  if (read_space__XTD()) {
+    result__YWBH='\0';
+    if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+      result__YWBH=((__CHARACTER )(( 0)));
+    } else {
+      result__YWBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
+    };
+    result__PGGH=FALSE__;
+    if ((((__INTEGER_8 )result__YWBH) >= ((__INTEGER_8 )'0'))) {
+      result__PGGH=(((__INTEGER_8 )result__YWBH) <= ((__INTEGER_8 )'9'));
+    };
+    __tmp__WAP=result__PGGH;
   } else {
-    __tmp__KAP=FALSE__;
-  };
-  if (__tmp__KAP) {
-    ((__STRING *)string_tmp__VH)->count__EGC= 0;
-    result__IVBH='\0';
-    if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-      result__IVBH=((__CHARACTER )(( 0)));
-    } else {
-      result__IVBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
-    };
-    add_last__GOT(string_tmp__VH,result__IVBH);
-    pos_old__55O=position__CCC;
+    __tmp__WAP=FALSE__;
+  };
+  if (__tmp__WAP) {
+    ((__STRING *)string_tmp__VH)->count__SGC= 0;
+    result__CXBH='\0';
+    if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+      result__CXBH=((__CHARACTER )(( 0)));
+    } else {
+      result__CXBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
+    };
+    Self__1NIH=((__STRING *)string_tmp__VH);
+    new_capacity__0NIH= 0;
+    if ((Self__1NIH->capacity__UCS <= Self__1NIH->count__SGC)) {
+      if ((Self__1NIH->capacity__UCS ==  0)) {
+        Self__1NIH->capacity__UCS= 32;
+        Self__1NIH->storage__3CS=create__YIEB( 32);
+      } else {
+        new_capacity__0NIH=(__INTEGER)(Self__1NIH->capacity__UCS <<  1);
+        Self__2NIH=((__CHARACTER *)Self__1NIH->storage__3CS);
+        old_nb_elts__3NIH=Self__1NIH->capacity__UCS;
+        new__4NIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__2NIH),((__UINTEGER_32 )old_nb_elts__3NIH),((__UINTEGER_32 )new_capacity__0NIH)));
+        upper__03KH=(__INTEGER)(new_capacity__0NIH -  1);
+        Self__Y3KH=old_nb_elts__3NIH;
+        while ((Self__Y3KH <= upper__03KH)) {
+          new__4NIH[Self__Y3KH]='\0';
+          Self__Y3KH=(__INTEGER)(Self__Y3KH +  1);
+        };
+        Self__1NIH->storage__3CS=new__4NIH;
+        Self__1NIH->capacity__UCS=new_capacity__0NIH;
+      };
+    };
+    ((__CHARACTER *)Self__1NIH->storage__3CS)[Self__1NIH->count__SGC]=result__CXBH;
+    Self__1NIH->count__SGC=(__INTEGER)(Self__1NIH->count__SGC +  1);
+    pos_old__LAP=position__CCC;
     position__CCC=(__INTEGER)(position__CCC +  1);
-    while_do__5C0D:
+    while_do__GE0D:
     {
-      result__NVBH='\0';
-      if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__NVBH=((__CHARACTER )(( 0)));
+      result__HXBH='\0';
+      if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+        result__HXBH=((__CHARACTER )(( 0)));
       } else {
-        result__NVBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+        result__HXBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
       };
-      result__YXEH=FALSE__;
-      if ((((__INTEGER_8 )result__NVBH) >= ((__INTEGER_8 )'0'))) {
-        result__YXEH=(((__INTEGER_8 )result__NVBH) <= ((__INTEGER_8 )'9'));
+      result__RGGH=FALSE__;
+      if ((((__INTEGER_8 )result__HXBH) >= ((__INTEGER_8 )'0'))) {
+        result__RGGH=(((__INTEGER_8 )result__HXBH) <= ((__INTEGER_8 )'9'));
       };
-      if (result__YXEH) {
-        __tmp__EBP=TRUE__;
+      if (result__RGGH) {
+        __tmp__QBP=TRUE__;
       } else {
-        result__SVBH='\0';
-        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__SVBH=((__CHARACTER )(( 0)));
+        result__MXBH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+          result__MXBH=((__CHARACTER )(( 0)));
         } else {
-          result__SVBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+          result__MXBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
         };
-        __tmp__EBP=(result__SVBH == '_');
+        __tmp__QBP=(result__MXBH == '_');
       };
-      if (__tmp__EBP) {
-        result__XVBH='\0';
-        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__XVBH=((__CHARACTER )(( 0)));
+      if (__tmp__QBP) {
+        result__RXBH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+          result__RXBH=((__CHARACTER )(( 0)));
         } else {
-          result__XVBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+          result__RXBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__XVBH != '_')) {
-          result__2VBH='\0';
-          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__2VBH=((__CHARACTER )(( 0)));
+        if ((result__RXBH != '_')) {
+          result__WXBH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+            result__WXBH=((__CHARACTER )(( 0)));
           } else {
-            result__2VBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+            result__WXBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
           };
-          add_last__GOT(string_tmp__VH,result__2VBH);
+          Self__BOIH=((__STRING *)string_tmp__VH);
+          new_capacity__AOIH= 0;
+          if ((Self__BOIH->capacity__UCS <= Self__BOIH->count__SGC)) {
+            if ((Self__BOIH->capacity__UCS ==  0)) {
+              Self__BOIH->capacity__UCS= 32;
+              Self__BOIH->storage__3CS=create__YIEB( 32);
+            } else {
+              new_capacity__AOIH=(__INTEGER)(Self__BOIH->capacity__UCS <<  1);
+              Self__COIH=((__CHARACTER *)Self__BOIH->storage__3CS);
+              old_nb_elts__DOIH=Self__BOIH->capacity__UCS;
+              new__EOIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__COIH),((__UINTEGER_32 )old_nb_elts__DOIH),((__UINTEGER_32 )new_capacity__AOIH)));
+              upper__53KH=(__INTEGER)(new_capacity__AOIH -  1);
+              Self__33KH=old_nb_elts__DOIH;
+              while ((Self__33KH <= upper__53KH)) {
+                new__EOIH[Self__33KH]='\0';
+                Self__33KH=(__INTEGER)(Self__33KH +  1);
+              };
+              Self__BOIH->storage__3CS=new__EOIH;
+              Self__BOIH->capacity__UCS=new_capacity__AOIH;
+            };
+          };
+          ((__CHARACTER *)Self__BOIH->storage__3CS)[Self__BOIH->count__SGC]=result__WXBH;
+          Self__BOIH->count__SGC=(__INTEGER)(Self__BOIH->count__SGC +  1);
         };
         position__CCC=(__INTEGER)(position__CCC +  1);
-        goto while_do__5C0D;
+        goto while_do__GE0D;
       };
     };
-    result__BWBH='\0';
-    if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-      result__BWBH=((__CHARACTER )(( 0)));
+    result__1XBH='\0';
+    if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+      result__1XBH=((__CHARACTER )(( 0)));
     } else {
-      result__BWBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+      result__1XBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
     };
-    if ((result__BWBH == '.')) {
-      add_last__GOT(string_tmp__VH,'.');
-      position__CCC=(__INTEGER)(position__CCC +  1);
-      result__GWBH='\0';
-      if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__GWBH=((__CHARACTER )(( 0)));
-      } else {
-        result__GWBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
-      };
-      result__QYEH=FALSE__;
-      if ((((__INTEGER_8 )result__GWBH) >= ((__INTEGER_8 )'0'))) {
-        result__QYEH=(((__INTEGER_8 )result__GWBH) <= ((__INTEGER_8 )'9'));
-      };
-      if (result__QYEH) {
-        result__45O=TRUE__;
-        result__LWBH='\0';
-        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__LWBH=((__CHARACTER )(( 0)));
+    if ((result__1XBH == '.')) {
+      Self__HOIH=((__STRING *)string_tmp__VH);
+      new_capacity__GOIH= 0;
+      if ((Self__HOIH->capacity__UCS <= Self__HOIH->count__SGC)) {
+        if ((Self__HOIH->capacity__UCS ==  0)) {
+          Self__HOIH->capacity__UCS= 32;
+          Self__HOIH->storage__3CS=create__YIEB( 32);
         } else {
-          result__LWBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+          new_capacity__GOIH=(__INTEGER)(Self__HOIH->capacity__UCS <<  1);
+          Self__IOIH=((__CHARACTER *)Self__HOIH->storage__3CS);
+          old_nb_elts__JOIH=Self__HOIH->capacity__UCS;
+          new__KOIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__IOIH),((__UINTEGER_32 )old_nb_elts__JOIH),((__UINTEGER_32 )new_capacity__GOIH)));
+          upper__E4KH=(__INTEGER)(new_capacity__GOIH -  1);
+          Self__C4KH=old_nb_elts__JOIH;
+          while ((Self__C4KH <= upper__E4KH)) {
+            new__KOIH[Self__C4KH]='\0';
+            Self__C4KH=(__INTEGER)(Self__C4KH +  1);
+          };
+          Self__HOIH->storage__3CS=new__KOIH;
+          Self__HOIH->capacity__UCS=new_capacity__GOIH;
         };
-        add_last__GOT(string_tmp__VH,result__LWBH);
+      };
+      ((__CHARACTER *)Self__HOIH->storage__3CS)[Self__HOIH->count__SGC]='.';
+      Self__HOIH->count__SGC=(__INTEGER)(Self__HOIH->count__SGC +  1);
+      position__CCC=(__INTEGER)(position__CCC +  1);
+      result__AYBH='\0';
+      if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+        result__AYBH=((__CHARACTER )(( 0)));
+      } else {
+        result__AYBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
+      };
+      result__TGGH=FALSE__;
+      if ((((__INTEGER_8 )result__AYBH) >= ((__INTEGER_8 )'0'))) {
+        result__TGGH=(((__INTEGER_8 )result__AYBH) <= ((__INTEGER_8 )'9'));
+      };
+      if (result__TGGH) {
+        result__KAP=TRUE__;
+        result__FYBH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+          result__FYBH=((__CHARACTER )(( 0)));
+        } else {
+          result__FYBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
+        };
+        Self__NOIH=((__STRING *)string_tmp__VH);
+        new_capacity__MOIH= 0;
+        if ((Self__NOIH->capacity__UCS <= Self__NOIH->count__SGC)) {
+          if ((Self__NOIH->capacity__UCS ==  0)) {
+            Self__NOIH->capacity__UCS= 32;
+            Self__NOIH->storage__3CS=create__YIEB( 32);
+          } else {
+            new_capacity__MOIH=(__INTEGER)(Self__NOIH->capacity__UCS <<  1);
+            Self__OOIH=((__CHARACTER *)Self__NOIH->storage__3CS);
+            old_nb_elts__POIH=Self__NOIH->capacity__UCS;
+            new__QOIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__OOIH),((__UINTEGER_32 )old_nb_elts__POIH),((__UINTEGER_32 )new_capacity__MOIH)));
+            upper__J4KH=(__INTEGER)(new_capacity__MOIH -  1);
+            Self__H4KH=old_nb_elts__POIH;
+            while ((Self__H4KH <= upper__J4KH)) {
+              new__QOIH[Self__H4KH]='\0';
+              Self__H4KH=(__INTEGER)(Self__H4KH +  1);
+            };
+            Self__NOIH->storage__3CS=new__QOIH;
+            Self__NOIH->capacity__UCS=new_capacity__MOIH;
+          };
+        };
+        ((__CHARACTER *)Self__NOIH->storage__3CS)[Self__NOIH->count__SGC]=result__FYBH;
+        Self__NOIH->count__SGC=(__INTEGER)(Self__NOIH->count__SGC +  1);
         position__CCC=(__INTEGER)(position__CCC +  1);
-        while_do__OSPE:
+        while_do__3SPE:
         {
-          result__QWBH='\0';
-          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__QWBH=((__CHARACTER )(( 0)));
+          result__KYBH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+            result__KYBH=((__CHARACTER )(( 0)));
           } else {
-            result__QWBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+            result__KYBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
           };
-          result__2YEH=FALSE__;
-          if ((((__INTEGER_8 )result__QWBH) >= ((__INTEGER_8 )'0'))) {
-            result__2YEH=(((__INTEGER_8 )result__QWBH) <= ((__INTEGER_8 )'9'));
+          result__VGGH=FALSE__;
+          if ((((__INTEGER_8 )result__KYBH) >= ((__INTEGER_8 )'0'))) {
+            result__VGGH=(((__INTEGER_8 )result__KYBH) <= ((__INTEGER_8 )'9'));
           };
-          if (result__2YEH) {
-            result__VWBH='\0';
-            if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-              result__VWBH=((__CHARACTER )(( 0)));
+          if (result__VGGH) {
+            result__PYBH='\0';
+            if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+              result__PYBH=((__CHARACTER )(( 0)));
             } else {
-              result__VWBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+              result__PYBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
+            };
+            Self__TOIH=((__STRING *)string_tmp__VH);
+            new_capacity__SOIH= 0;
+            if ((Self__TOIH->capacity__UCS <= Self__TOIH->count__SGC)) {
+              if ((Self__TOIH->capacity__UCS ==  0)) {
+                Self__TOIH->capacity__UCS= 32;
+                Self__TOIH->storage__3CS=create__YIEB( 32);
+              } else {
+                new_capacity__SOIH=(__INTEGER)(Self__TOIH->capacity__UCS <<  1);
+                Self__UOIH=((__CHARACTER *)Self__TOIH->storage__3CS);
+                old_nb_elts__VOIH=Self__TOIH->capacity__UCS;
+                new__WOIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__UOIH),((__UINTEGER_32 )old_nb_elts__VOIH),((__UINTEGER_32 )new_capacity__SOIH)));
+                upper__O4KH=(__INTEGER)(new_capacity__SOIH -  1);
+                Self__M4KH=old_nb_elts__VOIH;
+                while ((Self__M4KH <= upper__O4KH)) {
+                  new__WOIH[Self__M4KH]='\0';
+                  Self__M4KH=(__INTEGER)(Self__M4KH +  1);
+                };
+                Self__TOIH->storage__3CS=new__WOIH;
+                Self__TOIH->capacity__UCS=new_capacity__SOIH;
+              };
             };
-            add_last__GOT(string_tmp__VH,result__VWBH);
+            ((__CHARACTER *)Self__TOIH->storage__3CS)[Self__TOIH->count__SGC]=result__PYBH;
+            Self__TOIH->count__SGC=(__INTEGER)(Self__TOIH->count__SGC +  1);
             position__CCC=(__INTEGER)(position__CCC +  1);
-            goto while_do__OSPE;
+            goto while_do__3SPE;
           };
         };
       };
-      result__0WBH='\0';
-      if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__0WBH=((__CHARACTER )(( 0)));
+      result__UYBH='\0';
+      if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+        result__UYBH=((__CHARACTER )(( 0)));
       } else {
-        result__0WBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+        result__UYBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__0WBH == 'E')) {
-        result__45O=TRUE__;
-        add_last__GOT(string_tmp__VH,'E');
+      if ((result__UYBH == 'E')) {
+        result__KAP=TRUE__;
+        Self__ZOIH=((__STRING *)string_tmp__VH);
+        new_capacity__YOIH= 0;
+        if ((Self__ZOIH->capacity__UCS <= Self__ZOIH->count__SGC)) {
+          if ((Self__ZOIH->capacity__UCS ==  0)) {
+            Self__ZOIH->capacity__UCS= 32;
+            Self__ZOIH->storage__3CS=create__YIEB( 32);
+          } else {
+            new_capacity__YOIH=(__INTEGER)(Self__ZOIH->capacity__UCS <<  1);
+            Self__0OIH=((__CHARACTER *)Self__ZOIH->storage__3CS);
+            old_nb_elts__1OIH=Self__ZOIH->capacity__UCS;
+            new__2OIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__0OIH),((__UINTEGER_32 )old_nb_elts__1OIH),((__UINTEGER_32 )new_capacity__YOIH)));
+            upper__T4KH=(__INTEGER)(new_capacity__YOIH -  1);
+            Self__R4KH=old_nb_elts__1OIH;
+            while ((Self__R4KH <= upper__T4KH)) {
+              new__2OIH[Self__R4KH]='\0';
+              Self__R4KH=(__INTEGER)(Self__R4KH +  1);
+            };
+            Self__ZOIH->storage__3CS=new__2OIH;
+            Self__ZOIH->capacity__UCS=new_capacity__YOIH;
+          };
+        };
+        ((__CHARACTER *)Self__ZOIH->storage__3CS)[Self__ZOIH->count__SGC]='E';
+        Self__ZOIH->count__SGC=(__INTEGER)(Self__ZOIH->count__SGC +  1);
         position__CCC=(__INTEGER)(position__CCC +  1);
-        result__5WBH='\0';
-        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__5WBH=((__CHARACTER )(( 0)));
+        result__ZYBH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+          result__ZYBH=((__CHARACTER )(( 0)));
         } else {
-          result__5WBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+          result__ZYBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__5WBH == '+')) {
-          __tmp__RDP=TRUE__;
+        if ((result__ZYBH == '+')) {
+          __tmp__3DP=TRUE__;
         } else {
-          result__EXBH='\0';
-          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__EXBH=((__CHARACTER )(( 0)));
+          result__4YBH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+            result__4YBH=((__CHARACTER )(( 0)));
           } else {
-            result__EXBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+            result__4YBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
           };
-          __tmp__RDP=(result__EXBH == '-');
+          __tmp__3DP=(result__4YBH == '-');
         };
-        if (__tmp__RDP) {
-          result__JXBH='\0';
-          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__JXBH=((__CHARACTER )(( 0)));
+        if (__tmp__3DP) {
+          result__DZBH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+            result__DZBH=((__CHARACTER )(( 0)));
           } else {
-            result__JXBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+            result__DZBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
           };
-          add_last__GOT(string_tmp__VH,result__JXBH);
+          Self__5OIH=((__STRING *)string_tmp__VH);
+          new_capacity__4OIH= 0;
+          if ((Self__5OIH->capacity__UCS <= Self__5OIH->count__SGC)) {
+            if ((Self__5OIH->capacity__UCS ==  0)) {
+              Self__5OIH->capacity__UCS= 32;
+              Self__5OIH->storage__3CS=create__YIEB( 32);
+            } else {
+              new_capacity__4OIH=(__INTEGER)(Self__5OIH->capacity__UCS <<  1);
+              Self__APIH=((__CHARACTER *)Self__5OIH->storage__3CS);
+              old_nb_elts__BPIH=Self__5OIH->capacity__UCS;
+              new__CPIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__APIH),((__UINTEGER_32 )old_nb_elts__BPIH),((__UINTEGER_32 )new_capacity__4OIH)));
+              upper__Y4KH=(__INTEGER)(new_capacity__4OIH -  1);
+              Self__W4KH=old_nb_elts__BPIH;
+              while ((Self__W4KH <= upper__Y4KH)) {
+                new__CPIH[Self__W4KH]='\0';
+                Self__W4KH=(__INTEGER)(Self__W4KH +  1);
+              };
+              Self__5OIH->storage__3CS=new__CPIH;
+              Self__5OIH->capacity__UCS=new_capacity__4OIH;
+            };
+          };
+          ((__CHARACTER *)Self__5OIH->storage__3CS)[Self__5OIH->count__SGC]=result__DZBH;
+          Self__5OIH->count__SGC=(__INTEGER)(Self__5OIH->count__SGC +  1);
           position__CCC=(__INTEGER)(position__CCC +  1);
         };
-        result__OXBH='\0';
-        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__OXBH=((__CHARACTER )(( 0)));
+        result__IZBH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+          result__IZBH=((__CHARACTER )(( 0)));
         } else {
-          result__OXBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+          result__IZBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
         };
-        result__YZEH=FALSE__;
-        if ((((__INTEGER_8 )result__OXBH) >= ((__INTEGER_8 )'0'))) {
-          result__YZEH=(((__INTEGER_8 )result__OXBH) <= ((__INTEGER_8 )'9'));
+        result__XGGH=FALSE__;
+        if ((((__INTEGER_8 )result__IZBH) >= ((__INTEGER_8 )'0'))) {
+          result__XGGH=(((__INTEGER_8 )result__IZBH) <= ((__INTEGER_8 )'9'));
         };
-        if (result__YZEH) {
-          result__TXBH='\0';
-          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__TXBH=((__CHARACTER )(( 0)));
+        if (result__XGGH) {
+          result__NZBH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+            result__NZBH=((__CHARACTER )(( 0)));
           } else {
-            result__TXBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+            result__NZBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
           };
-          add_last__GOT(string_tmp__VH,result__TXBH);
+          Self__FPIH=((__STRING *)string_tmp__VH);
+          new_capacity__EPIH= 0;
+          if ((Self__FPIH->capacity__UCS <= Self__FPIH->count__SGC)) {
+            if ((Self__FPIH->capacity__UCS ==  0)) {
+              Self__FPIH->capacity__UCS= 32;
+              Self__FPIH->storage__3CS=create__YIEB( 32);
+            } else {
+              new_capacity__EPIH=(__INTEGER)(Self__FPIH->capacity__UCS <<  1);
+              Self__GPIH=((__CHARACTER *)Self__FPIH->storage__3CS);
+              old_nb_elts__HPIH=Self__FPIH->capacity__UCS;
+              new__IPIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__GPIH),((__UINTEGER_32 )old_nb_elts__HPIH),((__UINTEGER_32 )new_capacity__EPIH)));
+              upper__34KH=(__INTEGER)(new_capacity__EPIH -  1);
+              Self__14KH=old_nb_elts__HPIH;
+              while ((Self__14KH <= upper__34KH)) {
+                new__IPIH[Self__14KH]='\0';
+                Self__14KH=(__INTEGER)(Self__14KH +  1);
+              };
+              Self__FPIH->storage__3CS=new__IPIH;
+              Self__FPIH->capacity__UCS=new_capacity__EPIH;
+            };
+          };
+          ((__CHARACTER *)Self__FPIH->storage__3CS)[Self__FPIH->count__SGC]=result__NZBH;
+          Self__FPIH->count__SGC=(__INTEGER)(Self__FPIH->count__SGC +  1);
           position__CCC=(__INTEGER)(position__CCC +  1);
-          while_do__2NRE:
+          while_do__RORE:
           {
-            result__YXBH='\0';
-            if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-              result__YXBH=((__CHARACTER )(( 0)));
+            result__SZBH='\0';
+            if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+              result__SZBH=((__CHARACTER )(( 0)));
             } else {
-              result__YXBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+              result__SZBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
             };
-            result__E0EH=FALSE__;
-            if ((((__INTEGER_8 )result__YXBH) >= ((__INTEGER_8 )'0'))) {
-              result__E0EH=(((__INTEGER_8 )result__YXBH) <= ((__INTEGER_8 )'9'));
+            result__ZGGH=FALSE__;
+            if ((((__INTEGER_8 )result__SZBH) >= ((__INTEGER_8 )'0'))) {
+              result__ZGGH=(((__INTEGER_8 )result__SZBH) <= ((__INTEGER_8 )'9'));
             };
-            if (result__E0EH) {
-              result__3XBH='\0';
-              if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                result__3XBH=((__CHARACTER )(( 0)));
+            if (result__ZGGH) {
+              result__XZBH='\0';
+              if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+                result__XZBH=((__CHARACTER )(( 0)));
               } else {
-                result__3XBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+                result__XZBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
+              };
+              Self__LPIH=((__STRING *)string_tmp__VH);
+              new_capacity__KPIH= 0;
+              if ((Self__LPIH->capacity__UCS <= Self__LPIH->count__SGC)) {
+                if ((Self__LPIH->capacity__UCS ==  0)) {
+                  Self__LPIH->capacity__UCS= 32;
+                  Self__LPIH->storage__3CS=create__YIEB( 32);
+                } else {
+                  new_capacity__KPIH=(__INTEGER)(Self__LPIH->capacity__UCS <<  1);
+                  Self__MPIH=((__CHARACTER *)Self__LPIH->storage__3CS);
+                  old_nb_elts__NPIH=Self__LPIH->capacity__UCS;
+                  new__OPIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__MPIH),((__UINTEGER_32 )old_nb_elts__NPIH),((__UINTEGER_32 )new_capacity__KPIH)));
+                  upper__C5KH=(__INTEGER)(new_capacity__KPIH -  1);
+                  Self__A5KH=old_nb_elts__NPIH;
+                  while ((Self__A5KH <= upper__C5KH)) {
+                    new__OPIH[Self__A5KH]='\0';
+                    Self__A5KH=(__INTEGER)(Self__A5KH +  1);
+                  };
+                  Self__LPIH->storage__3CS=new__OPIH;
+                  Self__LPIH->capacity__UCS=new_capacity__KPIH;
+                };
               };
-              add_last__GOT(string_tmp__VH,result__3XBH);
+              ((__CHARACTER *)Self__LPIH->storage__3CS)[Self__LPIH->count__SGC]=result__XZBH;
+              Self__LPIH->count__SGC=(__INTEGER)(Self__LPIH->count__SGC +  1);
               position__CCC=(__INTEGER)(position__CCC +  1);
-              goto while_do__2NRE;
+              goto while_do__RORE;
             };
           };
         } else {
-          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)) {
+          pos__EE0G=current_position__B0F();
+          put_error__text__1PG( 0,(&__string_327));
+          put_position__FRG(pos__EE0G);
+          put_string__33F(msg_err__AQG);
+          if ((type_error__5PG !=  2)) {
             exit(( 1));
           };
         };
       };
     };
-    if (result__45O) {
+    if (result__KAP) {
       get__YWB(string_tmp__VH);
     } else {
-      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)));
+      position__CCC=pos_old__LAP;
+    };
+  };
+  if (result__KAP) {
+    short__token__to__GDD((&__string_121),pos_old__LAP,position__CCC);
+  };
+  if (result__KAP) {
+    __tmp__CSO=current_position__B0F();
+    result__UQQ=NULL;
+    ptr__VQQ=((__POINTER )(NULL));
+    typ_id__0QQ= 0;
+    sz__XQQ=((__UINTEGER_32 )sizeof(__ITM_REAL));
+    if ((sz__XQQ ==  0)) {
+      result__UQQ=ITM_REAL__;
+    } else {
+      typ_id__0QQ=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__XQQ);
+      if ((typ_id__0QQ == (__INTEGER)(-  1))) {
+        a__3GGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__4GGH=(__UINTEGER_32)((__UINTEGER_32)(sz__XQQ + a__3GGH) & (__UINTEGER_32)(~ a__3GGH));
+        ptr_table__F5KH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__4GGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__E5KH=((__POINTER )(NULL));
+        result__G5KH=((__POINTER *)ptr_table__F5KH)[ 0];
+        if ((result__G5KH == (void *)NULL)) {
+          result__G5KH=new_lab__RTJ(new_size__4GGH);
+          next__E5KH=(void *)((unsigned long)result__G5KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4GGH)));
+          ((__POINTER *)next__E5KH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__F5KH)[ 0]=next__E5KH;
+        } else {
+          next__E5KH=((__POINTER *)result__G5KH)[ 0];
+          if ((next__E5KH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__G5KH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__4GGH <<  1)) <=  4096)) {
+              next__E5KH=(void *)((unsigned long)result__G5KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4GGH)));
             } else {
-              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)));
+              next__E5KH=new_lab__RTJ(new_size__4GGH);
+            };
+            ((__POINTER *)next__E5KH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__F5KH)[ 0]=next__E5KH;
+          } else {
+            ((__POINTER *)result__G5KH)[ 0]=(void *)((unsigned long)((__POINTER *)next__E5KH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__G5KH=next__E5KH;
+          };
+        };
+        ptr__VQQ=result__G5KH;
+      } else {
+        t__CHGH=((__UINTEGER_32 )typ_id__0QQ);
+        a__BHGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__N5KH=(__UINTEGER_32)((__UINTEGER_32)(sz__XQQ + a__BHGH) & (__UINTEGER_32)(~ a__BHGH));
+        ptr_table__K5KH=((__POINTER )(&(table_type[(t__CHGH)])));
+        lab_type__M5KH=(__UINTEGER_32)(t__CHGH |  1);
+        next__J5KH=((__POINTER )(NULL));
+        result__L5KH=((__POINTER *)ptr_table__K5KH)[ 0];
+        if ((result__L5KH == (void *)NULL)) {
+          result__L5KH=new_lab__RTJ(lab_type__M5KH);
+          next__J5KH=(void *)((unsigned long)result__L5KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__N5KH)));
+          ((__POINTER *)next__J5KH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__K5KH)[ 0]=next__J5KH;
+        } else {
+          next__J5KH=((__POINTER *)result__L5KH)[ 0];
+          if ((next__J5KH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__L5KH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__N5KH <<  1)) <=  4096)) {
+              next__J5KH=(void *)((unsigned long)result__L5KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__N5KH)));
             } else {
-              next__KFKH=new_lab__FTJ(lab_type__NFKH);
+              next__J5KH=new_lab__RTJ(lab_type__M5KH);
             };
-            ((__POINTER *)next__KFKH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__LFKH)[ 0]=next__KFKH;
+            ((__POINTER *)next__J5KH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__K5KH)[ 0]=next__J5KH;
           } else {
-            ((__POINTER *)result__MFKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KFKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__MFKH=next__KFKH;
+            ((__POINTER *)result__L5KH)[ 0]=(void *)((unsigned long)((__POINTER *)next__J5KH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__L5KH=next__J5KH;
           };
         };
-        ptr__JQQ=result__MFKH;
+        ptr__VQQ=result__L5KH;
       };
-      result__IQQ=((__ITM_REAL *)ptr__JQQ);
-      *(result__IQQ) = *(ITM_REAL__);
+      result__UQQ=((__ITM_REAL *)ptr__VQQ);
+      *(result__UQQ) = *(ITM_REAL__);
     };
-    ((__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__;
+    ((__ITM_REAL *)result__UQQ)->parent_itm_constant__BSO.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ=__tmp__CSO;
+    result__0RO=result__UQQ;
+    __tmp__HSO=TRUE__;
   } else {
-    __tmp__1RO=FALSE__;
+    __tmp__HSO=FALSE__;
   };
-  if (__tmp__1RO) {
-    __tmp__NSO=TRUE__;
+  if (__tmp__HSO) {
+    __tmp__ZSO=TRUE__;
   } else {
-    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)));
+    result__3GP=read_integer__22P();
+    if (result__3GP) {
+      __tmp__USO=current_position__B0F();
+      result__JNMB=NULL;
+      ptr__KNMB=((__POINTER )(NULL));
+      typ_id__PNMB= 0;
+      sz__MNMB=((__UINTEGER_32 )sizeof(__ITM_NUMBER));
+      if ((sz__MNMB ==  0)) {
+        result__JNMB=ITM_NUMBER__;
+      } else {
+        typ_id__PNMB=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__MNMB);
+        if ((typ_id__PNMB == (__INTEGER)(-  1))) {
+          a__FHGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__GHGH=(__UINTEGER_32)((__UINTEGER_32)(sz__MNMB + a__FHGH) & (__UINTEGER_32)(~ a__FHGH));
+          ptr_table__P5KH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__GHGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__O5KH=((__POINTER )(NULL));
+          result__Q5KH=((__POINTER *)ptr_table__P5KH)[ 0];
+          if ((result__Q5KH == (void *)NULL)) {
+            result__Q5KH=new_lab__RTJ(new_size__GHGH);
+            next__O5KH=(void *)((unsigned long)result__Q5KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GHGH)));
+            ((__POINTER *)next__O5KH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__P5KH)[ 0]=next__O5KH;
+          } else {
+            next__O5KH=((__POINTER *)result__Q5KH)[ 0];
+            if ((next__O5KH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__Q5KH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__GHGH <<  1)) <=  4096)) {
+                next__O5KH=(void *)((unsigned long)result__Q5KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GHGH)));
               } else {
-                next__PFKH=new_lab__FTJ(new_size__V3GH);
-              };
-              ((__POINTER *)next__PFKH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__QFKH)[ 0]=next__PFKH;
-            } else {
-              ((__POINTER *)result__RFKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PFKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__RFKH=next__PFKH;
-            };
-          };
-          ptr__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)));
+                next__O5KH=new_lab__RTJ(new_size__GHGH);
+              };
+              ((__POINTER *)next__O5KH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__P5KH)[ 0]=next__O5KH;
+            } else {
+              ((__POINTER *)result__Q5KH)[ 0]=(void *)((unsigned long)((__POINTER *)next__O5KH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__Q5KH=next__O5KH;
+            };
+          };
+          ptr__KNMB=result__Q5KH;
+        } else {
+          t__KHGH=((__UINTEGER_32 )typ_id__PNMB);
+          a__JHGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__X5KH=(__UINTEGER_32)((__UINTEGER_32)(sz__MNMB + a__JHGH) & (__UINTEGER_32)(~ a__JHGH));
+          ptr_table__U5KH=((__POINTER )(&(table_type[(t__KHGH)])));
+          lab_type__W5KH=(__UINTEGER_32)(t__KHGH |  1);
+          next__T5KH=((__POINTER )(NULL));
+          result__V5KH=((__POINTER *)ptr_table__U5KH)[ 0];
+          if ((result__V5KH == (void *)NULL)) {
+            result__V5KH=new_lab__RTJ(lab_type__W5KH);
+            next__T5KH=(void *)((unsigned long)result__V5KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__X5KH)));
+            ((__POINTER *)next__T5KH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__U5KH)[ 0]=next__T5KH;
+          } else {
+            next__T5KH=((__POINTER *)result__V5KH)[ 0];
+            if ((next__T5KH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__V5KH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__X5KH <<  1)) <=  4096)) {
+                next__T5KH=(void *)((unsigned long)result__V5KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__X5KH)));
               } else {
-                next__UFKH=new_lab__FTJ(lab_type__XFKH);
+                next__T5KH=new_lab__RTJ(lab_type__W5KH);
               };
-              ((__POINTER *)next__UFKH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__VFKH)[ 0]=next__UFKH;
+              ((__POINTER *)next__T5KH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__U5KH)[ 0]=next__T5KH;
             } else {
-              ((__POINTER *)result__WFKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UFKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__WFKH=next__UFKH;
+              ((__POINTER *)result__V5KH)[ 0]=(void *)((unsigned long)((__POINTER *)next__T5KH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__V5KH=next__T5KH;
             };
           };
-          ptr__1QMB=result__WFKH;
+          ptr__KNMB=result__V5KH;
         };
-        result__0QMB=((__ITM_NUMBER *)ptr__1QMB);
-        *(result__0QMB) = *(ITM_NUMBER__);
+        result__JNMB=((__ITM_NUMBER *)ptr__KNMB);
+        *(result__JNMB) = *(ITM_NUMBER__);
       };
-      ((__ITM_NUMBER *)result__0QMB)->parent_itm_constant__HSO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ=__tmp__ISO;
-      result__ORO=result__0QMB;
+      ((__ITM_NUMBER *)result__JNMB)->parent_itm_constant__TSO.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ=__tmp__USO;
+      result__0RO=result__JNMB;
     };
-    __tmp__NSO=result__RGP;
+    __tmp__ZSO=result__3GP;
   };
-  if (__tmp__NSO) {
-    __tmp__4SO=TRUE__;
+  if (__tmp__ZSO) {
+    __tmp__KTO=TRUE__;
   } else {
-    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__CYBH=((__CHARACTER )(( 0)));
+    result__1CQ=FALSE__;
+    old_pos__2CQ= 0;
+    count__3CQ= 0;
+    if (read_space__XTD()) {
+      result__2ZBH='\0';
+      if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+        result__2ZBH=((__CHARACTER )(( 0)));
       } else {
-        result__CYBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+        result__2ZBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
       };
-      __tmp__1CQ=(result__CYBH == '\'');
+      __tmp__HDQ=(result__2ZBH == '\'');
     } else {
-      __tmp__1CQ=FALSE__;
+      __tmp__HDQ=FALSE__;
     };
-    if (__tmp__1CQ) {
-      old_pos__QCQ=position__CCC;
+    if (__tmp__HDQ) {
+      old_pos__2CQ=position__CCC;
       position__CCC=(__INTEGER)(position__CCC +  1);
-      ((__STRING *)string_tmp__VH)->count__EGC= 0;
-      until_do__ANRC:
+      ((__STRING *)string_tmp__VH)->count__SGC= 0;
+      until_do__0JRC:
       {
-        result__MYBH='\0';
-        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__MYBH=((__CHARACTER )(( 0)));
+        result__G0BH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+          result__G0BH=((__CHARACTER )(( 0)));
         } else {
-          result__MYBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+          result__G0BH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__MYBH == ((__CHARACTER )(( 0))))) {
-          __tmp__0DQ=TRUE__;
+        if ((result__G0BH == ((__CHARACTER )(( 0))))) {
+          __tmp__GEQ=TRUE__;
         } else {
-          result__VYBH='\0';
-          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__VYBH=((__CHARACTER )(( 0)));
+          result__P0BH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+            result__P0BH=((__CHARACTER )(( 0)));
           } else {
-            result__VYBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+            result__P0BH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
           };
-          __tmp__0DQ=(result__VYBH == '\n');
+          __tmp__GEQ=(result__P0BH == '\n');
         };
-        if (__tmp__0DQ) {
-          __tmp__1DQ=TRUE__;
+        if (__tmp__GEQ) {
+          __tmp__HEQ=TRUE__;
         } else {
-          result__0YBH='\0';
-          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__0YBH=((__CHARACTER )(( 0)));
+          result__U0BH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+            result__U0BH=((__CHARACTER )(( 0)));
           } else {
-            result__0YBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+            result__U0BH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
           };
-          __tmp__1DQ=(result__0YBH == '\'');
+          __tmp__HEQ=(result__U0BH == '\'');
         };
-        if ((! __tmp__1DQ)) {
-          result__5YBH='\0';
-          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__5YBH=((__CHARACTER )(( 0)));
+        if ((! __tmp__HEQ)) {
+          result__Z0BH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+            result__Z0BH=((__CHARACTER )(( 0)));
           } else {
-            result__5YBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+            result__Z0BH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
+          };
+          Self__RPIH=((__STRING *)string_tmp__VH);
+          new_capacity__QPIH= 0;
+          if ((Self__RPIH->capacity__UCS <= Self__RPIH->count__SGC)) {
+            if ((Self__RPIH->capacity__UCS ==  0)) {
+              Self__RPIH->capacity__UCS= 32;
+              Self__RPIH->storage__3CS=create__YIEB( 32);
+            } else {
+              new_capacity__QPIH=(__INTEGER)(Self__RPIH->capacity__UCS <<  1);
+              Self__SPIH=((__CHARACTER *)Self__RPIH->storage__3CS);
+              old_nb_elts__TPIH=Self__RPIH->capacity__UCS;
+              new__UPIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__SPIH),((__UINTEGER_32 )old_nb_elts__TPIH),((__UINTEGER_32 )new_capacity__QPIH)));
+              upper__15KH=(__INTEGER)(new_capacity__QPIH -  1);
+              Self__Z5KH=old_nb_elts__TPIH;
+              while ((Self__Z5KH <= upper__15KH)) {
+                new__UPIH[Self__Z5KH]='\0';
+                Self__Z5KH=(__INTEGER)(Self__Z5KH +  1);
+              };
+              Self__RPIH->storage__3CS=new__UPIH;
+              Self__RPIH->capacity__UCS=new_capacity__QPIH;
+            };
           };
-          add_last__GOT(string_tmp__VH,result__5YBH);
-          result__EZBH='\0';
-          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__EZBH=((__CHARACTER )(( 0)));
+          ((__CHARACTER *)Self__RPIH->storage__3CS)[Self__RPIH->count__SGC]=result__Z0BH;
+          Self__RPIH->count__SGC=(__INTEGER)(Self__RPIH->count__SGC +  1);
+          result__40BH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+            result__40BH=((__CHARACTER )(( 0)));
           } else {
-            result__EZBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+            result__40BH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__EZBH == '\\')) {
+          if ((result__40BH == '\\')) {
             position__CCC=(__INTEGER)(position__CCC +  1);
-            read_escape_character__G4KF();
-            count__RCQ=(__INTEGER)(count__RCQ +  1);
+            read_escape_character__AALF();
+            count__3CQ=(__INTEGER)(count__3CQ +  1);
           } else {
             position__CCC=(__INTEGER)(position__CCC +  1);
-            count__RCQ=(__INTEGER)(count__RCQ +  1);
+            count__3CQ=(__INTEGER)(count__3CQ +  1);
           };
-          goto until_do__ANRC;
+          goto until_do__0JRC;
         };
       };
-      result__JZBH='\0';
-      if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__JZBH=((__CHARACTER )(( 0)));
+      result__D1BH='\0';
+      if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+        result__D1BH=((__CHARACTER )(( 0)));
       } else {
-        result__JZBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+        result__D1BH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__JZBH == '\'')) {
+      if ((result__D1BH == '\'')) {
         position__CCC=(__INTEGER)(position__CCC +  1);
-        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)) {
+        last_string__D2C=get__YWB(string_tmp__VH);
+        if ((count__3CQ !=  1)) {
+          position__CCC=begin_position__BDE;
+          pos__EF0G=current_position__B0F();
+          put_error__text__1PG( 0,(&__string_328));
+          put_position__FRG(pos__EF0G);
+          put_string__33F(msg_err__AQG);
+          if ((type_error__5PG !=  2)) {
             exit(( 1));
           };
         };
-        result__PCQ=TRUE__;
-        short__token__to__YCD((&__string_122),old_pos__QCQ,position__CCC);
+        result__1CQ=TRUE__;
+        short__token__to__GDD((&__string_122),old_pos__2CQ,position__CCC);
       } else {
-        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)) {
+        position__CCC=begin_position__BDE;
+        pos__GF0G=current_position__B0F();
+        put_error__text__1PG( 0,(&__string_329));
+        put_position__FRG(pos__GF0G);
+        put_string__33F(msg_err__AQG);
+        if ((type_error__5PG !=  2)) {
           exit(( 1));
         };
       };
     };
-    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)));
+    if (result__1CQ) {
+      __tmp__GTO=current_position__B0F();
+      result__3OMB=NULL;
+      ptr__4OMB=((__POINTER )(NULL));
+      typ_id__DPMB= 0;
+      sz__APMB=((__UINTEGER_32 )sizeof(__ITM_CHARACTER));
+      if ((sz__APMB ==  0)) {
+        result__3OMB=ITM_CHARACTER__;
+      } else {
+        typ_id__DPMB=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__APMB);
+        if ((typ_id__DPMB == (__INTEGER)(-  1))) {
+          a__NHGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__OHGH=(__UINTEGER_32)((__UINTEGER_32)(sz__APMB + a__NHGH) & (__UINTEGER_32)(~ a__NHGH));
+          ptr_table__45KH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__OHGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__35KH=((__POINTER )(NULL));
+          result__55KH=((__POINTER *)ptr_table__45KH)[ 0];
+          if ((result__55KH == (void *)NULL)) {
+            result__55KH=new_lab__RTJ(new_size__OHGH);
+            next__35KH=(void *)((unsigned long)result__55KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OHGH)));
+            ((__POINTER *)next__35KH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__45KH)[ 0]=next__35KH;
+          } else {
+            next__35KH=((__POINTER *)result__55KH)[ 0];
+            if ((next__35KH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__55KH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__OHGH <<  1)) <=  4096)) {
+                next__35KH=(void *)((unsigned long)result__55KH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OHGH)));
               } else {
-                next__ZFKH=new_lab__FTJ(new_size__33GH);
-              };
-              ((__POINTER *)next__ZFKH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__0FKH)[ 0]=next__ZFKH;
-            } else {
-              ((__POINTER *)result__1FKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZFKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__1FKH=next__ZFKH;
-            };
-          };
-          ptr__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)));
+                next__35KH=new_lab__RTJ(new_size__OHGH);
+              };
+              ((__POINTER *)next__35KH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__45KH)[ 0]=next__35KH;
+            } else {
+              ((__POINTER *)result__55KH)[ 0]=(void *)((unsigned long)((__POINTER *)next__35KH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__55KH=next__35KH;
+            };
+          };
+          ptr__4OMB=result__55KH;
+        } else {
+          t__SHGH=((__UINTEGER_32 )typ_id__DPMB);
+          a__RHGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__GALH=(__UINTEGER_32)((__UINTEGER_32)(sz__APMB + a__RHGH) & (__UINTEGER_32)(~ a__RHGH));
+          ptr_table__DALH=((__POINTER )(&(table_type[(t__SHGH)])));
+          lab_type__FALH=(__UINTEGER_32)(t__SHGH |  1);
+          next__CALH=((__POINTER )(NULL));
+          result__EALH=((__POINTER *)ptr_table__DALH)[ 0];
+          if ((result__EALH == (void *)NULL)) {
+            result__EALH=new_lab__RTJ(lab_type__FALH);
+            next__CALH=(void *)((unsigned long)result__EALH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GALH)));
+            ((__POINTER *)next__CALH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__DALH)[ 0]=next__CALH;
+          } else {
+            next__CALH=((__POINTER *)result__EALH)[ 0];
+            if ((next__CALH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__EALH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__GALH <<  1)) <=  4096)) {
+                next__CALH=(void *)((unsigned long)result__EALH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GALH)));
               } else {
-                next__4FKH=new_lab__FTJ(lab_type__BGKH);
-              };
-              ((__POINTER *)next__4FKH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__5FKH)[ 0]=next__4FKH;
-            } else {
-              ((__POINTER *)result__AGKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4FKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__AGKH=next__4FKH;
-            };
-          };
-          ptr__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)));
+                next__CALH=new_lab__RTJ(lab_type__FALH);
+              };
+              ((__POINTER *)next__CALH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__DALH)[ 0]=next__CALH;
+            } else {
+              ((__POINTER *)result__EALH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CALH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__EALH=next__CALH;
+            };
+          };
+          ptr__4OMB=result__EALH;
+        };
+        result__3OMB=((__ITM_CHARACTER *)ptr__4OMB);
+        *(result__3OMB) = *(ITM_CHARACTER__);
+      };
+      ((__ITM_CHARACTER *)result__3OMB)->parent_itm_constant__FTO.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ=__tmp__GTO;
+      result__0RO=result__3OMB;
+    };
+    __tmp__KTO=result__1CQ;
+  };
+  if ((! __tmp__KTO)) {
+    if (read_string__HGQ()) {
+      __tmp__XTO=current_position__B0F();
+      result__RQMB=NULL;
+      ptr__SQMB=((__POINTER )(NULL));
+      typ_id__XQMB= 0;
+      sz__UQMB=((__UINTEGER_32 )sizeof(__ITM_STRING));
+      if ((sz__UQMB ==  0)) {
+        result__RQMB=ITM_STRING__;
+      } else {
+        typ_id__XQMB=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__UQMB);
+        if ((typ_id__XQMB == (__INTEGER)(-  1))) {
+          a__VHGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__WHGH=(__UINTEGER_32)((__UINTEGER_32)(sz__UQMB + a__VHGH) & (__UINTEGER_32)(~ a__VHGH));
+          ptr_table__IALH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__WHGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__HALH=((__POINTER )(NULL));
+          result__JALH=((__POINTER *)ptr_table__IALH)[ 0];
+          if ((result__JALH == (void *)NULL)) {
+            result__JALH=new_lab__RTJ(new_size__WHGH);
+            next__HALH=(void *)((unsigned long)result__JALH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WHGH)));
+            ((__POINTER *)next__HALH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__IALH)[ 0]=next__HALH;
+          } else {
+            next__HALH=((__POINTER *)result__JALH)[ 0];
+            if ((next__HALH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__JALH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__WHGH <<  1)) <=  4096)) {
+                next__HALH=(void *)((unsigned long)result__JALH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WHGH)));
               } else {
-                next__DGKH=new_lab__FTJ(new_size__F4GH);
-              };
-              ((__POINTER *)next__DGKH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__EGKH)[ 0]=next__DGKH;
-            } else {
-              ((__POINTER *)result__FGKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DGKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__FGKH=next__DGKH;
-            };
-          };
-          ptr__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)));
+                next__HALH=new_lab__RTJ(new_size__WHGH);
+              };
+              ((__POINTER *)next__HALH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__IALH)[ 0]=next__HALH;
+            } else {
+              ((__POINTER *)result__JALH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HALH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__JALH=next__HALH;
+            };
+          };
+          ptr__SQMB=result__JALH;
+        } else {
+          t__0HGH=((__UINTEGER_32 )typ_id__XQMB);
+          a__ZHGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__QALH=(__UINTEGER_32)((__UINTEGER_32)(sz__UQMB + a__ZHGH) & (__UINTEGER_32)(~ a__ZHGH));
+          ptr_table__NALH=((__POINTER )(&(table_type[(t__0HGH)])));
+          lab_type__PALH=(__UINTEGER_32)(t__0HGH |  1);
+          next__MALH=((__POINTER )(NULL));
+          result__OALH=((__POINTER *)ptr_table__NALH)[ 0];
+          if ((result__OALH == (void *)NULL)) {
+            result__OALH=new_lab__RTJ(lab_type__PALH);
+            next__MALH=(void *)((unsigned long)result__OALH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QALH)));
+            ((__POINTER *)next__MALH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__NALH)[ 0]=next__MALH;
+          } else {
+            next__MALH=((__POINTER *)result__OALH)[ 0];
+            if ((next__MALH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__OALH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__QALH <<  1)) <=  4096)) {
+                next__MALH=(void *)((unsigned long)result__OALH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QALH)));
               } else {
-                next__IGKH=new_lab__FTJ(lab_type__LGKH);
+                next__MALH=new_lab__RTJ(lab_type__PALH);
               };
-              ((__POINTER *)next__IGKH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__JGKH)[ 0]=next__IGKH;
+              ((__POINTER *)next__MALH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__NALH)[ 0]=next__MALH;
             } else {
-              ((__POINTER *)result__KGKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__IGKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__KGKH=next__IGKH;
+              ((__POINTER *)result__OALH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MALH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__OALH=next__MALH;
             };
           };
-          ptr__DUMB=result__KGKH;
+          ptr__SQMB=result__OALH;
         };
-        result__CUMB=((__ITM_STRING *)ptr__DUMB);
-        *(result__CUMB) = *(ITM_STRING__);
+        result__RQMB=((__ITM_STRING *)ptr__SQMB);
+        *(result__RQMB) = *(ITM_STRING__);
       };
-      ((__ITM_STRING *)result__CUMB)->parent_itm_constant__KTO.parent_itm_code__WXF.parent_itm_object__SEE.position__GFJ=__tmp__LTO;
-      result__ORO=result__CUMB;
+      ((__ITM_STRING *)result__RQMB)->parent_itm_constant__WTO.parent_itm_code__TYF.parent_itm_object__PFE.position__SFJ=__tmp__XTO;
+      result__0RO=result__RQMB;
     };
   };
-  return(result__ORO);
+  return(result__0RO);
 }
 
-static void* read_group__TBHB(__PARSER *Self__UBHB)
+static void* read_group__C4GB(__PARSER *Self__D4GB)
 // ({PARSER}) With resultNo recursive, No inlinable.
 {
-  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);
+  void *e__F4GB;
+  __ITM_RESULT *result__XALH,*result__AWWB;
+  __POINTER ptr__YALH,ptr_table__BBLH,next__ABLH,result__CBLH;
+  __POINTER ptr_table__GBLH,next__FBLH,result__HBLH,ptr__BWWB;
+  __POINTER ptr_table__RBLH,next__QBLH,result__SBLH,ptr_table__WBLH;
+  __POINTER next__VBLH,result__XBLH;
+  __INTEGER typ_id__ZALH,typ_id__GWWB;
+  __UINTEGER_32 sz__0ALH,a__1ALH,new_size__2ALH,t__3ALH,a__4ALH;
+  __UINTEGER_32 new_size__JBLH,lab_type__IBLH,sz__DWWB,a__GLGH;
+  __UINTEGER_32 new_size__HLGH,t__LLGH,a__KLGH,new_size__ZBLH;
+  __UINTEGER_32 lab_type__YBLH;
+  __POSITION pos__UF0G;
+  void *result__R5GH,*result__G4GB;
+  __FAST_ARRAYoFAST_ARRAYoITM_CODEoo *Self__S5GH,*Self__T5GH;
+  __BOOLEAN result__RALH,__tmp__V4GB,result__UALH,result__KBLH;
+  __BOOLEAN __tmp__25GB,result__NBLH;
+  __CHARACTER result__SALH,result__VALH,result__LBLH,result__OBLH;
+  read_def_local__M3H(Self__D4GB);
+  result__R5GH=NULL;
+  if ((((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__QAI)->parent_arrayed_collection__PAI.upper__BYT <  0)) {
+    result__R5GH=create_with_capacity__XXI( 16);
   } else {
-    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:
+    Self__S5GH=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__QAI);
+    result__R5GH=((void **)Self__S5GH->parent_arrayed_collection__PAI.storage__PCU)[Self__S5GH->parent_arrayed_collection__PAI.upper__BYT];
+    Self__T5GH=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__QAI);
+    Self__T5GH->parent_arrayed_collection__PAI.upper__BYT=(__INTEGER)(Self__T5GH->parent_arrayed_collection__PAI.upper__BYT -  1);
+  };
+  result__G4GB=result__R5GH;
+  e__F4GB=read_expr__DBJ(Self__D4GB);
+  while_do__VDMB:
   {
-    if (((void *)e__WBHB != (void *)NULL)) {
-      result__NGKH=FALSE__;
-      if ((! read_space__MTD())) {
-        result__NGKH=FALSE__;
+    if (((void *)e__F4GB != (void *)NULL)) {
+      result__RALH=FALSE__;
+      if ((! read_space__XTD())) {
+        result__RALH=FALSE__;
       } else {
-        result__OGKH='\0';
-        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__OGKH=((__CHARACTER )(( 0)));
+        result__SALH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+          result__SALH=((__CHARACTER )(( 0)));
         } else {
-          result__OGKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+          result__SALH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__OGKH == ';')) {
+        if ((result__SALH == ';')) {
           position__CCC=(__INTEGER)(position__CCC +  1);
-          result__NGKH=TRUE__;
+          result__RALH=TRUE__;
         };
       };
-      __tmp__GCHB=result__NGKH;
+      __tmp__V4GB=result__RALH;
     } else {
-      __tmp__GCHB=FALSE__;
+      __tmp__V4GB=FALSE__;
     };
-    if (__tmp__GCHB) {
-      add_last__25U(result__XBHB,e__WBHB);
-      e__WBHB=read_expr__XAJ(Self__UBHB);
-      goto while_do__GHMB;
+    if (__tmp__V4GB) {
+      add_last__I5U(result__G4GB,e__F4GB);
+      e__F4GB=read_expr__DBJ(Self__D4GB);
+      goto while_do__VDMB;
     };
   };
-  if (((void *)e__WBHB != (void *)NULL)) {
-    result__QGKH=FALSE__;
-    if ((! read_space__MTD())) {
-      result__QGKH=FALSE__;
+  if (((void *)e__F4GB != (void *)NULL)) {
+    result__UALH=FALSE__;
+    if ((! read_space__XTD())) {
+      result__UALH=FALSE__;
     } else {
-      result__RGKH='\0';
-      if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__RGKH=((__CHARACTER )(( 0)));
+      result__VALH='\0';
+      if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+        result__VALH=((__CHARACTER )(( 0)));
       } else {
-        result__RGKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+        result__VALH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__RGKH == ',')) {
+      if ((result__VALH == ',')) {
         position__CCC=(__INTEGER)(position__CCC +  1);
-        result__QGKH=TRUE__;
+        result__UALH=TRUE__;
       };
     };
-    if (result__QGKH) {
+    if (result__UALH) {
       do {
-        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__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)));
+        result__XALH=NULL;
+        ptr__YALH=((__POINTER )(NULL));
+        typ_id__ZALH= 0;
+        sz__0ALH=((__UINTEGER_32 )sizeof(__ITM_RESULT));
+        if ((sz__0ALH ==  0)) {
+          result__XALH=ITM_RESULT__;
+        } else {
+          typ_id__ZALH=-1;
+          clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__0ALH);
+          if ((typ_id__ZALH == (__INTEGER)(-  1))) {
+            a__1ALH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__2ALH=(__UINTEGER_32)((__UINTEGER_32)(sz__0ALH + a__1ALH) & (__UINTEGER_32)(~ a__1ALH));
+            ptr_table__BBLH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__2ALH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__ABLH=((__POINTER )(NULL));
+            result__CBLH=((__POINTER *)ptr_table__BBLH)[ 0];
+            if ((result__CBLH == (void *)NULL)) {
+              result__CBLH=new_lab__RTJ(new_size__2ALH);
+              next__ABLH=(void *)((unsigned long)result__CBLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2ALH)));
+              ((__POINTER *)next__ABLH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__BBLH)[ 0]=next__ABLH;
+            } else {
+              next__ABLH=((__POINTER *)result__CBLH)[ 0];
+              if ((next__ABLH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__CBLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__2ALH <<  1)) <=  4096)) {
+                  next__ABLH=(void *)((unsigned long)result__CBLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2ALH)));
                 } else {
-                  next__2GKH=new_lab__FTJ(new_size__YGKH);
+                  next__ABLH=new_lab__RTJ(new_size__2ALH);
                 };
-                ((__POINTER *)next__2GKH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__3GKH)[ 0]=next__2GKH;
+                ((__POINTER *)next__ABLH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__BBLH)[ 0]=next__ABLH;
               } else {
-                ((__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__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)));
+                ((__POINTER *)result__CBLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ABLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__CBLH=next__ABLH;
+              };
+            };
+            ptr__YALH=result__CBLH;
+          } else {
+            t__3ALH=((__UINTEGER_32 )typ_id__ZALH);
+            a__4ALH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__JBLH=(__UINTEGER_32)((__UINTEGER_32)(sz__0ALH + a__4ALH) & (__UINTEGER_32)(~ a__4ALH));
+            ptr_table__GBLH=((__POINTER )(&(table_type[(t__3ALH)])));
+            lab_type__IBLH=(__UINTEGER_32)(t__3ALH |  1);
+            next__FBLH=((__POINTER )(NULL));
+            result__HBLH=((__POINTER *)ptr_table__GBLH)[ 0];
+            if ((result__HBLH == (void *)NULL)) {
+              result__HBLH=new_lab__RTJ(lab_type__IBLH);
+              next__FBLH=(void *)((unsigned long)result__HBLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JBLH)));
+              ((__POINTER *)next__FBLH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__GBLH)[ 0]=next__FBLH;
+            } else {
+              next__FBLH=((__POINTER *)result__HBLH)[ 0];
+              if ((next__FBLH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HBLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__JBLH <<  1)) <=  4096)) {
+                  next__FBLH=(void *)((unsigned long)result__HBLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JBLH)));
                 } else {
-                  next__BHKH=new_lab__FTJ(lab_type__EHKH);
+                  next__FBLH=new_lab__RTJ(lab_type__IBLH);
                 };
-                ((__POINTER *)next__BHKH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__CHKH)[ 0]=next__BHKH;
+                ((__POINTER *)next__FBLH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__GBLH)[ 0]=next__FBLH;
               } else {
-                ((__POINTER *)result__DHKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BHKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__DHKH=next__BHKH;
+                ((__POINTER *)result__HBLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FBLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__HBLH=next__FBLH;
               };
             };
-            ptr__UGKH=result__DHKH;
+            ptr__YALH=result__HBLH;
           };
-          result__TGKH=((__ITM_RESULT *)ptr__UGKH);
-          *(result__TGKH) = *(ITM_RESULT__);
+          result__XALH=((__ITM_RESULT *)ptr__YALH);
+          *(result__XALH) = *(ITM_RESULT__);
         };
-        ((__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:
+        ((__ITM_RESULT *)result__XALH)->value__WKFC=e__F4GB;
+        add_last__I5U(result__G4GB,result__XALH);
+        e__F4GB=read_expr__DBJ(Self__D4GB);
+        while_do__UY3B:
         {
-          if (((void *)e__WBHB != (void *)NULL)) {
-            result__GHKH=FALSE__;
-            if ((! read_space__MTD())) {
-              result__GHKH=FALSE__;
-            } else {
-              result__HHKH='\0';
-              if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                result__HHKH=((__CHARACTER )(( 0)));
+          if (((void *)e__F4GB != (void *)NULL)) {
+            result__KBLH=FALSE__;
+            if ((! read_space__XTD())) {
+              result__KBLH=FALSE__;
+            } else {
+              result__LBLH='\0';
+              if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+                result__LBLH=((__CHARACTER )(( 0)));
               } else {
-                result__HHKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+                result__LBLH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
               };
-              if ((result__HHKH == ';')) {
+              if ((result__LBLH == ';')) {
                 position__CCC=(__INTEGER)(position__CCC +  1);
-                result__GHKH=TRUE__;
+                result__KBLH=TRUE__;
               };
             };
-            __tmp__NDHB=result__GHKH;
+            __tmp__25GB=result__KBLH;
           } else {
-            __tmp__NDHB=FALSE__;
+            __tmp__25GB=FALSE__;
           };
-          if (__tmp__NDHB) {
-            add_last__25U(result__XBHB,e__WBHB);
-            e__WBHB=read_expr__XAJ(Self__UBHB);
-            goto while_do__H23B;
+          if (__tmp__25GB) {
+            add_last__I5U(result__G4GB,e__F4GB);
+            e__F4GB=read_expr__DBJ(Self__D4GB);
+            goto while_do__UY3B;
           };
         };
-        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)) {
+        if (((void *)e__F4GB == (void *)NULL)) {
+          pos__UF0G=current_position__B0F();
+          put_error__text__1PG( 0,(&__string_330));
+          put_position__FRG(pos__UF0G);
+          put_string__33F(msg_err__AQG);
+          if ((type_error__5PG !=  2)) {
             exit(( 1));
           };
         };
-        result__JHKH=FALSE__;
-        if ((! read_space__MTD())) {
-          result__JHKH=FALSE__;
+        result__NBLH=FALSE__;
+        if ((! read_space__XTD())) {
+          result__NBLH=FALSE__;
         } else {
-          result__KHKH='\0';
-          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__KHKH=((__CHARACTER )(( 0)));
+          result__OBLH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+            result__OBLH=((__CHARACTER )(( 0)));
           } else {
-            result__KHKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+            result__OBLH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__KHKH == ',')) {
+          if ((result__OBLH == ',')) {
             position__CCC=(__INTEGER)(position__CCC +  1);
-            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)));
+            result__NBLH=TRUE__;
+          };
+        };
+      } while (result__NBLH);
+    };
+    result__AWWB=NULL;
+    ptr__BWWB=((__POINTER )(NULL));
+    typ_id__GWWB= 0;
+    sz__DWWB=((__UINTEGER_32 )sizeof(__ITM_RESULT));
+    if ((sz__DWWB ==  0)) {
+      result__AWWB=ITM_RESULT__;
+    } else {
+      typ_id__GWWB=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__DWWB);
+      if ((typ_id__GWWB == (__INTEGER)(-  1))) {
+        a__GLGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__HLGH=(__UINTEGER_32)((__UINTEGER_32)(sz__DWWB + a__GLGH) & (__UINTEGER_32)(~ a__GLGH));
+        ptr_table__RBLH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__HLGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__QBLH=((__POINTER )(NULL));
+        result__SBLH=((__POINTER *)ptr_table__RBLH)[ 0];
+        if ((result__SBLH == (void *)NULL)) {
+          result__SBLH=new_lab__RTJ(new_size__HLGH);
+          next__QBLH=(void *)((unsigned long)result__SBLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HLGH)));
+          ((__POINTER *)next__QBLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__RBLH)[ 0]=next__QBLH;
+        } else {
+          next__QBLH=((__POINTER *)result__SBLH)[ 0];
+          if ((next__QBLH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__SBLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__HLGH <<  1)) <=  4096)) {
+              next__QBLH=(void *)((unsigned long)result__SBLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HLGH)));
             } else {
-              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)));
+              next__QBLH=new_lab__RTJ(new_size__HLGH);
+            };
+            ((__POINTER *)next__QBLH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__RBLH)[ 0]=next__QBLH;
+          } else {
+            ((__POINTER *)result__SBLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QBLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__SBLH=next__QBLH;
+          };
+        };
+        ptr__BWWB=result__SBLH;
+      } else {
+        t__LLGH=((__UINTEGER_32 )typ_id__GWWB);
+        a__KLGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__ZBLH=(__UINTEGER_32)((__UINTEGER_32)(sz__DWWB + a__KLGH) & (__UINTEGER_32)(~ a__KLGH));
+        ptr_table__WBLH=((__POINTER )(&(table_type[(t__LLGH)])));
+        lab_type__YBLH=(__UINTEGER_32)(t__LLGH |  1);
+        next__VBLH=((__POINTER )(NULL));
+        result__XBLH=((__POINTER *)ptr_table__WBLH)[ 0];
+        if ((result__XBLH == (void *)NULL)) {
+          result__XBLH=new_lab__RTJ(lab_type__YBLH);
+          next__VBLH=(void *)((unsigned long)result__XBLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZBLH)));
+          ((__POINTER *)next__VBLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__WBLH)[ 0]=next__VBLH;
+        } else {
+          next__VBLH=((__POINTER *)result__XBLH)[ 0];
+          if ((next__VBLH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XBLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__ZBLH <<  1)) <=  4096)) {
+              next__VBLH=(void *)((unsigned long)result__XBLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZBLH)));
             } else {
-              next__RHKH=new_lab__FTJ(lab_type__UHKH);
+              next__VBLH=new_lab__RTJ(lab_type__YBLH);
             };
-            ((__POINTER *)next__RHKH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__SHKH)[ 0]=next__RHKH;
+            ((__POINTER *)next__VBLH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__WBLH)[ 0]=next__VBLH;
           } else {
-            ((__POINTER *)result__THKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RHKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__THKH=next__RHKH;
+            ((__POINTER *)result__XBLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VBLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__XBLH=next__VBLH;
           };
         };
-        ptr__UZWB=result__THKH;
+        ptr__BWWB=result__XBLH;
       };
-      result__TZWB=((__ITM_RESULT *)ptr__UZWB);
-      *(result__TZWB) = *(ITM_RESULT__);
+      result__AWWB=((__ITM_RESULT *)ptr__BWWB);
+      *(result__AWWB) = *(ITM_RESULT__);
     };
-    ((__ITM_RESULT *)result__TZWB)->value__FOFC=e__WBHB;
-    e__WBHB=result__TZWB;
-    add_last__25U(result__PZHH,result__TZWB);
+    ((__ITM_RESULT *)result__AWWB)->value__WKFC=e__F4GB;
+    e__F4GB=result__AWWB;
+    add_last__I5U(result__R5GH,result__AWWB);
   };
-  return(copy__TBI(result__PZHH));
+  return(copy__5BI(result__R5GH));
 }
 
-static void* readlip_expr_operator__ZPZB(__PARSER *Self__0PZB)
+static void* readlip_expr_operator__GMZB(__PARSER *Self__HMZB)
 // ({PARSER}) With resultRecursive, No inlinable.
 {
-  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:
+  void *right__KMZB,*result__JMZB;
+  __POSITION pos__KG0G,p__JCLH,p__ADLH;
+  __LIP_BINARY *result__ACLH,*Self__ICLH,*result__XCLH,*Self__5CLH;
+  __POINTER ptr__BCLH,ptr_table__OCLH,next__NCLH,result__PCLH;
+  __POINTER ptr_table__TCLH,next__SCLH,result__UCLH,ptr__YCLH;
+  __POINTER ptr_table__FDLH,next__EDLH,result__GDLH,ptr_table__KDLH;
+  __POINTER next__JDLH,result__LDLH;
+  __INTEGER typ_id__CCLH,typ_id__ZCLH;
+  __UINTEGER_32 sz__DCLH,a__ECLH,new_size__FCLH,t__GCLH,a__HCLH;
+  __UINTEGER_32 new_size__WCLH,lab_type__VCLH,sz__0CLH,a__1CLH;
+  __UINTEGER_32 new_size__2CLH,t__3CLH,a__4CLH,new_size__NDLH;
+  __UINTEGER_32 lab_type__MDLH;
+  __BOOLEAN result__0BLH,__tmp__5MZB,result__3BLH;
+  __CHARACTER result__1BLH,result__4BLH;
+  right__KMZB=NULL;
+  result__JMZB=readlip_expr_cmp__0Y1B(Self__HMZB);
+  if (((void *)result__JMZB != (void *)NULL)) {
+    while_do__J04B:
     {
-      result__WHKH=FALSE__;
-      if ((! read_space__MTD())) {
-        result__WHKH=FALSE__;
+      result__0BLH=FALSE__;
+      if ((! read_space__XTD())) {
+        result__0BLH=FALSE__;
       } else {
-        result__XHKH='\0';
-        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__XHKH=((__CHARACTER )(( 0)));
+        result__1BLH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+          result__1BLH=((__CHARACTER )(( 0)));
         } else {
-          result__XHKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+          result__1BLH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__XHKH == '|')) {
+        if ((result__1BLH == '|')) {
           position__CCC=(__INTEGER)(position__CCC +  1);
-          result__WHKH=TRUE__;
+          result__0BLH=TRUE__;
         };
       };
-      if (result__WHKH) {
-        __tmp__SQZB=TRUE__;
+      if (result__0BLH) {
+        __tmp__5MZB=TRUE__;
       } else {
-        result__ZHKH=FALSE__;
-        if ((! read_space__MTD())) {
-          result__ZHKH=FALSE__;
+        result__3BLH=FALSE__;
+        if ((! read_space__XTD())) {
+          result__3BLH=FALSE__;
         } else {
-          result__0HKH='\0';
-          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__0HKH=((__CHARACTER )(( 0)));
+          result__4BLH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+            result__4BLH=((__CHARACTER )(( 0)));
           } else {
-            result__0HKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+            result__4BLH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__0HKH == '&')) {
+          if ((result__4BLH == '&')) {
             position__CCC=(__INTEGER)(position__CCC +  1);
-            result__ZHKH=TRUE__;
+            result__3BLH=TRUE__;
           };
         };
-        __tmp__SQZB=result__ZHKH;
+        __tmp__5MZB=result__3BLH;
       };
-      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)) {
+      if (__tmp__5MZB) {
+        right__KMZB=readlip_expr_cmp__0Y1B(Self__HMZB);
+        if (((void *)right__KMZB == (void *)NULL)) {
+          pos__KG0G=current_position__B0F();
+          put_error__text__1PG( 0,(&__string_239));
+          put_position__FRG(pos__KG0G);
+          put_string__33F(msg_err__AQG);
+          if ((type_error__5PG !=  2)) {
             exit(( 1));
           };
         };
-        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;
+        if (result__0BLH) {
+          p__JCLH=current_position__B0F();
+          result__ACLH=NULL;
+          ptr__BCLH=((__POINTER )(NULL));
+          typ_id__CCLH= 0;
+          sz__DCLH=((__UINTEGER_32 )sizeof(__LIP_BINARY));
+          if ((sz__DCLH ==  0)) {
+            result__ACLH=LIP_BINARY__;
+          } else {
+            typ_id__CCLH=-1;
+            clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__DCLH);
+            if ((typ_id__CCLH == (__INTEGER)(-  1))) {
+              a__ECLH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__FCLH=(__UINTEGER_32)((__UINTEGER_32)(sz__DCLH + a__ECLH) & (__UINTEGER_32)(~ a__ECLH));
+              ptr_table__OCLH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__FCLH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__NCLH=((__POINTER )(NULL));
+              result__PCLH=((__POINTER *)ptr_table__OCLH)[ 0];
+              if ((result__PCLH == (void *)NULL)) {
+                result__PCLH=new_lab__RTJ(new_size__FCLH);
+                next__NCLH=(void *)((unsigned long)result__PCLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FCLH)));
+                ((__POINTER *)next__NCLH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__OCLH)[ 0]=next__NCLH;
               } else {
-                next__JIKH=((__POINTER *)result__LIKH)[ 0];
-                if ((next__JIKH == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LIKH - (unsigned long)begin_memory__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)));
+                next__NCLH=((__POINTER *)result__PCLH)[ 0];
+                if ((next__NCLH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__PCLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__FCLH <<  1)) <=  4096)) {
+                    next__NCLH=(void *)((unsigned long)result__PCLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FCLH)));
                   } else {
-                    next__JIKH=new_lab__FTJ(new_size__BIKH);
+                    next__NCLH=new_lab__RTJ(new_size__FCLH);
                   };
-                  ((__POINTER *)next__JIKH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__KIKH)[ 0]=next__JIKH;
+                  ((__POINTER *)next__NCLH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__OCLH)[ 0]=next__NCLH;
                 } else {
-                  ((__POINTER *)result__LIKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JIKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__LIKH=next__JIKH;
+                  ((__POINTER *)result__PCLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NCLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__PCLH=next__NCLH;
                 };
               };
-              ptr__3HKH=result__LIKH;
-            } else {
-              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;
+              ptr__BCLH=result__PCLH;
+            } else {
+              t__GCLH=((__UINTEGER_32 )typ_id__CCLH);
+              a__HCLH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__WCLH=(__UINTEGER_32)((__UINTEGER_32)(sz__DCLH + a__HCLH) & (__UINTEGER_32)(~ a__HCLH));
+              ptr_table__TCLH=((__POINTER )(&(table_type[(t__GCLH)])));
+              lab_type__VCLH=(__UINTEGER_32)(t__GCLH |  1);
+              next__SCLH=((__POINTER )(NULL));
+              result__UCLH=((__POINTER *)ptr_table__TCLH)[ 0];
+              if ((result__UCLH == (void *)NULL)) {
+                result__UCLH=new_lab__RTJ(lab_type__VCLH);
+                next__SCLH=(void *)((unsigned long)result__UCLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WCLH)));
+                ((__POINTER *)next__SCLH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__TCLH)[ 0]=next__SCLH;
               } else {
-                next__OIKH=((__POINTER *)result__QIKH)[ 0];
-                if ((next__OIKH == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__QIKH - (unsigned long)begin_memory__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)));
+                next__SCLH=((__POINTER *)result__UCLH)[ 0];
+                if ((next__SCLH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__UCLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__WCLH <<  1)) <=  4096)) {
+                    next__SCLH=(void *)((unsigned long)result__UCLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WCLH)));
                   } else {
-                    next__OIKH=new_lab__FTJ(lab_type__RIKH);
+                    next__SCLH=new_lab__RTJ(lab_type__VCLH);
                   };
-                  ((__POINTER *)next__OIKH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__PIKH)[ 0]=next__OIKH;
+                  ((__POINTER *)next__SCLH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__TCLH)[ 0]=next__SCLH;
                 } else {
-                  ((__POINTER *)result__QIKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OIKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__QIKH=next__OIKH;
+                  ((__POINTER *)result__UCLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__SCLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__UCLH=next__SCLH;
                 };
               };
-              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;
+              ptr__BCLH=result__UCLH;
+            };
+            result__ACLH=((__LIP_BINARY *)ptr__BCLH);
+            *(result__ACLH) = *(LIP_BINARY__);
+          };
+          Self__ICLH=((__LIP_BINARY *)result__ACLH);
+          Self__ICLH->parent_lip_code__WNZB.parent_itm_object__XFE.position__SFJ=p__JCLH;
+          Self__ICLH->left__J2QD=result__JMZB;
+          Self__ICLH->right__M2QD=right__KMZB;
+          Self__ICLH->operator__P2QD='|';
+          result__JMZB=result__ACLH;
+        } else {
+          p__ADLH=current_position__B0F();
+          result__XCLH=NULL;
+          ptr__YCLH=((__POINTER )(NULL));
+          typ_id__ZCLH= 0;
+          sz__0CLH=((__UINTEGER_32 )sizeof(__LIP_BINARY));
+          if ((sz__0CLH ==  0)) {
+            result__XCLH=LIP_BINARY__;
+          } else {
+            typ_id__ZCLH=-1;
+            clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__0CLH);
+            if ((typ_id__ZCLH == (__INTEGER)(-  1))) {
+              a__1CLH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__2CLH=(__UINTEGER_32)((__UINTEGER_32)(sz__0CLH + a__1CLH) & (__UINTEGER_32)(~ a__1CLH));
+              ptr_table__FDLH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__2CLH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__EDLH=((__POINTER )(NULL));
+              result__GDLH=((__POINTER *)ptr_table__FDLH)[ 0];
+              if ((result__GDLH == (void *)NULL)) {
+                result__GDLH=new_lab__RTJ(new_size__2CLH);
+                next__EDLH=(void *)((unsigned long)result__GDLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2CLH)));
+                ((__POINTER *)next__EDLH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__FDLH)[ 0]=next__EDLH;
               } else {
-                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)));
+                next__EDLH=((__POINTER *)result__GDLH)[ 0];
+                if ((next__EDLH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GDLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__2CLH <<  1)) <=  4096)) {
+                    next__EDLH=(void *)((unsigned long)result__GDLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2CLH)));
                   } else {
-                    next__AJKH=new_lab__FTJ(new_size__YIKH);
+                    next__EDLH=new_lab__RTJ(new_size__2CLH);
                   };
-                  ((__POINTER *)next__AJKH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__BJKH)[ 0]=next__AJKH;
+                  ((__POINTER *)next__EDLH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__FDLH)[ 0]=next__EDLH;
                 } else {
-                  ((__POINTER *)result__CJKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__AJKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__CJKH=next__AJKH;
+                  ((__POINTER *)result__GDLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EDLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__GDLH=next__EDLH;
                 };
               };
-              ptr__UIKH=result__CJKH;
-            } else {
-              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;
+              ptr__YCLH=result__GDLH;
+            } else {
+              t__3CLH=((__UINTEGER_32 )typ_id__ZCLH);
+              a__4CLH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__NDLH=(__UINTEGER_32)((__UINTEGER_32)(sz__0CLH + a__4CLH) & (__UINTEGER_32)(~ a__4CLH));
+              ptr_table__KDLH=((__POINTER )(&(table_type[(t__3CLH)])));
+              lab_type__MDLH=(__UINTEGER_32)(t__3CLH |  1);
+              next__JDLH=((__POINTER )(NULL));
+              result__LDLH=((__POINTER *)ptr_table__KDLH)[ 0];
+              if ((result__LDLH == (void *)NULL)) {
+                result__LDLH=new_lab__RTJ(lab_type__MDLH);
+                next__JDLH=(void *)((unsigned long)result__LDLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NDLH)));
+                ((__POINTER *)next__JDLH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__KDLH)[ 0]=next__JDLH;
               } else {
-                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)));
+                next__JDLH=((__POINTER *)result__LDLH)[ 0];
+                if ((next__JDLH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LDLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__NDLH <<  1)) <=  4096)) {
+                    next__JDLH=(void *)((unsigned long)result__LDLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NDLH)));
                   } else {
-                    next__FJKH=new_lab__FTJ(lab_type__IJKH);
+                    next__JDLH=new_lab__RTJ(lab_type__MDLH);
                   };
-                  ((__POINTER *)next__FJKH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__GJKH)[ 0]=next__FJKH;
+                  ((__POINTER *)next__JDLH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__KDLH)[ 0]=next__JDLH;
                 } else {
-                  ((__POINTER *)result__HJKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FJKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__HJKH=next__FJKH;
+                  ((__POINTER *)result__LDLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JDLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__LDLH=next__JDLH;
                 };
               };
-              ptr__UIKH=result__HJKH;
+              ptr__YCLH=result__LDLH;
             };
-            result__TIKH=((__LIP_BINARY *)ptr__UIKH);
-            *(result__TIKH) = *(LIP_BINARY__);
+            result__XCLH=((__LIP_BINARY *)ptr__YCLH);
+            *(result__XCLH) = *(LIP_BINARY__);
           };
-          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;
+          Self__5CLH=((__LIP_BINARY *)result__XCLH);
+          Self__5CLH->parent_lip_code__WNZB.parent_itm_object__XFE.position__SFJ=p__ADLH;
+          Self__5CLH->left__J2QD=result__JMZB;
+          Self__5CLH->right__M2QD=right__KMZB;
+          Self__5CLH->operator__P2QD='&';
+          result__JMZB=result__XCLH;
         };
-        goto while_do__234B;
+        goto while_do__J04B;
       };
     };
   };
-  return(result__2PZB);
+  return(result__JMZB);
 }
 
-static __FAST_ARRAYoLIP_CODEo* create_with_capacity__4UKD(__INTEGER new_count__AVKD)
+static __FAST_ARRAYoLIP_CODEo* create_with_capacity__DWKD(__INTEGER new_count__FWKD)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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__;
+  __POINTER ptr__YAMD,ptr_table__PDLH,next__ODLH,result__QDLH;
+  __POINTER ptr_table__UDLH,next__TDLH,result__VDLH;
+  __INTEGER typ_id__3AMD;
+  __UINTEGER_32 sz__0AMD,a__WLGH,new_size__XLGH,t__1LGH,a__0LGH;
+  __UINTEGER_32 new_size__XDLH,lab_type__WDLH;
+  __FAST_ARRAYoLIP_CODEo *result__XAMD,*Self__VDUD;
+  result__XAMD=NULL;
+  ptr__YAMD=((__POINTER )(NULL));
+  typ_id__3AMD= 0;
+  sz__0AMD=((__UINTEGER_32 )sizeof(__FAST_ARRAYoLIP_CODEo));
+  if ((sz__0AMD ==  0)) {
+    result__XAMD=FAST_ARRAYoLIP_CODEo__;
   } else {
-    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);
+    typ_id__3AMD=__FAST_ARRAYoLIP_CODEo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__0AMD);
+    if ((typ_id__3AMD == (__INTEGER)(-  1))) {
+      a__WLGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__XLGH=(__UINTEGER_32)((__UINTEGER_32)(sz__0AMD + a__WLGH) & (__UINTEGER_32)(~ a__WLGH));
+      ptr_table__PDLH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__XLGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__ODLH=((__POINTER )(NULL));
+      result__QDLH=((__POINTER *)ptr_table__PDLH)[ 0];
+      if ((result__QDLH == (void *)NULL)) {
+        result__QDLH=new_lab__RTJ(new_size__XLGH);
+        next__ODLH=(void *)((unsigned long)result__QDLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XLGH)));
+        ((__POINTER *)next__ODLH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__PDLH)[ 0]=next__ODLH;
+      } else {
+        next__ODLH=((__POINTER *)result__QDLH)[ 0];
+        if ((next__ODLH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__QDLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__XLGH <<  1)) <=  4096)) {
+            next__ODLH=(void *)((unsigned long)result__QDLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XLGH)));
+          } else {
+            next__ODLH=new_lab__RTJ(new_size__XLGH);
+          };
+          ((__POINTER *)next__ODLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__PDLH)[ 0]=next__ODLH;
+        } else {
+          ((__POINTER *)result__QDLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ODLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__QDLH=next__ODLH;
+        };
+      };
+      ptr__YAMD=result__QDLH;
+    } else {
+      t__1LGH=((__UINTEGER_32 )typ_id__3AMD);
+      a__0LGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__XDLH=(__UINTEGER_32)((__UINTEGER_32)(sz__0AMD + a__0LGH) & (__UINTEGER_32)(~ a__0LGH));
+      ptr_table__UDLH=((__POINTER )(&(table_type[(t__1LGH)])));
+      lab_type__WDLH=(__UINTEGER_32)(t__1LGH |  1);
+      next__TDLH=((__POINTER )(NULL));
+      result__VDLH=((__POINTER *)ptr_table__UDLH)[ 0];
+      if ((result__VDLH == (void *)NULL)) {
+        result__VDLH=new_lab__RTJ(lab_type__WDLH);
+        next__TDLH=(void *)((unsigned long)result__VDLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XDLH)));
+        ((__POINTER *)next__TDLH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__UDLH)[ 0]=next__TDLH;
+      } else {
+        next__TDLH=((__POINTER *)result__VDLH)[ 0];
+        if ((next__TDLH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__VDLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__XDLH <<  1)) <=  4096)) {
+            next__TDLH=(void *)((unsigned long)result__VDLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XDLH)));
+          } else {
+            next__TDLH=new_lab__RTJ(lab_type__WDLH);
+          };
+          ((__POINTER *)next__TDLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__UDLH)[ 0]=next__TDLH;
+        } else {
+          ((__POINTER *)result__VDLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TDLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__VDLH=next__TDLH;
+        };
+      };
+      ptr__YAMD=result__VDLH;
+    };
+    result__XAMD=((__FAST_ARRAYoLIP_CODEo *)ptr__YAMD);
+    *(result__XAMD) = *(FAST_ARRAYoLIP_CODEo__);
+  };
+  Self__VDUD=((__FAST_ARRAYoLIP_CODEo *)result__XAMD);
+  if ((Self__VDUD->parent_arrayed_collection__4MYC.capacity__1UTD < new_count__FWKD)) {
+    Self__VDUD->parent_arrayed_collection__4MYC.storage__GVTD=create__3WIE(new_count__FWKD);
+    Self__VDUD->parent_arrayed_collection__4MYC.capacity__1UTD=new_count__FWKD;
+  };
+  Self__VDUD->parent_arrayed_collection__4MYC.upper__ZGQD=(__INTEGER)(-  1);
+  return(result__XAMD);
 }
 
-static void add_last__CNUD(__FAST_ARRAYoLIP_CODEo *Self__DNUD,void *element__ENUD)
+static void add_last__JOUD(__FAST_ARRAYoLIP_CODEo *Self__KOUD,void *element__LOUD)
 // ({FAST_ARRAYoLIP_CODEo},{NULLxLIP_AFFECTxLIP_BINARYxLIP_UNARYxLIP_CALLxLIP_IFxLIP_PRINTxLIP_VALUE}) VoidNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER new_capacity__MOUD,__tmp__QPUD,__tmp__T1WE,Self__32QF;
+  __BOOLEAN __tmp__0OUD;
+  void **__tmp__PPUD,**new__50WE;
+  new_capacity__MOUD= 0;
+  if (((__INTEGER)(Self__KOUD->parent_arrayed_collection__4MYC.upper__ZGQD +  1) <= (__INTEGER)(Self__KOUD->parent_arrayed_collection__4MYC.capacity__1UTD -  1))) {
+    Self__KOUD->parent_arrayed_collection__4MYC.upper__ZGQD=(__INTEGER)(Self__KOUD->parent_arrayed_collection__4MYC.upper__ZGQD +  1);
+    __tmp__0OUD=TRUE__;
   } else {
-    __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;
+    __tmp__0OUD=FALSE__;
+  };
+  if ((! __tmp__0OUD)) {
+    if ((Self__KOUD->parent_arrayed_collection__4MYC.capacity__1UTD ==  0)) {
+      Self__KOUD->parent_arrayed_collection__4MYC.storage__GVTD=create__3WIE( 2);
+      Self__KOUD->parent_arrayed_collection__4MYC.capacity__1UTD= 2;
+      Self__KOUD->parent_arrayed_collection__4MYC.upper__ZGQD= 0;
+    } else {
+      new_capacity__MOUD=(__INTEGER)(Self__KOUD->parent_arrayed_collection__4MYC.capacity__1UTD <<  1);
+      __tmp__PPUD=Self__KOUD->parent_arrayed_collection__4MYC.storage__GVTD;
+      __tmp__QPUD=Self__KOUD->parent_arrayed_collection__4MYC.capacity__1UTD;
+      new__50WE=((void **)realloc_dynamic__old_size__new_size__KELC(((__POINTER )((void **)__tmp__PPUD)),((__UINTEGER_32 )(__INTEGER)(__tmp__QPUD * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__MOUD * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__T1WE=(__INTEGER)(new_capacity__MOUD -  1);
+      Self__32QF=__tmp__QPUD;
+      while ((Self__32QF <= __tmp__T1WE)) {
+        new__50WE[Self__32QF]=NULL;
+        Self__32QF=(__INTEGER)(Self__32QF +  1);
+      };
+      Self__KOUD->parent_arrayed_collection__4MYC.storage__GVTD=new__50WE;
+      Self__KOUD->parent_arrayed_collection__4MYC.capacity__1UTD=new_capacity__MOUD;
+      Self__KOUD->parent_arrayed_collection__4MYC.upper__ZGQD=(__INTEGER)(Self__KOUD->parent_arrayed_collection__4MYC.upper__ZGQD +  1);
+    };
+  };
+  ((void **)Self__KOUD->parent_arrayed_collection__4MYC.storage__GVTD)[Self__KOUD->parent_arrayed_collection__4MYC.upper__ZGQD]=element__LOUD;
 }
 
-static void* copy__DQID(void *tmp__FQID)
+static void* copy__ZPID(void *tmp__1PID)
 // ({NULLxFAST_ARRAYoLIP_CODEo}) With resultNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER new_capacity__SUTD,other_upper__RUTD,Self__5SYE;
+  __INTEGER new_capacity__OFUD,__tmp__WGUD,__tmp__5ZWE,Self__40QF;
+  void *result__3PID;
+  __FAST_ARRAYoLIP_CODEo *Self__PUTD;
+  void **__tmp__JVTD,**__tmp__LVTD,**Self__YQWE;
+  __FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *Self__MFUD;
+  __BOOLEAN __tmp__3FUD;
+  void **__tmp__VGUD,**new__LZWE;
+  result__3PID=create_with_capacity__DWKD((__INTEGER)(((__FAST_ARRAYoLIP_CODEo *)tmp__1PID)->parent_arrayed_collection__4MYC.upper__ZGQD +  1));
+  Self__PUTD=((__FAST_ARRAYoLIP_CODEo *)result__3PID);
+  new_capacity__SUTD= 0;
+  other_upper__RUTD=((__FAST_ARRAYoLIP_CODEo *)tmp__1PID)->parent_arrayed_collection__4MYC.upper__ZGQD;
+  if ((other_upper__RUTD >=  0)) {
+    new_capacity__SUTD=(__INTEGER)(other_upper__RUTD +  1);
+    if ((Self__PUTD->parent_arrayed_collection__4MYC.capacity__1UTD < new_capacity__SUTD)) {
+      Self__PUTD->parent_arrayed_collection__4MYC.storage__GVTD=create__3WIE(new_capacity__SUTD);
+      Self__PUTD->parent_arrayed_collection__4MYC.capacity__1UTD=new_capacity__SUTD;
+    };
+    __tmp__JVTD=Self__PUTD->parent_arrayed_collection__4MYC.storage__GVTD;
+    __tmp__LVTD=((__FAST_ARRAYoLIP_CODEo *)tmp__1PID)->parent_arrayed_collection__4MYC.storage__GVTD;
+    Self__YQWE=((void **)__tmp__JVTD);
+    Self__5SYE=other_upper__RUTD;
+    while ((Self__5SYE >=  0)) {
+      Self__YQWE[Self__5SYE]=((void **)__tmp__LVTD)[Self__5SYE];
+      Self__5SYE=(__INTEGER)(Self__5SYE -  1);
+    };
+  };
+  Self__PUTD->parent_arrayed_collection__4MYC.upper__ZGQD=other_upper__RUTD;
+  ((__FAST_ARRAYoLIP_CODEo *)tmp__1PID)->parent_arrayed_collection__4MYC.upper__ZGQD=(__INTEGER)(-  1);
+  Self__MFUD=((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)free_list__XOID);
+  new_capacity__OFUD= 0;
+  if (((__INTEGER)(Self__MFUD->parent_arrayed_collection__WOID.upper__PTTD +  1) <= (__INTEGER)(Self__MFUD->parent_arrayed_collection__WOID.capacity__QFUD -  1))) {
+    Self__MFUD->parent_arrayed_collection__WOID.upper__PTTD=(__INTEGER)(Self__MFUD->parent_arrayed_collection__WOID.upper__PTTD +  1);
+    __tmp__3FUD=TRUE__;
   } else {
-    __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);
+    __tmp__3FUD=FALSE__;
+  };
+  if ((! __tmp__3FUD)) {
+    if ((Self__MFUD->parent_arrayed_collection__WOID.capacity__QFUD ==  0)) {
+      Self__MFUD->parent_arrayed_collection__WOID.storage__MGUD=create__R2IE( 2);
+      Self__MFUD->parent_arrayed_collection__WOID.capacity__QFUD= 2;
+      Self__MFUD->parent_arrayed_collection__WOID.upper__PTTD= 0;
+    } else {
+      new_capacity__OFUD=(__INTEGER)(Self__MFUD->parent_arrayed_collection__WOID.capacity__QFUD <<  1);
+      __tmp__VGUD=Self__MFUD->parent_arrayed_collection__WOID.storage__MGUD;
+      __tmp__WGUD=Self__MFUD->parent_arrayed_collection__WOID.capacity__QFUD;
+      new__LZWE=((void **)realloc_dynamic__old_size__new_size__KELC(((__POINTER )((void **)__tmp__VGUD)),((__UINTEGER_32 )(__INTEGER)(__tmp__WGUD * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__OFUD * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__5ZWE=(__INTEGER)(new_capacity__OFUD -  1);
+      Self__40QF=__tmp__WGUD;
+      while ((Self__40QF <= __tmp__5ZWE)) {
+        new__LZWE[Self__40QF]=NULL;
+        Self__40QF=(__INTEGER)(Self__40QF +  1);
+      };
+      Self__MFUD->parent_arrayed_collection__WOID.storage__MGUD=new__LZWE;
+      Self__MFUD->parent_arrayed_collection__WOID.capacity__QFUD=new_capacity__OFUD;
+      Self__MFUD->parent_arrayed_collection__WOID.upper__PTTD=(__INTEGER)(Self__MFUD->parent_arrayed_collection__WOID.upper__PTTD +  1);
+    };
+  };
+  ((void **)Self__MFUD->parent_arrayed_collection__WOID.storage__MGUD)[Self__MFUD->parent_arrayed_collection__WOID.upper__PTTD]=tmp__1PID;
+  return(result__3PID);
 }
 
-static void* fast_reference_at__MWRD(__HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo *Self__NWRD,void *k__OWRD)
+static void* fast_reference_at__PXRD(__HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo *Self__QXRD,void *k__RXRD)
 // ({HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __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:
+  void *node__1XRD;
+  __BOOLEAN __tmp__TYRD;
+  node__1XRD=((void **)Self__QXRD->buckets__DYRD)[(__INTEGER)(hash_code__RNW(k__RXRD) % Self__QXRD->capacity__4XRD)];
+  until_do__1KWD:
   {
-    if (((void *)node__YWRD == (void *)NULL)) {
-      __tmp__QXRD=TRUE__;
+    if (((void *)node__1XRD == (void *)NULL)) {
+      __tmp__TYRD=TRUE__;
     } else {
       print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
-      __tmp__QXRD=((void *)NULL == (void *)k__OWRD);
+      __tmp__TYRD=((void *)NULL == (void *)k__RXRD);
     };
-    if ((! __tmp__QXRD)) {
+    if ((! __tmp__TYRD)) {
       print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
-      node__YWRD=NULL;
-      goto until_do__UJWD;
+      node__1XRD=NULL;
+      goto until_do__1KWD;
     };
   };
-  if (((void *)node__YWRD != (void *)NULL)) {
+  if (((void *)node__1XRD != (void *)NULL)) {
     print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
   };
   return(NULL);
 }
 
-static void* run_expr__A1QD(__LIP_BINARY *Self__B1QD)
+static void* run_expr__D2QD(__LIP_BINARY *Self__E2QD)
 // ({LIP_BINARY}) With resultRecursive, No inlinable.
 {
-  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) {
+  void *result__G2QD,*__tmp__L2QD,*__tmp__ZDLH,*__tmp__0DLH,*__tmp__O2QD;
+  void *__tmp__4DLH,*__tmp__5DLH,*result__QE4F,*__tmp__W2QD;
+  void *result__AF4F,*result__SF4F,*__tmp__32QD,*result__CG4F;
+  void *result__UG4F,*__tmp__E3QD,*result__EH4F,*result__XJIG;
+  void *result__WH4F,*__tmp__L3QD,*result__GI4F,*result__IKIG;
+  void *__tmp__S3QD,*result__IJ4F,*__tmp__Z3QD,*result__KK4F;
+  void *__tmp__A4QD,*result__ML4F,*__tmp__H4QD,*result__OM4F;
+  void *__tmp__O4QD,*result__QN4F,*result__3MIG,*__tmp__V4QD;
+  void *result__SO4F;
+  void *__tmp__K2QD,*__tmp__N2QD;
+  __LIP_INTEGER *Self__1DLH,*Self__AELH,*Self__3E4F,*__tmp__DF4F;
+  __LIP_INTEGER *s__BF4F,*Self__5F4F,*__tmp__FG4F,*s__DG4F,*Self__BH4F;
+  __LIP_INTEGER *__tmp__HH4F,*s__FH4F,*Self__DI4F,*__tmp__JI4F,*s__HI4F;
+  __LIP_INTEGER *Self__FJ4F,*__tmp__LJ4F,*s__JJ4F,*Self__HK4F;
+  __LIP_INTEGER *__tmp__NK4F,*s__LK4F,*Self__JL4F,*__tmp__PL4F,*s__NL4F;
+  __LIP_INTEGER *Self__LM4F,*__tmp__RM4F,*s__PM4F,*Self__NN4F;
+  __LIP_INTEGER *__tmp__TN4F,*s__RN4F,*Self__PO4F,*__tmp__VO4F,*s__TO4F;
+  __LIP_STRING *Self__2DLH,*Self__BELH,*__tmp__YIIG,*s__WIIG;
+  __LIP_STRING *__tmp__JJIG,*s__HJIG,*Self__UJIG,*__tmp__0JIG,*s__YJIG;
+  __LIP_STRING *Self__FKIG,*__tmp__LKIG,*s__JKIG,*__tmp__2KIG,*s__0KIG;
+  __LIP_STRING *__tmp__NLIG,*s__LLIG,*__tmp__4LIG,*s__2LIG,*__tmp__PMIG;
+  __LIP_STRING *s__NMIG,*Self__0MIG,*__tmp__ANIG,*s__4MIG,*__tmp__RNIG;
+  __LIP_STRING *s__PNIG;
+  __LIP_BOOLEAN *Self__NE4F,*__tmp__TE4F,*s__RE4F,*Self__PF4F;
+  __LIP_BOOLEAN *__tmp__VF4F,*s__TF4F,*Self__RG4F,*__tmp__XG4F,*s__VG4F;
+  __LIP_BOOLEAN *Self__TH4F,*__tmp__ZH4F,*s__XH4F,*__tmp__1I4F,*s__ZI4F;
+  __LIP_BOOLEAN *__tmp__3J4F,*s__1J4F,*__tmp__5K4F,*s__3K4F,*__tmp__BM4F;
+  __LIP_BOOLEAN *s__5L4F,*__tmp__DN4F,*s__BN4F,*__tmp__FO4F,*s__DO4F;
+  void *result__EZEH,*result__GZEH,*result__IZEH,*result__KZEH;
+  void *result__MZEH,*result__OZEH,*result__QZEH,*result__SZEH;
+  void *result__UZEH,*result__WZEH,*result__YZEH,*result__0ZEH;
+  __POSITION __tmp__44QD;
+  __CHARACTER Self__GWVD;
+  __BOOLEAN b__FZEH,b__HZEH,b__JZEH,b__LZEH,b__NZEH,b__PZEH,b__RZEH;
+  __BOOLEAN b__TZEH,b__VZEH,b__XZEH,b__ZZEH,b__1ZEH;
+  result__G2QD=NULL;
+  __tmp__K2QD=Self__E2QD->left__J2QD;
+  switch (((struct ___OBJ *)__tmp__K2QD)->__id) {
   case __LIP_BINARY__: {
-    __tmp__I1QD=run_expr__A1QD(__tmp__H1QD);
+    __tmp__L2QD=run_expr__D2QD(__tmp__K2QD);
   } break;
   case __LIP_UNARY__: {
-    __tmp__I1QD=run_expr__53QD(__tmp__H1QD);
+    __tmp__L2QD=run_expr__C5QD(__tmp__K2QD);
   } break;
   case __LIP_CALL__: {
-    __tmp__I1QD=run_expr__XWUE(__tmp__H1QD);
+    __tmp__L2QD=run_expr__IXUE(__tmp__K2QD);
   } break;
   case __LIP_VALUE__: {
-    __tmp__VJKH=((__LIP_VALUE *)__tmp__H1QD)->value__X0UE;
-    switch (((struct ___OBJ *)__tmp__VJKH)->__id) {
+    __tmp__ZDLH=((__LIP_VALUE *)__tmp__K2QD)->value__I1UE;
+    switch (((struct ___OBJ *)__tmp__ZDLH)->__id) {
     case __LIP_BOOLEAN__: {
-      __tmp__WJKH=((__LIP_BOOLEAN *)__tmp__VJKH);
+      __tmp__0DLH=((__LIP_BOOLEAN *)__tmp__ZDLH);
     } break;
     case __LIP_INTEGER__: {
-      Self__XJKH=((__LIP_INTEGER *)__tmp__VJKH);
-      __tmp__WJKH=get__5XSE(Self__XJKH,Self__XJKH->value__LN4F);
+      Self__1DLH=((__LIP_INTEGER *)__tmp__ZDLH);
+      __tmp__0DLH=get__UYSE(Self__1DLH,Self__1DLH->value__FP4F);
     } break;
     case __LIP_STRING__: {
-      Self__YJKH=((__LIP_STRING *)__tmp__VJKH);
-      __tmp__WJKH=get__M3FF(Self__YJKH,Self__YJKH->value__FSUE);
+      Self__2DLH=((__LIP_STRING *)__tmp__ZDLH);
+      __tmp__0DLH=get__34FF(Self__2DLH,Self__2DLH->value__WSUE);
     } break;
     };
-    __tmp__I1QD=__tmp__WJKH;
+    __tmp__L2QD=__tmp__0DLH;
   } break;
   };
-  __tmp__K1QD=Self__B1QD->right__J1QD;
-  switch (((struct ___OBJ *)__tmp__K1QD)->__id) {
+  __tmp__N2QD=Self__E2QD->right__M2QD;
+  switch (((struct ___OBJ *)__tmp__N2QD)->__id) {
   case __LIP_BINARY__: {
-    __tmp__L1QD=run_expr__A1QD(__tmp__K1QD);
+    __tmp__O2QD=run_expr__D2QD(__tmp__N2QD);
   } break;
   case __LIP_UNARY__: {
-    __tmp__L1QD=run_expr__53QD(__tmp__K1QD);
+    __tmp__O2QD=run_expr__C5QD(__tmp__N2QD);
   } break;
   case __LIP_CALL__: {
-    __tmp__L1QD=run_expr__XWUE(__tmp__K1QD);
+    __tmp__O2QD=run_expr__IXUE(__tmp__N2QD);
   } break;
   case __LIP_VALUE__: {
-    __tmp__0JKH=((__LIP_VALUE *)__tmp__K1QD)->value__X0UE;
-    switch (((struct ___OBJ *)__tmp__0JKH)->__id) {
+    __tmp__4DLH=((__LIP_VALUE *)__tmp__N2QD)->value__I1UE;
+    switch (((struct ___OBJ *)__tmp__4DLH)->__id) {
     case __LIP_BOOLEAN__: {
-      __tmp__1JKH=((__LIP_BOOLEAN *)__tmp__0JKH);
+      __tmp__5DLH=((__LIP_BOOLEAN *)__tmp__4DLH);
     } break;
     case __LIP_INTEGER__: {
-      Self__2JKH=((__LIP_INTEGER *)__tmp__0JKH);
-      __tmp__1JKH=get__5XSE(Self__2JKH,Self__2JKH->value__LN4F);
+      Self__AELH=((__LIP_INTEGER *)__tmp__4DLH);
+      __tmp__5DLH=get__UYSE(Self__AELH,Self__AELH->value__FP4F);
     } break;
     case __LIP_STRING__: {
-      Self__3JKH=((__LIP_STRING *)__tmp__0JKH);
-      __tmp__1JKH=get__M3FF(Self__3JKH,Self__3JKH->value__FSUE);
+      Self__BELH=((__LIP_STRING *)__tmp__4DLH);
+      __tmp__5DLH=get__34FF(Self__BELH,Self__BELH->value__WSUE);
     } break;
     };
-    __tmp__L1QD=__tmp__1JKH;
+    __tmp__O2QD=__tmp__5DLH;
   } break;
   };
-  Self__5UVD=Self__B1QD->operator__M1QD;
-  if ((Self__5UVD == '|')) {
-    switch (((struct ___OBJ *)__tmp__I1QD)->__id) {
+  Self__GWVD=Self__E2QD->operator__P2QD;
+  if ((Self__GWVD == '|')) {
+    switch (((struct ___OBJ *)__tmp__L2QD)->__id) {
     case __LIP_BOOLEAN__: {
-      Self__TC4F=((__LIP_BOOLEAN *)__tmp__I1QD);
-      result__WC4F=NULL;
-      if (__tmp__L1QD==NULL) {
-        __tmp__ZC4F=NULL;
+      Self__NE4F=((__LIP_BOOLEAN *)__tmp__L2QD);
+      result__QE4F=NULL;
+      if (__tmp__O2QD==NULL) {
+        __tmp__TE4F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__L1QD)->__id) {
+        switch (((struct ___OBJ *)__tmp__O2QD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__ZC4F=((__LIP_BOOLEAN *)__tmp__L1QD);
+          __tmp__TE4F=((__LIP_BOOLEAN *)__tmp__O2QD);
         } break;
         case __LIP_INTEGER__: {
-          __tmp__ZC4F=NULL;
+          __tmp__TE4F=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__ZC4F=NULL;
+          __tmp__TE4F=NULL;
         } break;
         }
       };
-      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;
+      s__RE4F=__tmp__TE4F;
+      if (((void *)__tmp__TE4F != (void *)NULL)) {
+        b__FZEH=(Self__NE4F->value__MGQD | __tmp__TE4F->value__MGQD);
+        result__EZEH=NULL;
+        if (b__FZEH) {
+          result__EZEH=true__5YLF;
         } else {
-          result__G2EH=LIP_BOOLEAN__;
+          result__EZEH=LIP_BOOLEAN__;
         };
-        result__WC4F=result__G2EH;
+        result__QE4F=result__EZEH;
       };
-      __tmp__T1QD=result__WC4F;
+      __tmp__W2QD=result__QE4F;
     } break;
     case __LIP_INTEGER__: {
-      Self__DD4F=((__LIP_INTEGER *)__tmp__I1QD);
-      result__GD4F=NULL;
-      if (__tmp__L1QD==NULL) {
-        __tmp__JD4F=NULL;
+      Self__3E4F=((__LIP_INTEGER *)__tmp__L2QD);
+      result__AF4F=NULL;
+      if (__tmp__O2QD==NULL) {
+        __tmp__DF4F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__L1QD)->__id) {
+        switch (((struct ___OBJ *)__tmp__O2QD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__JD4F=NULL;
+          __tmp__DF4F=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__JD4F=((__LIP_INTEGER *)__tmp__L1QD);
+          __tmp__DF4F=((__LIP_INTEGER *)__tmp__O2QD);
         } break;
         case __LIP_STRING__: {
-          __tmp__JD4F=NULL;
+          __tmp__DF4F=NULL;
         } break;
         }
       };
-      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;
+      s__BF4F=__tmp__DF4F;
+      if (((void *)__tmp__DF4F != (void *)NULL)) {
+        Self__3E4F->value__FP4F=(__INTEGER)(Self__3E4F->value__FP4F | __tmp__DF4F->value__FP4F);
+        free__3D4F(__tmp__DF4F);
+        result__AF4F=Self__3E4F;
       };
-      __tmp__T1QD=result__GD4F;
+      __tmp__W2QD=result__AF4F;
     } break;
     case __LIP_STRING__: {
-      if (__tmp__L1QD==NULL) {
-        __tmp__4GIG=NULL;
+      if (__tmp__O2QD==NULL) {
+        __tmp__YIIG=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__L1QD)->__id) {
+        switch (((struct ___OBJ *)__tmp__O2QD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__4GIG=NULL;
+          __tmp__YIIG=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__4GIG=NULL;
+          __tmp__YIIG=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__4GIG=((__LIP_STRING *)__tmp__L1QD);
+          __tmp__YIIG=((__LIP_STRING *)__tmp__O2QD);
         } break;
         }
       };
-      s__2GIG=__tmp__4GIG;
-      __tmp__T1QD=NULL;
+      s__WIIG=__tmp__YIIG;
+      __tmp__W2QD=NULL;
     } break;
     };
-    result__D1QD=__tmp__T1QD;
+    result__G2QD=__tmp__W2QD;
   };
-  if ((Self__5UVD == '&')) {
-    switch (((struct ___OBJ *)__tmp__I1QD)->__id) {
+  if ((Self__GWVD == '&')) {
+    switch (((struct ___OBJ *)__tmp__L2QD)->__id) {
     case __LIP_BOOLEAN__: {
-      Self__VD4F=((__LIP_BOOLEAN *)__tmp__I1QD);
-      result__YD4F=NULL;
-      if (__tmp__L1QD==NULL) {
-        __tmp__1D4F=NULL;
+      Self__PF4F=((__LIP_BOOLEAN *)__tmp__L2QD);
+      result__SF4F=NULL;
+      if (__tmp__O2QD==NULL) {
+        __tmp__VF4F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__L1QD)->__id) {
+        switch (((struct ___OBJ *)__tmp__O2QD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__1D4F=((__LIP_BOOLEAN *)__tmp__L1QD);
+          __tmp__VF4F=((__LIP_BOOLEAN *)__tmp__O2QD);
         } break;
         case __LIP_INTEGER__: {
-          __tmp__1D4F=NULL;
+          __tmp__VF4F=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__1D4F=NULL;
+          __tmp__VF4F=NULL;
         } break;
         }
       };
-      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;
+      s__TF4F=__tmp__VF4F;
+      if (((void *)__tmp__VF4F != (void *)NULL)) {
+        b__HZEH=(Self__PF4F->value__MGQD & __tmp__VF4F->value__MGQD);
+        result__GZEH=NULL;
+        if (b__HZEH) {
+          result__GZEH=true__5YLF;
         } else {
-          result__I2EH=LIP_BOOLEAN__;
+          result__GZEH=LIP_BOOLEAN__;
         };
-        result__YD4F=result__I2EH;
+        result__SF4F=result__GZEH;
       };
-      __tmp__01QD=result__YD4F;
+      __tmp__32QD=result__SF4F;
     } break;
     case __LIP_INTEGER__: {
-      Self__FE4F=((__LIP_INTEGER *)__tmp__I1QD);
-      result__IE4F=NULL;
-      if (__tmp__L1QD==NULL) {
-        __tmp__LE4F=NULL;
+      Self__5F4F=((__LIP_INTEGER *)__tmp__L2QD);
+      result__CG4F=NULL;
+      if (__tmp__O2QD==NULL) {
+        __tmp__FG4F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__L1QD)->__id) {
+        switch (((struct ___OBJ *)__tmp__O2QD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__LE4F=NULL;
+          __tmp__FG4F=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__LE4F=((__LIP_INTEGER *)__tmp__L1QD);
+          __tmp__FG4F=((__LIP_INTEGER *)__tmp__O2QD);
         } break;
         case __LIP_STRING__: {
-          __tmp__LE4F=NULL;
+          __tmp__FG4F=NULL;
         } break;
         }
       };
-      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;
+      s__DG4F=__tmp__FG4F;
+      if (((void *)__tmp__FG4F != (void *)NULL)) {
+        Self__5F4F->value__FP4F=(__INTEGER)(Self__5F4F->value__FP4F & __tmp__FG4F->value__FP4F);
+        free__3D4F(__tmp__FG4F);
+        result__CG4F=Self__5F4F;
       };
-      __tmp__01QD=result__IE4F;
+      __tmp__32QD=result__CG4F;
     } break;
     case __LIP_STRING__: {
-      if (__tmp__L1QD==NULL) {
-        __tmp__PHIG=NULL;
+      if (__tmp__O2QD==NULL) {
+        __tmp__JJIG=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__L1QD)->__id) {
+        switch (((struct ___OBJ *)__tmp__O2QD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__PHIG=NULL;
+          __tmp__JJIG=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__PHIG=NULL;
+          __tmp__JJIG=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__PHIG=((__LIP_STRING *)__tmp__L1QD);
+          __tmp__JJIG=((__LIP_STRING *)__tmp__O2QD);
         } break;
         }
       };
-      s__NHIG=__tmp__PHIG;
-      __tmp__01QD=NULL;
+      s__HJIG=__tmp__JJIG;
+      __tmp__32QD=NULL;
     } break;
     };
-    result__D1QD=__tmp__01QD;
+    result__G2QD=__tmp__32QD;
   };
-  if ((Self__5UVD == '=')) {
-    switch (((struct ___OBJ *)__tmp__I1QD)->__id) {
+  if ((Self__GWVD == '=')) {
+    switch (((struct ___OBJ *)__tmp__L2QD)->__id) {
     case __LIP_BOOLEAN__: {
-      Self__XE4F=((__LIP_BOOLEAN *)__tmp__I1QD);
-      result__0E4F=NULL;
-      if (__tmp__L1QD==NULL) {
-        __tmp__3E4F=NULL;
+      Self__RG4F=((__LIP_BOOLEAN *)__tmp__L2QD);
+      result__UG4F=NULL;
+      if (__tmp__O2QD==NULL) {
+        __tmp__XG4F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__L1QD)->__id) {
+        switch (((struct ___OBJ *)__tmp__O2QD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__3E4F=((__LIP_BOOLEAN *)__tmp__L1QD);
+          __tmp__XG4F=((__LIP_BOOLEAN *)__tmp__O2QD);
         } break;
         case __LIP_INTEGER__: {
-          __tmp__3E4F=NULL;
+          __tmp__XG4F=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__3E4F=NULL;
+          __tmp__XG4F=NULL;
         } break;
         }
       };
-      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;
+      s__VG4F=__tmp__XG4F;
+      if (((void *)__tmp__XG4F != (void *)NULL)) {
+        b__JZEH=(Self__RG4F->value__MGQD == __tmp__XG4F->value__MGQD);
+        result__IZEH=NULL;
+        if (b__JZEH) {
+          result__IZEH=true__5YLF;
         } else {
-          result__K2EH=LIP_BOOLEAN__;
+          result__IZEH=LIP_BOOLEAN__;
         };
-        result__0E4F=result__K2EH;
+        result__UG4F=result__IZEH;
       };
-      __tmp__B2QD=result__0E4F;
+      __tmp__E3QD=result__UG4F;
     } break;
     case __LIP_INTEGER__: {
-      Self__HF4F=((__LIP_INTEGER *)__tmp__I1QD);
-      result__KF4F=NULL;
-      if (__tmp__L1QD==NULL) {
-        __tmp__NF4F=NULL;
+      Self__BH4F=((__LIP_INTEGER *)__tmp__L2QD);
+      result__EH4F=NULL;
+      if (__tmp__O2QD==NULL) {
+        __tmp__HH4F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__L1QD)->__id) {
+        switch (((struct ___OBJ *)__tmp__O2QD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__NF4F=NULL;
+          __tmp__HH4F=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__NF4F=((__LIP_INTEGER *)__tmp__L1QD);
+          __tmp__HH4F=((__LIP_INTEGER *)__tmp__O2QD);
         } break;
         case __LIP_STRING__: {
-          __tmp__NF4F=NULL;
+          __tmp__HH4F=NULL;
         } break;
         }
       };
-      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;
+      s__FH4F=__tmp__HH4F;
+      if (((void *)__tmp__HH4F != (void *)NULL)) {
+        free__3D4F(__tmp__HH4F);
+        free__3D4F(Self__BH4F);
+        b__LZEH=(Self__BH4F->value__FP4F == __tmp__HH4F->value__FP4F);
+        result__KZEH=NULL;
+        if (b__LZEH) {
+          result__KZEH=true__5YLF;
         } else {
-          result__M2EH=LIP_BOOLEAN__;
+          result__KZEH=LIP_BOOLEAN__;
         };
-        result__KF4F=result__M2EH;
+        result__EH4F=result__KZEH;
       };
-      __tmp__B2QD=result__KF4F;
+      __tmp__E3QD=result__EH4F;
     } break;
     case __LIP_STRING__: {
-      Self__0HIG=((__LIP_STRING *)__tmp__I1QD);
-      result__3HIG=NULL;
-      if (__tmp__L1QD==NULL) {
-        __tmp__AIIG=NULL;
+      Self__UJIG=((__LIP_STRING *)__tmp__L2QD);
+      result__XJIG=NULL;
+      if (__tmp__O2QD==NULL) {
+        __tmp__0JIG=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__L1QD)->__id) {
+        switch (((struct ___OBJ *)__tmp__O2QD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__AIIG=NULL;
+          __tmp__0JIG=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__AIIG=NULL;
+          __tmp__0JIG=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__AIIG=((__LIP_STRING *)__tmp__L1QD);
+          __tmp__0JIG=((__LIP_STRING *)__tmp__O2QD);
         } break;
         }
       };
-      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;
+      s__YJIG=__tmp__0JIG;
+      if (((void *)__tmp__0JIG != (void *)NULL)) {
+        free__LIIG(__tmp__0JIG);
+        free__LIIG(Self__UJIG);
+        b__NZEH=((void *)Self__UJIG->value__WSUE == (void *)__tmp__0JIG->value__WSUE);
+        result__MZEH=NULL;
+        if (b__NZEH) {
+          result__MZEH=true__5YLF;
         } else {
-          result__O2EH=LIP_BOOLEAN__;
+          result__MZEH=LIP_BOOLEAN__;
         };
-        result__3HIG=result__O2EH;
+        result__XJIG=result__MZEH;
       };
-      __tmp__B2QD=result__3HIG;
+      __tmp__E3QD=result__XJIG;
     } break;
     };
-    result__D1QD=__tmp__B2QD;
+    result__G2QD=__tmp__E3QD;
   };
-  if ((Self__5UVD == 'E')) {
-    switch (((struct ___OBJ *)__tmp__I1QD)->__id) {
+  if ((Self__GWVD == 'E')) {
+    switch (((struct ___OBJ *)__tmp__L2QD)->__id) {
     case __LIP_BOOLEAN__: {
-      Self__ZF4F=((__LIP_BOOLEAN *)__tmp__I1QD);
-      result__2F4F=NULL;
-      if (__tmp__L1QD==NULL) {
-        __tmp__5F4F=NULL;
+      Self__TH4F=((__LIP_BOOLEAN *)__tmp__L2QD);
+      result__WH4F=NULL;
+      if (__tmp__O2QD==NULL) {
+        __tmp__ZH4F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__L1QD)->__id) {
+        switch (((struct ___OBJ *)__tmp__O2QD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__5F4F=((__LIP_BOOLEAN *)__tmp__L1QD);
+          __tmp__ZH4F=((__LIP_BOOLEAN *)__tmp__O2QD);
         } break;
         case __LIP_INTEGER__: {
-          __tmp__5F4F=NULL;
+          __tmp__ZH4F=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__5F4F=NULL;
+          __tmp__ZH4F=NULL;
         } break;
         }
       };
-      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;
+      s__XH4F=__tmp__ZH4F;
+      if (((void *)__tmp__ZH4F != (void *)NULL)) {
+        b__PZEH=(Self__TH4F->value__MGQD != __tmp__ZH4F->value__MGQD);
+        result__OZEH=NULL;
+        if (b__PZEH) {
+          result__OZEH=true__5YLF;
         } else {
-          result__Q2EH=LIP_BOOLEAN__;
+          result__OZEH=LIP_BOOLEAN__;
         };
-        result__2F4F=result__Q2EH;
+        result__WH4F=result__OZEH;
       };
-      __tmp__I2QD=result__2F4F;
+      __tmp__L3QD=result__WH4F;
     } break;
     case __LIP_INTEGER__: {
-      Self__JG4F=((__LIP_INTEGER *)__tmp__I1QD);
-      result__MG4F=NULL;
-      if (__tmp__L1QD==NULL) {
-        __tmp__PG4F=NULL;
+      Self__DI4F=((__LIP_INTEGER *)__tmp__L2QD);
+      result__GI4F=NULL;
+      if (__tmp__O2QD==NULL) {
+        __tmp__JI4F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__L1QD)->__id) {
+        switch (((struct ___OBJ *)__tmp__O2QD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__PG4F=NULL;
+          __tmp__JI4F=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__PG4F=((__LIP_INTEGER *)__tmp__L1QD);
+          __tmp__JI4F=((__LIP_INTEGER *)__tmp__O2QD);
         } break;
         case __LIP_STRING__: {
-          __tmp__PG4F=NULL;
+          __tmp__JI4F=NULL;
         } break;
         }
       };
-      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;
+      s__HI4F=__tmp__JI4F;
+      if (((void *)__tmp__JI4F != (void *)NULL)) {
+        free__3D4F(__tmp__JI4F);
+        free__3D4F(Self__DI4F);
+        b__RZEH=(Self__DI4F->value__FP4F != __tmp__JI4F->value__FP4F);
+        result__QZEH=NULL;
+        if (b__RZEH) {
+          result__QZEH=true__5YLF;
         } else {
-          result__S2EH=LIP_BOOLEAN__;
+          result__QZEH=LIP_BOOLEAN__;
         };
-        result__MG4F=result__S2EH;
+        result__GI4F=result__QZEH;
       };
-      __tmp__I2QD=result__MG4F;
+      __tmp__L3QD=result__GI4F;
     } break;
     case __LIP_STRING__: {
-      Self__LIIG=((__LIP_STRING *)__tmp__I1QD);
-      result__OIIG=NULL;
-      if (__tmp__L1QD==NULL) {
-        __tmp__RIIG=NULL;
+      Self__FKIG=((__LIP_STRING *)__tmp__L2QD);
+      result__IKIG=NULL;
+      if (__tmp__O2QD==NULL) {
+        __tmp__LKIG=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__L1QD)->__id) {
+        switch (((struct ___OBJ *)__tmp__O2QD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__RIIG=NULL;
+          __tmp__LKIG=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__RIIG=NULL;
+          __tmp__LKIG=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__RIIG=((__LIP_STRING *)__tmp__L1QD);
+          __tmp__LKIG=((__LIP_STRING *)__tmp__O2QD);
         } break;
         }
       };
-      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;
+      s__JKIG=__tmp__LKIG;
+      if (((void *)__tmp__LKIG != (void *)NULL)) {
+        free__LIIG(__tmp__LKIG);
+        free__LIIG(Self__FKIG);
+        b__TZEH=((void *)Self__FKIG->value__WSUE != (void *)__tmp__LKIG->value__WSUE);
+        result__SZEH=NULL;
+        if (b__TZEH) {
+          result__SZEH=true__5YLF;
         } else {
-          result__U2EH=LIP_BOOLEAN__;
+          result__SZEH=LIP_BOOLEAN__;
         };
-        result__OIIG=result__U2EH;
+        result__IKIG=result__SZEH;
       };
-      __tmp__I2QD=result__OIIG;
+      __tmp__L3QD=result__IKIG;
     } break;
     };
-    result__D1QD=__tmp__I2QD;
+    result__G2QD=__tmp__L3QD;
   };
-  if ((Self__5UVD == '>')) {
-    switch (((struct ___OBJ *)__tmp__I1QD)->__id) {
+  if ((Self__GWVD == '>')) {
+    switch (((struct ___OBJ *)__tmp__L2QD)->__id) {
     case __LIP_BOOLEAN__: {
-      if (__tmp__L1QD==NULL) {
-        __tmp__BH4F=NULL;
+      if (__tmp__O2QD==NULL) {
+        __tmp__1I4F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__L1QD)->__id) {
+        switch (((struct ___OBJ *)__tmp__O2QD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__BH4F=((__LIP_BOOLEAN *)__tmp__L1QD);
+          __tmp__1I4F=((__LIP_BOOLEAN *)__tmp__O2QD);
         } break;
         case __LIP_INTEGER__: {
-          __tmp__BH4F=NULL;
+          __tmp__1I4F=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__BH4F=NULL;
+          __tmp__1I4F=NULL;
         } break;
         }
       };
-      s__5G4F=__tmp__BH4F;
-      __tmp__P2QD=NULL;
+      s__ZI4F=__tmp__1I4F;
+      __tmp__S3QD=NULL;
     } break;
     case __LIP_INTEGER__: {
-      Self__LH4F=((__LIP_INTEGER *)__tmp__I1QD);
-      result__OH4F=NULL;
-      if (__tmp__L1QD==NULL) {
-        __tmp__RH4F=NULL;
+      Self__FJ4F=((__LIP_INTEGER *)__tmp__L2QD);
+      result__IJ4F=NULL;
+      if (__tmp__O2QD==NULL) {
+        __tmp__LJ4F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__L1QD)->__id) {
+        switch (((struct ___OBJ *)__tmp__O2QD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__RH4F=NULL;
+          __tmp__LJ4F=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__RH4F=((__LIP_INTEGER *)__tmp__L1QD);
+          __tmp__LJ4F=((__LIP_INTEGER *)__tmp__O2QD);
         } break;
         case __LIP_STRING__: {
-          __tmp__RH4F=NULL;
+          __tmp__LJ4F=NULL;
         } break;
         }
       };
-      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;
+      s__JJ4F=__tmp__LJ4F;
+      if (((void *)__tmp__LJ4F != (void *)NULL)) {
+        free__3D4F(__tmp__LJ4F);
+        free__3D4F(Self__FJ4F);
+        b__VZEH=(Self__FJ4F->value__FP4F > __tmp__LJ4F->value__FP4F);
+        result__UZEH=NULL;
+        if (b__VZEH) {
+          result__UZEH=true__5YLF;
         } else {
-          result__W2EH=LIP_BOOLEAN__;
+          result__UZEH=LIP_BOOLEAN__;
         };
-        result__OH4F=result__W2EH;
+        result__IJ4F=result__UZEH;
       };
-      __tmp__P2QD=result__OH4F;
+      __tmp__S3QD=result__IJ4F;
     } break;
     case __LIP_STRING__: {
-      if (__tmp__L1QD==NULL) {
-        __tmp__CJIG=NULL;
+      if (__tmp__O2QD==NULL) {
+        __tmp__2KIG=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__L1QD)->__id) {
+        switch (((struct ___OBJ *)__tmp__O2QD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__CJIG=NULL;
+          __tmp__2KIG=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__CJIG=NULL;
+          __tmp__2KIG=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__CJIG=((__LIP_STRING *)__tmp__L1QD);
+          __tmp__2KIG=((__LIP_STRING *)__tmp__O2QD);
         } break;
         }
       };
-      s__AJIG=__tmp__CJIG;
-      __tmp__P2QD=NULL;
+      s__0KIG=__tmp__2KIG;
+      __tmp__S3QD=NULL;
     } break;
     };
-    result__D1QD=__tmp__P2QD;
+    result__G2QD=__tmp__S3QD;
   };
-  if ((Self__5UVD == '<')) {
-    switch (((struct ___OBJ *)__tmp__I1QD)->__id) {
+  if ((Self__GWVD == '<')) {
+    switch (((struct ___OBJ *)__tmp__L2QD)->__id) {
     case __LIP_BOOLEAN__: {
-      if (__tmp__L1QD==NULL) {
-        __tmp__DI4F=NULL;
+      if (__tmp__O2QD==NULL) {
+        __tmp__3J4F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__L1QD)->__id) {
+        switch (((struct ___OBJ *)__tmp__O2QD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__DI4F=((__LIP_BOOLEAN *)__tmp__L1QD);
+          __tmp__3J4F=((__LIP_BOOLEAN *)__tmp__O2QD);
         } break;
         case __LIP_INTEGER__: {
-          __tmp__DI4F=NULL;
+          __tmp__3J4F=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__DI4F=NULL;
+          __tmp__3J4F=NULL;
         } break;
         }
       };
-      s__BI4F=__tmp__DI4F;
-      __tmp__W2QD=NULL;
+      s__1J4F=__tmp__3J4F;
+      __tmp__Z3QD=NULL;
     } break;
     case __LIP_INTEGER__: {
-      Self__NI4F=((__LIP_INTEGER *)__tmp__I1QD);
-      result__QI4F=NULL;
-      if (__tmp__L1QD==NULL) {
-        __tmp__TI4F=NULL;
+      Self__HK4F=((__LIP_INTEGER *)__tmp__L2QD);
+      result__KK4F=NULL;
+      if (__tmp__O2QD==NULL) {
+        __tmp__NK4F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__L1QD)->__id) {
+        switch (((struct ___OBJ *)__tmp__O2QD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__TI4F=NULL;
+          __tmp__NK4F=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__TI4F=((__LIP_INTEGER *)__tmp__L1QD);
+          __tmp__NK4F=((__LIP_INTEGER *)__tmp__O2QD);
         } break;
         case __LIP_STRING__: {
-          __tmp__TI4F=NULL;
+          __tmp__NK4F=NULL;
         } break;
         }
       };
-      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;
+      s__LK4F=__tmp__NK4F;
+      if (((void *)__tmp__NK4F != (void *)NULL)) {
+        free__3D4F(__tmp__NK4F);
+        free__3D4F(Self__HK4F);
+        b__XZEH=(Self__HK4F->value__FP4F < __tmp__NK4F->value__FP4F);
+        result__WZEH=NULL;
+        if (b__XZEH) {
+          result__WZEH=true__5YLF;
         } else {
-          result__Y2EH=LIP_BOOLEAN__;
+          result__WZEH=LIP_BOOLEAN__;
         };
-        result__QI4F=result__Y2EH;
+        result__KK4F=result__WZEH;
       };
-      __tmp__W2QD=result__QI4F;
+      __tmp__Z3QD=result__KK4F;
     } break;
     case __LIP_STRING__: {
-      if (__tmp__L1QD==NULL) {
-        __tmp__TJIG=NULL;
+      if (__tmp__O2QD==NULL) {
+        __tmp__NLIG=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__L1QD)->__id) {
+        switch (((struct ___OBJ *)__tmp__O2QD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__TJIG=NULL;
+          __tmp__NLIG=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__TJIG=NULL;
+          __tmp__NLIG=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__TJIG=((__LIP_STRING *)__tmp__L1QD);
+          __tmp__NLIG=((__LIP_STRING *)__tmp__O2QD);
         } break;
         }
       };
-      s__RJIG=__tmp__TJIG;
-      __tmp__W2QD=NULL;
+      s__LLIG=__tmp__NLIG;
+      __tmp__Z3QD=NULL;
     } break;
     };
-    result__D1QD=__tmp__W2QD;
+    result__G2QD=__tmp__Z3QD;
   };
-  if ((Self__5UVD == 'S')) {
-    switch (((struct ___OBJ *)__tmp__I1QD)->__id) {
+  if ((Self__GWVD == 'S')) {
+    switch (((struct ___OBJ *)__tmp__L2QD)->__id) {
     case __LIP_BOOLEAN__: {
-      if (__tmp__L1QD==NULL) {
-        __tmp__FJ4F=NULL;
+      if (__tmp__O2QD==NULL) {
+        __tmp__5K4F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__L1QD)->__id) {
+        switch (((struct ___OBJ *)__tmp__O2QD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__FJ4F=((__LIP_BOOLEAN *)__tmp__L1QD);
+          __tmp__5K4F=((__LIP_BOOLEAN *)__tmp__O2QD);
         } break;
         case __LIP_INTEGER__: {
-          __tmp__FJ4F=NULL;
+          __tmp__5K4F=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__FJ4F=NULL;
+          __tmp__5K4F=NULL;
         } break;
         }
       };
-      s__DJ4F=__tmp__FJ4F;
-      __tmp__32QD=NULL;
+      s__3K4F=__tmp__5K4F;
+      __tmp__A4QD=NULL;
     } break;
     case __LIP_INTEGER__: {
-      Self__PJ4F=((__LIP_INTEGER *)__tmp__I1QD);
-      result__SJ4F=NULL;
-      if (__tmp__L1QD==NULL) {
-        __tmp__VJ4F=NULL;
+      Self__JL4F=((__LIP_INTEGER *)__tmp__L2QD);
+      result__ML4F=NULL;
+      if (__tmp__O2QD==NULL) {
+        __tmp__PL4F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__L1QD)->__id) {
+        switch (((struct ___OBJ *)__tmp__O2QD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__VJ4F=NULL;
+          __tmp__PL4F=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__VJ4F=((__LIP_INTEGER *)__tmp__L1QD);
+          __tmp__PL4F=((__LIP_INTEGER *)__tmp__O2QD);
         } break;
         case __LIP_STRING__: {
-          __tmp__VJ4F=NULL;
+          __tmp__PL4F=NULL;
         } break;
         }
       };
-      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;
+      s__NL4F=__tmp__PL4F;
+      if (((void *)__tmp__PL4F != (void *)NULL)) {
+        free__3D4F(__tmp__PL4F);
+        free__3D4F(Self__JL4F);
+        b__ZZEH=(Self__JL4F->value__FP4F >= __tmp__PL4F->value__FP4F);
+        result__YZEH=NULL;
+        if (b__ZZEH) {
+          result__YZEH=true__5YLF;
         } else {
-          result__02EH=LIP_BOOLEAN__;
+          result__YZEH=LIP_BOOLEAN__;
         };
-        result__SJ4F=result__02EH;
+        result__ML4F=result__YZEH;
       };
-      __tmp__32QD=result__SJ4F;
+      __tmp__A4QD=result__ML4F;
     } break;
     case __LIP_STRING__: {
-      if (__tmp__L1QD==NULL) {
-        __tmp__EKIG=NULL;
+      if (__tmp__O2QD==NULL) {
+        __tmp__4LIG=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__L1QD)->__id) {
+        switch (((struct ___OBJ *)__tmp__O2QD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__EKIG=NULL;
+          __tmp__4LIG=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__EKIG=NULL;
+          __tmp__4LIG=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__EKIG=((__LIP_STRING *)__tmp__L1QD);
+          __tmp__4LIG=((__LIP_STRING *)__tmp__O2QD);
         } break;
         }
       };
-      s__CKIG=__tmp__EKIG;
-      __tmp__32QD=NULL;
+      s__2LIG=__tmp__4LIG;
+      __tmp__A4QD=NULL;
     } break;
     };
-    result__D1QD=__tmp__32QD;
+    result__G2QD=__tmp__A4QD;
   };
-  if ((Self__5UVD == 'I')) {
-    switch (((struct ___OBJ *)__tmp__I1QD)->__id) {
+  if ((Self__GWVD == 'I')) {
+    switch (((struct ___OBJ *)__tmp__L2QD)->__id) {
     case __LIP_BOOLEAN__: {
-      if (__tmp__L1QD==NULL) {
-        __tmp__HK4F=NULL;
+      if (__tmp__O2QD==NULL) {
+        __tmp__BM4F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__L1QD)->__id) {
+        switch (((struct ___OBJ *)__tmp__O2QD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__HK4F=((__LIP_BOOLEAN *)__tmp__L1QD);
+          __tmp__BM4F=((__LIP_BOOLEAN *)__tmp__O2QD);
         } break;
         case __LIP_INTEGER__: {
-          __tmp__HK4F=NULL;
+          __tmp__BM4F=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__HK4F=NULL;
+          __tmp__BM4F=NULL;
         } break;
         }
       };
-      s__FK4F=__tmp__HK4F;
-      __tmp__E3QD=NULL;
+      s__5L4F=__tmp__BM4F;
+      __tmp__H4QD=NULL;
     } break;
     case __LIP_INTEGER__: {
-      Self__RK4F=((__LIP_INTEGER *)__tmp__I1QD);
-      result__UK4F=NULL;
-      if (__tmp__L1QD==NULL) {
-        __tmp__XK4F=NULL;
+      Self__LM4F=((__LIP_INTEGER *)__tmp__L2QD);
+      result__OM4F=NULL;
+      if (__tmp__O2QD==NULL) {
+        __tmp__RM4F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__L1QD)->__id) {
+        switch (((struct ___OBJ *)__tmp__O2QD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__XK4F=NULL;
+          __tmp__RM4F=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__XK4F=((__LIP_INTEGER *)__tmp__L1QD);
+          __tmp__RM4F=((__LIP_INTEGER *)__tmp__O2QD);
         } break;
         case __LIP_STRING__: {
-          __tmp__XK4F=NULL;
+          __tmp__RM4F=NULL;
         } break;
         }
       };
-      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;
+      s__PM4F=__tmp__RM4F;
+      if (((void *)__tmp__RM4F != (void *)NULL)) {
+        free__3D4F(__tmp__RM4F);
+        free__3D4F(Self__LM4F);
+        b__1ZEH=(Self__LM4F->value__FP4F <= __tmp__RM4F->value__FP4F);
+        result__0ZEH=NULL;
+        if (b__1ZEH) {
+          result__0ZEH=true__5YLF;
         } else {
-          result__22EH=LIP_BOOLEAN__;
+          result__0ZEH=LIP_BOOLEAN__;
         };
-        result__UK4F=result__22EH;
+        result__OM4F=result__0ZEH;
       };
-      __tmp__E3QD=result__UK4F;
+      __tmp__H4QD=result__OM4F;
     } break;
     case __LIP_STRING__: {
-      if (__tmp__L1QD==NULL) {
-        __tmp__VKIG=NULL;
+      if (__tmp__O2QD==NULL) {
+        __tmp__PMIG=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__L1QD)->__id) {
+        switch (((struct ___OBJ *)__tmp__O2QD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__VKIG=NULL;
+          __tmp__PMIG=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__VKIG=NULL;
+          __tmp__PMIG=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__VKIG=((__LIP_STRING *)__tmp__L1QD);
+          __tmp__PMIG=((__LIP_STRING *)__tmp__O2QD);
         } break;
         }
       };
-      s__TKIG=__tmp__VKIG;
-      __tmp__E3QD=NULL;
+      s__NMIG=__tmp__PMIG;
+      __tmp__H4QD=NULL;
     } break;
     };
-    result__D1QD=__tmp__E3QD;
+    result__G2QD=__tmp__H4QD;
   };
-  if ((Self__5UVD == '+')) {
-    switch (((struct ___OBJ *)__tmp__I1QD)->__id) {
+  if ((Self__GWVD == '+')) {
+    switch (((struct ___OBJ *)__tmp__L2QD)->__id) {
     case __LIP_BOOLEAN__: {
-      if (__tmp__L1QD==NULL) {
-        __tmp__JL4F=NULL;
+      if (__tmp__O2QD==NULL) {
+        __tmp__DN4F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__L1QD)->__id) {
+        switch (((struct ___OBJ *)__tmp__O2QD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__JL4F=((__LIP_BOOLEAN *)__tmp__L1QD);
+          __tmp__DN4F=((__LIP_BOOLEAN *)__tmp__O2QD);
         } break;
         case __LIP_INTEGER__: {
-          __tmp__JL4F=NULL;
+          __tmp__DN4F=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__JL4F=NULL;
+          __tmp__DN4F=NULL;
         } break;
         }
       };
-      s__HL4F=__tmp__JL4F;
-      __tmp__L3QD=NULL;
+      s__BN4F=__tmp__DN4F;
+      __tmp__O4QD=NULL;
     } break;
     case __LIP_INTEGER__: {
-      Self__TL4F=((__LIP_INTEGER *)__tmp__I1QD);
-      result__WL4F=NULL;
-      if (__tmp__L1QD==NULL) {
-        __tmp__ZL4F=NULL;
+      Self__NN4F=((__LIP_INTEGER *)__tmp__L2QD);
+      result__QN4F=NULL;
+      if (__tmp__O2QD==NULL) {
+        __tmp__TN4F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__L1QD)->__id) {
+        switch (((struct ___OBJ *)__tmp__O2QD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__ZL4F=NULL;
+          __tmp__TN4F=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__ZL4F=((__LIP_INTEGER *)__tmp__L1QD);
+          __tmp__TN4F=((__LIP_INTEGER *)__tmp__O2QD);
         } break;
         case __LIP_STRING__: {
-          __tmp__ZL4F=NULL;
+          __tmp__TN4F=NULL;
         } break;
         }
       };
-      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;
+      s__RN4F=__tmp__TN4F;
+      if (((void *)__tmp__TN4F != (void *)NULL)) {
+        Self__NN4F->value__FP4F=(__INTEGER)(Self__NN4F->value__FP4F + __tmp__TN4F->value__FP4F);
+        free__3D4F(__tmp__TN4F);
+        result__QN4F=Self__NN4F;
       };
-      __tmp__L3QD=result__WL4F;
+      __tmp__O4QD=result__QN4F;
     } break;
     case __LIP_STRING__: {
-      Self__ALIG=((__LIP_STRING *)__tmp__I1QD);
-      result__DLIG=NULL;
-      if (__tmp__L1QD==NULL) {
-        __tmp__GLIG=NULL;
+      Self__0MIG=((__LIP_STRING *)__tmp__L2QD);
+      result__3MIG=NULL;
+      if (__tmp__O2QD==NULL) {
+        __tmp__ANIG=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__L1QD)->__id) {
+        switch (((struct ___OBJ *)__tmp__O2QD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__GLIG=NULL;
+          __tmp__ANIG=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__GLIG=NULL;
+          __tmp__ANIG=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__GLIG=((__LIP_STRING *)__tmp__L1QD);
+          __tmp__ANIG=((__LIP_STRING *)__tmp__O2QD);
         } break;
         }
       };
-      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;
+      s__4MIG=__tmp__ANIG;
+      if (((void *)__tmp__ANIG != (void *)NULL)) {
+        copy__VDS(string_tmp__VH,Self__0MIG->value__WSUE);
+        append__3OS(string_tmp__VH,__tmp__ANIG->value__WSUE);
+        Self__0MIG->value__WSUE=get__YWB(string_tmp__VH);
+        free__LIIG(__tmp__ANIG);
+        result__3MIG=Self__0MIG;
       };
-      __tmp__L3QD=result__DLIG;
+      __tmp__O4QD=result__3MIG;
     } break;
     };
-    result__D1QD=__tmp__L3QD;
+    result__G2QD=__tmp__O4QD;
   };
-  if ((Self__5UVD == '-')) {
-    switch (((struct ___OBJ *)__tmp__I1QD)->__id) {
+  if ((Self__GWVD == '-')) {
+    switch (((struct ___OBJ *)__tmp__L2QD)->__id) {
     case __LIP_BOOLEAN__: {
-      if (__tmp__L1QD==NULL) {
-        __tmp__LM4F=NULL;
+      if (__tmp__O2QD==NULL) {
+        __tmp__FO4F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__L1QD)->__id) {
+        switch (((struct ___OBJ *)__tmp__O2QD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__LM4F=((__LIP_BOOLEAN *)__tmp__L1QD);
+          __tmp__FO4F=((__LIP_BOOLEAN *)__tmp__O2QD);
         } break;
         case __LIP_INTEGER__: {
-          __tmp__LM4F=NULL;
+          __tmp__FO4F=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__LM4F=NULL;
+          __tmp__FO4F=NULL;
         } break;
         }
       };
-      s__JM4F=__tmp__LM4F;
-      __tmp__S3QD=NULL;
+      s__DO4F=__tmp__FO4F;
+      __tmp__V4QD=NULL;
     } break;
     case __LIP_INTEGER__: {
-      Self__VM4F=((__LIP_INTEGER *)__tmp__I1QD);
-      result__YM4F=NULL;
-      if (__tmp__L1QD==NULL) {
-        __tmp__1M4F=NULL;
+      Self__PO4F=((__LIP_INTEGER *)__tmp__L2QD);
+      result__SO4F=NULL;
+      if (__tmp__O2QD==NULL) {
+        __tmp__VO4F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__L1QD)->__id) {
+        switch (((struct ___OBJ *)__tmp__O2QD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__1M4F=NULL;
+          __tmp__VO4F=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__1M4F=((__LIP_INTEGER *)__tmp__L1QD);
+          __tmp__VO4F=((__LIP_INTEGER *)__tmp__O2QD);
         } break;
         case __LIP_STRING__: {
-          __tmp__1M4F=NULL;
+          __tmp__VO4F=NULL;
         } break;
         }
       };
-      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;
+      s__TO4F=__tmp__VO4F;
+      if (((void *)__tmp__VO4F != (void *)NULL)) {
+        Self__PO4F->value__FP4F=(__INTEGER)(Self__PO4F->value__FP4F - __tmp__VO4F->value__FP4F);
+        free__3D4F(__tmp__VO4F);
+        result__SO4F=Self__PO4F;
       };
-      __tmp__S3QD=result__YM4F;
+      __tmp__V4QD=result__SO4F;
     } break;
     case __LIP_STRING__: {
-      if (__tmp__L1QD==NULL) {
-        __tmp__XLIG=NULL;
+      if (__tmp__O2QD==NULL) {
+        __tmp__RNIG=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__L1QD)->__id) {
+        switch (((struct ___OBJ *)__tmp__O2QD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__XLIG=NULL;
+          __tmp__RNIG=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__XLIG=NULL;
+          __tmp__RNIG=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__XLIG=((__LIP_STRING *)__tmp__L1QD);
+          __tmp__RNIG=((__LIP_STRING *)__tmp__O2QD);
         } break;
         }
       };
-      s__VLIG=__tmp__XLIG;
-      __tmp__S3QD=NULL;
+      s__PNIG=__tmp__RNIG;
+      __tmp__V4QD=NULL;
     } break;
     };
-    result__D1QD=__tmp__S3QD;
+    result__G2QD=__tmp__V4QD;
   };
-  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)) {
+  if (((void *)result__G2QD == (void *)NULL)) {
+    __tmp__44QD=Self__E2QD->parent_lip_code__WNZB.parent_itm_object__XFE.position__SFJ;
+    put_error__text__1PG( 1,(&__string_279));
+    put_position__FRG(__tmp__44QD);
+    put_string__33F(msg_err__AQG);
+    if ((type_error__5PG !=  2)) {
       exit(( 1));
     };
   };
-  return(result__D1QD);
+  return(result__G2QD);
 }
 
-static void* run_expr__53QD(__LIP_UNARY *Self__A4QD)
+static void* run_expr__C5QD(__LIP_UNARY *Self__D5QD)
 // ({LIP_UNARY}) With resultRecursive, No inlinable.
 {
-  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) {
+  void *__tmp__H5QD;
+  void *__tmp__I5QD,*__tmp__DELH,*__tmp__EELH,*result__F5QD,*__tmp__Q5QD;
+  void *__tmp__X5QD;
+  __LIP_INTEGER *Self__FELH,*Self__DP4F,*Self__QP4F;
+  __LIP_STRING *Self__GELH;
+  void *result__0YLF;
+  __POSITION __tmp__AARD;
+  __CHARACTER Self__WYVD;
+  __BOOLEAN b__YYLF;
+  __tmp__H5QD=Self__D5QD->value__G5QD;
+  switch (((struct ___OBJ *)__tmp__H5QD)->__id) {
   case __LIP_BINARY__: {
-    __tmp__F4QD=run_expr__A1QD(__tmp__E4QD);
+    __tmp__I5QD=run_expr__D2QD(__tmp__H5QD);
   } break;
   case __LIP_UNARY__: {
-    __tmp__F4QD=run_expr__53QD(__tmp__E4QD);
+    __tmp__I5QD=run_expr__C5QD(__tmp__H5QD);
   } break;
   case __LIP_CALL__: {
-    __tmp__F4QD=run_expr__XWUE(__tmp__E4QD);
+    __tmp__I5QD=run_expr__IXUE(__tmp__H5QD);
   } break;
   case __LIP_VALUE__: {
-    __tmp__5JKH=((__LIP_VALUE *)__tmp__E4QD)->value__X0UE;
-    switch (((struct ___OBJ *)__tmp__5JKH)->__id) {
+    __tmp__DELH=((__LIP_VALUE *)__tmp__H5QD)->value__I1UE;
+    switch (((struct ___OBJ *)__tmp__DELH)->__id) {
     case __LIP_BOOLEAN__: {
-      __tmp__AKKH=((__LIP_BOOLEAN *)__tmp__5JKH);
+      __tmp__EELH=((__LIP_BOOLEAN *)__tmp__DELH);
     } break;
     case __LIP_INTEGER__: {
-      Self__BKKH=((__LIP_INTEGER *)__tmp__5JKH);
-      __tmp__AKKH=get__5XSE(Self__BKKH,Self__BKKH->value__LN4F);
+      Self__FELH=((__LIP_INTEGER *)__tmp__DELH);
+      __tmp__EELH=get__UYSE(Self__FELH,Self__FELH->value__FP4F);
     } break;
     case __LIP_STRING__: {
-      Self__CKKH=((__LIP_STRING *)__tmp__5JKH);
-      __tmp__AKKH=get__M3FF(Self__CKKH,Self__CKKH->value__FSUE);
+      Self__GELH=((__LIP_STRING *)__tmp__DELH);
+      __tmp__EELH=get__34FF(Self__GELH,Self__GELH->value__WSUE);
     } break;
     };
-    __tmp__F4QD=__tmp__AKKH;
+    __tmp__I5QD=__tmp__EELH;
   } break;
   };
-  result__C4QD=__tmp__F4QD;
-  Self__PXVD=Self__A4QD->operator__G4QD;
-  if ((Self__PXVD == '-')) {
-    switch (((struct ___OBJ *)__tmp__F4QD)->__id) {
+  result__F5QD=__tmp__I5QD;
+  Self__WYVD=Self__D5QD->operator__J5QD;
+  if ((Self__WYVD == '-')) {
+    switch (((struct ___OBJ *)__tmp__I5QD)->__id) {
     case __LIP_BOOLEAN__: {
-      __tmp__N4QD=NULL;
+      __tmp__Q5QD=NULL;
     } break;
     case __LIP_INTEGER__: {
-      Self__JN4F=((__LIP_INTEGER *)__tmp__F4QD);
-      Self__JN4F->value__LN4F=(__INTEGER)(- Self__JN4F->value__LN4F);
-      __tmp__N4QD=Self__JN4F;
+      Self__DP4F=((__LIP_INTEGER *)__tmp__I5QD);
+      Self__DP4F->value__FP4F=(__INTEGER)(- Self__DP4F->value__FP4F);
+      __tmp__Q5QD=Self__DP4F;
     } break;
     case __LIP_STRING__: {
-      __tmp__N4QD=NULL;
+      __tmp__Q5QD=NULL;
     } break;
     };
-    result__C4QD=__tmp__N4QD;
+    result__F5QD=__tmp__Q5QD;
   };
-  if ((Self__PXVD == '!')) {
-    switch (((struct ___OBJ *)result__C4QD)->__id) {
+  if ((Self__WYVD == '!')) {
+    switch (((struct ___OBJ *)result__F5QD)->__id) {
     case __LIP_BOOLEAN__: {
-      b__4WLF=(! ((__LIP_BOOLEAN *)result__C4QD)->value__JFQD);
-      result__AXLF=NULL;
-      if (b__4WLF) {
-        result__AXLF=true__FXLF;
+      b__YYLF=(! ((__LIP_BOOLEAN *)result__F5QD)->value__MGQD);
+      result__0YLF=NULL;
+      if (b__YYLF) {
+        result__0YLF=true__5YLF;
       } else {
-        result__AXLF=LIP_BOOLEAN__;
+        result__0YLF=LIP_BOOLEAN__;
       };
-      __tmp__U4QD=result__AXLF;
+      __tmp__X5QD=result__0YLF;
     } break;
     case __LIP_INTEGER__: {
-      Self__WN4F=((__LIP_INTEGER *)result__C4QD);
-      Self__WN4F->value__LN4F=(__INTEGER)(~ Self__WN4F->value__LN4F);
-      __tmp__U4QD=Self__WN4F;
+      Self__QP4F=((__LIP_INTEGER *)result__F5QD);
+      Self__QP4F->value__FP4F=(__INTEGER)(~ Self__QP4F->value__FP4F);
+      __tmp__X5QD=Self__QP4F;
     } break;
     case __LIP_STRING__: {
-      __tmp__U4QD=NULL;
+      __tmp__X5QD=NULL;
     } break;
     };
-    result__C4QD=__tmp__U4QD;
+    result__F5QD=__tmp__X5QD;
   };
-  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)) {
+  if (((void *)result__F5QD == (void *)NULL)) {
+    __tmp__AARD=Self__D5QD->parent_lip_code__FZ4B.parent_itm_object__XFE.position__SFJ;
+    put_error__text__1PG( 1,(&__string_279));
+    put_position__FRG(__tmp__AARD);
+    put_string__33F(msg_err__AQG);
+    if ((type_error__5PG !=  2)) {
       exit(( 1));
     };
   };
-  return(result__C4QD);
+  return(result__F5QD);
 }
 
-static void* run_expr__XWUE(__LIP_CALL *Self__YWUE)
+static void* run_expr__IXUE(__LIP_CALL *Self__JXUE)
 // ({LIP_CALL}) With resultRecursive, No inlinable.
 {
-  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) {
+  void *str__MXUE,*__tmp__CYUE;
+  void *val__NXUE,*result__OXUE,*__tmp__XXUE,*__tmp__J1UE,*__tmp__K1UE;
+  void *__tmp__WXUE;
+  __LIP_INTEGER *Self__QS4F;
+  __LIP_STRING *Self__BPIG;
+  __POSITION pos__EK2G,pos__B4KF;
+  __STRING *Self__35GH,*Self__3PIH,*Self__DQIH;
+  __INTEGER new_capacity__WPIH,old_nb_elts__ZPIH,upper__KELH,Self__IELH;
+  __INTEGER state__KHXF,Self__OZGG,new_capacity__2PIH,old_nb_elts__5PIH;
+  __INTEGER upper__PELH,Self__NELH,new_capacity__CQIH,old_nb_elts__FQIH;
+  __INTEGER upper__UELH,Self__SELH;
+  __CHARACTER *Self__YPIH,*new__0PIH,*Self__4PIH,*new__AQIH,*Self__EQIH;
+  __CHARACTER *new__GQIH;
+  __BOOLEAN __tmp__TYUE,__tmp__FZUE,result__YXXE,sign__LHXF,__tmp__3IXF;
+  __BOOLEAN result__HIGH,__tmp__KJXF,result__VGQG,__tmp__3JXF;
+  __BOOLEAN result__KIGH,result__NIGH,result__2ZEH,result__3ZEH;
+  __CHARACTER Self__DACH,Self__IIGH,Self__EACH,Self__LIGH,Self__OIGH;
+  __CHARACTER mem__GGMF,ch__BQIH;
+  __FAST_ARRAYoLIP_SLOT_DATAo *Self__WCQF;
+  str__MXUE=NULL;
+  val__NXUE=NULL;
+  result__OXUE=NULL;
+  if (((void *)Self__JXUE->argument__4QUE != (void *)NULL)) {
+    __tmp__WXUE=Self__JXUE->argument__4QUE;
+    switch (((struct ___OBJ *)__tmp__WXUE)->__id) {
     case __LIP_BINARY__: {
-      __tmp__GXUE=run_expr__A1QD(__tmp__FXUE);
+      __tmp__XXUE=run_expr__D2QD(__tmp__WXUE);
     } break;
     case __LIP_UNARY__: {
-      __tmp__GXUE=run_expr__53QD(__tmp__FXUE);
+      __tmp__XXUE=run_expr__C5QD(__tmp__WXUE);
     } break;
     case __LIP_CALL__: {
-      __tmp__GXUE=run_expr__XWUE(__tmp__FXUE);
+      __tmp__XXUE=run_expr__IXUE(__tmp__WXUE);
     } break;
     case __LIP_VALUE__: {
-      __tmp__Y0UE=((__LIP_VALUE *)__tmp__FXUE)->value__X0UE;
-      switch (((struct ___OBJ *)__tmp__Y0UE)->__id) {
+      __tmp__J1UE=((__LIP_VALUE *)__tmp__WXUE)->value__I1UE;
+      switch (((struct ___OBJ *)__tmp__J1UE)->__id) {
       case __LIP_BOOLEAN__: {
-        __tmp__Z0UE=((__LIP_BOOLEAN *)__tmp__Y0UE);
+        __tmp__K1UE=((__LIP_BOOLEAN *)__tmp__J1UE);
       } break;
       case __LIP_INTEGER__: {
-        Self__WQ4F=((__LIP_INTEGER *)__tmp__Y0UE);
-        __tmp__Z0UE=get__5XSE(Self__WQ4F,Self__WQ4F->value__LN4F);
+        Self__QS4F=((__LIP_INTEGER *)__tmp__J1UE);
+        __tmp__K1UE=get__UYSE(Self__QS4F,Self__QS4F->value__FP4F);
       } break;
       case __LIP_STRING__: {
-        Self__HNIG=((__LIP_STRING *)__tmp__Y0UE);
-        __tmp__Z0UE=get__M3FF(Self__HNIG,Self__HNIG->value__FSUE);
+        Self__BPIG=((__LIP_STRING *)__tmp__J1UE);
+        __tmp__K1UE=get__34FF(Self__BPIG,Self__BPIG->value__WSUE);
       } break;
       };
-      __tmp__GXUE=__tmp__Z0UE;
+      __tmp__XXUE=__tmp__K1UE;
     } break;
     };
-    val__2WUE=__tmp__GXUE;
+    val__NXUE=__tmp__XXUE;
   };
-  if (((void *)Self__YWUE->name__YQUE == (void *)(&__string_93))) {
-    if (val__2WUE==NULL) {
-      __tmp__RXUE=NULL;
+  if (((void *)Self__JXUE->name__JRUE == (void *)(&__string_93))) {
+    if (val__NXUE==NULL) {
+      __tmp__CYUE=NULL;
     } else {
-      switch (((struct ___OBJ *)val__2WUE)->__id) {
+      switch (((struct ___OBJ *)val__NXUE)->__id) {
       case __LIP_BOOLEAN__: {
-        __tmp__RXUE=NULL;
+        __tmp__CYUE=NULL;
       } break;
       case __LIP_INTEGER__: {
-        __tmp__RXUE=NULL;
+        __tmp__CYUE=NULL;
       } break;
       case __LIP_STRING__: {
-        __tmp__RXUE=((void *)val__2WUE);
+        __tmp__CYUE=((void *)val__NXUE);
       } break;
       }
     };
-    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)) {
+    str__MXUE=__tmp__CYUE;
+    if (((void *)__tmp__CYUE == (void *)NULL)) {
+      pos__EK2G=Self__JXUE->parent_lip_code__XZ4B.parent_itm_object__XFE.position__SFJ;
+      put_error__text__1PG( 1,(&__string_312));
+      put_position__FRG(pos__EK2G);
+      put_string__33F(msg_err__AQG);
+      if ((type_error__5PG !=  2)) {
         exit(( 1));
       };
     };
-    ((__STRING *)string_tmp__VH)->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';
+    ((__STRING *)string_tmp__VH)->count__SGC= 0;
+    append_in__FPIG(__tmp__CYUE,string_tmp__VH);
+    Self__35GH=((__STRING *)string_tmp__VH);
+    if ((Self__35GH->capacity__UCS > Self__35GH->count__SGC)) {
+      ((__CHARACTER *)Self__35GH->storage__3CS)[Self__35GH->count__SGC]='\0';
     } else {
-      add_last__GOT(Self__W4GH,'\0');
-      Self__W4GH->count__EGC=(__INTEGER)(Self__W4GH->count__EGC -  1);
+      new_capacity__WPIH= 0;
+      if ((Self__35GH->capacity__UCS <= Self__35GH->count__SGC)) {
+        if ((Self__35GH->capacity__UCS ==  0)) {
+          Self__35GH->capacity__UCS= 32;
+          Self__35GH->storage__3CS=create__YIEB( 32);
+        } else {
+          new_capacity__WPIH=(__INTEGER)(Self__35GH->capacity__UCS <<  1);
+          Self__YPIH=((__CHARACTER *)Self__35GH->storage__3CS);
+          old_nb_elts__ZPIH=Self__35GH->capacity__UCS;
+          new__0PIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__YPIH),((__UINTEGER_32 )old_nb_elts__ZPIH),((__UINTEGER_32 )new_capacity__WPIH)));
+          upper__KELH=(__INTEGER)(new_capacity__WPIH -  1);
+          Self__IELH=old_nb_elts__ZPIH;
+          while ((Self__IELH <= upper__KELH)) {
+            new__0PIH[Self__IELH]='\0';
+            Self__IELH=(__INTEGER)(Self__IELH +  1);
+          };
+          Self__35GH->storage__3CS=new__0PIH;
+          Self__35GH->capacity__UCS=new_capacity__WPIH;
+        };
+      };
+      ((__CHARACTER *)Self__35GH->storage__3CS)[Self__35GH->count__SGC]='\0';
+      Self__35GH->count__SGC=(__INTEGER)(Self__35GH->count__SGC +  1);
+      Self__35GH->count__SGC=(__INTEGER)(Self__35GH->count__SGC -  1);
     };
-    result__3WUE=get__5XSE(LIP_INTEGER__,((__INTEGER )(system(((char*)((Self__W4GH->storage__RCS)))))));
-    __tmp__CYUE=TRUE__;
+    result__OXUE=get__UYSE(LIP_INTEGER__,((__INTEGER )(system(((char*)((Self__35GH->storage__3CS)))))));
+    __tmp__TYUE=TRUE__;
   } else {
-    __tmp__CYUE=FALSE__;
+    __tmp__TYUE=FALSE__;
   };
-  if (__tmp__CYUE) {
-    __tmp__UYUE=TRUE__;
+  if (__tmp__TYUE) {
+    __tmp__FZUE=TRUE__;
   } else {
-    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__;
+    result__YXXE=((void *)Self__JXUE->name__JRUE == (void *)(&__string_106));
+    if (result__YXXE) {
+      state__KHXF= 0;
+      sign__LHXF=FALSE__;
+      while ((state__KHXF <=  2)) {
+        if (push_back_flag__P0MF) {
+          push_back_flag__P0MF=FALSE__;
         } else {
-          memory__UEMF=((__CHARACTER )(fgetc(stdin)));
+          memory__OGMF=((__CHARACTER )(fgetc(stdin)));
         };
-        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__;
+        if ((state__KHXF ==  0)) {
+          Self__DACH=memory__OGMF;
+          if ((((((((Self__DACH == ' ') || (Self__DACH == '\t')) || (Self__DACH == '\n')) || (Self__DACH == '\r')) || (Self__DACH == '\0')) || (Self__DACH == '\f')) || (Self__DACH == '\v'))) {
+            __tmp__3IXF=TRUE__;
           } else {
-            Self__52EH=memory__UEMF;
-            result__42EH=FALSE__;
-            if ((((__INTEGER_8 )Self__52EH) >= ((__INTEGER_8 )'0'))) {
-              result__42EH=(((__INTEGER_8 )Self__52EH) <= ((__INTEGER_8 )'9'));
+            Self__IIGH=memory__OGMF;
+            result__HIGH=FALSE__;
+            if ((((__INTEGER_8 )Self__IIGH) >= ((__INTEGER_8 )'0'))) {
+              result__HIGH=(((__INTEGER_8 )Self__IIGH) <= ((__INTEGER_8 )'9'));
             };
-            if (result__42EH) {
-              last_integer__PYUE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )memory__UEMF)) -  48);
-              state__QFXF= 2;
+            if (result__HIGH) {
+              last_integer__AZUE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )memory__OGMF)) -  48);
+              state__KHXF= 2;
             };
-            __tmp__DHXF=result__42EH;
+            __tmp__3IXF=result__HIGH;
           };
-          if (__tmp__DHXF) {
-            __tmp__QHXF=TRUE__;
+          if (__tmp__3IXF) {
+            __tmp__KJXF=TRUE__;
           } else {
-            result__1EQG=(memory__UEMF == '-');
-            if (result__1EQG) {
-              sign__RFXF=TRUE__;
-              state__QFXF= 1;
+            result__VGQG=(memory__OGMF == '-');
+            if (result__VGQG) {
+              sign__LHXF=TRUE__;
+              state__KHXF= 1;
             };
-            __tmp__QHXF=result__1EQG;
+            __tmp__KJXF=result__VGQG;
           };
-          if ((! __tmp__QHXF)) {
-            if ((memory__UEMF == '+')) {
-              state__QFXF= 1;
+          if ((! __tmp__KJXF)) {
+            if ((memory__OGMF == '+')) {
+              state__KHXF= 1;
             } else {
-              state__QFXF= 4;
+              state__KHXF= 4;
             };
           };
-          __tmp__DIXF=TRUE__;
+          __tmp__3JXF=TRUE__;
         } else {
-          __tmp__DIXF=FALSE__;
+          __tmp__3JXF=FALSE__;
         };
-        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 ((! __tmp__3JXF)) {
+          if ((state__KHXF ==  1)) {
+            Self__EACH=memory__OGMF;
+            if ((! (((((((Self__EACH == ' ') || (Self__EACH == '\t')) || (Self__EACH == '\n')) || (Self__EACH == '\r')) || (Self__EACH == '\0')) || (Self__EACH == '\f')) || (Self__EACH == '\v')))) {
+              Self__LIGH=memory__OGMF;
+              result__KIGH=FALSE__;
+              if ((((__INTEGER_8 )Self__LIGH) >= ((__INTEGER_8 )'0'))) {
+                result__KIGH=(((__INTEGER_8 )Self__LIGH) <= ((__INTEGER_8 )'9'));
               };
-              if (result__C3EH) {
-                last_integer__PYUE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )memory__UEMF)) -  48);
-                state__QFXF= 2;
+              if (result__KIGH) {
+                last_integer__AZUE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )memory__OGMF)) -  48);
+                state__KHXF= 2;
               } else {
-                state__QFXF= 4;
+                state__KHXF= 4;
               };
             };
           } else {
-            Self__H3EH=memory__UEMF;
-            result__G3EH=FALSE__;
-            if ((((__INTEGER_8 )Self__H3EH) >= ((__INTEGER_8 )'0'))) {
-              result__G3EH=(((__INTEGER_8 )Self__H3EH) <= ((__INTEGER_8 )'9'));
+            Self__OIGH=memory__OGMF;
+            result__NIGH=FALSE__;
+            if ((((__INTEGER_8 )Self__OIGH) >= ((__INTEGER_8 )'0'))) {
+              result__NIGH=(((__INTEGER_8 )Self__OIGH) <= ((__INTEGER_8 )'9'));
             };
-            if (result__G3EH) {
-              last_integer__PYUE=(__INTEGER)((__INTEGER)(last_integer__PYUE *  10) + (__INTEGER)(((__INTEGER )((__INTEGER_8 )memory__UEMF)) -  48));
+            if (result__NIGH) {
+              last_integer__AZUE=(__INTEGER)((__INTEGER)(last_integer__AZUE *  10) + (__INTEGER)(((__INTEGER )((__INTEGER_8 )memory__OGMF)) -  48));
             } else {
-              state__QFXF= 3;
+              state__KHXF= 3;
             };
           };
         };
-        result__K3EH=FALSE__;
-        if ((! push_back_flag__VYMF)) {
-          result__K3EH=(memory__UEMF == ((__CHARACTER )(EOF)));
+        result__2ZEH=FALSE__;
+        if ((! push_back_flag__P0MF)) {
+          result__2ZEH=(memory__OGMF == ((__CHARACTER )(EOF)));
         };
-        if (result__K3EH) {
-          Self__UXGG=state__QFXF;
-          if (((state__QFXF >=  0) && (state__QFXF <=  1))) {
-            state__QFXF= 4;
+        if (result__2ZEH) {
+          Self__OZGG=state__KHXF;
+          if (((state__KHXF >=  0) && (state__KHXF <=  1))) {
+            state__KHXF= 4;
           };
-          if (((Self__UXGG >=  2) && (Self__UXGG <=  3))) {
-            state__QFXF= 3;
+          if (((Self__OZGG >=  2) && (Self__OZGG <=  3))) {
+            state__KHXF= 3;
           };
         };
       };
-      result__L3EH=FALSE__;
-      if ((! push_back_flag__VYMF)) {
-        result__L3EH=(memory__UEMF == ((__CHARACTER )(EOF)));
+      result__3ZEH=FALSE__;
+      if ((! push_back_flag__P0MF)) {
+        result__3ZEH=(memory__OGMF == ((__CHARACTER )(EOF)));
       };
-      if (result__L3EH) {
-        push_back_flag__VYMF=TRUE__;
+      if (result__3ZEH) {
+        push_back_flag__P0MF=TRUE__;
       };
-      if ((state__QFXF ==  4)) {
-        print__DJD((&__string_331));
-        print__DJD((&__string_220));
+      if ((state__KHXF ==  4)) {
+        print__OJD((&__string_331));
+        print__OJD((&__string_220));
         fputc((int)('\n'),stdout);
         exit(( 1));
       };
-      if (sign__RFXF) {
-        last_integer__PYUE=(__INTEGER)(- last_integer__PYUE);
-      };
-      result__3WUE=get__5XSE(LIP_INTEGER__,last_integer__PYUE);
-    };
-    __tmp__UYUE=result__5WXE;
-  };
-  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__UEMF=((__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__UEMF=mem__MEMF;
-      };
-      result__3WUE=get__M3FF(LIP_STRING__,get__YWB(last_string__BZUE));
-    } else {
-      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)) {
+      if (sign__LHXF) {
+        last_integer__AZUE=(__INTEGER)(- last_integer__AZUE);
+      };
+      result__OXUE=get__UYSE(LIP_INTEGER__,last_integer__AZUE);
+    };
+    __tmp__FZUE=result__YXXE;
+  };
+  if ((! __tmp__FZUE)) {
+    if (((void *)Self__JXUE->name__JRUE == (void *)(&__string_107))) {
+      ((__STRING *)last_string__SZUE)->count__SGC= 0;
+      mem__GGMF='\0';
+      if (push_back_flag__P0MF) {
+        push_back_flag__P0MF=FALSE__;
+      } else {
+        memory__OGMF=((__CHARACTER )(fgetc(stdin)));
+      };
+      if (((memory__OGMF != '\n') && (memory__OGMF != ((__CHARACTER )(EOF))))) {
+        Self__3PIH=((__STRING *)last_string__SZUE);
+        ch__BQIH=memory__OGMF;
+        new_capacity__2PIH= 0;
+        if ((Self__3PIH->capacity__UCS <= Self__3PIH->count__SGC)) {
+          if ((Self__3PIH->capacity__UCS ==  0)) {
+            Self__3PIH->capacity__UCS= 32;
+            Self__3PIH->storage__3CS=create__YIEB( 32);
+          } else {
+            new_capacity__2PIH=(__INTEGER)(Self__3PIH->capacity__UCS <<  1);
+            Self__4PIH=((__CHARACTER *)Self__3PIH->storage__3CS);
+            old_nb_elts__5PIH=Self__3PIH->capacity__UCS;
+            new__AQIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__4PIH),((__UINTEGER_32 )old_nb_elts__5PIH),((__UINTEGER_32 )new_capacity__2PIH)));
+            upper__PELH=(__INTEGER)(new_capacity__2PIH -  1);
+            Self__NELH=old_nb_elts__5PIH;
+            while ((Self__NELH <= upper__PELH)) {
+              new__AQIH[Self__NELH]='\0';
+              Self__NELH=(__INTEGER)(Self__NELH +  1);
+            };
+            Self__3PIH->storage__3CS=new__AQIH;
+            Self__3PIH->capacity__UCS=new_capacity__2PIH;
+          };
+        };
+        ((__CHARACTER *)Self__3PIH->storage__3CS)[Self__3PIH->count__SGC]=ch__BQIH;
+        Self__3PIH->count__SGC=(__INTEGER)(Self__3PIH->count__SGC +  1);
+        mem__GGMF=((__CHARACTER )(fgetc(stdin)));
+        while ((! ((mem__GGMF == ((__CHARACTER )(EOF))) || (mem__GGMF == '\n')))) {
+          Self__DQIH=((__STRING *)last_string__SZUE);
+          new_capacity__CQIH= 0;
+          if ((Self__DQIH->capacity__UCS <= Self__DQIH->count__SGC)) {
+            if ((Self__DQIH->capacity__UCS ==  0)) {
+              Self__DQIH->capacity__UCS= 32;
+              Self__DQIH->storage__3CS=create__YIEB( 32);
+            } else {
+              new_capacity__CQIH=(__INTEGER)(Self__DQIH->capacity__UCS <<  1);
+              Self__EQIH=((__CHARACTER *)Self__DQIH->storage__3CS);
+              old_nb_elts__FQIH=Self__DQIH->capacity__UCS;
+              new__GQIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__EQIH),((__UINTEGER_32 )old_nb_elts__FQIH),((__UINTEGER_32 )new_capacity__CQIH)));
+              upper__UELH=(__INTEGER)(new_capacity__CQIH -  1);
+              Self__SELH=old_nb_elts__FQIH;
+              while ((Self__SELH <= upper__UELH)) {
+                new__GQIH[Self__SELH]='\0';
+                Self__SELH=(__INTEGER)(Self__SELH +  1);
+              };
+              Self__DQIH->storage__3CS=new__GQIH;
+              Self__DQIH->capacity__UCS=new_capacity__CQIH;
+            };
+          };
+          ((__CHARACTER *)Self__DQIH->storage__3CS)[Self__DQIH->count__SGC]=mem__GGMF;
+          Self__DQIH->count__SGC=(__INTEGER)(Self__DQIH->count__SGC +  1);
+          mem__GGMF=((__CHARACTER )(fgetc(stdin)));
+        };
+        memory__OGMF=mem__GGMF;
+      };
+      result__OXUE=get__34FF(LIP_STRING__,get__YWB(last_string__SZUE));
+    } else {
+      if (((void *)fast_reference_at__PXRD(list_data__HONC,Self__JXUE->name__JRUE) == (void *)NULL)) {
+        Self__WCQF=((__FAST_ARRAYoLIP_SLOT_DATAo *)stack__I0UE);
+        if (((void *)((void **)Self__WCQF->parent_arrayed_collection__H0UE.storage__SJQF)[Self__WCQF->parent_arrayed_collection__H0UE.upper__ADQF] == (void *)NULL)) {
+          copy__VDS(string_tmp__VH,(&__string_309));
+          append__3OS(string_tmp__VH,Self__JXUE->name__JRUE);
+          append__3OS(string_tmp__VH,(&__string_310));
+          pos__B4KF=Self__JXUE->parent_lip_code__XZ4B.parent_itm_object__XFE.position__SFJ;
+          put_error__text__1PG( 1,string_tmp__VH);
+          put_position__FRG(pos__B4KF);
+          put_string__33F(msg_err__AQG);
+          if ((type_error__5PG !=  2)) {
             exit(( 1));
           };
         };
       };
       print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
-      result__3WUE=NULL;
+      result__OXUE=NULL;
     };
   };
-  if (((void *)val__2WUE != (void *)NULL)) {
-    switch (((struct ___OBJ *)val__2WUE)->__id) {
+  if (((void *)val__NXUE != (void *)NULL)) {
+    switch (((struct ___OBJ *)val__NXUE)->__id) {
     case __LIP_BOOLEAN__: {
     } break;
     case __LIP_INTEGER__: {
-      free__DC4F(val__2WUE);
+      free__3D4F(val__NXUE);
     } break;
     case __LIP_STRING__: {
-      free__RGIG(val__2WUE);
+      free__LIIG(val__NXUE);
     } break;
     };
   };
-  return(result__3WUE);
+  return(result__OXUE);
 }
 
-static void* get__5XSE(__LIP_INTEGER *Self__AYSE,__INTEGER i__BYSE)
+static void* get__UYSE(__LIP_INTEGER *Self__VYSE,__INTEGER i__WYSE)
 // ({LIP_INTEGER},{INTEGER}) With resultNo recursive, No inlinable.
 {
-  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__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__IKKH=new_lab__FTJ(lab_type__LKKH);
-            };
-            ((__POINTER *)next__IKKH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__JKKH)[ 0]=next__IKKH;
-          } else {
-            ((__POINTER *)result__KKKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__IKKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__KKKH=next__IKKH;
-          };
-        };
-        ptr__PZSF=result__KKKH;
-      };
-      result__OZSF=((__LIP_INTEGER *)ptr__PZSF);
-      *(result__OZSF) = *(Self__AYSE);
-    };
-    result__DYSE=result__OZSF;
+  void *result__YYSE;
+  __LIP_INTEGER *result__I1SF;
+  __POINTER ptr__J1SF,ptr_table__XELH,next__WELH,result__YELH;
+  __POINTER ptr_table__2ELH,next__1ELH,result__3ELH;
+  __INTEGER typ_id__O1SF;
+  __UINTEGER_32 sz__L1SF,a__4LGH,new_size__5LGH,t__DMGH,a__CMGH;
+  __UINTEGER_32 new_size__5ELH,lab_type__4ELH;
+  __FAST_ARRAYoLIP_INTEGERo *Self__XC4E,*Self__ND4E;
+  result__YYSE=NULL;
+  if ((((__FAST_ARRAYoLIP_INTEGERo *)storage__4YSE)->parent_arrayed_collection__3YSE.upper__GIXE <  0)) {
+    result__I1SF=NULL;
+    ptr__J1SF=((__POINTER )(NULL));
+    typ_id__O1SF= 0;
+    sz__L1SF=((__UINTEGER_32 )sizeof(__LIP_INTEGER));
+    if ((sz__L1SF ==  0)) {
+      result__I1SF=Self__VYSE;
+    } else {
+      typ_id__O1SF=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__L1SF);
+      if ((typ_id__O1SF == (__INTEGER)(-  1))) {
+        a__4LGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__5LGH=(__UINTEGER_32)((__UINTEGER_32)(sz__L1SF + a__4LGH) & (__UINTEGER_32)(~ a__4LGH));
+        ptr_table__XELH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__5LGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__WELH=((__POINTER )(NULL));
+        result__YELH=((__POINTER *)ptr_table__XELH)[ 0];
+        if ((result__YELH == (void *)NULL)) {
+          result__YELH=new_lab__RTJ(new_size__5LGH);
+          next__WELH=(void *)((unsigned long)result__YELH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5LGH)));
+          ((__POINTER *)next__WELH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__XELH)[ 0]=next__WELH;
+        } else {
+          next__WELH=((__POINTER *)result__YELH)[ 0];
+          if ((next__WELH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YELH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__5LGH <<  1)) <=  4096)) {
+              next__WELH=(void *)((unsigned long)result__YELH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5LGH)));
+            } else {
+              next__WELH=new_lab__RTJ(new_size__5LGH);
+            };
+            ((__POINTER *)next__WELH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__XELH)[ 0]=next__WELH;
+          } else {
+            ((__POINTER *)result__YELH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WELH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__YELH=next__WELH;
+          };
+        };
+        ptr__J1SF=result__YELH;
+      } else {
+        t__DMGH=((__UINTEGER_32 )typ_id__O1SF);
+        a__CMGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__5ELH=(__UINTEGER_32)((__UINTEGER_32)(sz__L1SF + a__CMGH) & (__UINTEGER_32)(~ a__CMGH));
+        ptr_table__2ELH=((__POINTER )(&(table_type[(t__DMGH)])));
+        lab_type__4ELH=(__UINTEGER_32)(t__DMGH |  1);
+        next__1ELH=((__POINTER )(NULL));
+        result__3ELH=((__POINTER *)ptr_table__2ELH)[ 0];
+        if ((result__3ELH == (void *)NULL)) {
+          result__3ELH=new_lab__RTJ(lab_type__4ELH);
+          next__1ELH=(void *)((unsigned long)result__3ELH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5ELH)));
+          ((__POINTER *)next__1ELH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__2ELH)[ 0]=next__1ELH;
+        } else {
+          next__1ELH=((__POINTER *)result__3ELH)[ 0];
+          if ((next__1ELH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__3ELH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__5ELH <<  1)) <=  4096)) {
+              next__1ELH=(void *)((unsigned long)result__3ELH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5ELH)));
+            } else {
+              next__1ELH=new_lab__RTJ(lab_type__4ELH);
+            };
+            ((__POINTER *)next__1ELH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__2ELH)[ 0]=next__1ELH;
+          } else {
+            ((__POINTER *)result__3ELH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1ELH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__3ELH=next__1ELH;
+          };
+        };
+        ptr__J1SF=result__3ELH;
+      };
+      result__I1SF=((__LIP_INTEGER *)ptr__J1SF);
+      *(result__I1SF) = *(Self__VYSE);
+    };
+    result__YYSE=result__I1SF;
   } else {
-    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);
+    Self__XC4E=((__FAST_ARRAYoLIP_INTEGERo *)storage__4YSE);
+    result__YYSE=((void **)Self__XC4E->parent_arrayed_collection__3YSE.storage__TMXE)[Self__XC4E->parent_arrayed_collection__3YSE.upper__GIXE];
+    Self__ND4E=((__FAST_ARRAYoLIP_INTEGERo *)storage__4YSE);
+    Self__ND4E->parent_arrayed_collection__3YSE.upper__GIXE=(__INTEGER)(Self__ND4E->parent_arrayed_collection__3YSE.upper__GIXE -  1);
   };
-  ((__LIP_INTEGER *)result__DYSE)->value__LN4F=i__BYSE;
-  return(result__DYSE);
+  ((__LIP_INTEGER *)result__YYSE)->value__FP4F=i__WYSE;
+  return(result__YYSE);
 }
 
-static void* get__M3FF(__LIP_STRING *Self__N3FF,void *str__O3FF)
+static void* get__34FF(__LIP_STRING *Self__44FF,void *str__54FF)
 // ({LIP_STRING},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  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__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__SKKH=new_lab__FTJ(lab_type__VKKH);
-            };
-            ((__POINTER *)next__SKKH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__TKKH)[ 0]=next__SKKH;
-          } else {
-            ((__POINTER *)result__UKKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__SKKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__UKKH=next__SKKH;
-          };
-        };
-        ptr__IQBG=result__UKKH;
-      };
-      result__HQBG=((__LIP_STRING *)ptr__IQBG);
-      *(result__HQBG) = *(Self__N3FF);
-    };
-    result__Q3FF=result__HQBG;
+  void *result__B5FF;
+  __LIP_STRING *result__BSBG;
+  __POINTER ptr__CSBG,ptr_table__BFLH,next__AFLH,result__CFLH;
+  __POINTER ptr_table__GFLH,next__FFLH,result__HFLH;
+  __INTEGER typ_id__HSBG;
+  __UINTEGER_32 sz__ESBG,a__GMGH,new_size__HMGH,t__LMGH,a__KMGH;
+  __UINTEGER_32 new_size__JFLH,lab_type__IFLH;
+  __FAST_ARRAYoLIP_STRINGo *Self__IPTF,*Self__4PTF;
+  result__B5FF=NULL;
+  if ((((__FAST_ARRAYoLIP_STRINGo *)storage__H5FF)->parent_arrayed_collection__G5FF.upper__WZPF <  0)) {
+    result__BSBG=NULL;
+    ptr__CSBG=((__POINTER )(NULL));
+    typ_id__HSBG= 0;
+    sz__ESBG=((__UINTEGER_32 )sizeof(__LIP_STRING));
+    if ((sz__ESBG ==  0)) {
+      result__BSBG=Self__44FF;
+    } else {
+      typ_id__HSBG=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__ESBG);
+      if ((typ_id__HSBG == (__INTEGER)(-  1))) {
+        a__GMGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__HMGH=(__UINTEGER_32)((__UINTEGER_32)(sz__ESBG + a__GMGH) & (__UINTEGER_32)(~ a__GMGH));
+        ptr_table__BFLH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__HMGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__AFLH=((__POINTER )(NULL));
+        result__CFLH=((__POINTER *)ptr_table__BFLH)[ 0];
+        if ((result__CFLH == (void *)NULL)) {
+          result__CFLH=new_lab__RTJ(new_size__HMGH);
+          next__AFLH=(void *)((unsigned long)result__CFLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HMGH)));
+          ((__POINTER *)next__AFLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__BFLH)[ 0]=next__AFLH;
+        } else {
+          next__AFLH=((__POINTER *)result__CFLH)[ 0];
+          if ((next__AFLH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__CFLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__HMGH <<  1)) <=  4096)) {
+              next__AFLH=(void *)((unsigned long)result__CFLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HMGH)));
+            } else {
+              next__AFLH=new_lab__RTJ(new_size__HMGH);
+            };
+            ((__POINTER *)next__AFLH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__BFLH)[ 0]=next__AFLH;
+          } else {
+            ((__POINTER *)result__CFLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__AFLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__CFLH=next__AFLH;
+          };
+        };
+        ptr__CSBG=result__CFLH;
+      } else {
+        t__LMGH=((__UINTEGER_32 )typ_id__HSBG);
+        a__KMGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__JFLH=(__UINTEGER_32)((__UINTEGER_32)(sz__ESBG + a__KMGH) & (__UINTEGER_32)(~ a__KMGH));
+        ptr_table__GFLH=((__POINTER )(&(table_type[(t__LMGH)])));
+        lab_type__IFLH=(__UINTEGER_32)(t__LMGH |  1);
+        next__FFLH=((__POINTER )(NULL));
+        result__HFLH=((__POINTER *)ptr_table__GFLH)[ 0];
+        if ((result__HFLH == (void *)NULL)) {
+          result__HFLH=new_lab__RTJ(lab_type__IFLH);
+          next__FFLH=(void *)((unsigned long)result__HFLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JFLH)));
+          ((__POINTER *)next__FFLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__GFLH)[ 0]=next__FFLH;
+        } else {
+          next__FFLH=((__POINTER *)result__HFLH)[ 0];
+          if ((next__FFLH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HFLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__JFLH <<  1)) <=  4096)) {
+              next__FFLH=(void *)((unsigned long)result__HFLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JFLH)));
+            } else {
+              next__FFLH=new_lab__RTJ(lab_type__IFLH);
+            };
+            ((__POINTER *)next__FFLH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__GFLH)[ 0]=next__FFLH;
+          } else {
+            ((__POINTER *)result__HFLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FFLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__HFLH=next__FFLH;
+          };
+        };
+        ptr__CSBG=result__HFLH;
+      };
+      result__BSBG=((__LIP_STRING *)ptr__CSBG);
+      *(result__BSBG) = *(Self__44FF);
+    };
+    result__B5FF=result__BSBG;
   } else {
-    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);
+    Self__IPTF=((__FAST_ARRAYoLIP_STRINGo *)storage__H5FF);
+    result__B5FF=((void **)Self__IPTF->parent_arrayed_collection__G5FF.storage__JBQF)[Self__IPTF->parent_arrayed_collection__G5FF.upper__WZPF];
+    Self__4PTF=((__FAST_ARRAYoLIP_STRINGo *)storage__H5FF);
+    Self__4PTF->parent_arrayed_collection__G5FF.upper__WZPF=(__INTEGER)(Self__4PTF->parent_arrayed_collection__G5FF.upper__WZPF -  1);
   };
-  ((__LIP_STRING *)result__Q3FF)->value__FSUE=str__O3FF;
-  return(result__Q3FF);
+  ((__LIP_STRING *)result__B5FF)->value__WSUE=str__54FF;
+  return(result__B5FF);
 }
 
-static void free__DC4F(__LIP_INTEGER *Self__EC4F)
+static void free__3D4F(__LIP_INTEGER *Self__4D4F)
 // ({LIP_INTEGER}) VoidNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER new_capacity__0U5F,__tmp__4V5F,__tmp__M4GG,Self__JJJG;
+  __FAST_ARRAYoLIP_INTEGERo *Self__YU5F;
+  __BOOLEAN __tmp__IV5F;
+  void **__tmp__3V5F,**new__Y3GG;
+  Self__YU5F=((__FAST_ARRAYoLIP_INTEGERo *)storage__4YSE);
+  new_capacity__0U5F= 0;
+  if (((__INTEGER)(Self__YU5F->parent_arrayed_collection__3YSE.upper__GIXE +  1) <= (__INTEGER)(Self__YU5F->parent_arrayed_collection__3YSE.capacity__IMXE -  1))) {
+    Self__YU5F->parent_arrayed_collection__3YSE.upper__GIXE=(__INTEGER)(Self__YU5F->parent_arrayed_collection__3YSE.upper__GIXE +  1);
+    __tmp__IV5F=TRUE__;
   } else {
-    __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;
+    __tmp__IV5F=FALSE__;
+  };
+  if ((! __tmp__IV5F)) {
+    if ((Self__YU5F->parent_arrayed_collection__3YSE.capacity__IMXE ==  0)) {
+      Self__YU5F->parent_arrayed_collection__3YSE.storage__TMXE=create__JPGF( 2);
+      Self__YU5F->parent_arrayed_collection__3YSE.capacity__IMXE= 2;
+      Self__YU5F->parent_arrayed_collection__3YSE.upper__GIXE= 0;
+    } else {
+      new_capacity__0U5F=(__INTEGER)(Self__YU5F->parent_arrayed_collection__3YSE.capacity__IMXE <<  1);
+      __tmp__3V5F=Self__YU5F->parent_arrayed_collection__3YSE.storage__TMXE;
+      __tmp__4V5F=Self__YU5F->parent_arrayed_collection__3YSE.capacity__IMXE;
+      new__Y3GG=((void **)realloc_dynamic__old_size__new_size__KELC(((__POINTER )((void **)__tmp__3V5F)),((__UINTEGER_32 )(__INTEGER)(__tmp__4V5F * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__0U5F * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__M4GG=(__INTEGER)(new_capacity__0U5F -  1);
+      Self__JJJG=__tmp__4V5F;
+      while ((Self__JJJG <= __tmp__M4GG)) {
+        new__Y3GG[Self__JJJG]=NULL;
+        Self__JJJG=(__INTEGER)(Self__JJJG +  1);
+      };
+      Self__YU5F->parent_arrayed_collection__3YSE.storage__TMXE=new__Y3GG;
+      Self__YU5F->parent_arrayed_collection__3YSE.capacity__IMXE=new_capacity__0U5F;
+      Self__YU5F->parent_arrayed_collection__3YSE.upper__GIXE=(__INTEGER)(Self__YU5F->parent_arrayed_collection__3YSE.upper__GIXE +  1);
+    };
+  };
+  ((void **)Self__YU5F->parent_arrayed_collection__3YSE.storage__TMXE)[Self__YU5F->parent_arrayed_collection__3YSE.upper__GIXE]=Self__4D4F;
 }
 
-static void free__RGIG(__LIP_STRING *Self__SGIG)
+static void free__LIIG(__LIP_STRING *Self__MIIG)
 // ({LIP_STRING}) VoidNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER new_capacity__FBJG,__tmp__JCJG,__tmp__2JMG,Self__PVNG;
+  __FAST_ARRAYoLIP_STRINGo *Self__DBJG;
+  __BOOLEAN __tmp__TBJG;
+  void **__tmp__ICJG,**new__IJMG;
+  Self__DBJG=((__FAST_ARRAYoLIP_STRINGo *)storage__H5FF);
+  new_capacity__FBJG= 0;
+  if (((__INTEGER)(Self__DBJG->parent_arrayed_collection__G5FF.upper__WZPF +  1) <= (__INTEGER)(Self__DBJG->parent_arrayed_collection__G5FF.capacity__4AQF -  1))) {
+    Self__DBJG->parent_arrayed_collection__G5FF.upper__WZPF=(__INTEGER)(Self__DBJG->parent_arrayed_collection__G5FF.upper__WZPF +  1);
+    __tmp__TBJG=TRUE__;
   } else {
-    __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;
+    __tmp__TBJG=FALSE__;
+  };
+  if ((! __tmp__TBJG)) {
+    if ((Self__DBJG->parent_arrayed_collection__G5FF.capacity__4AQF ==  0)) {
+      Self__DBJG->parent_arrayed_collection__G5FF.storage__JBQF=create__ARYF( 2);
+      Self__DBJG->parent_arrayed_collection__G5FF.capacity__4AQF= 2;
+      Self__DBJG->parent_arrayed_collection__G5FF.upper__WZPF= 0;
+    } else {
+      new_capacity__FBJG=(__INTEGER)(Self__DBJG->parent_arrayed_collection__G5FF.capacity__4AQF <<  1);
+      __tmp__ICJG=Self__DBJG->parent_arrayed_collection__G5FF.storage__JBQF;
+      __tmp__JCJG=Self__DBJG->parent_arrayed_collection__G5FF.capacity__4AQF;
+      new__IJMG=((void **)realloc_dynamic__old_size__new_size__KELC(((__POINTER )((void **)__tmp__ICJG)),((__UINTEGER_32 )(__INTEGER)(__tmp__JCJG * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__FBJG * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__2JMG=(__INTEGER)(new_capacity__FBJG -  1);
+      Self__PVNG=__tmp__JCJG;
+      while ((Self__PVNG <= __tmp__2JMG)) {
+        new__IJMG[Self__PVNG]=NULL;
+        Self__PVNG=(__INTEGER)(Self__PVNG +  1);
+      };
+      Self__DBJG->parent_arrayed_collection__G5FF.storage__JBQF=new__IJMG;
+      Self__DBJG->parent_arrayed_collection__G5FF.capacity__4AQF=new_capacity__FBJG;
+      Self__DBJG->parent_arrayed_collection__G5FF.upper__WZPF=(__INTEGER)(Self__DBJG->parent_arrayed_collection__G5FF.upper__WZPF +  1);
+    };
+  };
+  ((void **)Self__DBJG->parent_arrayed_collection__G5FF.storage__JBQF)[Self__DBJG->parent_arrayed_collection__G5FF.upper__WZPF]=Self__MIIG;
 }
 
-static void load_directory__is_recursive__RCXF(__LIP_CALL *Self__SCXF,void *path__TCXF,__BOOLEAN is_rec__UCXF)
+static void load_directory__is_recursive__LEXF(__LIP_CALL *Self__MEXF,void *path__NEXF,__BOOLEAN is_rec__OEXF)
 // ({LIP_CALL},{NULLxSTRING_CONSTANT},{TRUExFALSE}) VoidRecursive, No inlinable.
 {
-  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) {
+  void *dir__QEXF,*__tmp__JFXF;
+  void *entry__PEXF;
+  __FILE_UNIX *Self__RDCH;
+  __INTEGER __tmp__NFXF,Self__CBOG;
+  void *__tmp__UFXF,*__tmp__3FXF,*__tmp__UGXF;
+  __POSITION __tmp__CHXF;
+  __BOOLEAN __tmp__XEXF,__tmp__BFXF,__tmp__4EXF,__tmp__CFXF,__tmp__AGXF;
+  __BOOLEAN __tmp__KGXF,__tmp__NGXF;
+  dir__QEXF=NULL;
+  if (FILE_SYSTEM__->parent_directory__HHD==0) {
   } else {
-    parent_directory__1FD();
+    parent_directory__GGD();
   };
-  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);
+  entry__PEXF=get_entry__DZAC(path__NEXF);
+  if (((void *)entry__PEXF != (void *)NULL)) {
+    if (((struct ___OBJ *)entry__PEXF)->__id==__DIRECTORY_UNIX__) {
+      __tmp__XEXF=((void *)((__DIRECTORY_UNIX *)entry__PEXF) != (void *)NULL);
     } else {
-      __tmp__3CXF=FALSE__;
+      __tmp__XEXF=FALSE__;
     };
-    __tmp__HDXF=__tmp__3CXF;
+    __tmp__BFXF=__tmp__XEXF;
   } else {
-    __tmp__HDXF=FALSE__;
+    __tmp__BFXF=FALSE__;
   };
-  if (__tmp__HDXF) {
-    if (((struct ___OBJ *)entry__VCXF)->__id==__DIRECTORY_UNIX__) {
-      __tmp__EDXF=open__TGRD(entry__VCXF);
+  if (__tmp__BFXF) {
+    if (((struct ___OBJ *)entry__PEXF)->__id==__DIRECTORY_UNIX__) {
+      __tmp__4EXF=open__WHRD(entry__PEXF);
     } else {
-      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);
+      Self__RDCH=((__FILE_UNIX *)entry__PEXF);
+      Self__RDCH->stream__BMRD=((__POINTER )(fopen((char*)(((__STRING_CONSTANT *)Self__RDCH->parent_entry_unix__EFF.parent_entry__QGD.path__BD)->storage__RRO),"r+b")));
+      __tmp__4EXF=(Self__RDCH->stream__BMRD != (void *)NULL);
     };
-    __tmp__IDXF=__tmp__EDXF;
+    __tmp__CFXF=__tmp__4EXF;
   } else {
-    __tmp__IDXF=FALSE__;
+    __tmp__CFXF=FALSE__;
   };
-  if (__tmp__IDXF) {
-    if (entry__VCXF==NULL) {
-      __tmp__PDXF=NULL;
+  if (__tmp__CFXF) {
+    if (entry__PEXF==NULL) {
+      __tmp__JFXF=NULL;
     } else {
-      switch (((struct ___OBJ *)entry__VCXF)->__id) {
+      switch (((struct ___OBJ *)entry__PEXF)->__id) {
       case __DIRECTORY_UNIX__: {
-        __tmp__PDXF=((void *)entry__VCXF);
+        __tmp__JFXF=((void *)entry__PEXF);
       } break;
       case __FILE_UNIX__: {
-        __tmp__PDXF=NULL;
+        __tmp__JFXF=NULL;
       } break;
       }
     };
-    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;
+    dir__QEXF=__tmp__JFXF;
+    __tmp__NFXF=((__LINKED_LISToENTRYo *)((__DIRECTORY_UNIX *)__tmp__JFXF)->parent_directory__SGD.list__FIRD)->parent_linked_collection__EIRD.upper__HR3D;
+    Self__CBOG= 1;
+    while ((Self__CBOG <= __tmp__NFXF)) {
+      entry__PEXF=item__V3PE(dir__QEXF,Self__CBOG);
+      if (((struct ___OBJ *)entry__PEXF)->__id==__DIRECTORY_UNIX__) {
+        __tmp__UFXF=((__DIRECTORY_UNIX *)entry__PEXF)->parent_entry_unix__RGD.parent_entry__QGD.name__OPT;
       } else {
-        __tmp__0DXF=((__FILE_UNIX *)entry__VCXF)->parent_entry_unix__HEF.parent_entry__FGD.name__CQT;
-      };
-      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__XKKH=(i1__YKKH > Self__0KKH->count__DD);
+        __tmp__UFXF=((__FILE_UNIX *)entry__PEXF)->parent_entry_unix__EFF.parent_entry__QGD.name__OPT;
       };
-      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;
+      if (has_suffix__QJS(__tmp__UFXF)) {
+        if (((struct ___OBJ *)entry__PEXF)->__id==__DIRECTORY_UNIX__) {
+          __tmp__3FXF=((__DIRECTORY_UNIX *)entry__PEXF)->parent_entry_unix__RGD.parent_entry__QGD.path__BD;
         } else {
-          __tmp__DEXF=((__FILE_UNIX *)entry__VCXF)->parent_entry_unix__HEF.parent_entry__FGD.path__BD;
+          __tmp__3FXF=((__FILE_UNIX *)entry__PEXF)->parent_entry_unix__EFF.parent_entry__QGD.path__BD;
         };
-        add_last__LDPD(path_file__BEXF,__tmp__DEXF);
-        __tmp__GEXF=TRUE__;
+        add_last__SEPD(path_file__1FXF,__tmp__3FXF);
+        __tmp__AGXF=TRUE__;
       } else {
-        __tmp__GEXF=FALSE__;
+        __tmp__AGXF=FALSE__;
       };
-      if ((! __tmp__GEXF)) {
-        if (is_rec__UCXF) {
-          if (((struct ___OBJ *)entry__VCXF)->__id==__DIRECTORY_UNIX__) {
-            __tmp__QEXF=((void *)((__DIRECTORY_UNIX *)entry__VCXF) != (void *)NULL);
+      if ((! __tmp__AGXF)) {
+        if (is_rec__OEXF) {
+          if (((struct ___OBJ *)entry__PEXF)->__id==__DIRECTORY_UNIX__) {
+            __tmp__KGXF=((void *)((__DIRECTORY_UNIX *)entry__PEXF) != (void *)NULL);
           } else {
-            __tmp__QEXF=FALSE__;
+            __tmp__KGXF=FALSE__;
           };
-          __tmp__TEXF=__tmp__QEXF;
+          __tmp__NGXF=__tmp__KGXF;
         } else {
-          __tmp__TEXF=FALSE__;
+          __tmp__NGXF=FALSE__;
         };
-        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;
+        if (__tmp__NGXF) {
+          if (((struct ___OBJ *)entry__PEXF)->__id==__DIRECTORY_UNIX__) {
+            __tmp__UGXF=((__DIRECTORY_UNIX *)entry__PEXF)->parent_entry_unix__RGD.parent_entry__QGD.path__BD;
           } else {
-            __tmp__0EXF=((__FILE_UNIX *)entry__VCXF)->parent_entry_unix__HEF.parent_entry__FGD.path__BD;
+            __tmp__UGXF=((__FILE_UNIX *)entry__PEXF)->parent_entry_unix__EFF.parent_entry__QGD.path__BD;
           };
-          load_directory__is_recursive__RCXF(Self__SCXF,__tmp__0EXF,TRUE__);
+          load_directory__is_recursive__LEXF(Self__MEXF,__tmp__UGXF,TRUE__);
         };
       };
-      Self__I5NG=(__INTEGER)(Self__I5NG +  1);
+      Self__CBOG=(__INTEGER)(Self__CBOG +  1);
     };
   } else {
-    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)) {
+    copy__VDS(string_tmp__VH,(&__string_332));
+    append__3OS(string_tmp__VH,path__NEXF);
+    append__3OS(string_tmp__VH,(&__string_293));
+    __tmp__CHXF=Self__MEXF->parent_lip_code__XZ4B.parent_itm_object__XFE.position__SFJ;
+    put_error__text__1PG( 2,string_tmp__VH);
+    put_position__FRG(__tmp__CHXF);
+    put_string__33F(msg_err__AQG);
+    if ((type_error__5PG !=  2)) {
       exit(( 1));
     };
   };
 }
 
-static void append_in__LNIG(__LIP_STRING *Self__MNIG,void *str__NNIG)
+static void append_in__FPIG(__LIP_STRING *Self__GPIG,void *str__HPIG)
 // ({LIP_STRING},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __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__PNIG == 'b')) {
-          add_last__GOT(str__NNIG,'\b');
-        };
-        if ((car__PNIG == 'f')) {
-          add_last__GOT(str__NNIG,'\f');
-        };
-        if ((car__PNIG == 'n')) {
-          add_last__GOT(str__NNIG,'\n');
-        };
-        if ((car__PNIG == 'r')) {
-          add_last__GOT(str__NNIG,'\r');
-        };
-        if ((car__PNIG == 't')) {
-          add_last__GOT(str__NNIG,'\t');
-        };
-        if ((car__PNIG == 'v')) {
-          add_last__GOT(str__NNIG,'\v');
-        };
-        if ((car__PNIG == '\\')) {
-          add_last__GOT(str__NNIG,'\\');
-        };
-        if ((car__PNIG == '?')) {
-          add_last__GOT(str__NNIG,'\?');
-        };
-        if ((car__PNIG == '\'')) {
-          add_last__GOT(str__NNIG,'\'');
-        };
-        if ((car__PNIG == '\"')) {
-          add_last__GOT(str__NNIG,'\"');
+  __INTEGER i__IPIG,new_capacity__IQIH,old_nb_elts__LQIH,upper__NFLH;
+  __INTEGER Self__LFLH,new_capacity__OQIH,old_nb_elts__RQIH,upper__SFLH;
+  __INTEGER Self__QFLH,new_capacity__UQIH,old_nb_elts__XQIH,upper__XFLH;
+  __INTEGER Self__VFLH,new_capacity__0QIH,old_nb_elts__3QIH,upper__2FLH;
+  __INTEGER Self__0FLH,new_capacity__ARIH,old_nb_elts__DRIH,upper__BGLH;
+  __INTEGER Self__5FLH,new_capacity__GRIH,old_nb_elts__JRIH,upper__GGLH;
+  __INTEGER Self__EGLH,new_capacity__MRIH,old_nb_elts__PRIH,upper__LGLH;
+  __INTEGER Self__JGLH,new_capacity__SRIH,old_nb_elts__VRIH,upper__QGLH;
+  __INTEGER Self__OGLH,new_capacity__YRIH,old_nb_elts__1RIH,upper__VGLH;
+  __INTEGER Self__TGLH,new_capacity__4RIH,old_nb_elts__BSIH,upper__0GLH;
+  __INTEGER Self__YGLH,new_capacity__ESIH,old_nb_elts__HSIH,upper__5GLH;
+  __INTEGER Self__3GLH,new_capacity__KSIH,old_nb_elts__NSIH,upper__EHLH;
+  __INTEGER Self__CHLH,new_capacity__QSIH,old_nb_elts__TSIH,upper__JHLH;
+  __INTEGER Self__HHLH;
+  __STRING *Self__JQIH,*Self__PQIH,*Self__VQIH,*Self__1QIH,*Self__BRIH;
+  __STRING *Self__HRIH,*Self__NRIH,*Self__TRIH,*Self__ZRIH,*Self__5RIH;
+  __STRING *Self__FSIH,*Self__LSIH,*Self__RSIH;
+  __CHARACTER car__JPIG;
+  __CHARACTER *Self__KQIH,*new__MQIH,*Self__QQIH,*new__SQIH,*Self__WQIH;
+  __CHARACTER *new__YQIH,*Self__2QIH,*new__4QIH,*Self__CRIH,*new__ERIH;
+  __CHARACTER *Self__IRIH,*new__KRIH,*Self__ORIH,*new__QRIH,*Self__URIH;
+  __CHARACTER *new__WRIH,*Self__0RIH,*new__2RIH,*Self__ASIH,*new__CSIH;
+  __CHARACTER *Self__GSIH,*new__ISIH,*Self__MSIH,*new__OSIH,*Self__SSIH;
+  __CHARACTER *new__USIH;
+  car__JPIG='\0';
+  i__IPIG= 1;
+  while ((i__IPIG <= ((__STRING_CONSTANT *)Self__GPIG->value__WSUE)->count__DD)) {
+    car__JPIG=((__CHARACTER *)((__STRING_CONSTANT *)Self__GPIG->value__WSUE)->storage__RRO)[(__INTEGER)(i__IPIG -  1)];
+    if ((car__JPIG == '\\')) {
+      i__IPIG=(__INTEGER)(i__IPIG +  1);
+      if ((i__IPIG <= ((__STRING_CONSTANT *)Self__GPIG->value__WSUE)->count__DD)) {
+        car__JPIG=((__CHARACTER *)((__STRING_CONSTANT *)Self__GPIG->value__WSUE)->storage__RRO)[(__INTEGER)(i__IPIG -  1)];
+        if ((car__JPIG == 'a')) {
+          Self__JQIH=((__STRING *)str__HPIG);
+          new_capacity__IQIH= 0;
+          if ((Self__JQIH->capacity__UCS <= Self__JQIH->count__SGC)) {
+            if ((Self__JQIH->capacity__UCS ==  0)) {
+              Self__JQIH->capacity__UCS= 32;
+              Self__JQIH->storage__3CS=create__YIEB( 32);
+            } else {
+              new_capacity__IQIH=(__INTEGER)(Self__JQIH->capacity__UCS <<  1);
+              Self__KQIH=((__CHARACTER *)Self__JQIH->storage__3CS);
+              old_nb_elts__LQIH=Self__JQIH->capacity__UCS;
+              new__MQIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__KQIH),((__UINTEGER_32 )old_nb_elts__LQIH),((__UINTEGER_32 )new_capacity__IQIH)));
+              upper__NFLH=(__INTEGER)(new_capacity__IQIH -  1);
+              Self__LFLH=old_nb_elts__LQIH;
+              while ((Self__LFLH <= upper__NFLH)) {
+                new__MQIH[Self__LFLH]='\0';
+                Self__LFLH=(__INTEGER)(Self__LFLH +  1);
+              };
+              Self__JQIH->storage__3CS=new__MQIH;
+              Self__JQIH->capacity__UCS=new_capacity__IQIH;
+            };
+          };
+          ((__CHARACTER *)Self__JQIH->storage__3CS)[Self__JQIH->count__SGC]='\a';
+          Self__JQIH->count__SGC=(__INTEGER)(Self__JQIH->count__SGC +  1);
+        };
+        if ((car__JPIG == 'b')) {
+          Self__PQIH=((__STRING *)str__HPIG);
+          new_capacity__OQIH= 0;
+          if ((Self__PQIH->capacity__UCS <= Self__PQIH->count__SGC)) {
+            if ((Self__PQIH->capacity__UCS ==  0)) {
+              Self__PQIH->capacity__UCS= 32;
+              Self__PQIH->storage__3CS=create__YIEB( 32);
+            } else {
+              new_capacity__OQIH=(__INTEGER)(Self__PQIH->capacity__UCS <<  1);
+              Self__QQIH=((__CHARACTER *)Self__PQIH->storage__3CS);
+              old_nb_elts__RQIH=Self__PQIH->capacity__UCS;
+              new__SQIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__QQIH),((__UINTEGER_32 )old_nb_elts__RQIH),((__UINTEGER_32 )new_capacity__OQIH)));
+              upper__SFLH=(__INTEGER)(new_capacity__OQIH -  1);
+              Self__QFLH=old_nb_elts__RQIH;
+              while ((Self__QFLH <= upper__SFLH)) {
+                new__SQIH[Self__QFLH]='\0';
+                Self__QFLH=(__INTEGER)(Self__QFLH +  1);
+              };
+              Self__PQIH->storage__3CS=new__SQIH;
+              Self__PQIH->capacity__UCS=new_capacity__OQIH;
+            };
+          };
+          ((__CHARACTER *)Self__PQIH->storage__3CS)[Self__PQIH->count__SGC]='\b';
+          Self__PQIH->count__SGC=(__INTEGER)(Self__PQIH->count__SGC +  1);
+        };
+        if ((car__JPIG == 'f')) {
+          Self__VQIH=((__STRING *)str__HPIG);
+          new_capacity__UQIH= 0;
+          if ((Self__VQIH->capacity__UCS <= Self__VQIH->count__SGC)) {
+            if ((Self__VQIH->capacity__UCS ==  0)) {
+              Self__VQIH->capacity__UCS= 32;
+              Self__VQIH->storage__3CS=create__YIEB( 32);
+            } else {
+              new_capacity__UQIH=(__INTEGER)(Self__VQIH->capacity__UCS <<  1);
+              Self__WQIH=((__CHARACTER *)Self__VQIH->storage__3CS);
+              old_nb_elts__XQIH=Self__VQIH->capacity__UCS;
+              new__YQIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__WQIH),((__UINTEGER_32 )old_nb_elts__XQIH),((__UINTEGER_32 )new_capacity__UQIH)));
+              upper__XFLH=(__INTEGER)(new_capacity__UQIH -  1);
+              Self__VFLH=old_nb_elts__XQIH;
+              while ((Self__VFLH <= upper__XFLH)) {
+                new__YQIH[Self__VFLH]='\0';
+                Self__VFLH=(__INTEGER)(Self__VFLH +  1);
+              };
+              Self__VQIH->storage__3CS=new__YQIH;
+              Self__VQIH->capacity__UCS=new_capacity__UQIH;
+            };
+          };
+          ((__CHARACTER *)Self__VQIH->storage__3CS)[Self__VQIH->count__SGC]='\f';
+          Self__VQIH->count__SGC=(__INTEGER)(Self__VQIH->count__SGC +  1);
+        };
+        if ((car__JPIG == 'n')) {
+          Self__1QIH=((__STRING *)str__HPIG);
+          new_capacity__0QIH= 0;
+          if ((Self__1QIH->capacity__UCS <= Self__1QIH->count__SGC)) {
+            if ((Self__1QIH->capacity__UCS ==  0)) {
+              Self__1QIH->capacity__UCS= 32;
+              Self__1QIH->storage__3CS=create__YIEB( 32);
+            } else {
+              new_capacity__0QIH=(__INTEGER)(Self__1QIH->capacity__UCS <<  1);
+              Self__2QIH=((__CHARACTER *)Self__1QIH->storage__3CS);
+              old_nb_elts__3QIH=Self__1QIH->capacity__UCS;
+              new__4QIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__2QIH),((__UINTEGER_32 )old_nb_elts__3QIH),((__UINTEGER_32 )new_capacity__0QIH)));
+              upper__2FLH=(__INTEGER)(new_capacity__0QIH -  1);
+              Self__0FLH=old_nb_elts__3QIH;
+              while ((Self__0FLH <= upper__2FLH)) {
+                new__4QIH[Self__0FLH]='\0';
+                Self__0FLH=(__INTEGER)(Self__0FLH +  1);
+              };
+              Self__1QIH->storage__3CS=new__4QIH;
+              Self__1QIH->capacity__UCS=new_capacity__0QIH;
+            };
+          };
+          ((__CHARACTER *)Self__1QIH->storage__3CS)[Self__1QIH->count__SGC]='\n';
+          Self__1QIH->count__SGC=(__INTEGER)(Self__1QIH->count__SGC +  1);
+        };
+        if ((car__JPIG == 'r')) {
+          Self__BRIH=((__STRING *)str__HPIG);
+          new_capacity__ARIH= 0;
+          if ((Self__BRIH->capacity__UCS <= Self__BRIH->count__SGC)) {
+            if ((Self__BRIH->capacity__UCS ==  0)) {
+              Self__BRIH->capacity__UCS= 32;
+              Self__BRIH->storage__3CS=create__YIEB( 32);
+            } else {
+              new_capacity__ARIH=(__INTEGER)(Self__BRIH->capacity__UCS <<  1);
+              Self__CRIH=((__CHARACTER *)Self__BRIH->storage__3CS);
+              old_nb_elts__DRIH=Self__BRIH->capacity__UCS;
+              new__ERIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__CRIH),((__UINTEGER_32 )old_nb_elts__DRIH),((__UINTEGER_32 )new_capacity__ARIH)));
+              upper__BGLH=(__INTEGER)(new_capacity__ARIH -  1);
+              Self__5FLH=old_nb_elts__DRIH;
+              while ((Self__5FLH <= upper__BGLH)) {
+                new__ERIH[Self__5FLH]='\0';
+                Self__5FLH=(__INTEGER)(Self__5FLH +  1);
+              };
+              Self__BRIH->storage__3CS=new__ERIH;
+              Self__BRIH->capacity__UCS=new_capacity__ARIH;
+            };
+          };
+          ((__CHARACTER *)Self__BRIH->storage__3CS)[Self__BRIH->count__SGC]='\r';
+          Self__BRIH->count__SGC=(__INTEGER)(Self__BRIH->count__SGC +  1);
+        };
+        if ((car__JPIG == 't')) {
+          Self__HRIH=((__STRING *)str__HPIG);
+          new_capacity__GRIH= 0;
+          if ((Self__HRIH->capacity__UCS <= Self__HRIH->count__SGC)) {
+            if ((Self__HRIH->capacity__UCS ==  0)) {
+              Self__HRIH->capacity__UCS= 32;
+              Self__HRIH->storage__3CS=create__YIEB( 32);
+            } else {
+              new_capacity__GRIH=(__INTEGER)(Self__HRIH->capacity__UCS <<  1);
+              Self__IRIH=((__CHARACTER *)Self__HRIH->storage__3CS);
+              old_nb_elts__JRIH=Self__HRIH->capacity__UCS;
+              new__KRIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__IRIH),((__UINTEGER_32 )old_nb_elts__JRIH),((__UINTEGER_32 )new_capacity__GRIH)));
+              upper__GGLH=(__INTEGER)(new_capacity__GRIH -  1);
+              Self__EGLH=old_nb_elts__JRIH;
+              while ((Self__EGLH <= upper__GGLH)) {
+                new__KRIH[Self__EGLH]='\0';
+                Self__EGLH=(__INTEGER)(Self__EGLH +  1);
+              };
+              Self__HRIH->storage__3CS=new__KRIH;
+              Self__HRIH->capacity__UCS=new_capacity__GRIH;
+            };
+          };
+          ((__CHARACTER *)Self__HRIH->storage__3CS)[Self__HRIH->count__SGC]='\t';
+          Self__HRIH->count__SGC=(__INTEGER)(Self__HRIH->count__SGC +  1);
+        };
+        if ((car__JPIG == 'v')) {
+          Self__NRIH=((__STRING *)str__HPIG);
+          new_capacity__MRIH= 0;
+          if ((Self__NRIH->capacity__UCS <= Self__NRIH->count__SGC)) {
+            if ((Self__NRIH->capacity__UCS ==  0)) {
+              Self__NRIH->capacity__UCS= 32;
+              Self__NRIH->storage__3CS=create__YIEB( 32);
+            } else {
+              new_capacity__MRIH=(__INTEGER)(Self__NRIH->capacity__UCS <<  1);
+              Self__ORIH=((__CHARACTER *)Self__NRIH->storage__3CS);
+              old_nb_elts__PRIH=Self__NRIH->capacity__UCS;
+              new__QRIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__ORIH),((__UINTEGER_32 )old_nb_elts__PRIH),((__UINTEGER_32 )new_capacity__MRIH)));
+              upper__LGLH=(__INTEGER)(new_capacity__MRIH -  1);
+              Self__JGLH=old_nb_elts__PRIH;
+              while ((Self__JGLH <= upper__LGLH)) {
+                new__QRIH[Self__JGLH]='\0';
+                Self__JGLH=(__INTEGER)(Self__JGLH +  1);
+              };
+              Self__NRIH->storage__3CS=new__QRIH;
+              Self__NRIH->capacity__UCS=new_capacity__MRIH;
+            };
+          };
+          ((__CHARACTER *)Self__NRIH->storage__3CS)[Self__NRIH->count__SGC]='\v';
+          Self__NRIH->count__SGC=(__INTEGER)(Self__NRIH->count__SGC +  1);
+        };
+        if ((car__JPIG == '\\')) {
+          Self__TRIH=((__STRING *)str__HPIG);
+          new_capacity__SRIH= 0;
+          if ((Self__TRIH->capacity__UCS <= Self__TRIH->count__SGC)) {
+            if ((Self__TRIH->capacity__UCS ==  0)) {
+              Self__TRIH->capacity__UCS= 32;
+              Self__TRIH->storage__3CS=create__YIEB( 32);
+            } else {
+              new_capacity__SRIH=(__INTEGER)(Self__TRIH->capacity__UCS <<  1);
+              Self__URIH=((__CHARACTER *)Self__TRIH->storage__3CS);
+              old_nb_elts__VRIH=Self__TRIH->capacity__UCS;
+              new__WRIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__URIH),((__UINTEGER_32 )old_nb_elts__VRIH),((__UINTEGER_32 )new_capacity__SRIH)));
+              upper__QGLH=(__INTEGER)(new_capacity__SRIH -  1);
+              Self__OGLH=old_nb_elts__VRIH;
+              while ((Self__OGLH <= upper__QGLH)) {
+                new__WRIH[Self__OGLH]='\0';
+                Self__OGLH=(__INTEGER)(Self__OGLH +  1);
+              };
+              Self__TRIH->storage__3CS=new__WRIH;
+              Self__TRIH->capacity__UCS=new_capacity__SRIH;
+            };
+          };
+          ((__CHARACTER *)Self__TRIH->storage__3CS)[Self__TRIH->count__SGC]='\\';
+          Self__TRIH->count__SGC=(__INTEGER)(Self__TRIH->count__SGC +  1);
+        };
+        if ((car__JPIG == '?')) {
+          Self__ZRIH=((__STRING *)str__HPIG);
+          new_capacity__YRIH= 0;
+          if ((Self__ZRIH->capacity__UCS <= Self__ZRIH->count__SGC)) {
+            if ((Self__ZRIH->capacity__UCS ==  0)) {
+              Self__ZRIH->capacity__UCS= 32;
+              Self__ZRIH->storage__3CS=create__YIEB( 32);
+            } else {
+              new_capacity__YRIH=(__INTEGER)(Self__ZRIH->capacity__UCS <<  1);
+              Self__0RIH=((__CHARACTER *)Self__ZRIH->storage__3CS);
+              old_nb_elts__1RIH=Self__ZRIH->capacity__UCS;
+              new__2RIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__0RIH),((__UINTEGER_32 )old_nb_elts__1RIH),((__UINTEGER_32 )new_capacity__YRIH)));
+              upper__VGLH=(__INTEGER)(new_capacity__YRIH -  1);
+              Self__TGLH=old_nb_elts__1RIH;
+              while ((Self__TGLH <= upper__VGLH)) {
+                new__2RIH[Self__TGLH]='\0';
+                Self__TGLH=(__INTEGER)(Self__TGLH +  1);
+              };
+              Self__ZRIH->storage__3CS=new__2RIH;
+              Self__ZRIH->capacity__UCS=new_capacity__YRIH;
+            };
+          };
+          ((__CHARACTER *)Self__ZRIH->storage__3CS)[Self__ZRIH->count__SGC]='\?';
+          Self__ZRIH->count__SGC=(__INTEGER)(Self__ZRIH->count__SGC +  1);
+        };
+        if ((car__JPIG == '\'')) {
+          Self__5RIH=((__STRING *)str__HPIG);
+          new_capacity__4RIH= 0;
+          if ((Self__5RIH->capacity__UCS <= Self__5RIH->count__SGC)) {
+            if ((Self__5RIH->capacity__UCS ==  0)) {
+              Self__5RIH->capacity__UCS= 32;
+              Self__5RIH->storage__3CS=create__YIEB( 32);
+            } else {
+              new_capacity__4RIH=(__INTEGER)(Self__5RIH->capacity__UCS <<  1);
+              Self__ASIH=((__CHARACTER *)Self__5RIH->storage__3CS);
+              old_nb_elts__BSIH=Self__5RIH->capacity__UCS;
+              new__CSIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__ASIH),((__UINTEGER_32 )old_nb_elts__BSIH),((__UINTEGER_32 )new_capacity__4RIH)));
+              upper__0GLH=(__INTEGER)(new_capacity__4RIH -  1);
+              Self__YGLH=old_nb_elts__BSIH;
+              while ((Self__YGLH <= upper__0GLH)) {
+                new__CSIH[Self__YGLH]='\0';
+                Self__YGLH=(__INTEGER)(Self__YGLH +  1);
+              };
+              Self__5RIH->storage__3CS=new__CSIH;
+              Self__5RIH->capacity__UCS=new_capacity__4RIH;
+            };
+          };
+          ((__CHARACTER *)Self__5RIH->storage__3CS)[Self__5RIH->count__SGC]='\'';
+          Self__5RIH->count__SGC=(__INTEGER)(Self__5RIH->count__SGC +  1);
+        };
+        if ((car__JPIG == '\"')) {
+          Self__FSIH=((__STRING *)str__HPIG);
+          new_capacity__ESIH= 0;
+          if ((Self__FSIH->capacity__UCS <= Self__FSIH->count__SGC)) {
+            if ((Self__FSIH->capacity__UCS ==  0)) {
+              Self__FSIH->capacity__UCS= 32;
+              Self__FSIH->storage__3CS=create__YIEB( 32);
+            } else {
+              new_capacity__ESIH=(__INTEGER)(Self__FSIH->capacity__UCS <<  1);
+              Self__GSIH=((__CHARACTER *)Self__FSIH->storage__3CS);
+              old_nb_elts__HSIH=Self__FSIH->capacity__UCS;
+              new__ISIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__GSIH),((__UINTEGER_32 )old_nb_elts__HSIH),((__UINTEGER_32 )new_capacity__ESIH)));
+              upper__5GLH=(__INTEGER)(new_capacity__ESIH -  1);
+              Self__3GLH=old_nb_elts__HSIH;
+              while ((Self__3GLH <= upper__5GLH)) {
+                new__ISIH[Self__3GLH]='\0';
+                Self__3GLH=(__INTEGER)(Self__3GLH +  1);
+              };
+              Self__FSIH->storage__3CS=new__ISIH;
+              Self__FSIH->capacity__UCS=new_capacity__ESIH;
+            };
+          };
+          ((__CHARACTER *)Self__FSIH->storage__3CS)[Self__FSIH->count__SGC]='\"';
+          Self__FSIH->count__SGC=(__INTEGER)(Self__FSIH->count__SGC +  1);
         };
       } else {
-        add_last__GOT(str__NNIG,car__PNIG);
+        Self__LSIH=((__STRING *)str__HPIG);
+        new_capacity__KSIH= 0;
+        if ((Self__LSIH->capacity__UCS <= Self__LSIH->count__SGC)) {
+          if ((Self__LSIH->capacity__UCS ==  0)) {
+            Self__LSIH->capacity__UCS= 32;
+            Self__LSIH->storage__3CS=create__YIEB( 32);
+          } else {
+            new_capacity__KSIH=(__INTEGER)(Self__LSIH->capacity__UCS <<  1);
+            Self__MSIH=((__CHARACTER *)Self__LSIH->storage__3CS);
+            old_nb_elts__NSIH=Self__LSIH->capacity__UCS;
+            new__OSIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__MSIH),((__UINTEGER_32 )old_nb_elts__NSIH),((__UINTEGER_32 )new_capacity__KSIH)));
+            upper__EHLH=(__INTEGER)(new_capacity__KSIH -  1);
+            Self__CHLH=old_nb_elts__NSIH;
+            while ((Self__CHLH <= upper__EHLH)) {
+              new__OSIH[Self__CHLH]='\0';
+              Self__CHLH=(__INTEGER)(Self__CHLH +  1);
+            };
+            Self__LSIH->storage__3CS=new__OSIH;
+            Self__LSIH->capacity__UCS=new_capacity__KSIH;
+          };
+        };
+        ((__CHARACTER *)Self__LSIH->storage__3CS)[Self__LSIH->count__SGC]=car__JPIG;
+        Self__LSIH->count__SGC=(__INTEGER)(Self__LSIH->count__SGC +  1);
       };
     } else {
-      add_last__GOT(str__NNIG,car__PNIG);
+      Self__RSIH=((__STRING *)str__HPIG);
+      new_capacity__QSIH= 0;
+      if ((Self__RSIH->capacity__UCS <= Self__RSIH->count__SGC)) {
+        if ((Self__RSIH->capacity__UCS ==  0)) {
+          Self__RSIH->capacity__UCS= 32;
+          Self__RSIH->storage__3CS=create__YIEB( 32);
+        } else {
+          new_capacity__QSIH=(__INTEGER)(Self__RSIH->capacity__UCS <<  1);
+          Self__SSIH=((__CHARACTER *)Self__RSIH->storage__3CS);
+          old_nb_elts__TSIH=Self__RSIH->capacity__UCS;
+          new__USIH=((__CHARACTER *)realloc_dynamic__old_size__new_size__KELC(((__POINTER )Self__SSIH),((__UINTEGER_32 )old_nb_elts__TSIH),((__UINTEGER_32 )new_capacity__QSIH)));
+          upper__JHLH=(__INTEGER)(new_capacity__QSIH -  1);
+          Self__HHLH=old_nb_elts__TSIH;
+          while ((Self__HHLH <= upper__JHLH)) {
+            new__USIH[Self__HHLH]='\0';
+            Self__HHLH=(__INTEGER)(Self__HHLH +  1);
+          };
+          Self__RSIH->storage__3CS=new__USIH;
+          Self__RSIH->capacity__UCS=new_capacity__QSIH;
+        };
+      };
+      ((__CHARACTER *)Self__RSIH->storage__3CS)[Self__RSIH->count__SGC]=car__JPIG;
+      Self__RSIH->count__SGC=(__INTEGER)(Self__RSIH->count__SGC +  1);
     };
-    i__ONIG=(__INTEGER)(i__ONIG +  1);
+    i__IPIG=(__INTEGER)(i__IPIG +  1);
   };
 }
 
-static void print_positif__1FLG(__INTEGER Self__2FLG)
+static void print_positif__VHLG(__INTEGER Self__WHLG)
 // ({INTEGER}) VoidRecursive, No inlinable.
 {
-  __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);
+  __INTEGER val__5HLG;
+  __CHARACTER char__4HLG;
+  char__4HLG=((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )(__INTEGER)(Self__WHLG %  10)) + ((__INTEGER_8 )'0')))));
+  val__5HLG=(__INTEGER)(Self__WHLG /  10);
+  if ((val__5HLG !=  0)) {
+    print_positif__VHLG(val__5HLG);
+  };
+  fputc((int)(char__4HLG),stdout);
 }
 
-static __BOOLEAN has__3LMB(__HASHED_SEToSTRING_CONSTANTo *Self__4LMB,void *e__5LMB)
+static __BOOLEAN fast_has__1K1(__HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo *Self__2K1,void *e__3K1)
+// ({HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo},{NULLxFAST_ARRAYoITM_TYPE_MONOo}) With resultNo recursive, No inlinable.
+{
+  void *node__GL1;
+  node__GL1=((void **)Self__2K1->buckets__K5V)[(__INTEGER)(hash_code__S30(e__3K1) % Self__2K1->capacity__F5V)];
+  while ((! (((void *)node__GL1 == (void *)NULL) || ((void *)((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__GL1)->item__W5V == (void *)e__3K1)))) {
+    node__GL1=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__GL1)->next__CAW;
+  };
+  return(((void *)node__GL1 != (void *)NULL));
+}
+
+static __BOOLEAN has__MIMB(__HASHED_SEToSTRING_CONSTANTo *Self__NIMB,void *e__OIMB)
 // ({HASHED_SEToSTRING_CONSTANTo},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __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));
+  void *node__XIMB;
+  node__XIMB=((void **)Self__NIMB->buckets__DEV)[(__INTEGER)(hash_code__RNW(e__OIMB) % Self__NIMB->capacity__HIT)];
+  while ((! (((void *)node__XIMB == (void *)NULL) || __infix_equal_equal__V2DB(((__HASHED_SET_NODEoSTRING_CONSTANTo *)node__XIMB)->item__PEV,e__OIMB)))) {
+    node__XIMB=((__HASHED_SET_NODEoSTRING_CONSTANTo *)node__XIMB)->next__0EV;
+  };
+  return(((void *)node__XIMB != (void *)NULL));
 }
 
-static __FAST_ARRAYoITM_LOCALo* create_with_capacity__5KK(__INTEGER new_count__BLK)
+static __FAST_ARRAYoITM_LOCALo* create_with_capacity__LLK(__INTEGER new_count__NLK)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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__;
+  __POINTER ptr__J5K,ptr_table__MHLH,next__LHLH,result__NHLH;
+  __POINTER ptr_table__RHLH,next__QHLH,result__SHLH;
+  __INTEGER typ_id__O5K;
+  __UINTEGER_32 sz__L5K,a__OMGH,new_size__PMGH,t__TMGH,a__SMGH;
+  __UINTEGER_32 new_size__UHLH,lab_type__THLH;
+  __FAST_ARRAYoITM_LOCALo *result__I5K,*Self__KOU;
+  result__I5K=NULL;
+  ptr__J5K=((__POINTER )(NULL));
+  typ_id__O5K= 0;
+  sz__L5K=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_LOCALo));
+  if ((sz__L5K ==  0)) {
+    result__I5K=FAST_ARRAYoITM_LOCALo__;
   } else {
-    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);
+    typ_id__O5K=__FAST_ARRAYoITM_LOCALo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__L5K);
+    if ((typ_id__O5K == (__INTEGER)(-  1))) {
+      a__OMGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__PMGH=(__UINTEGER_32)((__UINTEGER_32)(sz__L5K + a__OMGH) & (__UINTEGER_32)(~ a__OMGH));
+      ptr_table__MHLH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__PMGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__LHLH=((__POINTER )(NULL));
+      result__NHLH=((__POINTER *)ptr_table__MHLH)[ 0];
+      if ((result__NHLH == (void *)NULL)) {
+        result__NHLH=new_lab__RTJ(new_size__PMGH);
+        next__LHLH=(void *)((unsigned long)result__NHLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PMGH)));
+        ((__POINTER *)next__LHLH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__MHLH)[ 0]=next__LHLH;
+      } else {
+        next__LHLH=((__POINTER *)result__NHLH)[ 0];
+        if ((next__LHLH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__NHLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__PMGH <<  1)) <=  4096)) {
+            next__LHLH=(void *)((unsigned long)result__NHLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PMGH)));
+          } else {
+            next__LHLH=new_lab__RTJ(new_size__PMGH);
+          };
+          ((__POINTER *)next__LHLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__MHLH)[ 0]=next__LHLH;
+        } else {
+          ((__POINTER *)result__NHLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LHLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__NHLH=next__LHLH;
+        };
+      };
+      ptr__J5K=result__NHLH;
+    } else {
+      t__TMGH=((__UINTEGER_32 )typ_id__O5K);
+      a__SMGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__UHLH=(__UINTEGER_32)((__UINTEGER_32)(sz__L5K + a__SMGH) & (__UINTEGER_32)(~ a__SMGH));
+      ptr_table__RHLH=((__POINTER )(&(table_type[(t__TMGH)])));
+      lab_type__THLH=(__UINTEGER_32)(t__TMGH |  1);
+      next__QHLH=((__POINTER )(NULL));
+      result__SHLH=((__POINTER *)ptr_table__RHLH)[ 0];
+      if ((result__SHLH == (void *)NULL)) {
+        result__SHLH=new_lab__RTJ(lab_type__THLH);
+        next__QHLH=(void *)((unsigned long)result__SHLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UHLH)));
+        ((__POINTER *)next__QHLH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__RHLH)[ 0]=next__QHLH;
+      } else {
+        next__QHLH=((__POINTER *)result__SHLH)[ 0];
+        if ((next__QHLH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__SHLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__UHLH <<  1)) <=  4096)) {
+            next__QHLH=(void *)((unsigned long)result__SHLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UHLH)));
+          } else {
+            next__QHLH=new_lab__RTJ(lab_type__THLH);
+          };
+          ((__POINTER *)next__QHLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__RHLH)[ 0]=next__QHLH;
+        } else {
+          ((__POINTER *)result__SHLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QHLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__SHLH=next__QHLH;
+        };
+      };
+      ptr__J5K=result__SHLH;
+    };
+    result__I5K=((__FAST_ARRAYoITM_LOCALo *)ptr__J5K);
+    *(result__I5K) = *(FAST_ARRAYoITM_LOCALo__);
+  };
+  Self__KOU=((__FAST_ARRAYoITM_LOCALo *)result__I5K);
+  if ((Self__KOU->parent_arrayed_collection__T3H.capacity__IMU < new_count__NLK)) {
+    Self__KOU->parent_arrayed_collection__T3H.storage__TMU=create__KPQB(new_count__NLK);
+    Self__KOU->parent_arrayed_collection__T3H.capacity__IMU=new_count__NLK;
+  };
+  Self__KOU->parent_arrayed_collection__T3H.upper__M2K=(__INTEGER)(-  1);
+  return(result__I5K);
 }
 
-static void add_last__N2U(__FAST_ARRAYoITM_LOCALo *Self__O2U,void *element__P2U)
+static void add_last__Z1U(__FAST_ARRAYoITM_LOCALo *Self__01U,void *element__11U)
 // ({FAST_ARRAYoITM_LOCALo},{NULLxITM_LOCAL}) VoidNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER new_capacity__21U,__tmp__A3U,__tmp__0BEC,Self__KKVD;
+  __BOOLEAN __tmp__K2U;
+  void **__tmp__52U,**new__GBEC;
+  new_capacity__21U= 0;
+  if (((__INTEGER)(Self__01U->parent_arrayed_collection__T3H.upper__M2K +  1) <= (__INTEGER)(Self__01U->parent_arrayed_collection__T3H.capacity__IMU -  1))) {
+    Self__01U->parent_arrayed_collection__T3H.upper__M2K=(__INTEGER)(Self__01U->parent_arrayed_collection__T3H.upper__M2K +  1);
+    __tmp__K2U=TRUE__;
   } else {
-    __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;
+    __tmp__K2U=FALSE__;
+  };
+  if ((! __tmp__K2U)) {
+    if ((Self__01U->parent_arrayed_collection__T3H.capacity__IMU ==  0)) {
+      Self__01U->parent_arrayed_collection__T3H.storage__TMU=create__KPQB( 2);
+      Self__01U->parent_arrayed_collection__T3H.capacity__IMU= 2;
+      Self__01U->parent_arrayed_collection__T3H.upper__M2K= 0;
+    } else {
+      new_capacity__21U=(__INTEGER)(Self__01U->parent_arrayed_collection__T3H.capacity__IMU <<  1);
+      __tmp__52U=Self__01U->parent_arrayed_collection__T3H.storage__TMU;
+      __tmp__A3U=Self__01U->parent_arrayed_collection__T3H.capacity__IMU;
+      new__GBEC=((void **)realloc_dynamic__old_size__new_size__KELC(((__POINTER )((void **)__tmp__52U)),((__UINTEGER_32 )(__INTEGER)(__tmp__A3U * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__21U * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__0BEC=(__INTEGER)(new_capacity__21U -  1);
+      Self__KKVD=__tmp__A3U;
+      while ((Self__KKVD <= __tmp__0BEC)) {
+        new__GBEC[Self__KKVD]=NULL;
+        Self__KKVD=(__INTEGER)(Self__KKVD +  1);
+      };
+      Self__01U->parent_arrayed_collection__T3H.storage__TMU=new__GBEC;
+      Self__01U->parent_arrayed_collection__T3H.capacity__IMU=new_capacity__21U;
+      Self__01U->parent_arrayed_collection__T3H.upper__M2K=(__INTEGER)(Self__01U->parent_arrayed_collection__T3H.upper__M2K +  1);
+    };
+  };
+  ((void **)Self__01U->parent_arrayed_collection__T3H.storage__TMU)[Self__01U->parent_arrayed_collection__T3H.upper__M2K]=element__11U;
 }
 
-static void free__FLK(void *tmp__HLK)
+static void free__RLK(void *tmp__TLK)
 // ({NULLxFAST_ARRAYoITM_LOCALo}) VoidNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER new_capacity__DQU,__tmp__HRU,__tmp__O5DC,Self__LIVD;
+  __FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *Self__BQU;
+  __BOOLEAN __tmp__RQU;
+  void **__tmp__GRU,**new__04DC;
+  ((__FAST_ARRAYoITM_LOCALo *)tmp__TLK)->parent_arrayed_collection__T3H.upper__M2K=(__INTEGER)(-  1);
+  Self__BQU=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__0TI);
+  new_capacity__DQU= 0;
+  if (((__INTEGER)(Self__BQU->parent_arrayed_collection__ZTI.upper__C3T +  1) <= (__INTEGER)(Self__BQU->parent_arrayed_collection__ZTI.capacity__NKU -  1))) {
+    Self__BQU->parent_arrayed_collection__ZTI.upper__C3T=(__INTEGER)(Self__BQU->parent_arrayed_collection__ZTI.upper__C3T +  1);
+    __tmp__RQU=TRUE__;
   } else {
-    __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;
+    __tmp__RQU=FALSE__;
+  };
+  if ((! __tmp__RQU)) {
+    if ((Self__BQU->parent_arrayed_collection__ZTI.capacity__NKU ==  0)) {
+      Self__BQU->parent_arrayed_collection__ZTI.storage__YKU=create__NFQB( 2);
+      Self__BQU->parent_arrayed_collection__ZTI.capacity__NKU= 2;
+      Self__BQU->parent_arrayed_collection__ZTI.upper__C3T= 0;
+    } else {
+      new_capacity__DQU=(__INTEGER)(Self__BQU->parent_arrayed_collection__ZTI.capacity__NKU <<  1);
+      __tmp__GRU=Self__BQU->parent_arrayed_collection__ZTI.storage__YKU;
+      __tmp__HRU=Self__BQU->parent_arrayed_collection__ZTI.capacity__NKU;
+      new__04DC=((void **)realloc_dynamic__old_size__new_size__KELC(((__POINTER )((void **)__tmp__GRU)),((__UINTEGER_32 )(__INTEGER)(__tmp__HRU * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__DQU * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__O5DC=(__INTEGER)(new_capacity__DQU -  1);
+      Self__LIVD=__tmp__HRU;
+      while ((Self__LIVD <= __tmp__O5DC)) {
+        new__04DC[Self__LIVD]=NULL;
+        Self__LIVD=(__INTEGER)(Self__LIVD +  1);
+      };
+      Self__BQU->parent_arrayed_collection__ZTI.storage__YKU=new__04DC;
+      Self__BQU->parent_arrayed_collection__ZTI.capacity__NKU=new_capacity__DQU;
+      Self__BQU->parent_arrayed_collection__ZTI.upper__C3T=(__INTEGER)(Self__BQU->parent_arrayed_collection__ZTI.upper__C3T +  1);
+    };
+  };
+  ((void **)Self__BQU->parent_arrayed_collection__ZTI.storage__YKU)[Self__BQU->parent_arrayed_collection__ZTI.upper__C3T]=tmp__TLK;
 }
 
-static void* copy__O5J(void *tmp__Q5J)
+static void* copy__05J(void *tmp__25J)
 // ({NULLxFAST_ARRAYoITM_LOCALo}) With resultNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER new_capacity__5LU,other_upper__4LU,Self__54JC;
+  void *result__45J;
+  __FAST_ARRAYoITM_LOCALo *Self__2LU;
+  void **__tmp__WMU,**__tmp__YMU,**Self__VSCC;
+  result__45J=create_with_capacity__LLK((__INTEGER)(((__FAST_ARRAYoITM_LOCALo *)tmp__25J)->parent_arrayed_collection__T3H.upper__M2K +  1));
+  Self__2LU=((__FAST_ARRAYoITM_LOCALo *)result__45J);
+  new_capacity__5LU= 0;
+  other_upper__4LU=((__FAST_ARRAYoITM_LOCALo *)tmp__25J)->parent_arrayed_collection__T3H.upper__M2K;
+  if ((other_upper__4LU >=  0)) {
+    new_capacity__5LU=(__INTEGER)(other_upper__4LU +  1);
+    if ((Self__2LU->parent_arrayed_collection__T3H.capacity__IMU < new_capacity__5LU)) {
+      Self__2LU->parent_arrayed_collection__T3H.storage__TMU=create__KPQB(new_capacity__5LU);
+      Self__2LU->parent_arrayed_collection__T3H.capacity__IMU=new_capacity__5LU;
+    };
+    __tmp__WMU=Self__2LU->parent_arrayed_collection__T3H.storage__TMU;
+    __tmp__YMU=((__FAST_ARRAYoITM_LOCALo *)tmp__25J)->parent_arrayed_collection__T3H.storage__TMU;
+    Self__VSCC=((void **)__tmp__WMU);
+    Self__54JC=other_upper__4LU;
+    while ((Self__54JC >=  0)) {
+      Self__VSCC[Self__54JC]=((void **)__tmp__YMU)[Self__54JC];
+      Self__54JC=(__INTEGER)(Self__54JC -  1);
+    };
+  };
+  Self__2LU->parent_arrayed_collection__T3H.upper__M2K=other_upper__4LU;
+  free__RLK(tmp__25J);
+  return(result__45J);
+}
+
+static void append_collection__RDPD(__FAST_ARRAYoITM_LOCALo *Self__SDPD,void *other__TDPD)
+// ({FAST_ARRAYoITM_LOCALo},{NULLxFAST_ARRAYoITM_LOCALo}) VoidNo recursive, No inlinable.
+{
+  __INTEGER __tmp__3DPD,Self__MVUD;
+  __tmp__3DPD=((__FAST_ARRAYoITM_LOCALo *)other__TDPD)->parent_arrayed_collection__T3H.upper__M2K;
+  Self__MVUD= 0;
+  while ((Self__MVUD <= __tmp__3DPD)) {
+    add_last__Z1U(Self__SDPD,((void **)((__FAST_ARRAYoITM_LOCALo *)other__TDPD)->parent_arrayed_collection__T3H.storage__TMU)[Self__MVUD]);
+    Self__MVUD=(__INTEGER)(Self__MVUD +  1);
+  };
 }
 
-static void** create__3UQB(__INTEGER nb_elements__5UQB)
+static void** create__KRQB(__INTEGER nb_elements__MRQB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__ZFHH,a__YFHH,new_size__0FHH,new_size2__1FHH,a__2FHH;
+  __UINTEGER_32 new_size__3FHH;
+  __POINTER result__XFHH,ptr_table__WHLH,next__VHLH,result__XHLH;
+  __INTEGER Self__T1MC;
+  void **Result__PMTB;
+  sz__ZFHH=((__UINTEGER_32 )(__INTEGER)(nb_elements__MRQB * ((__INTEGER )(sizeof(void *)))));
+  result__XFHH=((__POINTER )(NULL));
+  a__YFHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__0FHH=(__UINTEGER_32)((__UINTEGER_32)(sz__ZFHH + a__YFHH) & (__UINTEGER_32)(~ a__YFHH));
+  new_size2__1FHH=(__UINTEGER_32)(new_size__0FHH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__1FHH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__2FHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__3FHH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__1FHH + a__2FHH) & (__UINTEGER_32)(~ a__2FHH));
+    ptr_table__WHLH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__3FHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__VHLH=((__POINTER )(NULL));
+    result__XHLH=((__POINTER *)ptr_table__WHLH)[ 0];
+    if ((result__XHLH == (void *)NULL)) {
+      result__XHLH=new_lab__RTJ(new_size__3FHH);
+      next__VHLH=(void *)((unsigned long)result__XHLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3FHH)));
+      ((__POINTER *)next__VHLH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__WHLH)[ 0]=next__VHLH;
+    } else {
+      next__VHLH=((__POINTER *)result__XHLH)[ 0];
+      if ((next__VHLH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XHLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__3FHH <<  1)) <=  4096)) {
+          next__VHLH=(void *)((unsigned long)result__XHLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3FHH)));
+        } else {
+          next__VHLH=new_lab__RTJ(new_size__3FHH);
+        };
+        ((__POINTER *)next__VHLH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__WHLH)[ 0]=next__VHLH;
+      } else {
+        ((__POINTER *)result__XHLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VHLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__XHLH=next__VHLH;
+      };
+    };
+    ((__POINTER *)result__XHLH)[ 0]=((__POINTER ) 3);
+    result__XFHH=(void *)((unsigned long)result__XHLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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__LLKH == (void *)NULL)) {
-      result__LLKH=new_page__YC5();
-    };
-    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__XFHH=(void *)((unsigned long)((__POINTER )((__MEMORY *)search__XAVB(new_size__0FHH))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__PMTB=((void **)result__XFHH);
+  Self__T1MC=(__INTEGER)(nb_elements__MRQB -  1);
+  while ((Self__T1MC >=  0)) {
+    Result__PMTB[Self__T1MC]=NULL;
+    Self__T1MC=(__INTEGER)(Self__T1MC -  1);
   };
-  return(Result__CQTB);
+  return(Result__PMTB);
 }
 
-static void* read_send_msg__24N(__PARSER *Self__34N,void *first_arg__44N)
+static void* read_send_msg__I5N(__PARSER *Self__J5N,void *first_arg__K5N)
 // ({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__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)) {
+  void *result__M5N,*arg__Q5N,*tmp__OMRB;
+  void *n__O5N,*result__XJGH;
+  __INTEGER p1__R5N,p2__S5N,old_derive__T5N,sav_derive__U5N;
+  __INTEGER typ_id__YSIH,typ_id__BTIH,typ_id__KTIH,Self__E2YC;
+  __INTEGER typ_id__MDR;
+  __POSITION pos__SX0G,p__4SIH,p__HTIH,p__QTIH,p__Z5Q;
+  __ITM_READ *result__WSIH;
+  __POINTER ptr__XSIH,ptr_table__1HLH,next__0HLH,result__2HLH;
+  __POINTER ptr_table__AILH,next__5HLH,result__BILH,ptr__ATIH;
+  __POINTER ptr_table__FILH,next__EILH,result__GILH,ptr_table__KILH;
+  __POINTER next__JILH,result__LILH,ptr__JTIH,ptr_table__PILH;
+  __POINTER next__OILH,result__QILH,ptr_table__UILH,next__TILH;
+  __POINTER result__VILH,ptr__HDR,ptr_table__ZILH,next__YILH;
+  __POINTER result__0ILH,ptr_table__4ILH,next__3ILH,result__5ILH;
+  __UINTEGER_32 sz__ZSIH,a__0SIH,new_size__1SIH,t__2SIH,a__3SIH;
+  __UINTEGER_32 new_size__DILH,lab_type__CILH,sz__CTIH,a__DTIH;
+  __UINTEGER_32 new_size__ETIH,t__FTIH,a__GTIH,new_size__NILH;
+  __UINTEGER_32 lab_type__MILH,sz__LTIH,a__MTIH,new_size__NTIH,t__OTIH;
+  __UINTEGER_32 a__PTIH,new_size__XILH,lab_type__WILH,sz__JDR,a__4KGH;
+  __UINTEGER_32 new_size__5KGH,t__DLGH,a__CLGH,new_size__BJLH;
+  __UINTEGER_32 lab_type__AJLH;
+  __ITM_READ_ARG1 *result__5SIH;
+  __ITM_READ_ARG2 *result__ITIH;
+  __ITM_READ_ARGS *result__GDR;
+  void *l_arg__P5N,*result__HAHH;
+  __FAST_ARRAYoSTRINGo *Self__YJGH,*Self__0JGH;
+  __FAST_ARRAYoFAST_ARRAYoITM_CODEoo *Self__IAHH,*Self__JAHH;
+  __BOOLEAN __tmp__ODO;
+  __FAST_ARRAYoITM_CODEo *Self__RCW;
+  void **__tmp__WKGH,**__tmp__XKGH,**__tmp__YKGH;
+  result__M5N=NULL;
+  n__O5N=NULL;
+  l_arg__P5N=NULL;
+  arg__Q5N=NULL;
+  p1__R5N= 0;
+  p2__S5N= 0;
+  old_derive__T5N= 0;
+  sav_derive__U5N= 0;
+  if (read_identifier__2BL()) {
+    p1__R5N=(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__D2C)->count__DD);
+    p2__S5N=position__CCC;
+    old_derive__T5N=short_derive__PCC;
+    result__XJGH=NULL;
+    if ((((__FAST_ARRAYoSTRINGo *)free__3OP)->parent_arrayed_collection__5KC.upper__CLC <  0)) {
+      result__XJGH=create__ZBB( 128);
+    } else {
+      Self__YJGH=((__FAST_ARRAYoSTRINGo *)free__3OP);
+      result__XJGH=((void **)Self__YJGH->parent_arrayed_collection__5KC.storage__UGT)[Self__YJGH->parent_arrayed_collection__5KC.upper__CLC];
+      Self__0JGH=((__FAST_ARRAYoSTRINGo *)free__3OP);
+      Self__0JGH->parent_arrayed_collection__5KC.upper__CLC=(__INTEGER)(Self__0JGH->parent_arrayed_collection__5KC.upper__CLC -  1);
+    };
+    n__O5N=result__XJGH;
+    copy__VDS(result__XJGH,last_string__D2C);
+    result__HAHH=NULL;
+    if ((((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__QAI)->parent_arrayed_collection__PAI.upper__BYT <  0)) {
+      result__HAHH=create_with_capacity__XXI( 16);
+    } else {
+      Self__IAHH=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__QAI);
+      result__HAHH=((void **)Self__IAHH->parent_arrayed_collection__PAI.storage__PCU)[Self__IAHH->parent_arrayed_collection__PAI.upper__BYT];
+      Self__JAHH=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__QAI);
+      Self__JAHH->parent_arrayed_collection__PAI.upper__BYT=(__INTEGER)(Self__JAHH->parent_arrayed_collection__PAI.upper__BYT -  1);
+    };
+    l_arg__P5N=result__HAHH;
+    arg__Q5N=read_argument__PPP(Self__J5N);
+    if (((void *)arg__Q5N != (void *)NULL)) {
+      add_last__I5U(result__HAHH,arg__Q5N);
+      while (read_identifier__2BL()) {
+        short__token__to__GDD((&__string_131),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__D2C)->count__DD),position__CCC);
+        append__3OS(n__O5N,(&__string_112));
+        append__3OS(n__O5N,last_string__D2C);
+        arg__Q5N=read_argument__PPP(Self__J5N);
+        if (((void *)arg__Q5N == (void *)NULL)) {
+          pos__SX0G=current_position__B0F();
+          put_error__text__1PG( 0,(&__string_333));
+          put_position__FRG(pos__SX0G);
+          put_string__33F(msg_err__AQG);
+          if ((type_error__5PG !=  2)) {
             exit(( 1));
           };
         };
-        add_last__25U(l_arg__D5N,arg__E5N);
+        add_last__I5U(l_arg__P5N,arg__Q5N);
       };
     };
-    get__YWB(result__KAHH);
-    add_last__ISV(free__ROP,result__KAHH);
-    ((__STRING *)result__KAHH)->count__EGC= 0;
+    get__YWB(result__XJGH);
+    add_last__URV(free__3OP,result__XJGH);
+    ((__STRING *)result__XJGH)->count__SGC= 0;
     if (is_shorter__LZ) {
-      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__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)));
+      if ((((! (((__FAST_ARRAYoITM_CODEo *)result__HAHH)->parent_arrayed_collection__JWF.upper__NJL <  0)) || ((void *)first_arg__K5N != (void *)NULL)) || (! fast_has__RDV(short_local__XCC,last_string__D2C)))) {
+        sav_derive__U5N=short_derive__PCC;
+        short_derive__PCC=old_derive__T5N;
+        short__token__to__GDD((&__string_131),p1__R5N,p2__S5N);
+        short_derive__PCC=(__INTEGER)(sav_derive__U5N + (__INTEGER)(short_derive__PCC - old_derive__T5N));
+      };
+    };
+    if ((((__FAST_ARRAYoITM_CODEo *)result__HAHH)->parent_arrayed_collection__JWF.upper__NJL <  0)) {
+      if (((void *)first_arg__K5N == (void *)NULL)) {
+        p__4SIH=current_position__B0F();
+        result__WSIH=NULL;
+        ptr__XSIH=((__POINTER )(NULL));
+        typ_id__YSIH= 0;
+        sz__ZSIH=((__UINTEGER_32 )sizeof(__ITM_READ));
+        if ((sz__ZSIH ==  0)) {
+          result__WSIH=ITM_READ__;
+        } else {
+          typ_id__YSIH=-1;
+          clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__ZSIH);
+          if ((typ_id__YSIH == (__INTEGER)(-  1))) {
+            a__0SIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__1SIH=(__UINTEGER_32)((__UINTEGER_32)(sz__ZSIH + a__0SIH) & (__UINTEGER_32)(~ a__0SIH));
+            ptr_table__1HLH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__1SIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__0HLH=((__POINTER )(NULL));
+            result__2HLH=((__POINTER *)ptr_table__1HLH)[ 0];
+            if ((result__2HLH == (void *)NULL)) {
+              result__2HLH=new_lab__RTJ(new_size__1SIH);
+              next__0HLH=(void *)((unsigned long)result__2HLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1SIH)));
+              ((__POINTER *)next__0HLH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__1HLH)[ 0]=next__0HLH;
+            } else {
+              next__0HLH=((__POINTER *)result__2HLH)[ 0];
+              if ((next__0HLH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2HLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__1SIH <<  1)) <=  4096)) {
+                  next__0HLH=(void *)((unsigned long)result__2HLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1SIH)));
                 } else {
-                  next__OLKH=new_lab__FTJ(new_size__PMIH);
+                  next__0HLH=new_lab__RTJ(new_size__1SIH);
                 };
-                ((__POINTER *)next__OLKH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__PLKH)[ 0]=next__OLKH;
+                ((__POINTER *)next__0HLH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__1HLH)[ 0]=next__0HLH;
               } else {
-                ((__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__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)));
+                ((__POINTER *)result__2HLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0HLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__2HLH=next__0HLH;
+              };
+            };
+            ptr__XSIH=result__2HLH;
+          } else {
+            t__2SIH=((__UINTEGER_32 )typ_id__YSIH);
+            a__3SIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__DILH=(__UINTEGER_32)((__UINTEGER_32)(sz__ZSIH + a__3SIH) & (__UINTEGER_32)(~ a__3SIH));
+            ptr_table__AILH=((__POINTER )(&(table_type[(t__2SIH)])));
+            lab_type__CILH=(__UINTEGER_32)(t__2SIH |  1);
+            next__5HLH=((__POINTER )(NULL));
+            result__BILH=((__POINTER *)ptr_table__AILH)[ 0];
+            if ((result__BILH == (void *)NULL)) {
+              result__BILH=new_lab__RTJ(lab_type__CILH);
+              next__5HLH=(void *)((unsigned long)result__BILH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DILH)));
+              ((__POINTER *)next__5HLH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__AILH)[ 0]=next__5HLH;
+            } else {
+              next__5HLH=((__POINTER *)result__BILH)[ 0];
+              if ((next__5HLH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BILH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__DILH <<  1)) <=  4096)) {
+                  next__5HLH=(void *)((unsigned long)result__BILH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DILH)));
                 } else {
-                  next__TLKH=new_lab__FTJ(lab_type__WLKH);
+                  next__5HLH=new_lab__RTJ(lab_type__CILH);
                 };
-                ((__POINTER *)next__TLKH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__ULKH)[ 0]=next__TLKH;
+                ((__POINTER *)next__5HLH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__AILH)[ 0]=next__5HLH;
               } else {
-                ((__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__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)));
+                ((__POINTER *)result__BILH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5HLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__BILH=next__5HLH;
+              };
+            };
+            ptr__XSIH=result__BILH;
+          };
+          result__WSIH=((__ITM_READ *)ptr__XSIH);
+          *(result__WSIH) = *(ITM_READ__);
+        };
+        ((__ITM_READ *)result__WSIH)->parent_itm_code__VIJ.parent_itm_object__PFE.position__SFJ=p__4SIH;
+        result__M5N=result__WSIH;
+      } else {
+        p__HTIH=current_position__B0F();
+        result__5SIH=NULL;
+        ptr__ATIH=((__POINTER )(NULL));
+        typ_id__BTIH= 0;
+        sz__CTIH=((__UINTEGER_32 )sizeof(__ITM_READ_ARG1));
+        if ((sz__CTIH ==  0)) {
+          result__5SIH=ITM_READ_ARG1__;
+        } else {
+          typ_id__BTIH=-1;
+          clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__CTIH);
+          if ((typ_id__BTIH == (__INTEGER)(-  1))) {
+            a__DTIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__ETIH=(__UINTEGER_32)((__UINTEGER_32)(sz__CTIH + a__DTIH) & (__UINTEGER_32)(~ a__DTIH));
+            ptr_table__FILH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ETIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__EILH=((__POINTER )(NULL));
+            result__GILH=((__POINTER *)ptr_table__FILH)[ 0];
+            if ((result__GILH == (void *)NULL)) {
+              result__GILH=new_lab__RTJ(new_size__ETIH);
+              next__EILH=(void *)((unsigned long)result__GILH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ETIH)));
+              ((__POINTER *)next__EILH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__FILH)[ 0]=next__EILH;
+            } else {
+              next__EILH=((__POINTER *)result__GILH)[ 0];
+              if ((next__EILH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GILH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__ETIH <<  1)) <=  4096)) {
+                  next__EILH=(void *)((unsigned long)result__GILH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ETIH)));
                 } else {
-                  next__YLKH=new_lab__FTJ(new_size__YMIH);
+                  next__EILH=new_lab__RTJ(new_size__ETIH);
                 };
-                ((__POINTER *)next__YLKH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__ZLKH)[ 0]=next__YLKH;
+                ((__POINTER *)next__EILH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__FILH)[ 0]=next__EILH;
               } else {
-                ((__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__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)));
+                ((__POINTER *)result__GILH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EILH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__GILH=next__EILH;
+              };
+            };
+            ptr__ATIH=result__GILH;
+          } else {
+            t__FTIH=((__UINTEGER_32 )typ_id__BTIH);
+            a__GTIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__NILH=(__UINTEGER_32)((__UINTEGER_32)(sz__CTIH + a__GTIH) & (__UINTEGER_32)(~ a__GTIH));
+            ptr_table__KILH=((__POINTER )(&(table_type[(t__FTIH)])));
+            lab_type__MILH=(__UINTEGER_32)(t__FTIH |  1);
+            next__JILH=((__POINTER )(NULL));
+            result__LILH=((__POINTER *)ptr_table__KILH)[ 0];
+            if ((result__LILH == (void *)NULL)) {
+              result__LILH=new_lab__RTJ(lab_type__MILH);
+              next__JILH=(void *)((unsigned long)result__LILH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NILH)));
+              ((__POINTER *)next__JILH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__KILH)[ 0]=next__JILH;
+            } else {
+              next__JILH=((__POINTER *)result__LILH)[ 0];
+              if ((next__JILH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LILH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__NILH <<  1)) <=  4096)) {
+                  next__JILH=(void *)((unsigned long)result__LILH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NILH)));
                 } else {
-                  next__3LKH=new_lab__FTJ(lab_type__AMKH);
+                  next__JILH=new_lab__RTJ(lab_type__MILH);
                 };
-                ((__POINTER *)next__3LKH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__4LKH)[ 0]=next__3LKH;
+                ((__POINTER *)next__JILH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__KILH)[ 0]=next__JILH;
               } else {
-                ((__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__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)));
+                ((__POINTER *)result__LILH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JILH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__LILH=next__JILH;
+              };
+            };
+            ptr__ATIH=result__LILH;
+          };
+          result__5SIH=((__ITM_READ_ARG1 *)ptr__ATIH);
+          *(result__5SIH) = *(ITM_READ_ARG1__);
+        };
+        ((__ITM_READ_ARG1 *)result__5SIH)->parent_itm_read__1JL.parent_itm_code__VIJ.parent_itm_object__PFE.position__SFJ=p__HTIH;
+        result__M5N=result__5SIH;
+      };
+      free__3XI(result__HAHH);
+      __tmp__ODO=TRUE__;
+    } else {
+      __tmp__ODO=FALSE__;
+    };
+    if ((! __tmp__ODO)) {
+      if (((__INTEGER)(((__FAST_ARRAYoITM_CODEo *)result__HAHH)->parent_arrayed_collection__JWF.upper__NJL +  1) ==  1)) {
+        p__QTIH=current_position__B0F();
+        result__ITIH=NULL;
+        ptr__JTIH=((__POINTER )(NULL));
+        typ_id__KTIH= 0;
+        sz__LTIH=((__UINTEGER_32 )sizeof(__ITM_READ_ARG2));
+        if ((sz__LTIH ==  0)) {
+          result__ITIH=ITM_READ_ARG2__;
+        } else {
+          typ_id__KTIH=-1;
+          clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__LTIH);
+          if ((typ_id__KTIH == (__INTEGER)(-  1))) {
+            a__MTIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__NTIH=(__UINTEGER_32)((__UINTEGER_32)(sz__LTIH + a__MTIH) & (__UINTEGER_32)(~ a__MTIH));
+            ptr_table__PILH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__NTIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__OILH=((__POINTER )(NULL));
+            result__QILH=((__POINTER *)ptr_table__PILH)[ 0];
+            if ((result__QILH == (void *)NULL)) {
+              result__QILH=new_lab__RTJ(new_size__NTIH);
+              next__OILH=(void *)((unsigned long)result__QILH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NTIH)));
+              ((__POINTER *)next__OILH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__PILH)[ 0]=next__OILH;
+            } else {
+              next__OILH=((__POINTER *)result__QILH)[ 0];
+              if ((next__OILH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__QILH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__NTIH <<  1)) <=  4096)) {
+                  next__OILH=(void *)((unsigned long)result__QILH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NTIH)));
                 } else {
-                  next__CMKH=new_lab__FTJ(new_size__BNIH);
+                  next__OILH=new_lab__RTJ(new_size__NTIH);
                 };
-                ((__POINTER *)next__CMKH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__DMKH)[ 0]=next__CMKH;
+                ((__POINTER *)next__OILH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__PILH)[ 0]=next__OILH;
               } else {
-                ((__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__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)));
+                ((__POINTER *)result__QILH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OILH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__QILH=next__OILH;
+              };
+            };
+            ptr__JTIH=result__QILH;
+          } else {
+            t__OTIH=((__UINTEGER_32 )typ_id__KTIH);
+            a__PTIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__XILH=(__UINTEGER_32)((__UINTEGER_32)(sz__LTIH + a__PTIH) & (__UINTEGER_32)(~ a__PTIH));
+            ptr_table__UILH=((__POINTER )(&(table_type[(t__OTIH)])));
+            lab_type__WILH=(__UINTEGER_32)(t__OTIH |  1);
+            next__TILH=((__POINTER )(NULL));
+            result__VILH=((__POINTER *)ptr_table__UILH)[ 0];
+            if ((result__VILH == (void *)NULL)) {
+              result__VILH=new_lab__RTJ(lab_type__WILH);
+              next__TILH=(void *)((unsigned long)result__VILH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XILH)));
+              ((__POINTER *)next__TILH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__UILH)[ 0]=next__TILH;
+            } else {
+              next__TILH=((__POINTER *)result__VILH)[ 0];
+              if ((next__TILH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__VILH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__XILH <<  1)) <=  4096)) {
+                  next__TILH=(void *)((unsigned long)result__VILH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XILH)));
                 } else {
-                  next__HMKH=new_lab__FTJ(lab_type__KMKH);
+                  next__TILH=new_lab__RTJ(lab_type__WILH);
                 };
-                ((__POINTER *)next__HMKH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__IMKH)[ 0]=next__HMKH;
+                ((__POINTER *)next__TILH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__UILH)[ 0]=next__TILH;
               } else {
-                ((__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__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)));
+                ((__POINTER *)result__VILH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TILH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__VILH=next__TILH;
+              };
+            };
+            ptr__JTIH=result__VILH;
+          };
+          result__ITIH=((__ITM_READ_ARG2 *)ptr__JTIH);
+          *(result__ITIH) = *(ITM_READ_ARG2__);
+        };
+        ((__ITM_READ_ARG2 *)result__ITIH)->parent_itm_read__IML.parent_itm_code__VIJ.parent_itm_object__PFE.position__SFJ=p__QTIH;
+        result__M5N=result__ITIH;
+        free__3XI(result__HAHH);
+      } else {
+        Self__RCW=((__FAST_ARRAYoITM_CODEo *)result__HAHH);
+        add_last__I5U(Self__RCW,first_arg__K5N);
+        if ((Self__RCW->parent_arrayed_collection__JWF.upper__NJL !=  0)) {
+          if ((Self__RCW->parent_arrayed_collection__JWF.upper__NJL ==  1)) {
+            tmp__OMRB=((void **)Self__RCW->parent_arrayed_collection__JWF.storage__4ZT)[ 0];
+            ((void **)Self__RCW->parent_arrayed_collection__JWF.storage__4ZT)[ 0]=((void **)Self__RCW->parent_arrayed_collection__JWF.storage__4ZT)[ 1];
+            ((void **)Self__RCW->parent_arrayed_collection__JWF.storage__4ZT)[ 1]=tmp__OMRB;
+          } else {
+            Self__E2YC=(__INTEGER)(Self__RCW->parent_arrayed_collection__JWF.upper__NJL -  1);
+            __tmp__WKGH=Self__RCW->parent_arrayed_collection__JWF.storage__4ZT;
+            __tmp__XKGH=Self__RCW->parent_arrayed_collection__JWF.storage__4ZT;
+            __tmp__YKGH=Self__RCW->parent_arrayed_collection__JWF.storage__4ZT;
+            while ((Self__E2YC >=  0)) {
+              ((void **)__tmp__XKGH)[(__INTEGER)(Self__E2YC +  1)]=((void **)__tmp__WKGH)[Self__E2YC];
+              ((void **)__tmp__YKGH)[Self__E2YC]=NULL;
+              Self__E2YC=(__INTEGER)(Self__E2YC -  1);
+            };
+            ((void **)Self__RCW->parent_arrayed_collection__JWF.storage__4ZT)[ 0]=first_arg__K5N;
+          };
+        };
+        l_arg__P5N=copy__5BI(result__HAHH);
+        p__Z5Q=current_position__B0F();
+        result__GDR=NULL;
+        ptr__HDR=((__POINTER )(NULL));
+        typ_id__MDR= 0;
+        sz__JDR=((__UINTEGER_32 )sizeof(__ITM_READ_ARGS));
+        if ((sz__JDR ==  0)) {
+          result__GDR=ITM_READ_ARGS__;
+        } else {
+          typ_id__MDR=-1;
+          clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__JDR);
+          if ((typ_id__MDR == (__INTEGER)(-  1))) {
+            a__4KGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__5KGH=(__UINTEGER_32)((__UINTEGER_32)(sz__JDR + a__4KGH) & (__UINTEGER_32)(~ a__4KGH));
+            ptr_table__ZILH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__5KGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__YILH=((__POINTER )(NULL));
+            result__0ILH=((__POINTER *)ptr_table__ZILH)[ 0];
+            if ((result__0ILH == (void *)NULL)) {
+              result__0ILH=new_lab__RTJ(new_size__5KGH);
+              next__YILH=(void *)((unsigned long)result__0ILH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5KGH)));
+              ((__POINTER *)next__YILH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__ZILH)[ 0]=next__YILH;
+            } else {
+              next__YILH=((__POINTER *)result__0ILH)[ 0];
+              if ((next__YILH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__0ILH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__5KGH <<  1)) <=  4096)) {
+                  next__YILH=(void *)((unsigned long)result__0ILH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5KGH)));
                 } else {
-                  next__MMKH=new_lab__FTJ(new_size__MBHH);
+                  next__YILH=new_lab__RTJ(new_size__5KGH);
                 };
-                ((__POINTER *)next__MMKH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__NMKH)[ 0]=next__MMKH;
+                ((__POINTER *)next__YILH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__ZILH)[ 0]=next__YILH;
               } else {
-                ((__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__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)));
+                ((__POINTER *)result__0ILH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YILH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__0ILH=next__YILH;
+              };
+            };
+            ptr__HDR=result__0ILH;
+          } else {
+            t__DLGH=((__UINTEGER_32 )typ_id__MDR);
+            a__CLGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__BJLH=(__UINTEGER_32)((__UINTEGER_32)(sz__JDR + a__CLGH) & (__UINTEGER_32)(~ a__CLGH));
+            ptr_table__4ILH=((__POINTER )(&(table_type[(t__DLGH)])));
+            lab_type__AJLH=(__UINTEGER_32)(t__DLGH |  1);
+            next__3ILH=((__POINTER )(NULL));
+            result__5ILH=((__POINTER *)ptr_table__4ILH)[ 0];
+            if ((result__5ILH == (void *)NULL)) {
+              result__5ILH=new_lab__RTJ(lab_type__AJLH);
+              next__3ILH=(void *)((unsigned long)result__5ILH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BJLH)));
+              ((__POINTER *)next__3ILH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__4ILH)[ 0]=next__3ILH;
+            } else {
+              next__3ILH=((__POINTER *)result__5ILH)[ 0];
+              if ((next__3ILH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__5ILH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__BJLH <<  1)) <=  4096)) {
+                  next__3ILH=(void *)((unsigned long)result__5ILH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BJLH)));
                 } else {
-                  next__RMKH=new_lab__FTJ(lab_type__UMKH);
+                  next__3ILH=new_lab__RTJ(lab_type__AJLH);
                 };
-                ((__POINTER *)next__RMKH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__SMKH)[ 0]=next__RMKH;
+                ((__POINTER *)next__3ILH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__4ILH)[ 0]=next__3ILH;
               } else {
-                ((__POINTER *)result__TMKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RMKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__TMKH=next__RMKH;
+                ((__POINTER *)result__5ILH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3ILH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__5ILH=next__3ILH;
               };
             };
-            ptr__1CR=result__TMKH;
+            ptr__HDR=result__5ILH;
           };
-          result__0CR=((__ITM_READ_ARGS *)ptr__1CR);
-          *(result__0CR) = *(ITM_READ_ARGS__);
+          result__GDR=((__ITM_READ_ARGS *)ptr__HDR);
+          *(result__GDR) = *(ITM_READ_ARGS__);
         };
-        ((__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;
+        ((__ITM_READ_ARGS *)result__GDR)->parent_itm_read__GEO.parent_itm_code__VIJ.parent_itm_object__PFE.position__SFJ=p__Z5Q;
+        result__M5N=result__GDR;
       };
     };
   };
-  return(result__A5N);
+  return(result__M5N);
 }
 
-static void* readlip_expr_cmp__N21B(__PARSER *Self__O21B)
+static void* readlip_expr_cmp__0Y1B(__PARSER *Self__1Y1B)
 // ({PARSER}) With resultNo recursive, No inlinable.
 {
-  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)) {
+  void *right__4Y1B,*result__3Y1B;
+  void *op__5Y1B;
+  __POSITION pos__P00G,p__WVBD;
+  __STRING_CONSTANT *Self__GUBD;
+  __LIP_BINARY *result__1JGD,*Self__I0SD;
+  __POINTER ptr__2JGD,ptr_table__DJLH,next__CJLH,result__EJLH;
+  __POINTER ptr_table__IJLH,next__HJLH,result__JJLH;
+  __INTEGER typ_id__BKGD;
+  __UINTEGER_32 sz__4JGD,a__OLGH,new_size__PLGH,t__TLGH,a__SLGH;
+  __UINTEGER_32 new_size__LJLH,lab_type__KJLH;
+  __CHARACTER type__AZ1B;
+  right__4Y1B=NULL;
+  op__5Y1B=NULL;
+  type__AZ1B='\0';
+  result__3Y1B=readlip_expr_binary__XL3B(Self__1Y1B);
+  if (((void *)result__3Y1B != (void *)NULL)) {
+    while ((((((read_symbol__4YJ((&__string_19)) || read_symbol__4YJ((&__string_21))) || read_symbol__4YJ((&__string_17))) || read_symbol__4YJ((&__string_16))) || read_symbol__4YJ((&__string_18))) || read_symbol__4YJ((&__string_20)))) {
+      op__5Y1B=last_string__D2C;
+      right__4Y1B=readlip_expr_binary__XL3B(Self__1Y1B);
+      if (((void *)right__4Y1B == (void *)NULL)) {
+        pos__P00G=current_position__B0F();
+        put_error__text__1PG( 0,(&__string_239));
+        put_position__FRG(pos__P00G);
+        put_string__33F(msg_err__AQG);
+        if ((type_error__5PG !=  2)) {
           exit(( 1));
         };
       };
-      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)));
+      Self__GUBD=((__STRING_CONSTANT *)op__5Y1B);
+      if (((void *)Self__GUBD == (void *)(&__string_19))) {
+        type__AZ1B='S';
+      };
+      if (((void *)Self__GUBD == (void *)(&__string_21))) {
+        type__AZ1B='I';
+      };
+      if (((void *)Self__GUBD == (void *)(&__string_17))) {
+        type__AZ1B='E';
+      };
+      if (((void *)Self__GUBD == (void *)(&__string_16))) {
+        type__AZ1B='=';
+      };
+      if (((void *)Self__GUBD == (void *)(&__string_18))) {
+        type__AZ1B='>';
+      };
+      if (((void *)Self__GUBD == (void *)(&__string_20))) {
+        type__AZ1B='<';
+      };
+      p__WVBD=current_position__B0F();
+      result__1JGD=NULL;
+      ptr__2JGD=((__POINTER )(NULL));
+      typ_id__BKGD= 0;
+      sz__4JGD=((__UINTEGER_32 )sizeof(__LIP_BINARY));
+      if ((sz__4JGD ==  0)) {
+        result__1JGD=LIP_BINARY__;
+      } else {
+        typ_id__BKGD=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__4JGD);
+        if ((typ_id__BKGD == (__INTEGER)(-  1))) {
+          a__OLGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__PLGH=(__UINTEGER_32)((__UINTEGER_32)(sz__4JGD + a__OLGH) & (__UINTEGER_32)(~ a__OLGH));
+          ptr_table__DJLH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__PLGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__CJLH=((__POINTER )(NULL));
+          result__EJLH=((__POINTER *)ptr_table__DJLH)[ 0];
+          if ((result__EJLH == (void *)NULL)) {
+            result__EJLH=new_lab__RTJ(new_size__PLGH);
+            next__CJLH=(void *)((unsigned long)result__EJLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PLGH)));
+            ((__POINTER *)next__CJLH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__DJLH)[ 0]=next__CJLH;
+          } else {
+            next__CJLH=((__POINTER *)result__EJLH)[ 0];
+            if ((next__CJLH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__EJLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__PLGH <<  1)) <=  4096)) {
+                next__CJLH=(void *)((unsigned long)result__EJLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PLGH)));
               } else {
-                next__WMKH=new_lab__FTJ(new_size__2BHH);
-              };
-              ((__POINTER *)next__WMKH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__XMKH)[ 0]=next__WMKH;
-            } else {
-              ((__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)));
+                next__CJLH=new_lab__RTJ(new_size__PLGH);
+              };
+              ((__POINTER *)next__CJLH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__DJLH)[ 0]=next__CJLH;
+            } else {
+              ((__POINTER *)result__EJLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CJLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__EJLH=next__CJLH;
+            };
+          };
+          ptr__2JGD=result__EJLH;
+        } else {
+          t__TLGH=((__UINTEGER_32 )typ_id__BKGD);
+          a__SLGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__LJLH=(__UINTEGER_32)((__UINTEGER_32)(sz__4JGD + a__SLGH) & (__UINTEGER_32)(~ a__SLGH));
+          ptr_table__IJLH=((__POINTER )(&(table_type[(t__TLGH)])));
+          lab_type__KJLH=(__UINTEGER_32)(t__TLGH |  1);
+          next__HJLH=((__POINTER )(NULL));
+          result__JJLH=((__POINTER *)ptr_table__IJLH)[ 0];
+          if ((result__JJLH == (void *)NULL)) {
+            result__JJLH=new_lab__RTJ(lab_type__KJLH);
+            next__HJLH=(void *)((unsigned long)result__JJLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LJLH)));
+            ((__POINTER *)next__HJLH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__IJLH)[ 0]=next__HJLH;
+          } else {
+            next__HJLH=((__POINTER *)result__JJLH)[ 0];
+            if ((next__HJLH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__JJLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__LJLH <<  1)) <=  4096)) {
+                next__HJLH=(void *)((unsigned long)result__JJLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LJLH)));
               } else {
-                next__1MKH=new_lab__FTJ(lab_type__4MKH);
+                next__HJLH=new_lab__RTJ(lab_type__KJLH);
               };
-              ((__POINTER *)next__1MKH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__2MKH)[ 0]=next__1MKH;
+              ((__POINTER *)next__HJLH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__IJLH)[ 0]=next__HJLH;
             } else {
-              ((__POINTER *)result__3MKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1MKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__3MKH=next__1MKH;
+              ((__POINTER *)result__JJLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HJLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__JJLH=next__HJLH;
             };
           };
-          ptr__XLGD=result__3MKH;
+          ptr__2JGD=result__JJLH;
         };
-        result__WLGD=((__LIP_BINARY *)ptr__XLGD);
-        *(result__WLGD) = *(LIP_BINARY__);
+        result__1JGD=((__LIP_BINARY *)ptr__2JGD);
+        *(result__1JGD) = *(LIP_BINARY__);
       };
-      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;
+      Self__I0SD=((__LIP_BINARY *)result__1JGD);
+      Self__I0SD->parent_lip_code__WNZB.parent_itm_object__XFE.position__SFJ=p__WVBD;
+      Self__I0SD->left__J2QD=result__3Y1B;
+      Self__I0SD->right__M2QD=right__4Y1B;
+      Self__I0SD->operator__P2QD=type__AZ1B;
+      result__3Y1B=result__1JGD;
     };
   };
-  return(result__Q21B);
+  return(result__3Y1B);
 }
 
-static void** create__OWIE(__INTEGER nb_elements__QWIE)
+static void** create__3WIE(__INTEGER nb_elements__5WIE)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__BGHH,a__AGHH,new_size__CGHH,new_size2__DGHH,a__EGHH;
+  __UINTEGER_32 new_size__FGHH;
+  __POINTER result__5FHH,ptr_table__NJLH,next__MJLH,result__OJLH;
+  __INTEGER Self__BXYE;
+  void **Result__G1NE;
+  sz__BGHH=((__UINTEGER_32 )(__INTEGER)(nb_elements__5WIE * ((__INTEGER )(sizeof(void *)))));
+  result__5FHH=((__POINTER )(NULL));
+  a__AGHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__CGHH=(__UINTEGER_32)((__UINTEGER_32)(sz__BGHH + a__AGHH) & (__UINTEGER_32)(~ a__AGHH));
+  new_size2__DGHH=(__UINTEGER_32)(new_size__CGHH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__DGHH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__EGHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__FGHH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__DGHH + a__EGHH) & (__UINTEGER_32)(~ a__EGHH));
+    ptr_table__NJLH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__FGHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__MJLH=((__POINTER )(NULL));
+    result__OJLH=((__POINTER *)ptr_table__NJLH)[ 0];
+    if ((result__OJLH == (void *)NULL)) {
+      result__OJLH=new_lab__RTJ(new_size__FGHH);
+      next__MJLH=(void *)((unsigned long)result__OJLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FGHH)));
+      ((__POINTER *)next__MJLH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__NJLH)[ 0]=next__MJLH;
+    } else {
+      next__MJLH=((__POINTER *)result__OJLH)[ 0];
+      if ((next__MJLH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__OJLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__FGHH <<  1)) <=  4096)) {
+          next__MJLH=(void *)((unsigned long)result__OJLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FGHH)));
+        } else {
+          next__MJLH=new_lab__RTJ(new_size__FGHH);
+        };
+        ((__POINTER *)next__MJLH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__NJLH)[ 0]=next__MJLH;
+      } else {
+        ((__POINTER *)result__OJLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MJLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__OJLH=next__MJLH;
+      };
+    };
+    ((__POINTER *)result__OJLH)[ 0]=((__POINTER ) 3);
+    result__5FHH=(void *)((unsigned long)result__OJLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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__FNKH == (void *)NULL)) {
-      result__FNKH=new_page__YC5();
-    };
-    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__5FHH=(void *)((unsigned long)((__POINTER )((__MEMORY *)search__XAVB(new_size__CGHH))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__G1NE=((void **)result__5FHH);
+  Self__BXYE=(__INTEGER)(nb_elements__5WIE -  1);
+  while ((Self__BXYE >=  0)) {
+    Result__G1NE[Self__BXYE]=NULL;
+    Self__BXYE=(__INTEGER)(Self__BXYE -  1);
   };
-  return(Result__X0NE);
+  return(Result__G1NE);
 }
 
-static void** create__3SQB(__INTEGER nb_elements__5SQB)
+static void** create__KPQB(__INTEGER nb_elements__MPQB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__JGHH,a__IGHH,new_size__KGHH,new_size2__LGHH,a__MGHH;
+  __UINTEGER_32 new_size__NGHH;
+  __POINTER result__HGHH,ptr_table__SJLH,next__RJLH,result__TJLH;
+  __INTEGER Self__M0MC;
+  void **Result__GJTB;
+  sz__JGHH=((__UINTEGER_32 )(__INTEGER)(nb_elements__MPQB * ((__INTEGER )(sizeof(void *)))));
+  result__HGHH=((__POINTER )(NULL));
+  a__IGHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__KGHH=(__UINTEGER_32)((__UINTEGER_32)(sz__JGHH + a__IGHH) & (__UINTEGER_32)(~ a__IGHH));
+  new_size2__LGHH=(__UINTEGER_32)(new_size__KGHH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__LGHH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__MGHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__NGHH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__LGHH + a__MGHH) & (__UINTEGER_32)(~ a__MGHH));
+    ptr_table__SJLH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__NGHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__RJLH=((__POINTER )(NULL));
+    result__TJLH=((__POINTER *)ptr_table__SJLH)[ 0];
+    if ((result__TJLH == (void *)NULL)) {
+      result__TJLH=new_lab__RTJ(new_size__NGHH);
+      next__RJLH=(void *)((unsigned long)result__TJLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NGHH)));
+      ((__POINTER *)next__RJLH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__SJLH)[ 0]=next__RJLH;
+    } else {
+      next__RJLH=((__POINTER *)result__TJLH)[ 0];
+      if ((next__RJLH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TJLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__NGHH <<  1)) <=  4096)) {
+          next__RJLH=(void *)((unsigned long)result__TJLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NGHH)));
+        } else {
+          next__RJLH=new_lab__RTJ(new_size__NGHH);
+        };
+        ((__POINTER *)next__RJLH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__SJLH)[ 0]=next__RJLH;
+      } else {
+        ((__POINTER *)result__TJLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RJLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__TJLH=next__RJLH;
+      };
+    };
+    ((__POINTER *)result__TJLH)[ 0]=((__POINTER ) 3);
+    result__HGHH=(void *)((unsigned long)result__TJLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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__NNKH == (void *)NULL)) {
-      result__NNKH=new_page__YC5();
-    };
-    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__HGHH=(void *)((unsigned long)((__POINTER )((__MEMORY *)search__XAVB(new_size__KGHH))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__GJTB=((void **)result__HGHH);
+  Self__M0MC=(__INTEGER)(nb_elements__MPQB -  1);
+  while ((Self__M0MC >=  0)) {
+    Result__GJTB[Self__M0MC]=NULL;
+    Self__M0MC=(__INTEGER)(Self__M0MC -  1);
   };
-  return(Result__ZMTB);
+  return(Result__GJTB);
 }
 
-static void* read_argument__DPP(__PARSER *Self__EPP)
+static void* read_argument__PPP(__PARSER *Self__QPP)
 // ({PARSER}) With resultNo recursive, No inlinable.
 {
-  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())) {
+  void *result__SPP;
+  __POSITION p__ZTIH;
+  __ITM_READ *result__RTIH;
+  __POINTER ptr__STIH,ptr_table__XJLH,next__WJLH,result__YJLH;
+  __POINTER ptr_table__2JLH,next__1JLH,result__3JLH;
+  __INTEGER typ_id__TTIH;
+  __UINTEGER_32 sz__UTIH,a__VTIH,new_size__WTIH,t__XTIH,a__YTIH;
+  __UINTEGER_32 new_size__5JLH,lab_type__4JLH;
+  result__SPP=read_expr_primary__E5M(Self__QPP);
+  if ((((void *)result__SPP == (void *)NULL) && read_identifier__2BL())) {
     if (is_shorter__LZ) {
-      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)));
+      if ((! fast_has__RDV(short_local__XCC,last_string__D2C))) {
+        short__token__to__GDD((&__string_131),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__D2C)->count__DD),position__CCC);
+      };
+    };
+    p__ZTIH=current_position__B0F();
+    result__RTIH=NULL;
+    ptr__STIH=((__POINTER )(NULL));
+    typ_id__TTIH= 0;
+    sz__UTIH=((__UINTEGER_32 )sizeof(__ITM_READ));
+    if ((sz__UTIH ==  0)) {
+      result__RTIH=ITM_READ__;
+    } else {
+      typ_id__TTIH=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__UTIH);
+      if ((typ_id__TTIH == (__INTEGER)(-  1))) {
+        a__VTIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__WTIH=(__UINTEGER_32)((__UINTEGER_32)(sz__UTIH + a__VTIH) & (__UINTEGER_32)(~ a__VTIH));
+        ptr_table__XJLH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__WTIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__WJLH=((__POINTER )(NULL));
+        result__YJLH=((__POINTER *)ptr_table__XJLH)[ 0];
+        if ((result__YJLH == (void *)NULL)) {
+          result__YJLH=new_lab__RTJ(new_size__WTIH);
+          next__WJLH=(void *)((unsigned long)result__YJLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WTIH)));
+          ((__POINTER *)next__WJLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__XJLH)[ 0]=next__WJLH;
+        } else {
+          next__WJLH=((__POINTER *)result__YJLH)[ 0];
+          if ((next__WJLH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YJLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__WTIH <<  1)) <=  4096)) {
+              next__WJLH=(void *)((unsigned long)result__YJLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WTIH)));
             } else {
-              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)));
+              next__WJLH=new_lab__RTJ(new_size__WTIH);
+            };
+            ((__POINTER *)next__WJLH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__XJLH)[ 0]=next__WJLH;
+          } else {
+            ((__POINTER *)result__YJLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WJLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__YJLH=next__WJLH;
+          };
+        };
+        ptr__STIH=result__YJLH;
+      } else {
+        t__XTIH=((__UINTEGER_32 )typ_id__TTIH);
+        a__YTIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__5JLH=(__UINTEGER_32)((__UINTEGER_32)(sz__UTIH + a__YTIH) & (__UINTEGER_32)(~ a__YTIH));
+        ptr_table__2JLH=((__POINTER )(&(table_type[(t__XTIH)])));
+        lab_type__4JLH=(__UINTEGER_32)(t__XTIH |  1);
+        next__1JLH=((__POINTER )(NULL));
+        result__3JLH=((__POINTER *)ptr_table__2JLH)[ 0];
+        if ((result__3JLH == (void *)NULL)) {
+          result__3JLH=new_lab__RTJ(lab_type__4JLH);
+          next__1JLH=(void *)((unsigned long)result__3JLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5JLH)));
+          ((__POINTER *)next__1JLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__2JLH)[ 0]=next__1JLH;
+        } else {
+          next__1JLH=((__POINTER *)result__3JLH)[ 0];
+          if ((next__1JLH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__3JLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__5JLH <<  1)) <=  4096)) {
+              next__1JLH=(void *)((unsigned long)result__3JLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5JLH)));
             } else {
-              next__VNKH=new_lab__FTJ(lab_type__YNKH);
+              next__1JLH=new_lab__RTJ(lab_type__4JLH);
             };
-            ((__POINTER *)next__VNKH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__WNKH)[ 0]=next__VNKH;
+            ((__POINTER *)next__1JLH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__2JLH)[ 0]=next__1JLH;
           } else {
-            ((__POINTER *)result__XNKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VNKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__XNKH=next__VNKH;
+            ((__POINTER *)result__3JLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1JLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__3JLH=next__1JLH;
           };
         };
-        ptr__GNIH=result__XNKH;
+        ptr__STIH=result__3JLH;
       };
-      result__FNIH=((__ITM_READ *)ptr__GNIH);
-      *(result__FNIH) = *(ITM_READ__);
+      result__RTIH=((__ITM_READ *)ptr__STIH);
+      *(result__RTIH) = *(ITM_READ__);
     };
-    ((__ITM_READ *)result__FNIH)->parent_itm_code__JIJ.parent_itm_object__SEE.position__GFJ=p__NNIH;
-    result__GPP=result__FNIH;
+    ((__ITM_READ *)result__RTIH)->parent_itm_code__VIJ.parent_itm_object__PFE.position__SFJ=p__ZTIH;
+    result__SPP=result__RTIH;
   };
-  return(result__GPP);
+  return(result__SPP);
 }
 
-static void* readlip_expr_binary__KP3B(__PARSER *Self__LP3B)
+static void* readlip_expr_binary__XL3B(__PARSER *Self__YL3B)
 // ({PARSER}) With resultNo recursive, No inlinable.
 {
-  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:
+  void *right__1L3B,*result__0L3B;
+  __POSITION pos__TA1G,p__DUIH,p__QUIH;
+  __LIP_BINARY *result__0TIH,*Self__CUIH,*result__HUIH,*Self__PUIH;
+  __POINTER ptr__1TIH,ptr_table__HKLH,next__GKLH,result__IKLH;
+  __POINTER ptr_table__MKLH,next__LKLH,result__NKLH,ptr__IUIH;
+  __POINTER ptr_table__RKLH,next__QKLH,result__SKLH,ptr_table__WKLH;
+  __POINTER next__VKLH,result__XKLH;
+  __INTEGER typ_id__2TIH,typ_id__JUIH;
+  __UINTEGER_32 sz__3TIH,a__4TIH,new_size__5TIH,t__AUIH,a__BUIH;
+  __UINTEGER_32 new_size__PKLH,lab_type__OKLH,sz__KUIH,a__LUIH;
+  __UINTEGER_32 new_size__MUIH,t__NUIH,a__OUIH,new_size__ZKLH;
+  __UINTEGER_32 lab_type__YKLH;
+  __BOOLEAN result__AKLH,__tmp__QM3B,result__DKLH;
+  __CHARACTER result__BKLH,result__EKLH;
+  right__1L3B=NULL;
+  result__0L3B=readlip_expr_unary__YX4B(Self__YL3B);
+  if (((void *)result__0L3B != (void *)NULL)) {
+    while_do__O25B:
     {
-      result__0NKH=FALSE__;
-      if ((! read_space__MTD())) {
-        result__0NKH=FALSE__;
+      result__AKLH=FALSE__;
+      if ((! read_space__XTD())) {
+        result__AKLH=FALSE__;
       } else {
-        result__1NKH='\0';
-        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__1NKH=((__CHARACTER )(( 0)));
+        result__BKLH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+          result__BKLH=((__CHARACTER )(( 0)));
         } else {
-          result__1NKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+          result__BKLH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__1NKH == '-')) {
+        if ((result__BKLH == '-')) {
           position__CCC=(__INTEGER)(position__CCC +  1);
-          result__0NKH=TRUE__;
+          result__AKLH=TRUE__;
         };
       };
-      if (result__0NKH) {
-        __tmp__DQ3B=TRUE__;
+      if (result__AKLH) {
+        __tmp__QM3B=TRUE__;
       } else {
-        result__3NKH=FALSE__;
-        if ((! read_space__MTD())) {
-          result__3NKH=FALSE__;
+        result__DKLH=FALSE__;
+        if ((! read_space__XTD())) {
+          result__DKLH=FALSE__;
         } else {
-          result__4NKH='\0';
-          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__4NKH=((__CHARACTER )(( 0)));
+          result__EKLH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+            result__EKLH=((__CHARACTER )(( 0)));
           } else {
-            result__4NKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+            result__EKLH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__4NKH == '+')) {
+          if ((result__EKLH == '+')) {
             position__CCC=(__INTEGER)(position__CCC +  1);
-            result__3NKH=TRUE__;
+            result__DKLH=TRUE__;
           };
         };
-        __tmp__DQ3B=result__3NKH;
+        __tmp__QM3B=result__DKLH;
       };
-      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)) {
+      if (__tmp__QM3B) {
+        right__1L3B=readlip_expr_unary__YX4B(Self__YL3B);
+        if (((void *)right__1L3B == (void *)NULL)) {
+          pos__TA1G=current_position__B0F();
+          put_error__text__1PG( 0,(&__string_239));
+          put_position__FRG(pos__TA1G);
+          put_string__33F(msg_err__AQG);
+          if ((type_error__5PG !=  2)) {
             exit(( 1));
           };
         };
-        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;
+        if (result__AKLH) {
+          p__DUIH=current_position__B0F();
+          result__0TIH=NULL;
+          ptr__1TIH=((__POINTER )(NULL));
+          typ_id__2TIH= 0;
+          sz__3TIH=((__UINTEGER_32 )sizeof(__LIP_BINARY));
+          if ((sz__3TIH ==  0)) {
+            result__0TIH=LIP_BINARY__;
+          } else {
+            typ_id__2TIH=-1;
+            clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__3TIH);
+            if ((typ_id__2TIH == (__INTEGER)(-  1))) {
+              a__4TIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__5TIH=(__UINTEGER_32)((__UINTEGER_32)(sz__3TIH + a__4TIH) & (__UINTEGER_32)(~ a__4TIH));
+              ptr_table__HKLH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__5TIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__GKLH=((__POINTER )(NULL));
+              result__IKLH=((__POINTER *)ptr_table__HKLH)[ 0];
+              if ((result__IKLH == (void *)NULL)) {
+                result__IKLH=new_lab__RTJ(new_size__5TIH);
+                next__GKLH=(void *)((unsigned long)result__IKLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5TIH)));
+                ((__POINTER *)next__GKLH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__HKLH)[ 0]=next__GKLH;
               } else {
-                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)));
+                next__GKLH=((__POINTER *)result__IKLH)[ 0];
+                if ((next__GKLH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__IKLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__5TIH <<  1)) <=  4096)) {
+                    next__GKLH=(void *)((unsigned long)result__IKLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5TIH)));
                   } else {
-                    next__AOKH=new_lab__FTJ(new_size__TNIH);
+                    next__GKLH=new_lab__RTJ(new_size__5TIH);
                   };
-                  ((__POINTER *)next__AOKH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__BOKH)[ 0]=next__AOKH;
+                  ((__POINTER *)next__GKLH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__HKLH)[ 0]=next__GKLH;
                 } else {
-                  ((__POINTER *)result__COKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__AOKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__COKH=next__AOKH;
+                  ((__POINTER *)result__IKLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GKLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__IKLH=next__GKLH;
                 };
               };
-              ptr__PNIH=result__COKH;
-            } else {
-              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;
+              ptr__1TIH=result__IKLH;
+            } else {
+              t__AUIH=((__UINTEGER_32 )typ_id__2TIH);
+              a__BUIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__PKLH=(__UINTEGER_32)((__UINTEGER_32)(sz__3TIH + a__BUIH) & (__UINTEGER_32)(~ a__BUIH));
+              ptr_table__MKLH=((__POINTER )(&(table_type[(t__AUIH)])));
+              lab_type__OKLH=(__UINTEGER_32)(t__AUIH |  1);
+              next__LKLH=((__POINTER )(NULL));
+              result__NKLH=((__POINTER *)ptr_table__MKLH)[ 0];
+              if ((result__NKLH == (void *)NULL)) {
+                result__NKLH=new_lab__RTJ(lab_type__OKLH);
+                next__LKLH=(void *)((unsigned long)result__NKLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PKLH)));
+                ((__POINTER *)next__LKLH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__MKLH)[ 0]=next__LKLH;
               } else {
-                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)));
+                next__LKLH=((__POINTER *)result__NKLH)[ 0];
+                if ((next__LKLH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__NKLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__PKLH <<  1)) <=  4096)) {
+                    next__LKLH=(void *)((unsigned long)result__NKLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PKLH)));
                   } else {
-                    next__FOKH=new_lab__FTJ(lab_type__IOKH);
+                    next__LKLH=new_lab__RTJ(lab_type__OKLH);
                   };
-                  ((__POINTER *)next__FOKH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__GOKH)[ 0]=next__FOKH;
+                  ((__POINTER *)next__LKLH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__MKLH)[ 0]=next__LKLH;
                 } else {
-                  ((__POINTER *)result__HOKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FOKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__HOKH=next__FOKH;
+                  ((__POINTER *)result__NKLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LKLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__NKLH=next__LKLH;
                 };
               };
-              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;
+              ptr__1TIH=result__NKLH;
+            };
+            result__0TIH=((__LIP_BINARY *)ptr__1TIH);
+            *(result__0TIH) = *(LIP_BINARY__);
+          };
+          Self__CUIH=((__LIP_BINARY *)result__0TIH);
+          Self__CUIH->parent_lip_code__WNZB.parent_itm_object__XFE.position__SFJ=p__DUIH;
+          Self__CUIH->left__J2QD=result__0L3B;
+          Self__CUIH->right__M2QD=right__1L3B;
+          Self__CUIH->operator__P2QD='-';
+          result__0L3B=result__0TIH;
+        } else {
+          p__QUIH=current_position__B0F();
+          result__HUIH=NULL;
+          ptr__IUIH=((__POINTER )(NULL));
+          typ_id__JUIH= 0;
+          sz__KUIH=((__UINTEGER_32 )sizeof(__LIP_BINARY));
+          if ((sz__KUIH ==  0)) {
+            result__HUIH=LIP_BINARY__;
+          } else {
+            typ_id__JUIH=-1;
+            clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__KUIH);
+            if ((typ_id__JUIH == (__INTEGER)(-  1))) {
+              a__LUIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__MUIH=(__UINTEGER_32)((__UINTEGER_32)(sz__KUIH + a__LUIH) & (__UINTEGER_32)(~ a__LUIH));
+              ptr_table__RKLH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__MUIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__QKLH=((__POINTER )(NULL));
+              result__SKLH=((__POINTER *)ptr_table__RKLH)[ 0];
+              if ((result__SKLH == (void *)NULL)) {
+                result__SKLH=new_lab__RTJ(new_size__MUIH);
+                next__QKLH=(void *)((unsigned long)result__SKLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MUIH)));
+                ((__POINTER *)next__QKLH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__RKLH)[ 0]=next__QKLH;
               } else {
-                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)));
+                next__QKLH=((__POINTER *)result__SKLH)[ 0];
+                if ((next__QKLH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__SKLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__MUIH <<  1)) <=  4096)) {
+                    next__QKLH=(void *)((unsigned long)result__SKLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MUIH)));
                   } else {
-                    next__KOKH=new_lab__FTJ(new_size__AOIH);
+                    next__QKLH=new_lab__RTJ(new_size__MUIH);
                   };
-                  ((__POINTER *)next__KOKH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__LOKH)[ 0]=next__KOKH;
+                  ((__POINTER *)next__QKLH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__RKLH)[ 0]=next__QKLH;
                 } else {
-                  ((__POINTER *)result__MOKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KOKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__MOKH=next__KOKH;
+                  ((__POINTER *)result__SKLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QKLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__SKLH=next__QKLH;
                 };
               };
-              ptr__2NIH=result__MOKH;
-            } else {
-              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;
+              ptr__IUIH=result__SKLH;
+            } else {
+              t__NUIH=((__UINTEGER_32 )typ_id__JUIH);
+              a__OUIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__ZKLH=(__UINTEGER_32)((__UINTEGER_32)(sz__KUIH + a__OUIH) & (__UINTEGER_32)(~ a__OUIH));
+              ptr_table__WKLH=((__POINTER )(&(table_type[(t__NUIH)])));
+              lab_type__YKLH=(__UINTEGER_32)(t__NUIH |  1);
+              next__VKLH=((__POINTER )(NULL));
+              result__XKLH=((__POINTER *)ptr_table__WKLH)[ 0];
+              if ((result__XKLH == (void *)NULL)) {
+                result__XKLH=new_lab__RTJ(lab_type__YKLH);
+                next__VKLH=(void *)((unsigned long)result__XKLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZKLH)));
+                ((__POINTER *)next__VKLH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__WKLH)[ 0]=next__VKLH;
               } else {
-                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)));
+                next__VKLH=((__POINTER *)result__XKLH)[ 0];
+                if ((next__VKLH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XKLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__ZKLH <<  1)) <=  4096)) {
+                    next__VKLH=(void *)((unsigned long)result__XKLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZKLH)));
                   } else {
-                    next__POKH=new_lab__FTJ(lab_type__SOKH);
+                    next__VKLH=new_lab__RTJ(lab_type__YKLH);
                   };
-                  ((__POINTER *)next__POKH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__QOKH)[ 0]=next__POKH;
+                  ((__POINTER *)next__VKLH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__WKLH)[ 0]=next__VKLH;
                 } else {
-                  ((__POINTER *)result__ROKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__POKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__ROKH=next__POKH;
+                  ((__POINTER *)result__XKLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VKLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__XKLH=next__VKLH;
                 };
               };
-              ptr__2NIH=result__ROKH;
+              ptr__IUIH=result__XKLH;
             };
-            result__1NIH=((__LIP_BINARY *)ptr__2NIH);
-            *(result__1NIH) = *(LIP_BINARY__);
+            result__HUIH=((__LIP_BINARY *)ptr__IUIH);
+            *(result__HUIH) = *(LIP_BINARY__);
           };
-          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;
+          Self__PUIH=((__LIP_BINARY *)result__HUIH);
+          Self__PUIH->parent_lip_code__WNZB.parent_itm_object__XFE.position__SFJ=p__QUIH;
+          Self__PUIH->left__J2QD=result__0L3B;
+          Self__PUIH->right__M2QD=right__1L3B;
+          Self__PUIH->operator__P2QD='+';
+          result__0L3B=result__HUIH;
         };
-        goto while_do__BAAC;
+        goto while_do__O25B;
       };
     };
   };
-  return(result__NP3B);
+  return(result__0L3B);
 }
 
-static void* readlip_expr_unary__L14B(__PARSER *Self__M14B)
+static void* readlip_expr_unary__YX4B(__PARSER *Self__ZX4B)
 // ({PARSER}) With resultRecursive, No inlinable.
 {
-  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__;
+  void *result__1X4B,*result__XGFE;
+  void *nam__4X4B,*n__ULLH;
+  __POSITION pos__FC1G,p__XA0C,p__TLLH,p__KHFE;
+  __LIP_UNARY *result__VPBD,*Self__3KSD;
+  __POINTER ptr__WPBD,ptr_table__BLLH,next__ALLH,result__CLLH;
+  __POINTER ptr_table__GLLH,next__FLLH,result__HLLH,ptr__LLLH;
+  __POINTER ptr_table__XLLH,next__WLLH,result__YLLH,ptr_table__2LLH;
+  __POINTER next__1LLH,result__3LLH,ptr__OVLE,ptr_table__BMLH;
+  __POINTER next__AMLH,result__CMLH,ptr_table__GMLH,next__FMLH;
+  __POINTER result__HMLH;
+  __INTEGER typ_id__1PBD,typ_id__MLLH,typ_id__TVLE;
+  __UINTEGER_32 sz__YPBD,a__WMGH,new_size__XMGH,t__1MGH,a__0MGH;
+  __UINTEGER_32 new_size__JLLH,lab_type__ILLH,sz__NLLH,a__OLLH;
+  __UINTEGER_32 new_size__PLLH,t__QLLH,a__RLLH,new_size__5LLH;
+  __UINTEGER_32 lab_type__4LLH,sz__QVLE,a__4MGH,new_size__5MGH,t__DNGH;
+  __UINTEGER_32 a__CNGH,new_size__JMLH,lab_type__IMLH;
+  __LIP_CALL *result__KLLH,*Self__SLLH,*result__NVLE,*Self__ASWE;
+  __CHARACTER type__3X4B,result__1KLH,result__4KLH;
+  __BOOLEAN result__0KLH,__tmp__JY4B,result__3KLH,__tmp__JZ4B;
+  result__1X4B=NULL;
+  type__3X4B='\0';
+  nam__4X4B=NULL;
+  result__0KLH=FALSE__;
+  if ((! read_space__XTD())) {
+    result__0KLH=FALSE__;
   } else {
-    result__VOKH='\0';
-    if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-      result__VOKH=((__CHARACTER )(( 0)));
+    result__1KLH='\0';
+    if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+      result__1KLH=((__CHARACTER )(( 0)));
     } else {
-      result__VOKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+      result__1KLH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
     };
-    if ((result__VOKH == '-')) {
+    if ((result__1KLH == '-')) {
       position__CCC=(__INTEGER)(position__CCC +  1);
-      result__UOKH=TRUE__;
+      result__0KLH=TRUE__;
     };
   };
-  if (result__UOKH) {
-    __tmp__214B=TRUE__;
+  if (result__0KLH) {
+    __tmp__JY4B=TRUE__;
   } else {
-    result__XOKH=FALSE__;
-    if ((! read_space__MTD())) {
-      result__XOKH=FALSE__;
+    result__3KLH=FALSE__;
+    if ((! read_space__XTD())) {
+      result__3KLH=FALSE__;
     } else {
-      result__YOKH='\0';
-      if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__YOKH=((__CHARACTER )(( 0)));
+      result__4KLH='\0';
+      if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+        result__4KLH=((__CHARACTER )(( 0)));
       } else {
-        result__YOKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+        result__4KLH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__YOKH == '!')) {
+      if ((result__4KLH == '!')) {
         position__CCC=(__INTEGER)(position__CCC +  1);
-        result__XOKH=TRUE__;
+        result__3KLH=TRUE__;
       };
     };
-    __tmp__214B=result__XOKH;
+    __tmp__JY4B=result__3KLH;
   };
-  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)) {
+  if (__tmp__JY4B) {
+    result__1X4B=readlip_expr_unary__YX4B(Self__ZX4B);
+    if (((void *)result__1X4B == (void *)NULL)) {
+      pos__FC1G=current_position__B0F();
+      put_error__text__1PG( 0,(&__string_239));
+      put_position__FRG(pos__FC1G);
+      put_string__33F(msg_err__AQG);
+      if ((type_error__5PG !=  2)) {
         exit(( 1));
       };
     };
-    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)));
+    if (result__0KLH) {
+      type__3X4B='-';
+    } else {
+      type__3X4B='!';
+    };
+    p__XA0C=current_position__B0F();
+    result__VPBD=NULL;
+    ptr__WPBD=((__POINTER )(NULL));
+    typ_id__1PBD= 0;
+    sz__YPBD=((__UINTEGER_32 )sizeof(__LIP_UNARY));
+    if ((sz__YPBD ==  0)) {
+      result__VPBD=LIP_UNARY__;
+    } else {
+      typ_id__1PBD=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__YPBD);
+      if ((typ_id__1PBD == (__INTEGER)(-  1))) {
+        a__WMGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__XMGH=(__UINTEGER_32)((__UINTEGER_32)(sz__YPBD + a__WMGH) & (__UINTEGER_32)(~ a__WMGH));
+        ptr_table__BLLH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__XMGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__ALLH=((__POINTER )(NULL));
+        result__CLLH=((__POINTER *)ptr_table__BLLH)[ 0];
+        if ((result__CLLH == (void *)NULL)) {
+          result__CLLH=new_lab__RTJ(new_size__XMGH);
+          next__ALLH=(void *)((unsigned long)result__CLLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XMGH)));
+          ((__POINTER *)next__ALLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__BLLH)[ 0]=next__ALLH;
+        } else {
+          next__ALLH=((__POINTER *)result__CLLH)[ 0];
+          if ((next__ALLH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__CLLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__XMGH <<  1)) <=  4096)) {
+              next__ALLH=(void *)((unsigned long)result__CLLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XMGH)));
             } else {
-              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)));
+              next__ALLH=new_lab__RTJ(new_size__XMGH);
+            };
+            ((__POINTER *)next__ALLH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__BLLH)[ 0]=next__ALLH;
+          } else {
+            ((__POINTER *)result__CLLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ALLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__CLLH=next__ALLH;
+          };
+        };
+        ptr__WPBD=result__CLLH;
+      } else {
+        t__1MGH=((__UINTEGER_32 )typ_id__1PBD);
+        a__0MGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__JLLH=(__UINTEGER_32)((__UINTEGER_32)(sz__YPBD + a__0MGH) & (__UINTEGER_32)(~ a__0MGH));
+        ptr_table__GLLH=((__POINTER )(&(table_type[(t__1MGH)])));
+        lab_type__ILLH=(__UINTEGER_32)(t__1MGH |  1);
+        next__FLLH=((__POINTER )(NULL));
+        result__HLLH=((__POINTER *)ptr_table__GLLH)[ 0];
+        if ((result__HLLH == (void *)NULL)) {
+          result__HLLH=new_lab__RTJ(lab_type__ILLH);
+          next__FLLH=(void *)((unsigned long)result__HLLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JLLH)));
+          ((__POINTER *)next__FLLH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__GLLH)[ 0]=next__FLLH;
+        } else {
+          next__FLLH=((__POINTER *)result__HLLH)[ 0];
+          if ((next__FLLH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HLLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__JLLH <<  1)) <=  4096)) {
+              next__FLLH=(void *)((unsigned long)result__HLLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JLLH)));
             } else {
-              next__5OKH=new_lab__FTJ(lab_type__CPKH);
+              next__FLLH=new_lab__RTJ(lab_type__ILLH);
             };
-            ((__POINTER *)next__5OKH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__APKH)[ 0]=next__5OKH;
+            ((__POINTER *)next__FLLH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__GLLH)[ 0]=next__FLLH;
           } else {
-            ((__POINTER *)result__BPKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5OKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__BPKH=next__5OKH;
+            ((__POINTER *)result__HLLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FLLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__HLLH=next__FLLH;
           };
         };
-        ptr__2SBD=result__BPKH;
+        ptr__WPBD=result__HLLH;
       };
-      result__1SBD=((__LIP_UNARY *)ptr__2SBD);
-      *(result__1SBD) = *(LIP_UNARY__);
+      result__VPBD=((__LIP_UNARY *)ptr__WPBD);
+      *(result__VPBD) = *(LIP_UNARY__);
     };
-    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__;
+    Self__3KSD=((__LIP_UNARY *)result__VPBD);
+    Self__3KSD->parent_lip_code__FZ4B.parent_itm_object__XFE.position__SFJ=p__XA0C;
+    Self__3KSD->operator__J5QD=type__3X4B;
+    Self__3KSD->value__G5QD=result__1X4B;
+    result__1X4B=result__VPBD;
+    __tmp__JZ4B=TRUE__;
   } else {
-    __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__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)));
+    __tmp__JZ4B=FALSE__;
+  };
+  if ((! __tmp__JZ4B)) {
+    if (read_identifier__2BL()) {
+      nam__4X4B=last_string__D2C;
+      result__XGFE=NULL;
+      if (read_identifier__2BL()) {
+        p__TLLH=current_position__B0F();
+        n__ULLH=last_string__D2C;
+        result__KLLH=NULL;
+        ptr__LLLH=((__POINTER )(NULL));
+        typ_id__MLLH= 0;
+        sz__NLLH=((__UINTEGER_32 )sizeof(__LIP_CALL));
+        if ((sz__NLLH ==  0)) {
+          result__KLLH=LIP_CALL__;
+        } else {
+          typ_id__MLLH=-1;
+          clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__NLLH);
+          if ((typ_id__MLLH == (__INTEGER)(-  1))) {
+            a__OLLH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__PLLH=(__UINTEGER_32)((__UINTEGER_32)(sz__NLLH + a__OLLH) & (__UINTEGER_32)(~ a__OLLH));
+            ptr_table__XLLH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__PLLH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__WLLH=((__POINTER )(NULL));
+            result__YLLH=((__POINTER *)ptr_table__XLLH)[ 0];
+            if ((result__YLLH == (void *)NULL)) {
+              result__YLLH=new_lab__RTJ(new_size__PLLH);
+              next__WLLH=(void *)((unsigned long)result__YLLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PLLH)));
+              ((__POINTER *)next__WLLH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__XLLH)[ 0]=next__WLLH;
+            } else {
+              next__WLLH=((__POINTER *)result__YLLH)[ 0];
+              if ((next__WLLH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YLLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__PLLH <<  1)) <=  4096)) {
+                  next__WLLH=(void *)((unsigned long)result__YLLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PLLH)));
                 } else {
-                  next__QPKH=new_lab__FTJ(new_size__JPKH);
+                  next__WLLH=new_lab__RTJ(new_size__PLLH);
                 };
-                ((__POINTER *)next__QPKH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__RPKH)[ 0]=next__QPKH;
+                ((__POINTER *)next__WLLH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__XLLH)[ 0]=next__WLLH;
               } else {
-                ((__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__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)));
+                ((__POINTER *)result__YLLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WLLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__YLLH=next__WLLH;
+              };
+            };
+            ptr__LLLH=result__YLLH;
+          } else {
+            t__QLLH=((__UINTEGER_32 )typ_id__MLLH);
+            a__RLLH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__5LLH=(__UINTEGER_32)((__UINTEGER_32)(sz__NLLH + a__RLLH) & (__UINTEGER_32)(~ a__RLLH));
+            ptr_table__2LLH=((__POINTER )(&(table_type[(t__QLLH)])));
+            lab_type__4LLH=(__UINTEGER_32)(t__QLLH |  1);
+            next__1LLH=((__POINTER )(NULL));
+            result__3LLH=((__POINTER *)ptr_table__2LLH)[ 0];
+            if ((result__3LLH == (void *)NULL)) {
+              result__3LLH=new_lab__RTJ(lab_type__4LLH);
+              next__1LLH=(void *)((unsigned long)result__3LLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5LLH)));
+              ((__POINTER *)next__1LLH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__2LLH)[ 0]=next__1LLH;
+            } else {
+              next__1LLH=((__POINTER *)result__3LLH)[ 0];
+              if ((next__1LLH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__3LLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__5LLH <<  1)) <=  4096)) {
+                  next__1LLH=(void *)((unsigned long)result__3LLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5LLH)));
                 } else {
-                  next__VPKH=new_lab__FTJ(lab_type__YPKH);
+                  next__1LLH=new_lab__RTJ(lab_type__4LLH);
                 };
-                ((__POINTER *)next__VPKH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__WPKH)[ 0]=next__VPKH;
+                ((__POINTER *)next__1LLH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__2LLH)[ 0]=next__1LLH;
               } else {
-                ((__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)));
+                ((__POINTER *)result__3LLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1LLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__3LLH=next__1LLH;
+              };
+            };
+            ptr__LLLH=result__3LLH;
+          };
+          result__KLLH=((__LIP_CALL *)ptr__LLLH);
+          *(result__KLLH) = *(LIP_CALL__);
+        };
+        Self__SLLH=((__LIP_CALL *)result__KLLH);
+        Self__SLLH->parent_lip_code__XZ4B.parent_itm_object__XFE.position__SFJ=p__TLLH;
+        Self__SLLH->name__JRUE=n__ULLH;
+        Self__SLLH->argument__4QUE=NULL;
+        result__XGFE=result__KLLH;
+      } else {
+        result__XGFE=readlip_expr_base__QHFE(Self__ZX4B);
+      };
+      p__KHFE=current_position__B0F();
+      result__NVLE=NULL;
+      ptr__OVLE=((__POINTER )(NULL));
+      typ_id__TVLE= 0;
+      sz__QVLE=((__UINTEGER_32 )sizeof(__LIP_CALL));
+      if ((sz__QVLE ==  0)) {
+        result__NVLE=LIP_CALL__;
+      } else {
+        typ_id__TVLE=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__QVLE);
+        if ((typ_id__TVLE == (__INTEGER)(-  1))) {
+          a__4MGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__5MGH=(__UINTEGER_32)((__UINTEGER_32)(sz__QVLE + a__4MGH) & (__UINTEGER_32)(~ a__4MGH));
+          ptr_table__BMLH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__5MGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__AMLH=((__POINTER )(NULL));
+          result__CMLH=((__POINTER *)ptr_table__BMLH)[ 0];
+          if ((result__CMLH == (void *)NULL)) {
+            result__CMLH=new_lab__RTJ(new_size__5MGH);
+            next__AMLH=(void *)((unsigned long)result__CMLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5MGH)));
+            ((__POINTER *)next__AMLH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__BMLH)[ 0]=next__AMLH;
+          } else {
+            next__AMLH=((__POINTER *)result__CMLH)[ 0];
+            if ((next__AMLH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__CMLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__5MGH <<  1)) <=  4096)) {
+                next__AMLH=(void *)((unsigned long)result__CMLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5MGH)));
               } else {
-                next__0PKH=new_lab__FTJ(new_size__0DHH);
-              };
-              ((__POINTER *)next__0PKH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__1PKH)[ 0]=next__0PKH;
-            } else {
-              ((__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)));
+                next__AMLH=new_lab__RTJ(new_size__5MGH);
+              };
+              ((__POINTER *)next__AMLH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__BMLH)[ 0]=next__AMLH;
+            } else {
+              ((__POINTER *)result__CMLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__AMLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__CMLH=next__AMLH;
+            };
+          };
+          ptr__OVLE=result__CMLH;
+        } else {
+          t__DNGH=((__UINTEGER_32 )typ_id__TVLE);
+          a__CNGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__JMLH=(__UINTEGER_32)((__UINTEGER_32)(sz__QVLE + a__CNGH) & (__UINTEGER_32)(~ a__CNGH));
+          ptr_table__GMLH=((__POINTER )(&(table_type[(t__DNGH)])));
+          lab_type__IMLH=(__UINTEGER_32)(t__DNGH |  1);
+          next__FMLH=((__POINTER )(NULL));
+          result__HMLH=((__POINTER *)ptr_table__GMLH)[ 0];
+          if ((result__HMLH == (void *)NULL)) {
+            result__HMLH=new_lab__RTJ(lab_type__IMLH);
+            next__FMLH=(void *)((unsigned long)result__HMLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JMLH)));
+            ((__POINTER *)next__FMLH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__GMLH)[ 0]=next__FMLH;
+          } else {
+            next__FMLH=((__POINTER *)result__HMLH)[ 0];
+            if ((next__FMLH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HMLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__JMLH <<  1)) <=  4096)) {
+                next__FMLH=(void *)((unsigned long)result__HMLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JMLH)));
               } else {
-                next__5PKH=new_lab__FTJ(lab_type__CQKH);
+                next__FMLH=new_lab__RTJ(lab_type__IMLH);
               };
-              ((__POINTER *)next__5PKH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__AQKH)[ 0]=next__5PKH;
+              ((__POINTER *)next__FMLH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__GMLH)[ 0]=next__FMLH;
             } else {
-              ((__POINTER *)result__BQKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5PKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__BQKH=next__5PKH;
+              ((__POINTER *)result__HMLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FMLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__HMLH=next__FMLH;
             };
           };
-          ptr__IVLE=result__BQKH;
+          ptr__OVLE=result__HMLH;
         };
-        result__HVLE=((__LIP_CALL *)ptr__IVLE);
-        *(result__HVLE) = *(LIP_CALL__);
+        result__NVLE=((__LIP_CALL *)ptr__OVLE);
+        *(result__NVLE) = *(LIP_CALL__);
       };
-      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;
+      Self__ASWE=((__LIP_CALL *)result__NVLE);
+      Self__ASWE->parent_lip_code__XZ4B.parent_itm_object__XFE.position__SFJ=p__KHFE;
+      Self__ASWE->name__JRUE=nam__4X4B;
+      Self__ASWE->argument__4QUE=result__XGFE;
+      result__1X4B=result__NVLE;
     } else {
-      result__O14B=readlip_expr_base__BHFE(Self__M14B);
+      result__1X4B=readlip_expr_base__QHFE(Self__ZX4B);
     };
   };
-  return(result__O14B);
+  return(result__1X4B);
 }
 
-static void* readlip_expr_base__BHFE(__PARSER *Self__CHFE)
+static void* readlip_expr_base__QHFE(__PARSER *Self__RHFE)
 // ({PARSER}) With resultNo recursive, No inlinable.
 {
-  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__;
+  void *result__THFE;
+  __POSITION pos__VC1G,pos__XC1G,pos__ZC1G,p__KBSE;
+  void *result__KZPE;
+  __LIP_VALUE *result__ZZSE,*Self__UGXE;
+  __POINTER ptr__0ZSE,ptr_table__RMLH,next__QMLH,result__SMLH;
+  __POINTER ptr_table__WMLH,next__VMLH,result__XMLH;
+  __INTEGER typ_id__5ZSE;
+  __UINTEGER_32 sz__2ZSE,a__GNGH,new_size__HNGH,t__LNGH,a__KNGH;
+  __UINTEGER_32 new_size__ZMLH,lab_type__YMLH;
+  __BOOLEAN result__KMLH,result__NMLH,__tmp__XZPE,__tmp__H0PE;
+  __BOOLEAN result__RWQE,__tmp__20PE;
+  __CHARACTER result__LMLH,result__OMLH;
+  result__THFE=NULL;
+  result__KMLH=FALSE__;
+  if ((! read_space__XTD())) {
+    result__KMLH=FALSE__;
   } else {
-    result__FQKH='\0';
-    if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-      result__FQKH=((__CHARACTER )(( 0)));
+    result__LMLH='\0';
+    if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+      result__LMLH=((__CHARACTER )(( 0)));
     } else {
-      result__FQKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+      result__LMLH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
     };
-    if ((result__FQKH == '(')) {
+    if ((result__LMLH == '(')) {
       position__CCC=(__INTEGER)(position__CCC +  1);
-      result__EQKH=TRUE__;
+      result__KMLH=TRUE__;
     };
   };
-  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)) {
+  if (result__KMLH) {
+    result__THFE=readlip_expr_operator__GMZB(Self__RHFE);
+    if (((void *)result__THFE == (void *)NULL)) {
+      pos__VC1G=current_position__B0F();
+      put_error__text__1PG( 0,(&__string_239));
+      put_position__FRG(pos__VC1G);
+      put_string__33F(msg_err__AQG);
+      if ((type_error__5PG !=  2)) {
         exit(( 1));
       };
     };
-    result__HQKH=FALSE__;
-    if ((! read_space__MTD())) {
-      result__HQKH=FALSE__;
+    result__NMLH=FALSE__;
+    if ((! read_space__XTD())) {
+      result__NMLH=FALSE__;
     } else {
-      result__IQKH='\0';
-      if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__IQKH=((__CHARACTER )(( 0)));
+      result__OMLH='\0';
+      if ((position__CCC > ((__STRING *)source__5BC)->count__SGC)) {
+        result__OMLH=((__CHARACTER )(( 0)));
       } else {
-        result__IQKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__RCS)[(__INTEGER)(position__CCC -  1)];
+        result__OMLH=((__CHARACTER *)((__STRING *)source__5BC)->storage__3CS)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__IQKH == ')')) {
+      if ((result__OMLH == ')')) {
         position__CCC=(__INTEGER)(position__CCC +  1);
-        result__HQKH=TRUE__;
+        result__NMLH=TRUE__;
       };
     };
-    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)) {
+    if ((! result__NMLH)) {
+      pos__XC1G=current_position__B0F();
+      put_error__text__1PG( 2,(&__string_237));
+      put_position__FRG(pos__XC1G);
+      put_string__33F(msg_err__AQG);
+      if ((type_error__5PG !=  2)) {
         exit(( 1));
       };
     };
   } else {
-    result__1YPE=NULL;
-    if (read_integer__Q2P()) {
-      result__1YPE=get__5XSE(LIP_INTEGER__,((__INTEGER )last_integer__JSO));
-      __tmp__IZPE=TRUE__;
+    result__KZPE=NULL;
+    if (read_integer__22P()) {
+      result__KZPE=get__UYSE(LIP_INTEGER__,((__INTEGER )last_integer__VSO));
+      __tmp__XZPE=TRUE__;
     } else {
-      __tmp__IZPE=FALSE__;
+      __tmp__XZPE=FALSE__;
     };
-    if (__tmp__IZPE) {
-      __tmp__YZPE=TRUE__;
+    if (__tmp__XZPE) {
+      __tmp__H0PE=TRUE__;
     } else {
-      result__2VQE=read_string__1FQ();
-      if (result__2VQE) {
-        result__1YPE=get__M3FF(LIP_STRING__,last_string__V1C);
+      result__RWQE=read_string__HGQ();
+      if (result__RWQE) {
+        result__KZPE=get__34FF(LIP_STRING__,last_string__D2C);
       };
-      __tmp__YZPE=result__2VQE;
+      __tmp__H0PE=result__RWQE;
     };
-    if ((! __tmp__YZPE)) {
-      if (read_cap_identifier__B1J()) {
-        if (((void *)last_string__V1C == (void *)(&__string_42))) {
-          result__1YPE=true__FXLF;
-          __tmp__N0PE=TRUE__;
+    if ((! __tmp__H0PE)) {
+      if (read_cap_identifier__N1J()) {
+        if (((void *)last_string__D2C == (void *)(&__string_42))) {
+          result__KZPE=true__5YLF;
+          __tmp__20PE=TRUE__;
         } else {
-          __tmp__N0PE=FALSE__;
+          __tmp__20PE=FALSE__;
         };
-        if ((! __tmp__N0PE)) {
-          if (((void *)last_string__V1C == (void *)(&__string_43))) {
-            result__1YPE=LIP_BOOLEAN__;
+        if ((! __tmp__20PE)) {
+          if (((void *)last_string__D2C == (void *)(&__string_43))) {
+            result__KZPE=LIP_BOOLEAN__;
           } else {
-            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)) {
+            pos__ZC1G=current_position__B0F();
+            put_error__text__1PG( 0,(&__string_334));
+            put_position__FRG(pos__ZC1G);
+            put_string__33F(msg_err__AQG);
+            if ((type_error__5PG !=  2)) {
               exit(( 1));
             };
           };
         };
       };
     };
-    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)));
+    if (((void *)result__KZPE != (void *)NULL)) {
+      p__KBSE=current_position__B0F();
+      result__ZZSE=NULL;
+      ptr__0ZSE=((__POINTER )(NULL));
+      typ_id__5ZSE= 0;
+      sz__2ZSE=((__UINTEGER_32 )sizeof(__LIP_VALUE));
+      if ((sz__2ZSE ==  0)) {
+        result__ZZSE=LIP_VALUE__;
+      } else {
+        typ_id__5ZSE=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__2ZSE);
+        if ((typ_id__5ZSE == (__INTEGER)(-  1))) {
+          a__GNGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__HNGH=(__UINTEGER_32)((__UINTEGER_32)(sz__2ZSE + a__GNGH) & (__UINTEGER_32)(~ a__GNGH));
+          ptr_table__RMLH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__HNGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__QMLH=((__POINTER )(NULL));
+          result__SMLH=((__POINTER *)ptr_table__RMLH)[ 0];
+          if ((result__SMLH == (void *)NULL)) {
+            result__SMLH=new_lab__RTJ(new_size__HNGH);
+            next__QMLH=(void *)((unsigned long)result__SMLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HNGH)));
+            ((__POINTER *)next__QMLH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__RMLH)[ 0]=next__QMLH;
+          } else {
+            next__QMLH=((__POINTER *)result__SMLH)[ 0];
+            if ((next__QMLH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__SMLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__HNGH <<  1)) <=  4096)) {
+                next__QMLH=(void *)((unsigned long)result__SMLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HNGH)));
               } else {
-                next__KQKH=new_lab__FTJ(new_size__CEHH);
-              };
-              ((__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__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)));
+                next__QMLH=new_lab__RTJ(new_size__HNGH);
+              };
+              ((__POINTER *)next__QMLH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__RMLH)[ 0]=next__QMLH;
+            } else {
+              ((__POINTER *)result__SMLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QMLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__SMLH=next__QMLH;
+            };
+          };
+          ptr__0ZSE=result__SMLH;
+        } else {
+          t__LNGH=((__UINTEGER_32 )typ_id__5ZSE);
+          a__KNGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__ZMLH=(__UINTEGER_32)((__UINTEGER_32)(sz__2ZSE + a__KNGH) & (__UINTEGER_32)(~ a__KNGH));
+          ptr_table__WMLH=((__POINTER )(&(table_type[(t__LNGH)])));
+          lab_type__YMLH=(__UINTEGER_32)(t__LNGH |  1);
+          next__VMLH=((__POINTER )(NULL));
+          result__XMLH=((__POINTER *)ptr_table__WMLH)[ 0];
+          if ((result__XMLH == (void *)NULL)) {
+            result__XMLH=new_lab__RTJ(lab_type__YMLH);
+            next__VMLH=(void *)((unsigned long)result__XMLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZMLH)));
+            ((__POINTER *)next__VMLH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__WMLH)[ 0]=next__VMLH;
+          } else {
+            next__VMLH=((__POINTER *)result__XMLH)[ 0];
+            if ((next__VMLH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XMLH - (unsigned long)begin_memory__4XH)))) &  4095) + (__UINTEGER_32)(new_size__ZMLH <<  1)) <=  4096)) {
+                next__VMLH=(void *)((unsigned long)result__XMLH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZMLH)));
               } else {
-                next__PQKH=new_lab__FTJ(lab_type__SQKH);
+                next__VMLH=new_lab__RTJ(lab_type__YMLH);
               };
-              ((__POINTER *)next__PQKH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__QQKH)[ 0]=next__PQKH;
+              ((__POINTER *)next__VMLH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__WMLH)[ 0]=next__VMLH;
             } else {
-              ((__POINTER *)result__RQKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PQKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__RQKH=next__PQKH;
+              ((__POINTER *)result__XMLH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VMLH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__XMLH=next__VMLH;
             };
           };
-          ptr__FZSE=result__RQKH;
+          ptr__0ZSE=result__XMLH;
         };
-        result__EZSE=((__LIP_VALUE *)ptr__FZSE);
-        *(result__EZSE) = *(LIP_VALUE__);
+        result__ZZSE=((__LIP_VALUE *)ptr__0ZSE);
+        *(result__ZZSE) = *(LIP_VALUE__);
       };
-      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;
+      Self__UGXE=((__LIP_VALUE *)result__ZZSE);
+      Self__UGXE->parent_lip_code__1IFE.parent_itm_object__XFE.position__SFJ=p__KBSE;
+      Self__UGXE->value__I1UE=result__KZPE;
+      result__THFE=result__ZZSE;
     };
   };
-  return(result__EHFE);
+  return(result__THFE);
 }
 
 //==========================//
diff --git a/shorter/javadoc.li b/shorter/belinda.li
similarity index 100%
rename from shorter/javadoc.li
rename to shorter/belinda.li
diff --git a/src/parser.li b/src/parser.li
index 981d1de..64aa456 100644
--- a/src/parser.li
+++ b/src/parser.li
@@ -252,8 +252,11 @@ 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;
+            // BSBS: A revoir ...            
+            ((pos2-2+short_derive).in_range (output_code.lower) to (output_code.upper)).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;
diff --git a/src/shorter.li b/src/shorter.li
index fc721f5..433919e 100644
--- a/src/shorter.li
+++ b/src/shorter.li
@@ -29,15 +29,7 @@ Section Header
   - author      := "Matthieu Brehier, Sonntag Benoit (bsonntag at loria.fr)";
   - comment     := "Shorter source code.";
   
-  - external := 
-`
-#include "path.h"
-struct BLOCK_struct {
-  int __id;
-  void *self;
-};
-#define BLOCK_struct BLOCK_struct_bug
-`;
+  - external := `#include "path.h"`;
   
 Section Inherit
   
@@ -105,7 +97,7 @@ Section Private
   \    shorter -r -f html ~/lisaac/lib                         \n\
   \                                                            \n\
   \  * Build html documentation style JavaDoc:                 \n\
-  \    shorter -d -f javadoc ~/lisaac/lib                         \n\
+  \    shorter -d -f belinda ~/lisaac/lib                      \n\
   \                                                            \n\
   \Bug report:                                                 \n\
   \            post in : https://gna.org/bugs/?group=isaac     \n\
@@ -237,15 +229,19 @@ Section Private
   ( + file:STD_FILE;
     + entry:ENTRY;
     
-    (output_name != NULL).if {
-      string_tmp.copy output_name;
-      ((string_tmp.last != '/') || {string_tmp.last != '\\'}).if {
-	string_tmp.add_last '/';
+    (is_short_recursive).if {
+      (output_name != NULL).if {
+        string_tmp.copy output_name;
+        ((string_tmp.last != '/') || {string_tmp.last != '\\'}).if {
+          string_tmp.add_last '/';
+        };
+      } else {
+        string_tmp.clear;
       };
+      string_tmp.append n;
     } else {
-      string_tmp.clear;
+      string_tmp.copy output_name;
     };
-    string_tmp.append n;
     entry := FILE_SYSTEM.make_file string_tmp;
     (entry = NULL).if {
       STD_ERROR.put_string "Error: File ";
@@ -451,8 +447,7 @@ Section Public
             
       (output_name = NULL).if {
 	output_name := add_ext (proto_input.name);
-      };
-      
+      };    
       save_file output_name with output_code;	
     };
     (is_shorter2).if {

-- 
Lisaac compiler



More information about the Lisaac-commits mailing list